home *** CD-ROM | disk | FTP | other *** search
/ Fish 'n' More 2 / fishmore-publicdomainlibraryvol.ii1991xetec.iso / dirs / cross_464.lzh / Cross / txt / FileReq.def < prev    next >
Text File  |  1991-03-09  |  474b  |  25 lines
  1. DEFINITION MODULE FileReq;
  2.  
  3.  
  4. FROM ARP IMPORT FileRequester;
  5. FROM SYSTEM IMPORT ADDRESS;
  6.  
  7.  
  8. TYPE FileString=ARRAY[0..256] OF CHAR;
  9.      FileRequestData=
  10.       RECORD
  11.        fr: FileRequester;
  12.        h,f,d: FileString;
  13.       END;
  14.  
  15.  
  16. PROCEDURE MakeFRD(    header,deffile,defdir: FileString;
  17.                       reqwindow: ADDRESS;
  18.                   VAR frd: FileRequestData);
  19.  
  20. PROCEDURE FileReq(VAR frd: FileRequestData;
  21.                   VAR name: FileString);
  22.  
  23.  
  24. END FileReq.
  25.