
DEFINITION MODULE PRFILES;

FROM FIOR IMPORT ExtStr;

VAR Comments : BOOLEAN;

  PROCEDURE ReadFileNames (VAR source,dest : ARRAY OF CHAR);

  PROCEDURE SearchFirst (VAR name : ARRAY OF CHAR) : BOOLEAN;

  PROCEDURE SearchNext (VAR name : ARRAY OF CHAR) : BOOLEAN;

  PROCEDURE GetExt (str : ARRAY OF CHAR;
                    VAR ext : ExtStr);

END PRFILES.