const type: upperFile

File implementation type which turns characters to upper case. All data that is written to a upperFile is converted to upper case and forwarded to the destFile. All functions that read from upperFile read from destFile instead and deliver the data after converting it to upper case.

const func file: openUpper (in file: destFile)

Open a filter file which turns characters to upper case. All data that is written to a upperFile is converted to upper case and forwarded to the destFile. E.g.:

upperOutput := openUpper(OUT);
repeat
  write("Enter sentence: ");
  flush(OUT);
  readln(sentence);
  writeln(upperOutput, sentence);
until sentence = "";

All functions that read from upperFile read from destFile instead and deliver the data after converting it to upper case. This can be used to allow upper and lower case commands:

KEYBOARD := openUpper(KEYBOARD);
repeat
  write("command: ");
  flush(OUT);
  command := getc(KEYBOARD);
  writeln;
  ...
until command = 'Q';

Parameters:

destFile - File to which data is written or from which data is read.

Returns:

the upperFile opened.

const proc: write (inout upperFile: outFile, in string: stri)

Write the string stri to outFile. The characters are converted to upper case, before they are written.

const proc: writeln (inout upperFile: outFile)

Write end-of-line to outFile.

const proc: writeln (inout upperFile: outFile, in string: stri)

Write a string followed by end-of-line to outFile. The characters are converted to upper case, before they are written.

const func string: gets (inout upperFile: inFile, in integer: maxLength)

Read a string with a maximum length from a file. The characters read are converted to upper case.

Returns:

the string read and converted to upper case.

Raises:

RANGE_ERROR - The parameter maxLength is negative.