home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / dos / rdargs.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  806 b   |  40 lines
  1. {$if not def DOS_RDARGS_H} CONST DOS_RDARGS_H=0;
  2.  
  3. { **************************************************************
  4.   ** KickPascal-Include-Datei "dos/rdargs.h" zu Kickstart 3.0 **
  5.   ************************************************************** }
  6.  
  7. TYPE p_RDArgs = ^RDArgs;
  8. TYPE p_CSource = ^CSource;
  9.  
  10. {$if not def EXEC_NODES_H;incl "exec/nodes.h";endif}
  11.  
  12. TYPE CSource = RECORD
  13.  CS_Buffer : Str;
  14.  CS_Length : LongInt;
  15.  CS_CurChr : LongInt;
  16. END;
  17.  
  18. TYPE RDArgs = RECORD    
  19.  RDA_Source  : CSource;
  20.  RDA_DAList  : LongInt;
  21.  RDA_Buffer  : Str;
  22.  RDA_BufSiz  : LongInt;
  23.  RDA_ExtHelp : Str;
  24.  RDA_Flags   : LongInt;
  25. END;
  26.  
  27. CONST
  28.  RDAB_STDIN    = 0;
  29.  RDAF_STDIN    = 1;
  30.  RDAB_NOALLOC  = 1;
  31.  RDAF_NOALLOC  = 2;
  32.  RDAB_NOPROMPT = 2;
  33.  RDAF_NOPROMPT = 4;
  34.  
  35. CONST MAX_TEMPLATE_ITEMS = 100;
  36.  
  37. CONST MAX_MULTIARGS = 128;
  38.  
  39. {$endif}
  40.