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-2002 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 {
17     History:
18 
19     Typo in ExpansionBase Record.
20     11 Nov. 2002
21 
22     nils.sjoholm@mailbox.swipnet.se
23 }
24 
25 
26 unit expansionbase;
27 
28 INTERFACE
29 
30 uses exec, configvars;
31 
32 Const
33 
34     TOTALSLOTS  = 256;
35 
36 Type
37 
38 { BootNodes are scanned by dos.library at startup.  Items found on the
39    list are started by dos. BootNodes are added with the AddDosNode() or
40    the V36 AddBootNode() calls. }
41 
42    pBootNode = ^tBootNode;
43    tBootNode = record
44     bn_Node     : tNode;
45     bn_Flags    : Word;
46     bn_DeviceNode  : Pointer;
47    END;
48 
49     pExpansionBase = ^tExpansionBase;
50     tExpansionBase = record
51         LibNode         : tLibrary;
52         Flags           : Byte;
53         eb_Private01    : Byte;
54         eb_Private02    : ULONG;
55         eb_Private03    : ULONG;
56         eb_Private04    : tCurrentBinding;
57         eb_Private05    : tList;
58         MountList       : tList;
59         { private }
60     end;
61 
62 CONST
63 { error codes }
64      EE_OK          = 0 ;
65      EE_LASTBOARD   = 40;  { could not shut him up }
66      EE_NOEXPANSION = 41;  { not enough expansion mem; board shut up }
67      EE_NOMEMORY    = 42;  { not enough normal memory }
68      EE_NOBOARD     = 43;  { no board at that address }
69      EE_BADMEM      = 44;  { tried to add bad memory card }
70 
71 { Flags }
72      EBB_CLOGGED    = 0;       { someone could not be shutup }
73      EBF_CLOGGED    = 1;
74      EBB_SHORTMEM   = 1;       { ran out of expansion mem }
75      EBF_SHORTMEM   = 2;
76      EBB_BADMEM     = 2;       { tried to add bad memory card }
77      EBF_BADMEM     = 4;
78      EBB_DOSFLAG    = 3;       { reserved for use by AmigaDOS }
79      EBF_DOSFLAG    = 8;
80      EBB_KICKBACK33 = 4;       { reserved for use by AmigaDOS }
81      EBF_KICKBACK33 = 16;
82      EBB_KICKBACK36 = 5;       { reserved for use by AmigaDOS }
83      EBF_KICKBACK36 = 32;
84 { If the following flag is set by a floppy's bootblock code, the initial
85    open of the initial shell window will be delayed until the first output
86    to that shell.  Otherwise the 1.3 compatible behavior applies. }
87      EBB_SILENTSTART = 6;
88      EBF_SILENTSTART = 64;
89 
90 { Magic kludge for CC0 use }
91     EBB_START_CC0    = 7;
92     EBF_START_CC0    = 128;
93 
94 IMPLEMENTATION
95 
96 end.
97