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