home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL2.DMS / in.adf / INCLUDE / libraries / configvars.h < prev    next >
Encoding:
Text File  |  1994-07-25  |  1.1 KB  |  45 lines
  1. {$if not def LIBRARIES_CONFIGVARS_H} CONST LIBRARIES_CONFIGVARS_H=0;
  2.  
  3. { ************************************************************************
  4.   ** KickPascal-Include-Datei "libraries/configvars.h" zu Kickstart 3.0 **
  5.   ************************************************************************ }
  6.  
  7. TYPE p_CurrentBinding = ^CurrentBinding;
  8. TYPE p_ConfigDev = ^ConfigDev;
  9.  
  10. {$if not def EXEC_NODES_H;incl "exec/nodes.h";endif}
  11. {$if not def LIBRARIES_CONFIGREGS_H;incl "libraries/configregs.h";endif}
  12.  
  13. TYPE ConfigDev = RECORD
  14.  cd_Node      : Node;
  15.  cd_Flags     : Byte;
  16.  cd_Pad       : Byte;
  17.  cd_Rom       : ExpansionRom;
  18.  cd_BoardAddr : Ptr;
  19.  cd_BoardSize : Long;
  20.  cd_SlotAddr  : Word;
  21.  cd_SlotSize  : Word;
  22.  cd_Driver    : Ptr;
  23.  cd_NextCD    : p_ConfigDev;
  24.  cd_Unused    : ARRAY[0..3] Of Long;
  25. END;
  26.  
  27. CONST
  28.  CDB_SHUTUP    = 0;
  29.  CDB_CONFIGME  = 1;
  30.  CDB_BADMEMORY = 2;
  31.  
  32. CONST
  33.  CDF_SHUTUP    = $01;
  34.  CDF_CONFIGME  = $02;
  35.  CDF_BADMEMORY = $04;
  36.  
  37. TYPE CurrentBinding = RECORD
  38.  cb_ConfigDev     : p_ConfigDev;
  39.  cb_FileName      : Str;
  40.  cb_ProductString : Str;
  41.  cb_ToolTypes     : Ptr;
  42. END;
  43.  
  44. {$endif}
  45.