/packages/amunits/src/coreunits/romboot_base.pas

 1{
 2    This file is part of the Free Pascal run time library.
 3
 4    A file in Amiga system run time library.
 5    Copyright (c) 1998 by Nils Sjoholm
 6    member of the Amiga RTL development team.
 7
 8    See the file COPYING.FPC, included in this distribution,
 9    for details about the copyright.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
14
15 **********************************************************************}
16
17unit romboot_base;
18
19INTERFACE
20
21uses exec;
22
23Type
24
25    pRomBootBase = ^tRomBootBase;
26    tRomBootBase = record
27        LibNode         : tLibrary;
28        ExecBase        : pExecBase;
29        BootList        : tList;
30        Reserved        : Array [0..3] of Longint;
31                                { for future expansion }
32    end;
33
34Const
35
36    ROMBOOT_NAME : PChar = 'romboot.library';
37
38IMPLEMENTATION
39
40end.