MODULE GPTextFiles; IMPORT RTS, GPFiles; TYPE FILE* = POINTER TO RECORD (GPFiles.FILE) END; PROCEDURE WriteEOL*(file : FILE); PROCEDURE WriteChar*(file : FILE; ch : CHAR); PROCEDURE readNChars*( file : FILE; OUT buffPtr : ARRAY OF CHAR; requestedChars : INTEGER) : INTEGER; PROCEDURE getFullPathName*(f : FILE) : GPFiles.FileNameArray; PROCEDURE readChar*(file : FILE) : CHAR; PROCEDURE openFile*(IN fileName : ARRAY OF CHAR) : FILE; PROCEDURE findLocal*(IN fileName : ARRAY OF CHAR) : FILE; PROCEDURE CloseFile*(file : FILE); PROCEDURE WriteNChars*( file : FILE; IN buffPtr : ARRAY OF CHAR; requestedChars : INTEGER); PROCEDURE openFileRO*(IN fileName : ARRAY OF CHAR) : FILE; PROCEDURE findOnPath*(IN pathName : ARRAY OF CHAR; IN fileName : ARRAY OF CHAR) : FILE; PROCEDURE createFile*(IN fileName : ARRAY OF CHAR) : FILE; PROCEDURE createPath*(IN pathName : ARRAY OF CHAR) : FILE; END GPTextFiles.