home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l217 / 2.ddi / EXAMPLES / CH19EX03.PRE < prev    next >
Encoding:
Text File  |  1990-03-26  |  450 b   |  21 lines
  1. /*
  2.    Copyright (c) 1986, 90 by Prolog Development Center
  3. */
  4. constants
  5. fattrib_normal = $40
  6. flush = 0
  7. purge = 1
  8. nofilter = 0
  9. filter = 1
  10.  
  11. err_pipeclosed = 1802
  12. err_pipebroken = 1803
  13.  
  14. domains
  15. shcom =
  16.     dir(string);        /* Request dir info.            */
  17.     direntry(string,integer,integer,integer,integer,integer,integer,real);
  18.     copy(string);        /* Request file transfer.        */
  19.     contents(string);    /* File contents.            */
  20.     eoj()            /* End of job.                */
  21.