|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 17520 (0x4470)
Notes: pts_type(SC)
Names: »LDTASK.SC«
└─⟦4358b8014⟧ Bits:30009669 Philips computer tape "600124"
└─⟦this⟧ »MON10/LDTASK.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »M:DECE/LDTASK.SC«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »MON10/LDTASK.SC«
IDENT LDTASK REL 10.0 80-03-14 870105041000 * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * LDTASK = LOAD TASK * * * * ************************************************** * * * THIS MODULE CONTAINS THE LOAD TASK * FOR TOSS MEMORY MANAGEMENT SYSTEMS. * * IT CONTAINS TWO ENTRY POINTS: * * - LT:DSK USED IN DISC PAGING SYSTEMS * - LT:SWB USED IN SWAPPABLE WORK BLOCK SYSTEMS * * EJECT LDTASK * * *********** * ENTRIES * *********** * * ENTRY LT:DSK DISC PAGING ENTRY ENTRY LT:SWB SWAPPABLE WORK BLOCK ENTRY ENTRY TTABLD LOAD TASK TTAB ENTRY QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK ENTRY QLTSWB ACTIVATE LDTASK AT ENTRY LT:SWB ENTRY QLTASK ACTIVATE LDTASK ENTRY LD:ECB LDTASK ECB AREA ENTRY LD:BUF LDTASK BUFFER ENTRY LD:BUE END OF BUFFER ENTRY PQEMTY PAGE QUEUE EMPTY FLAG ENTRY LD:STB LDTASK STACK BASE EJECT LDTASK * * ************* * EXTERNALS * ************* * * EXTRN TLDS15 ENTRY IN TLDSEG EXTRN TLDS20 ENTRY IN TLDSEG EXTRN QMEXIT QUEUE TASK AND EXIT MONITOR TASK EXTRN LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR EXTRN ACTOT ACTIVATE TASK EXTRN RELPA2 RELEASE PAGE EXTRN PAGQUE FREE PAGE QUEUE EXTRN PAG:QB QUEUE LINK BACKWARDS EXTRN PAG:PA PAGE ADDRESS EXTRN PAG:SB SEGMENT BLOCK ADDRESS EXTRN SEG:FC FILE CODE EXTRN SEG:DS DISC SECTOR ADDRESS EXTRN SEG:EL SEGMENT LENGTH EXTRN SEG:PB PAGE BLOCK ADDRESS EXTRN SWB:DS DISC SECTOR ADDRESS OF FIRST COPY EXTRN SWB:EL SWB LENGTH (BYTES) EXTRN SWB:NS SWB LENGTH (SECTORS) EXTRN ECBBA ECB BUFFER ADDRESS EXTRN ECBRL ECB REQUESTED LENGTH EXTRN ECBEL ECB EFFECTIVE LENGTH EXTRN ECBRC ECB RETURN CODE EXTRN ECBCW1 ECB CONTROL WORD 1 EXTRN ECBCW2 ECB CONTROL WORD 2 EXTRN TTB:SA TTAB SAVE AREA EXTRN TTB:MT MMU TABLE EXTRN TTB:CB CURRENT SEGMENT BASE EXTRN TTB:SP SEGTAB ADDRESS * EJECT LDTASK * * EXTRN SCTIPL PROGRAM LOADING DEVICE EXTRN SCTIOE APPLICATION RESTART ADDRESS EXTRN SCTPSZ PAGE SIZE EXTRN SCTLAP LOGICAL ADDRESS OF PAGES EJECT LDTASK * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 1 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 0 * * * A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK * BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. * SWPBLK EQU 0 * EJECT LDTASK * * LDTASK ECB AND BUFFER AREAS * LD:ECB DATA 0,0,0,0,0,0,0 LDTASK ECB AREA * LD:BUF RES 128 INTERMEDIATE BUFFER FOR LOAD TASK LD:BUE EQU * END OF BUFFER * RES 4 LDTASK STACK (TWO LEVELS) LD:STB EQU *-2 LOAD TASK STACK BASE * EJECT LDTASK * * TTABLD (LOAD TASK TTAB) * IFT MMUPAG=1 RES 16 LDTASK MMU TABLE XIF * DATA 0 CURRENT SEGMENT BASE PQEMTY DATA 0 PAGE QUEUE EMPTY FLAG DATA 0 SEGMENT BLOCK ADDRESS * TTABLD EQU * TTABLD ENTRY DATA 0 DISPATCHER QUEUE LINK DATA '#L' TASK IDENTIFICATION DATA 49 PRIORITY LEVEL DATA 0 PENDING POINTER DATA /C4C0 PSW (PROGRAM STATUS WORD) DATA 0 DISPATCH ADDRESS DATA 0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14 DATA 0,0,0,0,0,0,0 DATA 2 DEVICE TABLE LENGTH * EJECT LDTASK * * ********** * LT:DSK * ********** * * * LT:DSK PERFORMS LOADING OF DISC RESIDENT SEGMENTS INTO CORE. * * INPUT: A1 = SEGMENT BLOCK ADDRESS * A3 = TTAB ADDRESS OF CALLING TASK * * LT:DSK EQU * LDTASK DISC PAGING ENTRY LDR* A2,A1 SEGMENT STATUS RF(NN) LTD:05 SEGMENT NOT LOADED IN CORE * * UPDATE MMU TABLE FOR CALLING TASK (IF MMU) AND * REMOVE PAGE FROM PAGQUE * LDR A7,A3 SAVE A3 LDR A5,A3 INH CF A15,TLDS15 LDR A5,A7 TTAB ADDRESS OF CALLING TASK ABL QMEXIT QUEUE TASK AND EXIT LDTASK * EJECT LDTASK * * NO PAGE AVAILABLE. PAUSE LDTASK UNTIL RESTARTED * BY RELPAG WHEN PAGE AVAILABLE AGAIN. * LTD:00 EQU * IM PQEMTY INDICATE PAGE QUEUE EMPTY LKM DATA 5 PAUSE LDTASK * * TAKE FIRST PAGE FROM PAGQUE * LTD:05 EQU * LD A2,PAGQUE+2 CWK A2,PAGQUE RB(E) LTD:00 NO PAGE AVAILABLE * EJECT LDTASK * * TAKE FOUND PAGE OUT OF PAGQUE * INH LD A4,PAG:QB,A2 ADDRESS TO NEXT PAGE BLOCK ST A4,PAGQUE+2 UPDATE QUEUE ANCHOR LDR* A5,A2 PAGQUE ADDRESS STR A5,A4 UPDATE QUEUE LINK FORWARD NEXT BLOCK CMR A2 RESET QUEUE LINK FORWARD THIS BLOCK LDKL A6,/4000 SEGMENT UNDER LOADING BIT LD A4,PAG:SB,A2 OLD SEGMENT BLOCK ADDRESS RF(Z) LTD:10 SCR A6,A4 RESET STATUS * LTD:10 EQU * ORRS A6,A1 INDICATE SEGMENT UNDER LOADING ST A2,SEG:PB,A1 SET NEW PAGE BLOCK ADDRESS ST A1,PAG:SB,A2 SET NEW SEGMENT BLOCK ADDRESS * IFT MMUPAG=1 * * UPDATE MMU TABLE FOR CALLING TASK AND LDTASK * LDKL A5,TTABLD LDTASK TTAB ADDRESS MS 3,TTB:SA+2,A5 SAVE A1-A3 IN TTAB SAVE AREA TL TTB:MT,A3 LOAD MMU WITH CALLING TASK TS TTB:MT,A5 STORE IN LDTASK MMU TABLE LD A1,TTB:CB,A3 CURRENT SEGMENT BASE ADDRESS ST A1,TTB:CB,A5 LDR A1,A2 LDR A3,A5 TTAB ADDRESS OF LDTASK CF A15,TLDS20 UPDATE MMU TABLE FOR LDTASK TS TTB:MT,A3 STORE NEW MMU TABLE FOR CALLING TASK XIF * EJECT LDTASK * * PREPARE FOR READING OF SEGMENT * ENB LD A4,SCTPSZ PAGE SIZE SRL A4,1 CONVERT LENGTH TO WORDS LD A6,SEG:EL,A1 SEGMENT LENGTH SRL A6,1 CONVERT LENGTH TO WORDS LDR A5,A3 TTAB ADDRESS OF CALLING TASK LDR A9,A1 SAVE SEGMENT BLOCK ADDRESS * IFT SWPBLK=1 LDR A11,A5 INDICATE DISC PAGING (A11 <> 0) XIF * LD A12,TTB:SP,A5 SEGTAB ADDRESS LD A12,SEG:FC,A12 SEGMENT DISC FILE CODE LD A3,PAG:PA,A2 PAGE ADDRESS (PHYSICAL) LD A2,SEG:DS,A1 SEGMENT DISC ADDRESS LDR* A1,A1 ANK A1,/FF * IFT MMUPAG=0 ST* A3,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE XIF * LTD:15 EQU * ENTRY USED BY LT:SWB LDK A7,/91 PHYSICAL READ * EJECT LDTASK * * SET ECB PARAMETERS * LTD:20 EQU * ENTRY USED BY LT:SWB LDKL A8,LD:ECB LD:ECB ADDRESS ST A1,ECBCW1,A8 SET SECTOR NUMBER IN ECB ST A2,ECBCW2,A8 STR A12,A8 SET DISC FILE CODE IN ECB LDR A12,A3 LDKL A14,LD:STB LDTASK STACK BASE * * CHECK IF ONE OR TWO LKM:S NECCESSARY * LDR A10,A6 ADKL A10,127 NEXT HIGHER MULTIPLE OF 128 ANKL A10,/7F80 SUR A4,A10 CHECK IF PAGE IS LARGE ENOUGH RF(NN) LTD:25 OK, JUST ONE LKM NEEDED LDR A10,A6 ANKL A10,/7F80 NEXT LOWER MULTIPLE OF 128 * LTD:25 EQU * SUR A6,A10 REMAINING LENGTH TO MOVE IN 2ND LKM ADR A10,A10 CONVERT LENGTH TO BYTES RF(Z) LTD:50 INTERMEDIATE BUFFER NEEDED ST A10,ECBRL,A8 SET REQUESTED LENGTH IN ECB * IFT MMUPAG=0 ST A3,ECBBA,A8 SET BUFFER ADDRESS XIF * EJECT LDTASK * * IFT MMUPAG=1 ECR A1,A3 * IFT SWPBLK=1 LDR A11,A11 CHECK DISC PAGING/SWB FLAG RF(NZ) LTD:30 DISC PAGING REQUEST * EJECT LDTASK * * SWB: CONVERT LOGICAL ADDRESS TO PHYSICAL * SRL A1,3 ANK A1,/1E MMUTAB INDEX (5 BITS) ADR A1,A5 ADD TTAB ADDRESS LC A1,TTB:MT,A1 PHYSICAL PAGE ADDRESS LDR A2,A1 ANK A2,/3C SRC A2,6 ANKL A3,/FFF ORR A3,A2 RF LTD:40 XIF * LTD:30 EQU * IFT MMUPAG=1 * * SEGMENT: CONVERT PHYSICAL ADDRESS TO LOGICAL * SLL A3,2 LDR A12,A3 ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL OR A12,SCTLAP * LTD:40 EQU * ST A3,ECBBA,A8 SET BUFFER ADDRESS SRL A1,2 ANK A1,/30 SCR A1,A8 XIF * CF A14,LTD:90 READ/WRITE SEGMENT/SWB ADK A6,0 CHECK IF ANYTHING LEFT TO READ/WRITE RF(NP) LTD:70 SEGMENT/SWB HANDLING FINISHED * EJECT LDTASK * * NOT ROOM ENOUGH IN PAGE FOR LAST SECTOR: * READ IT TO MEMORY VIA INTERMEDIATE BUFFER * LD A1,ECBEL,A8 EFFECTIVE LENGTH ADR A12,A1 UPDATE PAGE AREA POINTER * LTD:50 EQU * LDKL A1,LD:BUF LDTASK BUFFER ADDRESS ST A1,ECBBA,A8 LDK A2,/80 SCR A2,A8 INDICATE BUFFER NOW IN SYSTEM AREA ADK A2,/80 A2 := 256 ST A2,ECBRL,A8 SET REQUESTED LENGTH TO ONE SECTOR ECR A2,A10 ADS A2,ECBCW2,A8 UPDATE SECTOR NUMBER RF(O) LTD:85 OVERFLOW * LTD:60 EQU * CF A14,LTD:90 READ ONE SECTOR TO LD:BUF LDR A2,A12 PAGE POINTER ADR A6,A6 CONVERT LENGTH TO BYTES * IFT MMUPAG=1 MVSU A6 MOVE LAST PART OF SEGMENT/SWB TO PAGE XIF * IFT MMUPAG=0 LTD:65 EQU * LDR* A10,A1 MOVE ONE WORD STR A10,A2 ADK A1,2 INCREMENT BUFFER POINTERS ADK A2,2 SUK A6,2 DECREMENT COUNTER RB(P) LTD:65 XIF * EJECT LDTASK * * LTD:70 EQU * IFT SWPBLK=1 LDR A11,A11 CHECK DISC PAGING/SWB FLAG RF(Z) LTD:80 SWB HANDLING XIF * LDKL A4,/C000 INDICATE SEGMENT SUCCESSFULLY LOADED XRRS A4,A9 * LTD:80 EQU * ABL QMEXIT QUEUE TASK AND EXIT LDTASK * LTD:85 EQU * OVERFLOW CORRECTION IM ECBCW1,A8 LDKL A2,/7FFF ANS A2,ECBCW2,A8 RB LTD:60 * EJECT LDTASK * * READ ONE SECTOR FROM DISC * LTD:90 EQU * LKM DATA 1 LD A2,ECBRC,A8 RETURN CODE ANKL A2,/FEFF SKIP RETRY BIT RF(NZ) LTD:95 DISC ERROR RTN A14 NO, RETURN * * ERROR: INSERT PAGE IN PAGQUE AGAIN * LTD:95 ANK A2,1 NGR A2,A2 SUK A2,2 ERROR, SET RETURN CODE -2 OR -3 ST A2,TTB:SA+14,A5 SET RETURN CODE IN A7 * IFT SWPBLK=1 LDR A11,A11 CHECK DISC PAGING/SWB FLAG RB(Z) LTD:80 SWB HANDLING XIF * LD A3,SEG:PB,A9 PAGE BLOCK ADDRESS INH CF A15,RELPA2 RELEASE PAGE LDK A4,1 INDICATE SEGMENT ERROR SCR A4,A9 LD A4,SCTIOE APPLICATION RESTART ADDRESS ST A4,TTB:SA,A5 SET NEW DISPATCH ADDRESS RB LTD:80 * EJECT LDTASK * * ********** * LT:SWB * ********** * * * LT:SWB HANDLES THE LOADING/STORING OF SWAPPABLE WORK BLOCKS. * * INPUT: A1 = SWAPPABLE WORK BLOCK ADDRESS * A3 = TTAB ADDRESS OF CALLING TASK * A4 = LKM DATA DIRECTIVE * * LT:SWB EQU * LDTASK SWB HANDLING ENTRY IFT SWPBLK=1 IFT MMUPAG=1 INH LDKL A5,TTABLD LDTASK TTAB ADDRESS TL TTB:MT,A3 LOAD MMU WITH CALLING TASK TS TTB:MT,A5 STORE IN LDTASK MMU TABLE ENB XIF * IFT SWPBLK=1 LDR A5,A3 TTAB ADDRESS OF CALLING TASK LDR A7,A4 LKM DATA DIRECTIVE SUR A11,A11 INDICATE SWB HANDLING (A11 = 0) LDR* A3,A1 DISC ADDRESS OF FIRST COPY ANK A3,/FF LD A4,SWB:DS,A1 LD A6,SWB:EL,A1 SWB COPY LENGTH (BYTES) LD A2,SWB:NS,A1 SWB COPY LENGTH (SECTORS) * EJECT LDTASK * * LD A1,TTB:SA+14,A5 ANK A1,/FF SWB COPY INDEX * LTS:10 EQU * SUK A1,1 * IFT CPU852=1 RF(NP) LTS:20 ADR A4,A2 COMPUTE DISC ADDRESS OF REQUESTED SWB RF(O) LTS:15 OVERFLOW RB LTS:10 * LTS:15 EQU * OVERFLOW CORRECTION ADK A3,1 ANKL A4,/7FFF RB LTS:10 * LTS:20 EQU * LDR A1,A3 DISC ADDRESS OF REQUESTED SWB LDR A2,A4 XIF * IFT SWPBLK=1 IFT CPU852=0 MUR A1 COMPUTE DISC ADDRESS OF REQUESTED SWB DAR A3 XIF * EJECT LDTASK * * IFT SWPBLK=1 LD A3,TTB:SA+16,A5 MEMORY ADDRESS (LOGICAL) ADK A6,1 SRL A6,1 CONVERT SWB LENGTH TO WORDS LDR A4,A6 LD A12,SCTIPL SWB DISC FILE CODE SUK A7,19 CHECK LKM DATA DIRECTIVE ABL(Z) LTD:15 LOAD SWB REQUEST LDKL A4,/7FFF PARAMETER TO AVOID INTERMEDIATE BUFFER LDK A7,/95 PHYSICAL WRITE (STORE SWB REQUEST) ABL LTD:20 XIF * EJECT LDTASK * * ********** * QLTDSK * * QLTSWB * ********** * * * THIS ROUTINE PERFORMS ACTIVATION OF THE LOAD TASK. * * ACTIVATION IS AT LT:DSK WHEN DISC PAGING REQUEST. * ACTIVATION IS AT LT:SWB WHEN SWAPPABLE WORK BLOCK REQUEST. * * INPUT: A1 = SEGMENT BLOCK ADDRESS (LT:DSK) * = SWAPPABLE WORK BLOCK ADDRESS (LT:SWB) * A3 = TTAB ADDRESS OF CALLING TASK * A4 = LKM DATA DIRECTIVE (LT:SWB) * * OUTPUT: A2, A5 ARE DESTROYED * * QLTSWB EQU * ACTIVATE LDTASK AT ENTRY LT:SWB IFT SWPBLK=1 LDKL A2,LT:SWB DISPATCH ADDRESS RF QLTASK XIF * IFT SWPBLK=0 ABL LKMERR INDICATE SYSGEN ERROR AND HALT SYSTEM XIF * QLTDSK EQU * ACTIVATE LDTASK AT ENTRY LT:DSK LDKL A2,LT:DSK DISPATCH ADDRESS * EJECT LDTASK * * QLTASK EQU * LDKL A5,TTABLD LDTASK TTAB ADDRESS ABL ACTOT ACTIVATE LDTASK * * * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT LDTASK REL 10.0 80-03-14 870105041000 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0082 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x004c}
0x0082…008c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0086}
0x008c…00b4 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0090}
0x00b4…00be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b8}
0x00be…00dc Head {h00=0x001a, h01=0x0050, text=»* LDTASK = LOAD TASK«, t00=0x0000, t01=0x00c2}
0x00dc…00e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e0}
0x00e6…00f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ea}
0x00f0…00fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f4}
0x00fa…0104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fe}
0x0104…013e Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0108}
0x013e…0148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0142}
0x0148…0152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014c}
0x0152…0180 Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE CONTAINS THE LOAD TASK«, t00=0x0000, t01=0x0156}
0x0180…01b0 Head {h00=0x002c, h01=0x0050, text=»* FOR TOSS MEMORY MANAGEMENT SYSTEMS. «, t00=0x0000, t01=0x0184}
0x01b0…01ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0024}
0x01ba…01e4 Head {h00=0x0026, h01=0x0050, text=»* IT CONTAINS TWO ENTRY POINTS: «, t00=0x0001, t01=0x002e}
0x01e4…01ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0058}
0x01ee…0220 Head {h00=0x002e, h01=0x0050, text=»* - LT:DSK USED IN DISC PAGING SYSTEMS«, t00=0x0001, t01=0x0062}
0x0220…025c Head {h00=0x0038, h01=0x0050, text=»* - LT:SWB USED IN SWAPPABLE WORK BLOCK SYSTEMS «, t00=0x0001, t01=0x0094}
0x025c…0266 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d0}
0x0266…0270 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00da}
0x0270…0288 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0001, t01=0x00e4}
0x0288…0292 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fc}
0x0292…029c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0106}
0x029c…02b0 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x0110}
0x02b0…02c4 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x0124}
0x02c4…02d8 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x0138}
0x02d8…02e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014c}
0x02e2…02ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0156}
0x02ec…0314 Head {h00=0x0024, h01=0x0050, text=» ENTRY LT:DSK DISC PAGING ENTRY «, t00=0x0001, t01=0x0160}
0x0314…0344 Head {h00=0x002c, h01=0x0050, text=» ENTRY LT:SWB SWAPPABLE WORK BLOCK ENTRY«, t00=0x0001, t01=0x0188}
0x0344…0368 Head {h00=0x0020, h01=0x0050, text=» ENTRY TTABLD LOAD TASK TTAB«, t00=0x0002, t01=0x0028}
0x0368…039e Head {h00=0x0032, h01=0x0050, text=» ENTRY QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK «, t00=0x0002, t01=0x004c}
0x039e…03d4 Head {h00=0x0032, h01=0x0050, text=» ENTRY QLTSWB ACTIVATE LDTASK AT ENTRY LT:SWB «, t00=0x0002, t01=0x0082}
0x03d4…03fa Head {h00=0x0022, h01=0x0050, text=» ENTRY QLTASK ACTIVATE LDTASK «, t00=0x0002, t01=0x00b8}
0x03fa…0420 Head {h00=0x0022, h01=0x0050, text=» ENTRY LD:ECB LDTASK ECB AREA «, t00=0x0002, t01=0x00de}
0x0420…0444 Head {h00=0x0020, h01=0x0050, text=» ENTRY LD:BUF LDTASK BUFFER «, t00=0x0002, t01=0x0104}
0x0444…0468 Head {h00=0x0020, h01=0x0050, text=» ENTRY LD:BUE END OF BUFFER «, t00=0x0002, t01=0x0128}
0x0468…0494 Head {h00=0x0028, h01=0x0050, text=» ENTRY PQEMTY PAGE QUEUE EMPTY FLAG «, t00=0x0002, t01=0x014c}
0x0494…04bc Head {h00=0x0024, h01=0x0050, text=» ENTRY LD:STB LDTASK STACK BASE «, t00=0x0002, t01=0x0178}
0x04bc…04d4 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0003, t01=0x0010}
0x04d4…04de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0028}
0x04de…04e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0032}
0x04e8…04fe Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x003c}
0x04fe…0514 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x0052}
0x0514…052a Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x0068}
0x052a…0534 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007e}
0x0534…053e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0088}
0x053e…0564 Head {h00=0x0022, h01=0x0050, text=» EXTRN TLDS15 ENTRY IN TLDSEG «, t00=0x0003, t01=0x0092}
0x0564…058a Head {h00=0x0022, h01=0x0050, text=» EXTRN TLDS20 ENTRY IN TLDSEG «, t00=0x0003, t01=0x00b8}
0x058a…05c0 Head {h00=0x0032, h01=0x0050, text=» EXTRN QMEXIT QUEUE TASK AND EXIT MONITOR TASK«, t00=0x0003, t01=0x00de}
0x05c0…05f8 Head {h00=0x0034, h01=0x0050, text=» EXTRN LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR«, t00=0x0003, t01=0x0114}
0x05f8…061a Head {h00=0x001e, h01=0x0050, text=» EXTRN ACTOT ACTIVATE TASK«, t00=0x0003, t01=0x014c}
0x061a…063c Head {h00=0x001e, h01=0x0050, text=» EXTRN RELPA2 RELEASE PAGE«, t00=0x0003, t01=0x016e}
0x063c…0662 Head {h00=0x0022, h01=0x0050, text=» EXTRN PAGQUE FREE PAGE QUEUE «, t00=0x0003, t01=0x0190}
0x0662…068c Head {h00=0x0026, h01=0x0050, text=» EXTRN PAG:QB QUEUE LINK BACKWARDS«, t00=0x0004, t01=0x0026}
0x068c…06ae Head {h00=0x001e, h01=0x0050, text=» EXTRN PAG:PA PAGE ADDRESS«, t00=0x0004, t01=0x0050}
0x06ae…06da Head {h00=0x0028, h01=0x0050, text=» EXTRN PAG:SB SEGMENT BLOCK ADDRESS «, t00=0x0004, t01=0x0072}
0x06da…06fa Head {h00=0x001c, h01=0x0050, text=» EXTRN SEG:FC FILE CODE «, t00=0x0004, t01=0x009e}
0x06fa…0724 Head {h00=0x0026, h01=0x0050, text=» EXTRN SEG:DS DISC SECTOR ADDRESS «, t00=0x0004, t01=0x00be}
0x0724…0748 Head {h00=0x0020, h01=0x0050, text=» EXTRN SEG:EL SEGMENT LENGTH«, t00=0x0004, t01=0x00e8}
0x0748…0770 Head {h00=0x0024, h01=0x0050, text=» EXTRN SEG:PB PAGE BLOCK ADDRESS«, t00=0x0004, t01=0x010c}
0x0770…07a8 Head {h00=0x0034, h01=0x0050, text=» EXTRN SWB:DS DISC SECTOR ADDRESS OF FIRST COPY «, t00=0x0004, t01=0x0134}
0x07a8…07d0 Head {h00=0x0024, h01=0x0050, text=» EXTRN SWB:EL SWB LENGTH (BYTES)«, t00=0x0004, t01=0x016c}
0x07d0…07fa (5, 0, 400) Head {h00=0x0026, h01=0x0050, text=» EXTRN SWB:NS SWB LENGTH (SECTORS)«, t00=0x0005, t01=0x0004}
0x07fa…0822 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0005, t01=0x002e}
0x0822…084c Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0005, t01=0x0056}
0x084c…0876 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0080}
0x0876…089a Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x00aa}
0x089a…08c2 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBCW1 ECB CONTROL WORD 1«, t00=0x0005, t01=0x00ce}
0x08c2…08ea Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBCW2 ECB CONTROL WORD 2«, t00=0x0005, t01=0x00f6}
0x08ea…090e Head {h00=0x0020, h01=0x0050, text=» EXTRN TTB:SA TTAB SAVE AREA«, t00=0x0005, t01=0x011e}
0x090e…092e Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:MT MMU TABLE «, t00=0x0005, t01=0x0142}
0x092e…0958 Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:CB CURRENT SEGMENT BASE«, t00=0x0005, t01=0x0162}
0x0958…097c Head {h00=0x0020, h01=0x0050, text=» EXTRN TTB:SP SEGTAB ADDRESS«, t00=0x0005, t01=0x018c}
0x097c…0986 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0020}
0x0986…099e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0006, t01=0x002a}
0x099e…09a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0042}
0x09a8…09b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004c}
0x09b2…09de Head {h00=0x0028, h01=0x0050, text=» EXTRN SCTIPL PROGRAM LOADING DEVICE«, t00=0x0006, t01=0x0056}
0x09de…0a10 Head {h00=0x002e, h01=0x0050, text=» EXTRN SCTIOE APPLICATION RESTART ADDRESS «, t00=0x0006, t01=0x0082}
0x0a10…0a30 Head {h00=0x001c, h01=0x0050, text=» EXTRN SCTPSZ PAGE SIZE «, t00=0x0006, t01=0x00b4}
0x0a30…0a5e Head {h00=0x002a, h01=0x0050, text=» EXTRN SCTLAP LOGICAL ADDRESS OF PAGES«, t00=0x0006, t01=0x00d4}
0x0a5e…0a76 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0006, t01=0x0102}
0x0a76…0a80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011a}
0x0a80…0a8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0124}
0x0a8a…0abc Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x012e}
0x0abc…0ac6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0160}
0x0ac6…0ae4 Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0006, t01=0x016a}
0x0ae4…0aee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0188}
0x0aee…0b20 (7, 0, 400) Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x0004}
0x0b20…0b2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0036}
0x0b2a…0b5c Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0007, t01=0x0040}
0x0b5c…0b8a Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0007, t01=0x0072}
0x0b8a…0b94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a0}
0x0b94…0ba8 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0007, t01=0x00aa}
0x0ba8…0bb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00be}
0x0bb2…0bbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c8}
0x0bbc…0bf6 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0007, t01=0x00d2}
0x0bf6…0c28 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0007, t01=0x010c}
0x0c28…0c32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x013e}
0x0c32…0c46 Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0007, t01=0x0148}
0x0c46…0c50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x015c}
0x0c50…0c5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0166}
0x0c5a…0c94 Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK «, t00=0x0007, t01=0x0170}
0x0c94…0cca Head {h00=0x0032, h01=0x0050, text=»* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. «, t00=0x0008, t01=0x001a}
0x0cca…0cd4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0050}
0x0cd4…0ce8 Head {h00=0x0010, h01=0x0050, text=»SWPBLK EQU 0«, t00=0x0008, t01=0x005a}
0x0ce8…0cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x006e}
0x0cf2…0d0a Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0008, t01=0x0078}
0x0d0a…0d14 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0090}
0x0d14…0d3a Head {h00=0x0022, h01=0x0050, text=»* LDTASK ECB AND BUFFER AREAS «, t00=0x0008, t01=0x009a}
0x0d3a…0d44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c0}
0x0d44…0d76 Head {h00=0x002e, h01=0x0050, text=»LD:ECB DATA 0,0,0,0,0,0,0 LDTASK ECB AREA «, t00=0x0008, t01=0x00ca}
0x0d76…0d80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00fc}
0x0d80…0db8 Head {h00=0x0034, h01=0x0050, text=»LD:BUF RES 128 INTERMEDIATE BUFFER FOR LOAD TASK«, t00=0x0008, t01=0x0106}
0x0db8…0dda Head {h00=0x001e, h01=0x0050, text=»LD:BUE EQU * END OF BUFFER«, t00=0x0008, t01=0x013e}
0x0dda…0de4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0160}
0x0de4…0e0c Head {h00=0x0024, h01=0x0050, text=» RES 4 LDTASK STACK (TWO LEVELS)«, t00=0x0008, t01=0x016a}
0x0e0c…0e38 (9, 0, 400) Head {h00=0x0028, h01=0x0050, text=»LD:STB EQU *-2 LOAD TASK STACK BASE «, t00=0x0009, t01=0x0004}
0x0e38…0e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0030}
0x0e42…0e5a Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0009, t01=0x003a}
0x0e5a…0e64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0052}
0x0e64…0e86 Head {h00=0x001e, h01=0x0050, text=»* TTABLD (LOAD TASK TTAB) «, t00=0x0009, t01=0x005c}
0x0e86…0e90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007e}
0x0e90…0ea6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0009, t01=0x0088}
0x0ea6…0ec6 Head {h00=0x001c, h01=0x0050, text=» RES 16 LDTASK MMU TABLE«, t00=0x0009, t01=0x009e}
0x0ec6…0ed2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x00be}
0x0ed2…0edc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ca}
0x0edc…0f00 Head {h00=0x0020, h01=0x0050, text=» DATA 0 CURRENT SEGMENT BASE«, t00=0x0009, t01=0x00d4}
0x0f00…0f2c Head {h00=0x0028, h01=0x0050, text=»PQEMTY DATA 0 PAGE QUEUE EMPTY FLAG «, t00=0x0009, t01=0x00f8}
0x0f2c…0f52 Head {h00=0x0022, h01=0x0050, text=» DATA 0 SEGMENT BLOCK ADDRESS «, t00=0x0009, t01=0x0124}
0x0f52…0f5c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x014a}
0x0f5c…0f7e Head {h00=0x001e, h01=0x0050, text=»TTABLD EQU * TTABLD ENTRY «, t00=0x0009, t01=0x0154}
0x0f7e…0fa4 Head {h00=0x0022, h01=0x0050, text=» DATA 0 DISPATCHER QUEUE LINK «, t00=0x0009, t01=0x0176}
0x0fa4…0fca Head {h00=0x0022, h01=0x0050, text=» DATA '#L' TASK IDENTIFICATION«, t00=0x000a, t01=0x000c}
0x0fca…0fea Head {h00=0x001c, h01=0x0050, text=» DATA 49 PRIORITY LEVEL «, t00=0x000a, t01=0x0032}
0x0fea…100a Head {h00=0x001c, h01=0x0050, text=» DATA 0 PENDING POINTER «, t00=0x000a, t01=0x0052}
0x100a…1038 Head {h00=0x002a, h01=0x0050, text=» DATA /C4C0 PSW (PROGRAM STATUS WORD) «, t00=0x000a, t01=0x0072}
0x1038…1058 Head {h00=0x001c, h01=0x0050, text=» DATA 0 DISPATCH ADDRESS«, t00=0x000a, t01=0x00a0}
0x1058…108e Head {h00=0x0032, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14«, t00=0x000a, t01=0x00c0}
0x108e…10aa Head {h00=0x0018, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 «, t00=0x000a, t01=0x00f6}
0x10aa…10ce Head {h00=0x0020, h01=0x0050, text=» DATA 2 DEVICE TABLE LENGTH «, t00=0x000a, t01=0x0112}
0x10ce…10d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0136}
0x10d8…10f0 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x000a, t01=0x0140}
0x10f0…10fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0158}
0x10fa…1104 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0162}
0x1104…1116 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000a, t01=0x016c}
0x1116…1128 Head {h00=0x000e, h01=0x0050, text=»* LT:DSK *«, t00=0x000a, t01=0x017e}
0x1128…113a Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000a, t01=0x0190}
0x113a…1144 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0012}
0x1144…114e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x001c}
0x114e…1196 Head {h00=0x0044, h01=0x0050, text=»* LT:DSK PERFORMS LOADING OF DISC RESIDENT SEGMENTS INTO CORE.«, t00=0x000b, t01=0x0026}
0x1196…11a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x006e}
0x11a0…11ce Head {h00=0x002a, h01=0x0050, text=»* INPUT: A1 = SEGMENT BLOCK ADDRESS«, t00=0x000b, t01=0x0078}
0x11ce…1204 Head {h00=0x0032, h01=0x0050, text=»* A3 = TTAB ADDRESS OF CALLING TASK «, t00=0x000b, t01=0x00a6}
0x1204…120e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00dc}
0x120e…1218 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00e6}
0x1218…1246 Head {h00=0x002a, h01=0x0050, text=»LT:DSK EQU * LDTASK DISC PAGING ENTRY «, t00=0x000b, t01=0x00f0}
0x1246…1268 Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A1 SEGMENT STATUS«, t00=0x000b, t01=0x011e}
0x1268…129a Head {h00=0x002e, h01=0x0050, text=» RF(NN) LTD:05 SEGMENT NOT LOADED IN CORE «, t00=0x000b, t01=0x0140}
0x129a…12a4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0172}
0x12a4…12dc Head {h00=0x0034, h01=0x0050, text=»* UPDATE MMU TABLE FOR CALLING TASK (IF MMU) AND«, t00=0x000b, t01=0x017c}
0x12dc…12fe Head {h00=0x001e, h01=0x0050, text=»* REMOVE PAGE FROM PAGQUE «, t00=0x000c, t01=0x0024}
0x12fe…1308 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0046}
0x1308…1322 Head {h00=0x0016, h01=0x0050, text=» LDR A7,A3 SAVE A3«, t00=0x000c, t01=0x0050}
0x1322…1334 Head {h00=0x000e, h01=0x0050, text=» LDR A5,A3«, t00=0x000c, t01=0x006a}
0x1334…1340 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x000c, t01=0x007c}
0x1340…1356 Head {h00=0x0012, h01=0x0050, text=» CF A15,TLDS15«, t00=0x000c, t01=0x0088}
0x1356…1386 Head {h00=0x002c, h01=0x0050, text=» LDR A5,A7 TTAB ADDRESS OF CALLING TASK «, t00=0x000c, t01=0x009e}
0x1386…13b4 Head {h00=0x002a, h01=0x0050, text=» ABL QMEXIT QUEUE TASK AND EXIT LDTASK«, t00=0x000c, t01=0x00ce}
0x13b4…13be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00fc}
0x13be…13d6 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x000c, t01=0x0106}
0x13d6…13e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x011e}
0x13e0…141a Head {h00=0x0036, h01=0x0050, text=»* NO PAGE AVAILABLE. PAUSE LDTASK UNTIL RESTARTED «, t00=0x000c, t01=0x0128}
0x141a…1448 Head {h00=0x002a, h01=0x0050, text=»* BY RELPAG WHEN PAGE AVAILABLE AGAIN.«, t00=0x000c, t01=0x0162}
0x1448…1452 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0190}
0x1452…1466 Head {h00=0x0010, h01=0x0050, text=»LTD:00 EQU *«, t00=0x000d, t01=0x000a}
0x1466…1492 Head {h00=0x0028, h01=0x0050, text=» IM PQEMTY INDICATE PAGE QUEUE EMPTY«, t00=0x000d, t01=0x001e}
0x1492…149e Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000d, t01=0x004a}
0x149e…14ba Head {h00=0x0018, h01=0x0050, text=» DATA 5 PAUSE LDTASK«, t00=0x000d, t01=0x0056}
0x14ba…14c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0072}
0x14c4…14ea Head {h00=0x0022, h01=0x0050, text=»* TAKE FIRST PAGE FROM PAGQUE «, t00=0x000d, t01=0x007c}
0x14ea…14f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00a2}
0x14f4…1508 Head {h00=0x0010, h01=0x0050, text=»LTD:05 EQU *«, t00=0x000d, t01=0x00ac}
0x1508…1520 Head {h00=0x0014, h01=0x0050, text=» LD A2,PAGQUE+2 «, t00=0x000d, t01=0x00c0}
0x1520…1536 Head {h00=0x0012, h01=0x0050, text=» CWK A2,PAGQUE«, t00=0x000d, t01=0x00d8}
0x1536…155e Head {h00=0x0024, h01=0x0050, text=» RB(E) LTD:00 NO PAGE AVAILABLE «, t00=0x000d, t01=0x00ee}
0x155e…1568 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0116}
0x1568…1580 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x000d, t01=0x0120}
0x1580…158a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0138}
0x158a…15b2 Head {h00=0x0024, h01=0x0050, text=»* TAKE FOUND PAGE OUT OF PAGQUE «, t00=0x000d, t01=0x0142}
0x15b2…15bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016a}
0x15bc…15c8 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x000d, t01=0x0174}
0x15c8…15fc Head {h00=0x0030, h01=0x0050, text=» LD A4,PAG:QB,A2 ADDRESS TO NEXT PAGE BLOCK «, t00=0x000d, t01=0x0180}
0x15fc…1628 Head {h00=0x0028, h01=0x0050, text=» ST A4,PAGQUE+2 UPDATE QUEUE ANCHOR «, t00=0x000e, t01=0x0024}
0x1628…164a Head {h00=0x001e, h01=0x0050, text=» LDR* A5,A2 PAGQUE ADDRESS«, t00=0x000e, t01=0x0050}
0x164a…1682 Head {h00=0x0034, h01=0x0050, text=» STR A5,A4 UPDATE QUEUE LINK FORWARD NEXT BLOCK «, t00=0x000e, t01=0x0072}
0x1682…16b6 Head {h00=0x0030, h01=0x0050, text=» CMR A2 RESET QUEUE LINK FORWARD THIS BLOCK «, t00=0x000e, t01=0x00aa}
0x16b6…16e6 Head {h00=0x002c, h01=0x0050, text=» LDKL A6,/4000 SEGMENT UNDER LOADING BIT«, t00=0x000e, t01=0x00de}
0x16e6…1718 Head {h00=0x002e, h01=0x0050, text=» LD A4,PAG:SB,A2 OLD SEGMENT BLOCK ADDRESS«, t00=0x000e, t01=0x010e}
0x1718…172e Head {h00=0x0012, h01=0x0050, text=» RF(Z) LTD:10 «, t00=0x000e, t01=0x0140}
0x172e…174e Head {h00=0x001c, h01=0x0050, text=» SCR A6,A4 RESET STATUS «, t00=0x000e, t01=0x0156}
0x174e…1758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0176}
0x1758…176c Head {h00=0x0010, h01=0x0050, text=»LTD:10 EQU *«, t00=0x000e, t01=0x0180}
0x176c…179e (15, 0, 400) Head {h00=0x002e, h01=0x0050, text=» ORRS A6,A1 INDICATE SEGMENT UNDER LOADING«, t00=0x000f, t01=0x0004}
0x179e…17d2 Head {h00=0x0030, h01=0x0050, text=» ST A2,SEG:PB,A1 SET NEW PAGE BLOCK ADDRESS «, t00=0x000f, t01=0x0036}
0x17d2…1808 Head {h00=0x0032, h01=0x0050, text=» ST A1,PAG:SB,A2 SET NEW SEGMENT BLOCK ADDRESS«, t00=0x000f, t01=0x006a}
0x1808…1812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00a0}
0x1812…1828 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x00aa}
0x1828…1832 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c0}
0x1832…1868 Head {h00=0x0032, h01=0x0050, text=»* UPDATE MMU TABLE FOR CALLING TASK AND LDTASK«, t00=0x000f, t01=0x00ca}
0x1868…1872 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0100}
0x1872…189e Head {h00=0x0028, h01=0x0050, text=» LDKL A5,TTABLD LDTASK TTAB ADDRESS «, t00=0x000f, t01=0x010a}
0x189e…18d4 Head {h00=0x0032, h01=0x0050, text=» MS 3,TTB:SA+2,A5 SAVE A1-A3 IN TTAB SAVE AREA«, t00=0x000f, t01=0x0136}
0x18d4…1904 Head {h00=0x002c, h01=0x0050, text=» TL TTB:MT,A3 LOAD MMU WITH CALLING TASK«, t00=0x000f, t01=0x016c}
0x1904…1934 Head {h00=0x002c, h01=0x0050, text=» TS TTB:MT,A5 STORE IN LDTASK MMU TABLE «, t00=0x0010, t01=0x000c}
0x1934…196a Head {h00=0x0032, h01=0x0050, text=» LD A1,TTB:CB,A3 CURRENT SEGMENT BASE ADDRESS «, t00=0x0010, t01=0x003c}
0x196a…1982 Head {h00=0x0014, h01=0x0050, text=» ST A1,TTB:CB,A5«, t00=0x0010, t01=0x0072}
0x1982…1994 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0010, t01=0x008a}
0x1994…19be Head {h00=0x0026, h01=0x0050, text=» LDR A3,A5 TTAB ADDRESS OF LDTASK «, t00=0x0010, t01=0x009c}
0x19be…19f0 Head {h00=0x002e, h01=0x0050, text=» CF A15,TLDS20 UPDATE MMU TABLE FOR LDTASK«, t00=0x0010, t01=0x00c6}
0x19f0…1a2a Head {h00=0x0036, h01=0x0050, text=» TS TTB:MT,A3 STORE NEW MMU TABLE FOR CALLING TASK«, t00=0x0010, t01=0x00f8}
0x1a2a…1a36 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0132}
0x1a36…1a40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x013e}
0x1a40…1a58 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0010, t01=0x0148}
0x1a58…1a62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0160}
0x1a62…1a8a Head {h00=0x0024, h01=0x0050, text=»* PREPARE FOR READING OF SEGMENT«, t00=0x0010, t01=0x016a}
0x1a8a…1a94 (17, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0004}
0x1a94…1aa0 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0011, t01=0x000e}
0x1aa0…1ac0 Head {h00=0x001c, h01=0x0050, text=» LD A4,SCTPSZ PAGE SIZE «, t00=0x0011, t01=0x001a}
0x1ac0…1aea Head {h00=0x0026, h01=0x0050, text=» SRL A4,1 CONVERT LENGTH TO WORDS «, t00=0x0011, t01=0x003a}
0x1aea…1b12 Head {h00=0x0024, h01=0x0050, text=» LD A6,SEG:EL,A1 SEGMENT LENGTH «, t00=0x0011, t01=0x0064}
0x1b12…1b3c Head {h00=0x0026, h01=0x0050, text=» SRL A6,1 CONVERT LENGTH TO WORDS «, t00=0x0011, t01=0x008c}
0x1b3c…1b6c Head {h00=0x002c, h01=0x0050, text=» LDR A5,A3 TTAB ADDRESS OF CALLING TASK «, t00=0x0011, t01=0x00b6}
0x1b6c…1b9a Head {h00=0x002a, h01=0x0050, text=» LDR A9,A1 SAVE SEGMENT BLOCK ADDRESS «, t00=0x0011, t01=0x00e6}
0x1b9a…1ba4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0114}
0x1ba4…1bba Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0011, t01=0x011e}
0x1bba…1bee Head {h00=0x0030, h01=0x0050, text=» LDR A11,A5 INDICATE DISC PAGING (A11 <> 0) «, t00=0x0011, t01=0x0134}
0x1bee…1bfa Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0168}
0x1bfa…1c04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0174}
0x1c04…1c2c Head {h00=0x0024, h01=0x0050, text=» LD A12,TTB:SP,A5 SEGTAB ADDRESS«, t00=0x0011, t01=0x017e}
0x1c2c…1c5e Head {h00=0x002e, h01=0x0050, text=» LD A12,SEG:FC,A12 SEGMENT DISC FILE CODE «, t00=0x0012, t01=0x0016}
0x1c5e…1c8e Head {h00=0x002c, h01=0x0050, text=» LD A3,PAG:PA,A2 PAGE ADDRESS (PHYSICAL)«, t00=0x0012, t01=0x0048}
0x1c8e…1cbc Head {h00=0x002a, h01=0x0050, text=» LD A2,SEG:DS,A1 SEGMENT DISC ADDRESS «, t00=0x0012, t01=0x0078}
0x1cbc…1cd0 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A1 «, t00=0x0012, t01=0x00a6}
0x1cd0…1ce4 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x0012, t01=0x00ba}
0x1ce4…1cee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ce}
0x1cee…1d04 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0012, t01=0x00d8}
0x1d04…1d3a Head {h00=0x0032, h01=0x0050, text=» ST* A3,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE «, t00=0x0012, t01=0x00ee}
0x1d3a…1d46 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0124}
0x1d46…1d50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0130}
0x1d50…1d7a Head {h00=0x0026, h01=0x0050, text=»LTD:15 EQU * ENTRY USED BY LT:SWB «, t00=0x0012, t01=0x013a}
0x1d7a…1d9c Head {h00=0x001e, h01=0x0050, text=» LDK A7,/91 PHYSICAL READ «, t00=0x0012, t01=0x0164}
0x1d9c…1da6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0186}
0x1da6…1dbe Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0012, t01=0x0190}
0x1dbe…1dc8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0018}
0x1dc8…1de4 Head {h00=0x0018, h01=0x0050, text=»* SET ECB PARAMETERS«, t00=0x0013, t01=0x0022}
0x1de4…1dee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x003e}
0x1dee…1e18 Head {h00=0x0026, h01=0x0050, text=»LTD:20 EQU * ENTRY USED BY LT:SWB «, t00=0x0013, t01=0x0048}
0x1e18…1e3e Head {h00=0x0022, h01=0x0050, text=» LDKL A8,LD:ECB LD:ECB ADDRESS«, t00=0x0013, t01=0x0072}
0x1e3e…1e70 Head {h00=0x002e, h01=0x0050, text=» ST A1,ECBCW1,A8 SET SECTOR NUMBER IN ECB «, t00=0x0013, t01=0x0098}
0x1e70…1e88 Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW2,A8«, t00=0x0013, t01=0x00ca}
0x1e88…1eb6 Head {h00=0x002a, h01=0x0050, text=» STR A12,A8 SET DISC FILE CODE IN ECB «, t00=0x0013, t01=0x00e2}
0x1eb6…1eca Head {h00=0x0010, h01=0x0050, text=» LDR A12,A3 «, t00=0x0013, t01=0x0110}
0x1eca…1ef4 Head {h00=0x0026, h01=0x0050, text=» LDKL A14,LD:STB LDTASK STACK BASE«, t00=0x0013, t01=0x0124}
0x1ef4…1efe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x014e}
0x1efe…1f2c Head {h00=0x002a, h01=0x0050, text=»* CHECK IF ONE OR TWO LKM:S NECCESSARY«, t00=0x0013, t01=0x0158}
0x1f2c…1f36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0186}
0x1f36…1f4a Head {h00=0x0010, h01=0x0050, text=» LDR A10,A6 «, t00=0x0013, t01=0x0190}
0x1f4a…1f7c Head {h00=0x002e, h01=0x0050, text=» ADKL A10,127 NEXT HIGHER MULTIPLE OF 128 «, t00=0x0014, t01=0x0014}
0x1f7c…1f94 Head {h00=0x0014, h01=0x0050, text=» ANKL A10,/7F80 «, t00=0x0014, t01=0x0046}
0x1f94…1fc6 Head {h00=0x002e, h01=0x0050, text=» SUR A4,A10 CHECK IF PAGE IS LARGE ENOUGH «, t00=0x0014, t01=0x005e}
0x1fc6…1ff4 Head {h00=0x002a, h01=0x0050, text=» RF(NN) LTD:25 OK, JUST ONE LKM NEEDED«, t00=0x0014, t01=0x0090}
0x1ff4…2008 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A6 «, t00=0x0014, t01=0x00be}
0x2008…203a Head {h00=0x002e, h01=0x0050, text=» ANKL A10,/7F80 NEXT LOWER MULTIPLE OF 128«, t00=0x0014, t01=0x00d2}
0x203a…2044 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0104}
0x2044…2058 Head {h00=0x0010, h01=0x0050, text=»LTD:25 EQU *«, t00=0x0014, t01=0x010e}
0x2058…2090 Head {h00=0x0034, h01=0x0050, text=» SUR A6,A10 REMAINING LENGTH TO MOVE IN 2ND LKM «, t00=0x0014, t01=0x0122}
0x2090…20bc Head {h00=0x0028, h01=0x0050, text=» ADR A10,A10 CONVERT LENGTH TO BYTES«, t00=0x0014, t01=0x015a}
0x20bc…20ec Head {h00=0x002c, h01=0x0050, text=» RF(Z) LTD:50 INTERMEDIATE BUFFER NEEDED«, t00=0x0014, t01=0x0186}
0x20ec…2120 Head {h00=0x0030, h01=0x0050, text=» ST A10,ECBRL,A8 SET REQUESTED LENGTH IN ECB«, t00=0x0015, t01=0x0026}
0x2120…212a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x005a}
0x212a…2140 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0015, t01=0x0064}
0x2140…216a Head {h00=0x0026, h01=0x0050, text=» ST A3,ECBBA,A8 SET BUFFER ADDRESS«, t00=0x0015, t01=0x007a}
0x216a…2176 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00a4}
0x2176…2180 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00b0}
0x2180…2198 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0015, t01=0x00ba}
0x2198…21a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d2}
0x21a2…21ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00dc}
0x21ac…21c2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0015, t01=0x00e6}
0x21c2…21d4 Head {h00=0x000e, h01=0x0050, text=» ECR A1,A3«, t00=0x0015, t01=0x00fc}
0x21d4…21de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010e}
0x21de…21f4 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0015, t01=0x0118}
0x21f4…2224 Head {h00=0x002c, h01=0x0050, text=» LDR A11,A11 CHECK DISC PAGING/SWB FLAG «, t00=0x0015, t01=0x012e}
0x2224…224e Head {h00=0x0026, h01=0x0050, text=» RF(NZ) LTD:30 DISC PAGING REQUEST«, t00=0x0015, t01=0x015e}
0x224e…2258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0188}
0x2258…2270 (22, 0, 400) Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0016, t01=0x0004}
0x2270…227a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x001c}
0x227a…22ac Head {h00=0x002e, h01=0x0050, text=»* SWB: CONVERT LOGICAL ADDRESS TO PHYSICAL«, t00=0x0016, t01=0x0026}
0x22ac…22b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0058}
0x22b6…22c8 Head {h00=0x000e, h01=0x0050, text=» SRL A1,3 «, t00=0x0016, t01=0x0062}
0x22c8…22f2 Head {h00=0x0026, h01=0x0050, text=» ANK A1,/1E MMUTAB INDEX (5 BITS) «, t00=0x0016, t01=0x0074}
0x22f2…2316 Head {h00=0x0020, h01=0x0050, text=» ADR A1,A5 ADD TTAB ADDRESS «, t00=0x0016, t01=0x009e}
0x2316…2344 Head {h00=0x002a, h01=0x0050, text=» LC A1,TTB:MT,A1 PHYSICAL PAGE ADDRESS«, t00=0x0016, t01=0x00c2}
0x2344…2356 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x0016, t01=0x00f0}
0x2356…236a Head {h00=0x0010, h01=0x0050, text=» ANK A2,/3C «, t00=0x0016, t01=0x0102}
0x236a…237c Head {h00=0x000e, h01=0x0050, text=» SRC A2,6 «, t00=0x0016, t01=0x0116}
0x237c…2392 Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFF «, t00=0x0016, t01=0x0128}
0x2392…23a4 Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x0016, t01=0x013e}
0x23a4…23b6 Head {h00=0x000e, h01=0x0050, text=» RF LTD:40«, t00=0x0016, t01=0x0150}
0x23b6…23c2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0162}
0x23c2…23cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x016e}
0x23cc…23e0 Head {h00=0x0010, h01=0x0050, text=»LTD:30 EQU *«, t00=0x0016, t01=0x0178}
0x23e0…23f6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0016, t01=0x018c}
0x23f6…2400 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0012}
0x2400…2436 Head {h00=0x0032, h01=0x0050, text=»* SEGMENT: CONVERT PHYSICAL ADDRESS TO LOGICAL«, t00=0x0017, t01=0x001c}
0x2436…2440 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0052}
0x2440…2452 Head {h00=0x000e, h01=0x0050, text=» SLL A3,2 «, t00=0x0017, t01=0x005c}
0x2452…2466 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A3 «, t00=0x0017, t01=0x006e}
0x2466…24a0 Head {h00=0x0036, h01=0x0050, text=» ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL«, t00=0x0017, t01=0x0082}
0x24a0…24b6 Head {h00=0x0012, h01=0x0050, text=» OR A12,SCTLAP«, t00=0x0017, t01=0x00bc}
0x24b6…24c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d2}
0x24c0…24d4 Head {h00=0x0010, h01=0x0050, text=»LTD:40 EQU *«, t00=0x0017, t01=0x00dc}
0x24d4…24fe Head {h00=0x0026, h01=0x0050, text=» ST A3,ECBBA,A8 SET BUFFER ADDRESS«, t00=0x0017, t01=0x00f0}
0x24fe…2510 Head {h00=0x000e, h01=0x0050, text=» SRL A1,2 «, t00=0x0017, t01=0x011a}
0x2510…2524 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/30 «, t00=0x0017, t01=0x012c}
0x2524…2536 Head {h00=0x000e, h01=0x0050, text=» SCR A1,A8«, t00=0x0017, t01=0x0140}
0x2536…2542 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0152}
0x2542…254c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x015e}
0x254c…257a Head {h00=0x002a, h01=0x0050, text=» CF A14,LTD:90 READ/WRITE SEGMENT/SWB «, t00=0x0017, t01=0x0168}
0x257a…25b0 Head {h00=0x0032, h01=0x0050, text=» ADK A6,0 CHECK IF ANYTHING LEFT TO READ/WRITE«, t00=0x0018, t01=0x0008}
0x25b0…25e4 Head {h00=0x0030, h01=0x0050, text=» RF(NP) LTD:70 SEGMENT/SWB HANDLING FINISHED«, t00=0x0018, t01=0x003e}
0x25e4…25ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0072}
0x25ee…2606 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0018, t01=0x007c}
0x2606…2610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0094}
0x2610…2642 Head {h00=0x002e, h01=0x0050, text=»* NOT ROOM ENOUGH IN PAGE FOR LAST SECTOR:«, t00=0x0018, t01=0x009e}
0x2642…2676 Head {h00=0x0030, h01=0x0050, text=»* READ IT TO MEMORY VIA INTERMEDIATE BUFFER «, t00=0x0018, t01=0x00d0}
0x2676…2680 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0104}
0x2680…26a8 Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBEL,A8 EFFECTIVE LENGTH«, t00=0x0018, t01=0x010e}
0x26a8…26d4 Head {h00=0x0028, h01=0x0050, text=» ADR A12,A1 UPDATE PAGE AREA POINTER«, t00=0x0018, t01=0x0136}
0x26d4…26de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0162}
0x26de…26f2 Head {h00=0x0010, h01=0x0050, text=»LTD:50 EQU *«, t00=0x0018, t01=0x016c}
0x26f2…2720 Head {h00=0x002a, h01=0x0050, text=» LDKL A1,LD:BUF LDTASK BUFFER ADDRESS «, t00=0x0018, t01=0x0180}
0x2720…2738 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBBA,A8 «, t00=0x0019, t01=0x001e}
0x2738…274c Head {h00=0x0010, h01=0x0050, text=» LDK A2,/80 «, t00=0x0019, t01=0x0036}
0x274c…2782 Head {h00=0x0032, h01=0x0050, text=» SCR A2,A8 INDICATE BUFFER NOW IN SYSTEM AREA «, t00=0x0019, t01=0x004a}
0x2782…27a0 Head {h00=0x001a, h01=0x0050, text=» ADK A2,/80 A2 := 256 «, t00=0x0019, t01=0x0080}
0x27a0…27da Head {h00=0x0036, h01=0x0050, text=» ST A2,ECBRL,A8 SET REQUESTED LENGTH TO ONE SECTOR«, t00=0x0019, t01=0x009e}
0x27da…27ee Head {h00=0x0010, h01=0x0050, text=» ECR A2,A10 «, t00=0x0019, t01=0x00d8}
0x27ee…281c Head {h00=0x002a, h01=0x0050, text=» ADS A2,ECBCW2,A8 UPDATE SECTOR NUMBER«, t00=0x0019, t01=0x00ec}
0x281c…283a Head {h00=0x001a, h01=0x0050, text=» RF(O) LTD:85 OVERFLOW«, t00=0x0019, t01=0x011a}
0x283a…2844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0138}
0x2844…2858 Head {h00=0x0010, h01=0x0050, text=»LTD:60 EQU *«, t00=0x0019, t01=0x0142}
0x2858…2888 Head {h00=0x002c, h01=0x0050, text=» CF A14,LTD:90 READ ONE SECTOR TO LD:BUF«, t00=0x0019, t01=0x0156}
0x2888…28a8 Head {h00=0x001c, h01=0x0050, text=» LDR A2,A12 PAGE POINTER«, t00=0x0019, t01=0x0186}
0x28a8…28d2 Head {h00=0x0026, h01=0x0050, text=» ADR A6,A6 CONVERT LENGTH TO BYTES«, t00=0x001a, t01=0x0016}
0x28d2…28dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0040}
0x28dc…28f2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001a, t01=0x004a}
0x28f2…2928 Head {h00=0x0032, h01=0x0050, text=» MVSU A6 MOVE LAST PART OF SEGMENT/SWB TO PAGE«, t00=0x001a, t01=0x0060}
0x2928…2934 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0096}
0x2934…293e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00a2}
0x293e…2954 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001a, t01=0x00ac}
0x2954…2968 Head {h00=0x0010, h01=0x0050, text=»LTD:65 EQU *«, t00=0x001a, t01=0x00c2}
0x2968…298a Head {h00=0x001e, h01=0x0050, text=» LDR* A10,A1 MOVE ONE WORD«, t00=0x001a, t01=0x00d6}
0x298a…299e Head {h00=0x0010, h01=0x0050, text=» STR A10,A2 «, t00=0x001a, t01=0x00f8}
0x299e…29ca Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT BUFFER POINTERS «, t00=0x001a, t01=0x010c}
0x29ca…29dc Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x001a, t01=0x0138}
0x29dc…2a00 Head {h00=0x0020, h01=0x0050, text=» SUK A6,2 DECREMENT COUNTER «, t00=0x001a, t01=0x014a}
0x2a00…2a16 Head {h00=0x0012, h01=0x0050, text=» RB(P) LTD:65 «, t00=0x001a, t01=0x016e}
0x2a16…2a22 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0184}
0x2a22…2a2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0190}
0x2a2c…2a44 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x001b, t01=0x000a}
0x2a44…2a4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0022}
0x2a4e…2a58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x002c}
0x2a58…2a6c Head {h00=0x0010, h01=0x0050, text=»LTD:70 EQU *«, t00=0x001b, t01=0x0036}
0x2a6c…2a82 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x001b, t01=0x004a}
0x2a82…2ab2 Head {h00=0x002c, h01=0x0050, text=» LDR A11,A11 CHECK DISC PAGING/SWB FLAG «, t00=0x001b, t01=0x0060}
0x2ab2…2ad4 Head {h00=0x001e, h01=0x0050, text=» RF(Z) LTD:80 SWB HANDLING«, t00=0x001b, t01=0x0090}
0x2ad4…2ae0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x00b2}
0x2ae0…2aea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00be}
0x2aea…2b26 Head {h00=0x0038, h01=0x0050, text=» LDKL A4,/C000 INDICATE SEGMENT SUCCESSFULLY LOADED «, t00=0x001b, t01=0x00c8}
0x2b26…2b3a Head {h00=0x0010, h01=0x0050, text=» XRRS A4,A9 «, t00=0x001b, t01=0x0104}
0x2b3a…2b44 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0118}
0x2b44…2b58 Head {h00=0x0010, h01=0x0050, text=»LTD:80 EQU *«, t00=0x001b, t01=0x0122}
0x2b58…2b86 Head {h00=0x002a, h01=0x0050, text=» ABL QMEXIT QUEUE TASK AND EXIT LDTASK«, t00=0x001b, t01=0x0136}
0x2b86…2b90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0164}
0x2b90…2bb8 Head {h00=0x0024, h01=0x0050, text=»LTD:85 EQU * OVERFLOW CORRECTION«, t00=0x001b, t01=0x016e}
0x2bb8…2bce Head {h00=0x0012, h01=0x0050, text=» IM ECBCW1,A8 «, t00=0x001c, t01=0x0008}
0x2bce…2be4 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/7FFF«, t00=0x001c, t01=0x001e}
0x2be4…2bfe Head {h00=0x0016, h01=0x0050, text=» ANS A2,ECBCW2,A8 «, t00=0x001c, t01=0x0034}
0x2bfe…2c10 Head {h00=0x000e, h01=0x0050, text=» RB LTD:60«, t00=0x001c, t01=0x004e}
0x2c10…2c1a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0060}
0x2c1a…2c32 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x001c, t01=0x006a}
0x2c32…2c3c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0082}
0x2c3c…2c60 Head {h00=0x0020, h01=0x0050, text=»* READ ONE SECTOR FROM DISC «, t00=0x001c, t01=0x008c}
0x2c60…2c6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00b0}
0x2c6a…2c7e Head {h00=0x0010, h01=0x0050, text=»LTD:90 EQU *«, t00=0x001c, t01=0x00ba}
0x2c7e…2c8a Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x001c, t01=0x00ce}
0x2c8a…2c9a Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x001c, t01=0x00da}
0x2c9a…2cbe Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBRC,A8 RETURN CODE «, t00=0x001c, t01=0x00ea}
0x2cbe…2ce4 Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/FEFF SKIP RETRY BIT «, t00=0x001c, t01=0x010e}
0x2ce4…2d06 Head {h00=0x001e, h01=0x0050, text=» RF(NZ) LTD:95 DISC ERROR «, t00=0x001c, t01=0x0134}
0x2d06…2d22 Head {h00=0x0018, h01=0x0050, text=» RTN A14 NO, RETURN «, t00=0x001c, t01=0x0156}
0x2d22…2d2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0172}
0x2d2c…2d58 Head {h00=0x0028, h01=0x0050, text=»* ERROR: INSERT PAGE IN PAGQUE AGAIN«, t00=0x001c, t01=0x017c}
0x2d58…2d62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0018}
0x2d62…2d7a Head {h00=0x0014, h01=0x0050, text=»LTD:95 ANK A2,1 «, t00=0x001d, t01=0x0022}
0x2d7a…2d8c Head {h00=0x000e, h01=0x0050, text=» NGR A2,A2«, t00=0x001d, t01=0x003a}
0x2d8c…2dbe Head {h00=0x002e, h01=0x0050, text=» SUK A2,2 ERROR, SET RETURN CODE -2 OR -3 «, t00=0x001d, t01=0x004c}
0x2dbe…2df0 Head {h00=0x002e, h01=0x0050, text=» ST A2,TTB:SA+14,A5 SET RETURN CODE IN A7«, t00=0x001d, t01=0x007e}
0x2df0…2dfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b0}
0x2dfa…2e10 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x001d, t01=0x00ba}
0x2e10…2e40 Head {h00=0x002c, h01=0x0050, text=» LDR A11,A11 CHECK DISC PAGING/SWB FLAG «, t00=0x001d, t01=0x00d0}
0x2e40…2e62 Head {h00=0x001e, h01=0x0050, text=» RB(Z) LTD:80 SWB HANDLING«, t00=0x001d, t01=0x0100}
0x2e62…2e6e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x0122}
0x2e6e…2e78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x012e}
0x2e78…2ea4 Head {h00=0x0028, h01=0x0050, text=» LD A3,SEG:PB,A9 PAGE BLOCK ADDRESS «, t00=0x001d, t01=0x0138}
0x2ea4…2eb0 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001d, t01=0x0164}
0x2eb0…2ed4 Head {h00=0x0020, h01=0x0050, text=» CF A15,RELPA2 RELEASE PAGE «, t00=0x001d, t01=0x0170}
0x2ed4…2efc (30, 0, 400) Head {h00=0x0024, h01=0x0050, text=» LDK A4,1 INDICATE SEGMENT ERROR«, t00=0x001e, t01=0x0004}
0x2efc…2f0e Head {h00=0x000e, h01=0x0050, text=» SCR A4,A9«, t00=0x001e, t01=0x002c}
0x2f0e…2f40 Head {h00=0x002e, h01=0x0050, text=» LD A4,SCTIOE APPLICATION RESTART ADDRESS «, t00=0x001e, t01=0x003e}
0x2f40…2f72 Head {h00=0x002e, h01=0x0050, text=» ST A4,TTB:SA,A5 SET NEW DISPATCH ADDRESS «, t00=0x001e, t01=0x0070}
0x2f72…2f84 Head {h00=0x000e, h01=0x0050, text=» RB LTD:80«, t00=0x001e, t01=0x00a2}
0x2f84…2f8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b4}
0x2f8e…2fa6 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x001e, t01=0x00be}
0x2fa6…2fb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00d6}
0x2fb0…2fba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00e0}
0x2fba…2fcc Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001e, t01=0x00ea}
0x2fcc…2fde Head {h00=0x000e, h01=0x0050, text=»* LT:SWB *«, t00=0x001e, t01=0x00fc}
0x2fde…2ff0 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001e, t01=0x010e}
0x2ff0…2ffa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0120}
0x2ffa…3004 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x012a}
0x3004…304c Head {h00=0x0044, h01=0x0050, text=»* LT:SWB HANDLES THE LOADING/STORING OF SWAPPABLE WORK BLOCKS.«, t00=0x001e, t01=0x0134}
0x304c…3056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x017c}
0x3056…308c Head {h00=0x0032, h01=0x0050, text=»* INPUT: A1 = SWAPPABLE WORK BLOCK ADDRESS «, t00=0x001e, t01=0x0186}
0x308c…30c2 Head {h00=0x0032, h01=0x0050, text=»* A3 = TTAB ADDRESS OF CALLING TASK «, t00=0x001f, t01=0x002c}
0x30c2…30e6 Head {h00=0x0020, h01=0x0050, text=»* A4 = LKM DATA DIRECTIVE«, t00=0x001f, t01=0x0062}
0x30e6…30f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0086}
0x30f0…30fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0090}
0x30fa…3128 Head {h00=0x002a, h01=0x0050, text=»LT:SWB EQU * LDTASK SWB HANDLING ENTRY«, t00=0x001f, t01=0x009a}
0x3128…313e Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x001f, t01=0x00c8}
0x313e…3154 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001f, t01=0x00de}
0x3154…3160 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x001f, t01=0x00f4}
0x3160…318c Head {h00=0x0028, h01=0x0050, text=» LDKL A5,TTABLD LDTASK TTAB ADDRESS «, t00=0x001f, t01=0x0100}
0x318c…31bc Head {h00=0x002c, h01=0x0050, text=» TL TTB:MT,A3 LOAD MMU WITH CALLING TASK«, t00=0x001f, t01=0x012c}
0x31bc…31ec Head {h00=0x002c, h01=0x0050, text=» TS TTB:MT,A5 STORE IN LDTASK MMU TABLE «, t00=0x001f, t01=0x015c}
0x31ec…31f8 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x001f, t01=0x018c}
0x31f8…3204 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0008}
0x3204…320e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0014}
0x320e…3224 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0020, t01=0x001e}
0x3224…3254 Head {h00=0x002c, h01=0x0050, text=» LDR A5,A3 TTAB ADDRESS OF CALLING TASK «, t00=0x0020, t01=0x0034}
0x3254…327a Head {h00=0x0022, h01=0x0050, text=» LDR A7,A4 LKM DATA DIRECTIVE «, t00=0x0020, t01=0x0064}
0x327a…32ae Head {h00=0x0030, h01=0x0050, text=» SUR A11,A11 INDICATE SWB HANDLING (A11 = 0)«, t00=0x0020, t01=0x008a}
0x32ae…32dc Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A1 DISC ADDRESS OF FIRST COPY«, t00=0x0020, t01=0x00be}
0x32dc…32f0 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x0020, t01=0x00ec}
0x32f0…3308 Head {h00=0x0014, h01=0x0050, text=» LD A4,SWB:DS,A1«, t00=0x0020, t01=0x0100}
0x3308…3338 Head {h00=0x002c, h01=0x0050, text=» LD A6,SWB:EL,A1 SWB COPY LENGTH (BYTES)«, t00=0x0020, t01=0x0118}
0x3338…336a Head {h00=0x002e, h01=0x0050, text=» LD A2,SWB:NS,A1 SWB COPY LENGTH (SECTORS)«, t00=0x0020, t01=0x0148}
0x336a…3374 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x017a}
0x3374…338c Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0020, t01=0x0184}
0x338c…3396 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x000c}
0x3396…33a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0016}
0x33a0…33bc Head {h00=0x0018, h01=0x0050, text=» LD A1,TTB:SA+14,A5 «, t00=0x0021, t01=0x0020}
0x33bc…33de Head {h00=0x001e, h01=0x0050, text=» ANK A1,/FF SWB COPY INDEX«, t00=0x0021, t01=0x003c}
0x33de…33e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x005e}
0x33e8…33fc Head {h00=0x0010, h01=0x0050, text=»LTS:10 EQU *«, t00=0x0021, t01=0x0068}
0x33fc…340e Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0021, t01=0x007c}
0x340e…3418 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x008e}
0x3418…342e Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0021, t01=0x0098}
0x342e…3444 Head {h00=0x0012, h01=0x0050, text=» RF(NP) LTS:20«, t00=0x0021, t01=0x00ae}
0x3444…347c Head {h00=0x0034, h01=0x0050, text=» ADR A4,A2 COMPUTE DISC ADDRESS OF REQUESTED SWB«, t00=0x0021, t01=0x00c4}
0x347c…349a Head {h00=0x001a, h01=0x0050, text=» RF(O) LTS:15 OVERFLOW«, t00=0x0021, t01=0x00fc}
0x349a…34ac Head {h00=0x000e, h01=0x0050, text=» RB LTS:10«, t00=0x0021, t01=0x011a}
0x34ac…34b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x012c}
0x34b6…34de Head {h00=0x0024, h01=0x0050, text=»LTS:15 EQU * OVERFLOW CORRECTION«, t00=0x0021, t01=0x0136}
0x34de…34f0 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0021, t01=0x015e}
0x34f0…3506 Head {h00=0x0012, h01=0x0050, text=» ANKL A4,/7FFF«, t00=0x0021, t01=0x0170}
0x3506…3518 Head {h00=0x000e, h01=0x0050, text=» RB LTS:10«, t00=0x0021, t01=0x0186}
0x3518…3522 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0008}
0x3522…3536 Head {h00=0x0010, h01=0x0050, text=»LTS:20 EQU *«, t00=0x0022, t01=0x0012}
0x3536…3566 Head {h00=0x002c, h01=0x0050, text=» LDR A1,A3 DISC ADDRESS OF REQUESTED SWB«, t00=0x0022, t01=0x0026}
0x3566…3578 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0022, t01=0x0056}
0x3578…3584 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0068}
0x3584…358e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0074}
0x358e…35a4 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0022, t01=0x007e}
0x35a4…35ba Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0022, t01=0x0094}
0x35ba…35f0 Head {h00=0x0032, h01=0x0050, text=» MUR A1 COMPUTE DISC ADDRESS OF REQUESTED SWB «, t00=0x0022, t01=0x00aa}
0x35f0…3600 Head {h00=0x000c, h01=0x0050, text=» DAR A3 «, t00=0x0022, t01=0x00e0}
0x3600…360c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00f0}
0x360c…3616 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00fc}
0x3616…362e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0022, t01=0x0106}
0x362e…3638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x011e}
0x3638…3642 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0128}
0x3642…3658 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0022, t01=0x0132}
0x3658…368c Head {h00=0x0030, h01=0x0050, text=» LD A3,TTB:SA+16,A5 MEMORY ADDRESS (LOGICAL)«, t00=0x0022, t01=0x0148}
0x368c…369e Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0022, t01=0x017c}
0x369e…36cc Head {h00=0x002a, h01=0x0050, text=» SRL A6,1 CONVERT SWB LENGTH TO WORDS «, t00=0x0022, t01=0x018e}
0x36cc…36de Head {h00=0x000e, h01=0x0050, text=» LDR A4,A6«, t00=0x0023, t01=0x002c}
0x36de…3708 Head {h00=0x0026, h01=0x0050, text=» LD A12,SCTIPL SWB DISC FILE CODE «, t00=0x0023, t01=0x003e}
0x3708…3734 Head {h00=0x0028, h01=0x0050, text=» SUK A7,19 CHECK LKM DATA DIRECTIVE «, t00=0x0023, t01=0x0068}
0x3734…375c Head {h00=0x0024, h01=0x0050, text=» ABL(Z) LTD:15 LOAD SWB REQUEST «, t00=0x0023, t01=0x0094}
0x375c…379a Head {h00=0x003a, h01=0x0050, text=» LDKL A4,/7FFF PARAMETER TO AVOID INTERMEDIATE BUFFER «, t00=0x0023, t01=0x00bc}
0x379a…37d0 Head {h00=0x0032, h01=0x0050, text=» LDK A7,/95 PHYSICAL WRITE (STORE SWB REQUEST)«, t00=0x0023, t01=0x00fa}
0x37d0…37e4 Head {h00=0x0010, h01=0x0050, text=» ABL LTD:20 «, t00=0x0023, t01=0x0130}
0x37e4…37f0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x0144}
0x37f0…37fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0150}
0x37fa…3812 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0023, t01=0x015a}
0x3812…381c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0172}
0x381c…3826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x017c}
0x3826…3838 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0023, t01=0x0186}
0x3838…384a Head {h00=0x000e, h01=0x0050, text=»* QLTDSK *«, t00=0x0024, t01=0x0008}
0x384a…385c Head {h00=0x000e, h01=0x0050, text=»* QLTSWB *«, t00=0x0024, t01=0x001a}
0x385c…386e Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0024, t01=0x002c}
0x386e…3878 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x003e}
0x3878…3882 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0048}
0x3882…38c0 Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE PERFORMS ACTIVATION OF THE LOAD TASK.«, t00=0x0024, t01=0x0052}
0x38c0…38ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0090}
0x38ca…3908 Head {h00=0x003a, h01=0x0050, text=»* ACTIVATION IS AT LT:DSK WHEN DISC PAGING REQUEST. «, t00=0x0024, t01=0x009a}
0x3908…394e Head {h00=0x0042, h01=0x0050, text=»* ACTIVATION IS AT LT:SWB WHEN SWAPPABLE WORK BLOCK REQUEST.«, t00=0x0024, t01=0x00d8}
0x394e…3958 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x011e}
0x3958…3990 Head {h00=0x0034, h01=0x0050, text=»* INPUT: A1 = SEGMENT BLOCK ADDRESS (LT:DSK) «, t00=0x0024, t01=0x0128}
0x3990…39ca Head {h00=0x0036, h01=0x0050, text=»* = SWAPPABLE WORK BLOCK ADDRESS (LT:SWB) «, t00=0x0024, t01=0x0160}
0x39ca…3a00 Head {h00=0x0032, h01=0x0050, text=»* A3 = TTAB ADDRESS OF CALLING TASK «, t00=0x0025, t01=0x000a}
0x3a00…3a2e Head {h00=0x002a, h01=0x0050, text=»* A4 = LKM DATA DIRECTIVE (LT:SWB) «, t00=0x0025, t01=0x0040}
0x3a2e…3a38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006e}
0x3a38…3a60 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A2, A5 ARE DESTROYED«, t00=0x0025, t01=0x0078}
0x3a60…3a6a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00a0}
0x3a6a…3a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00aa}
0x3a74…3aa8 Head {h00=0x0030, h01=0x0050, text=»QLTSWB EQU * ACTIVATE LDTASK AT ENTRY LT:SWB«, t00=0x0025, t01=0x00b4}
0x3aa8…3abe Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0025, t01=0x00e8}
0x3abe…3ae6 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,LT:SWB DISPATCH ADDRESS«, t00=0x0025, t01=0x00fe}
0x3ae6…3af8 Head {h00=0x000e, h01=0x0050, text=» RF QLTASK«, t00=0x0025, t01=0x0126}
0x3af8…3b04 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0138}
0x3b04…3b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0144}
0x3b0e…3b24 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=0 «, t00=0x0025, t01=0x014e}
0x3b24…3b5e Head {h00=0x0036, h01=0x0050, text=» ABL LKMERR INDICATE SYSGEN ERROR AND HALT SYSTEM «, t00=0x0025, t01=0x0164}
0x3b5e…3b6a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x000e}
0x3b6a…3b74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x001a}
0x3b74…3ba8 Head {h00=0x0030, h01=0x0050, text=»QLTDSK EQU * ACTIVATE LDTASK AT ENTRY LT:DSK«, t00=0x0026, t01=0x0024}
0x3ba8…3bd0 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,LT:DSK DISPATCH ADDRESS«, t00=0x0026, t01=0x0058}
0x3bd0…3bda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0080}
0x3bda…3bf2 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0026, t01=0x008a}
0x3bf2…3bfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a2}
0x3bfc…3c06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00ac}
0x3c06…3c1a Head {h00=0x0010, h01=0x0050, text=»QLTASK EQU *«, t00=0x0026, t01=0x00b6}
0x3c1a…3c46 Head {h00=0x0028, h01=0x0050, text=» LDKL A5,TTABLD LDTASK TTAB ADDRESS «, t00=0x0026, t01=0x00ca}
0x3c46…3c68 Head {h00=0x001e, h01=0x0050, text=» ABL ACTOT ACTIVATE LDTASK«, t00=0x0026, t01=0x00f6}
0x3c68…3c72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0118}
0x3c72…3c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0122}
0x3c7c…3c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x012c}
0x3c86…3c92 Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0026, t01=0x0136}
0x3c92…3c96 Head {h00=0x4004, h01=0x0000}
0x3c96…3c9a 00 26 01 42 ┆ & B┆
0x3c9a…3ca2 (39, 1, 8) 20 04 00 00 00 27 00 04 ┆ ' ┆
0x3ca2…3cf2 (40, 0, 400) 27 47 45 54 50 53 57 27 2d 52 4f 55 54 49 4e 45 00 27 01 70 00 16 00 50 2a 20 4c 4f 41 44 20 53 54 41 43 4b 42 41 53 45 20 2a 00 28 00 18 00 16 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 28 00 32 00 04 00 50 00 28 00 4c ┆'GETPSW'-ROUTINE ' p P* LOAD STACKBASE * ( P****************** ( 2 P ( L┆
0x3cf2…3d42 00 14 00 50 5c 4c 44 4b 4c 5c 41 31 34 2c 53 54 41 43 4b 42 00 28 00 54 00 1a 00 50 5c 41 44 52 5c 41 31 34 2c 41 31 33 5c 52 45 4c 4f 43 41 54 45 20 00 28 00 6c 00 0c 00 50 5c 52 54 4e 5c 41 38 20 00 28 00 8a 00 08 00 50 5c 5c 5c 5c 00 28 ┆ P LDKL A14,STACKB ( T P ADR A14,A13 RELOCATE ( l P RTN A8 ( P (┆
0x3d42…3d92 00 9a 00 08 00 50 5c 5c 5c 5c 00 28 00 a6 00 0e 00 50 2a 20 53 54 41 43 4b 20 2a 20 00 28 00 b2 00 0e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 28 00 c4 00 06 00 50 2a 20 00 28 00 d6 00 0c 00 50 5c 52 45 53 5c 31 32 20 00 28 00 e0 00 16 00 50 ┆ P ( P* STACK * ( P********* ( P* ( P RES 12 ( P┆
0x3d92…3de2 53 54 41 43 4b 42 5c 45 51 55 5c 2a 2d 52 45 4c 2d 32 00 28 00 f0 00 0a 00 50 5c 45 4a 45 43 54 00 28 01 0a 00 08 00 50 5c 5c 5c 20 00 28 01 18 00 08 00 50 5c 5c 5c 5c 00 28 01 24 00 1e 00 50 2a 20 41 44 44 52 45 53 53 20 54 4f 20 50 53 57 ┆STACKB EQU *-REL-2 ( P EJECT ( P ( P ( $ P* ADDRESS TO PSW┆
0x3de2…3e32 2d 52 4f 55 54 49 4e 45 20 2a 00 28 01 30 00 1e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 28 01 52 00 06 00 50 2a 20 00 28 01 74 00 12 00 50 50 53 57 5c 45 51 55 5c 2a 2d 52 45 4c 20 00 28 01 7e ┆-ROUTINE * ( 0 P************************** ( R P* ( t PPSW EQU *-REL ( ~┆
0x3e32…3e82 (41, 0, 400) 00 10 00 50 5c 44 41 54 41 5c 47 45 54 50 53 57 00 29 00 04 00 08 00 50 5c 5c 5c 20 00 29 00 18 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ P DATA GETPSW ) P ) D P********************************************┆
0x3e82…3ed2 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 29 00 24 00 44 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 20 45 20 54 20 50 20 53 20 57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆******************** ) $ D P* G E T P S W ┆
0x3ed2…3f22 20 20 20 20 20 20 20 20 20 20 20 2a 00 29 00 6c 00 44 00 50 2a 20 4c 49 54 54 4c 45 20 53 55 42 52 4f 55 54 49 4e 45 20 54 4f 20 50 55 54 20 50 53 57 20 49 4e 20 53 54 41 43 4b 20 46 4f 52 20 43 41 4c 4c 49 4e 47 20 53 55 42 52 4f 55 54 49 ┆ * ) l D P* LITTLE SUBROUTINE TO PUT PSW IN STACK FOR CALLING SUBROUTI┆
0x3f22…3f72 4e 45 20 2a 00 29 00 b4 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 29 00 fc ┆NE * ) D P**************************************************************** ) ┆
0x3f72…3fc2 00 08 00 50 5c 5c 5c 20 00 29 01 44 00 14 00 50 47 45 54 50 53 57 5c 45 51 55 5c 2a 2d 52 45 4c 00 29 01 50 00 24 00 50 5c 53 54 52 5c 41 32 2c 41 31 34 5c 53 41 56 45 20 41 32 20 4f 4e 20 41 31 34 2d 53 54 41 43 4b 00 29 01 68 00 30 00 50 ┆ P ) D PGETPSW EQU *-REL ) P $ P STR A2,A14 SAVE A2 ON A14-STACK ) h 0 P┆
0x3fc2…4012 (42, 0, 400) 5c 4c 44 5c 41 32 2c 32 2c 41 31 34 5c 47 45 54 20 50 53 57 20 46 52 4f 4d 20 43 41 4c 4c 49 4e 47 20 53 55 42 52 4f 55 54 49 4e 45 00 29 01 90 00 2e 00 50 5c 53 54 5c 41 32 2c 36 2c 41 31 34 5c 52 45 50 4c 41 43 45 20 50 53 57 20 46 52 4f ┆ LD A2,2,A14 GET PSW FROM CALLING SUBROUTINE ) . P ST A2,6,A14 REPLACE PSW FRO┆
0x4012…4062 4d 20 4d 41 49 4e 20 50 52 4f 47 52 41 4d 00 2a 00 34 00 1c 00 50 5c 4c 44 52 2a 5c 41 32 2c 41 31 34 5c 52 45 53 54 4f 52 45 20 41 32 20 00 2a 00 66 00 0c 00 50 5c 52 54 4e 5c 41 31 34 00 2a 00 86 00 0a 00 50 5c 45 4a 45 43 54 00 2a 00 96 ┆M MAIN PROGRAM * 4 P LDR* A2,A14 RESTORE A2 * f P RTN A14 * P EJECT * ┆
0x4062…40b2 00 04 00 50 00 2a 00 a4 00 26 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 2a 00 ac 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P * & P********************************* * & P* ┆
0x40b2…4102 20 20 20 20 20 20 2a 20 00 2a 00 d6 00 26 00 50 2a 20 20 53 55 42 52 4f 55 54 49 4e 45 2d 48 41 4e 44 4c 45 52 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 2a 01 00 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ * * & P* SUBROUTINE-HANDLER * * & P* ┆
0x4102…4152 20 20 20 20 20 20 20 20 20 20 2a 20 00 2a 01 2a 00 26 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 2a 01 54 00 04 00 50 00 2a 01 7e 00 14 00 50 53 55 42 53 55 42 5c 45 51 55 ┆ * * * & P********************************* * T P * ~ PSUBSUB EQU┆
0x4152…41a2 (43, 0, 400) 5c 2a 2d 52 45 4c 00 2a 01 86 00 22 00 50 53 55 42 42 41 5c 53 54 5c 41 31 30 2c 4d 55 4c 2c 41 31 33 5c 53 41 56 45 20 41 31 30 20 00 2b 00 0e 00 2e 00 50 5c 4c 44 2a 5c 41 31 30 2c 34 2c 41 31 34 5c 47 45 54 20 53 55 42 52 4f 55 54 49 4e ┆ *-REL * " PSUBBA ST A10,MUL,A13 SAVE A10 + . P LD* A10,4,A14 GET SUBROUTIN┆
0x41a2…41f2 45 20 52 45 4c 20 41 44 44 52 45 53 53 20 00 2b 00 34 00 24 00 50 5c 49 4d 5c 34 2c 41 31 34 5c 41 44 4a 55 53 54 20 52 45 54 55 52 4e 20 41 44 44 52 45 53 53 20 00 2b 00 66 00 0e 00 50 5c 49 4d 5c 34 2c 41 31 34 20 00 2b 00 8e 00 30 00 50 ┆E REL ADDRESS + 4 $ P IM 4,A14 ADJUST RETURN ADDRESS + f P IM 4,A14 + 0 P┆
0x41f2…4242 5c 41 44 5c 41 31 30 2c 4d 3a 52 45 4c 2c 41 31 33 5c 41 44 44 20 46 4f 52 20 53 59 53 4c 44 4d 20 52 45 4c 4f 43 41 54 49 4f 4e 20 00 2b 00 a0 00 1e 00 50 5c 53 54 52 5c 41 31 30 2c 41 31 34 5c 50 55 54 20 4f 4e 20 53 54 41 43 4b 20 00 2b ┆ AD A10,M:REL,A13 ADD FOR SYSLDM RELOCATION + P STR A10,A14 PUT ON STACK +┆
0x4242…4292 00 d4 00 20 00 50 5c 4c 44 5c 41 31 30 2c 4d 55 4c 2c 41 31 33 5c 52 45 53 54 4f 52 45 20 41 31 30 20 00 2b 00 f6 00 0e 00 50 5c 41 42 52 2a 5c 41 31 34 20 00 2b 01 1a 00 04 00 50 00 2b 01 2c 00 04 00 50 00 2b 01 34 00 04 00 50 00 2b 01 3c ┆ P LD A10,MUL,A13 RESTORE A10 + P ABR* A14 + P + , P + 4 P + <┆
0x4292…42e2 00 3c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 2b 01 44 00 3c 00 50 2a 20 4a 55 4d 50 20 54 4f 20 53 59 ┆ < P******************************************************* + D < P* JUMP TO SY┆
0x42e2…4332 (44, 0, 398) 53 4c 44 4d 20 28 46 52 4f 4d 20 53 59 53 4c 4f 44 29 20 41 4c 57 41 59 53 20 56 49 41 20 54 48 49 53 20 4d 4f 44 55 4c 45 20 2a 20 00 2b 01 84 00 3c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆SLDM (FROM SYSLOD) ALWAYS VIA THIS MODULE * + < P****************************┆
0x4332…4382 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 2c 00 34 00 04 00 50 00 2c 00 74 00 14 00 50 4a 55 4d 50 5c 41 42 4c 5c 53 59 53 4c 44 4d 20 00 2c 00 7c 00 0a 00 50 5c 45 4a 45 43 54 00 2c 00 94 00 08 ┆*************************** , 4 P , t PJUMP ABL SYSLDM , | P EJECT , ┆
0x4382…43d2 00 50 5c 5c 5c 5c 00 2c 00 a2 00 28 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 2c 00 ae 00 28 00 50 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ P , ( P************************************ , ( P** ┆
0x43d2…4422 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 00 2c 00 da 00 28 00 50 2a 2a 20 20 53 41 56 45 2c 20 41 4e 44 20 43 4f 4d 4d 55 4e 49 43 41 54 49 4f 4e 20 41 52 45 41 20 20 2a 2a 00 2c 01 06 00 28 00 50 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ** , ( P** SAVE, AND COMMUNICATION AREA ** , ( P** ┆
0x4422…4470 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 2a 00 2c 01 32 00 28 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 2c 01 5e 00 08 00 50 5c 5c 5c 20 ┆ ** , 2 ( P************************************ , ^ P ┆