home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / consolehandle.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  353 b   |  20 lines
  1. {$if not def CONSOLEHANDLE_H }
  2. Const
  3.   CONSOLEHANDLE_H = 4711;
  4.  
  5. { --- KickPascal-Interne Struktur --- }
  6.  
  7. Type
  8.   ConsoleHandle = Record
  9.     Link: ^Ptr;
  10.     Size: Long;
  11.     Special1, Special2: Ptr;
  12.     ReadIO: IOStdReq;
  13.     WriteIO: IOStdReq;
  14.     ReadPort: MsgPort;
  15.     WritePort: MsgPort;
  16.     Buffer, Pos, Len: Word;
  17.     Line: STRING[80]
  18.   End;
  19. {$endif}
  20.