iAPX 286 Operating System Writers Guide 1983

BINDING AND LOADI.NGPL/M-286 COMPILER 960-515 date PAGE 353 154 255 256 157 258 2DQ$READ: PROCEDURE(CONN, BUF$P, COUNT, EXCEP$P) WORD EXTERNAL;DECLARE CONN CONNECTION, COUNT WORD,(BUF$P, EXCEP$P) POINTER;END DQ$READ;DQ$CLOSE: PROCEDURE (CONN, EXCEP$P) EXTERNAL;DECLARE CONN CONNECTION, EXCEP$P POINTER;END DQ$CLOSE;/****************************************************.**//* Data */59 160 1DECLARE IN GOT·LITERALLY '0',IN=LDTLITERALLY '1',DATA W LITERALLY 'lll100i0B', /* Access rights:present~ DPL=3, expand-up, writable, data segment */DATA WD LITERALLY '111101108', /* Access rights:present, OPL=3, expand-down, writable, data segment */READLITERALLY '1',DEFAULT PRIORITY LITERALLY '4',ALLOCATED LITERALLY'80H',OKLITERALLY'0',EXCEPTION LITERALLY 'EXCEPOK';DECLARE PATH NAMELOAD-FILEACTUALEXCEPTA SK..,.S LOTDCS_SEL(47) BYTE, /*CONNECTION,WORD,WORD,SELECTOR, /*SELECTOR, /*BOND FILESPEC (*) BYTEINITIAL (11,':F1:XOS.LB2');Disk file to load */First of GOT slotsfor new task */Data or code segmentof new t~sk */61 162 1DECLAREFILE_HEADERBYTE;DECLARE MODULE HEADERSTRUCTURETOTAL-SPACEDWORD,DESCR=COUNTWORD,BUILTBYTE,DATE (8) BYTE,TIME (8) BYTE,CREATOR (41) BYTE,TSS SELWORD,DESCRP LOC DWORD, /* 0 */LODTXT-LOC DWORD, /* 1 */IGNORE-1 DWORD, /* 2 */DESNAM-LOC DWORD, /* .3 */IGNORE-2 DWORD, /* 4 */IGNORE-3 DWORD, /* 5 */IGNORE-4 DWORD, /* 6 */LAST LOC DWORD, /* 7 */RESERVED1DWORD,Figure 11-6. Binding Loader (Cont'd.)11-17 121960-001