home *** CD-ROM | disk | FTP | other *** search
/ AMIGA PD 1 / AMIGA-PD-1.iso / Programme_zum_Heft / Programmieren / Kurztests / PascalPCQ / Include / Libraries / RomBoot_Base.i < prev    next >
Text File  |  1990-08-28  |  563b  |  33 lines
  1. {
  2.     ROMBoot_Base.i for PCQ Pascal
  3. }
  4.  
  5.  
  6. {$I "Include:Exec/Nodes.i"}
  7. {$I "Include:Exec/Lists.i"}
  8. {$I "Include:Exec/Libraries.i"}
  9. {$I "Include:Exec/ExecBase.i"}
  10. {$I "Include:Exec/ExecName.i"}
  11.  
  12. Type
  13.  
  14.     RomBootBase = record
  15.     LibNode        : Library;
  16.     ExecBase    : ExecBasePtr;
  17.     BootList    : List;
  18.     Reserved    : Array [0..3] of Integer;
  19.                 { for future expansion }
  20.     end;
  21.     RomBootBasePtr = ^RomBootBase;
  22.  
  23.     BootNode = record
  24.     bn_Node        : Node;
  25.     bn_Flags    : Short;
  26.     bn_DeviceNode    : Address;
  27.     end;
  28.     BootNodePtr = ^BootNode;
  29.  
  30. Const
  31.  
  32.     ROMBOOT_NAME    = "romboot.library";
  33.