home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c220 / 4.ddi / LIB / SRC / FILEH.PF < prev    next >
Encoding:
Text File  |  1990-12-16  |  372 b   |  12 lines
  1. package Fileh_type type File_handle;
  2.    const
  3.       MAX_FILES = 255;  -- We store a byte in our internal tables.
  4.    type
  5.       File_handle = Int;   {DOS file handle, as returned from OPEN}
  6.    const
  7.       Null_file_handle = File_handle(-1);
  8.       System_stdin = File_handle(0);
  9.       System_stdout = File_handle(1);
  10.       System_stderr = File_handle(2);
  11.    end;
  12.