|
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: 26810 (0x68ba)
Notes: pts_type(SC)
Names: »LDTASK.SC«
└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
└─⟦this⟧ »TOSSWORK/LDTASK.SC«
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
└─⟦this⟧ »TOSSWORK/LDTASK.SC«
IDENT LDTASK REL 11.0 81-06-10 870105041100 =2,REL 11.0 81-01-26 =2,END OF RELOC. CHECK FAILS (SPECIAL CASE) =1,PRR 11.0 80-06-12 BOFE =1,CHECK FOR END OF RELOCATION * ************************************************** * * 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 TLSEG1 UPDATE PAGQUE, CSB AND MMU EXTRN TLSEG2 UPDATE CSB AND MMU 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:AP ACB ADDRESS 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 SCTPSZ PAGE SIZE EXTRN ACBLAP LOGICAL ADDRESS OF PAGES EJECT LDTASK * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * * * A PROGRAM VERSION USING THE EXTENDED INSTRUCTION * SET IS OBTAINED BY SETTING CPU852 EQU 0. * CPU852 EQU 1 * * * A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK * BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. * SWPBLK EQU 0 * * * A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU * IS OBTAINED BY SETTING CPU857 EQU 1. * X:B EQU 0 CPU857 EQU X:B * EJECT LDTASK * * * A PROGRAM VERSION USING TOSS ASSEMBLER PAGING * IS OBTAINED BY SETTING ASMPAG EQU 1. * X:C EQU 0 ASMPAG EQU X:C * EJECT LDTASK * * ***************************** * ECB, STACK AND DATA 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 * PQEMTY DATA 0 PAGE QUEUE EMPTY FLAG * IFT MMUPAG=1 LD:LAD DATA 0 LOGICAL ADDRESS POINTER XIF * EJECT LDTASK * * ********** * TTABLD * ********** * * LDTASK TTAB * IFT MMUPAG=1 RES 16 LDTASK MMU TABLE XIF * DATA 0 CURRENT SEGMENT BASE (DUMMY) DATA 0 SEGMENT TABLE ADDRESS (DUMMY) DATA 0 SEGMENT BLOCK ADDRESS (DUMMY) DATA 0 ACB ADDRESS (DUMMY) * 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 TASK DEVICE TABLE (DUMMY) * 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 A9,A9 INDICATE SWB HANDLING (NO SEGBLK) 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 * * COMPUTE DISC ADDRESS OF REQUESTED SWB * 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 DAR A3 XIF * EJECT LDTASK * * IFT SWPBLK=1 LD A3,TTB:SA+16,A5 MEMORY ADDRESS (LOGICAL) ADK A6,1 LDR A4,A6 LD A12,SCTIPL SWB DISC FILE CODE SUK A7,19 CHECK LKM DATA DIRECTIVE RF(Z) LTSWB1 LOAD SWB LDKL A4,/7FFF PARAMETER TO AVOID INTERMEDIATE BUFFER LDK A7,/95 PHYSICAL WRITE RF LTSWB2 STORE SWB XIF * 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 A5,A3 TTAB ADDRESS OF CALLING TASK LDR* A2,A1 SEGMENT STATUS RF(NN) LTD:05 SEGMENT NOT LOADED IN CORE * * UPDATE MMU TABLE FOR CALLING TASK (IF MMU), * UPDATE CURRENT SEGMENT BASE, * AND REMOVE PAGE FROM PAGQUE. * LDR A7,A3 TTAB ADDRESS INH CF A15,TLSEG1 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 LEAST RECENTLY USED 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* A6,A2 PAGQUE ADDRESS STR A6,A4 UPDATE QUEUE LINK FORWARD NEXT BLOCK CMR A2 RESET QUEUE LINK FORWARD THIS BLOCK LD A4,PAG:SB,A2 OLD SEGMENT BLOCK ADDRESS RF(Z) LTD:10 LDKL A6,/7FFF ANRS A6,A4 INDICATE SEGMENT NOT LOADED ANYMORE * * CONNECT PAGBLK AND SEGBLK * LTD:10 EQU * 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 A3,TTABLD LDTASK TTAB ADDRESS MS 5,TTB:SA+2,A3 SAVE A1-A5 IN TTAB SAVE AREA TL TTB:MT,A5 LOAD MMU WITH CALLING TASK TS TTB:MT,A3 STORE IN LDTASK MMU TABLE LD A1,TTB:CB,A5 CURRENT SEGMENT BASE ADDRESS ST A1,TTB:CB,A3 LD A1,TTB:AP,A5 GET ACB ADDRESS ST A1,TTB:AP,A3 STORE IN LDTASK'S TTAB LDR A1,A2 LDR A5,A3 LDTASK TTAB ADDRESS CF A15,TLSEG2 UPDATE MMU TABLE FOR LDTASK TS TTB:MT,A5 STORE NEW MMU TABLE FOR CALLING TASK XIF * EJECT LDTASK * * PREPARE FOR READING OF SEGMENT * ENB LD A3,PAG:PA,A2 PAGE ADDRESS (PHYSICAL) LD A4,SCTPSZ PAGE SIZE LD A6,SEG:EL,A1 SEGMENT LENGTH LDR A9,A1 SAVE SEGMENT BLOCK ADDRESS LD A12,TTB:SP,A5 SEGTAB ADDRESS LD A12,SEG:FC,A12 SEGMENT DISC FILE CODE * IFT CPU852=1 LD A2,SEG:DS,A1 SEGMENT DISC ADDRESS LDR* A1,A1 XIF * IFT CPU852=0 MLR 2,A9 DISC SECTOR ADDRESS XIF * IFT MMUPAG=0 ST* A3,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE XIF * EJECT LDTASK * * IFT SWPBLK=1 * * ********** * LTSWB1 * * LTSWB2 * ********** * * * ENTRIES USED BY LDTASK WHEN ACTIVATED AT LT:SWB. * BELOW THIS POINT SWB HANDLING IS SIMILAR TO * DISC PAGING HANDLING. * * INPUT: A1 = DISC SECTOR NUMBER, PART 1 * A2 = " " " , PART 2 * A3 = MEMORY ADDRESS (LOGICAL) * A4 = SWB SIZE (BYTES) * A5 = TTAB ADDRESS CALLING TASK * A6 = SWB SIZE (BYTES) * A7 = ORDER CODE, PHYSICAL WRITE (LTSWB2 ONLY) * A9 = 0 (INDICATES SWB HANDLING BY SETTING SEGBLK ADDRESS = 0) * A12 = DISC FILE CODE * * XIF * LTSWB1 EQU * ENTRY USED BY LT:SWB ANK A1,/FF LDK A7,/91 PHYSICAL READ * EJECT LDTASK * * LTSWB2 EQU * ENTRY USED BY LT:SWB SRL A4,1 LDR A11,A4 PAGE/SWB SIZE (WORDS) SRL A6,1 LDR A10,A6 SEGMENT/SWB SIZE (WORDS) * * SET ECB PARAMETERS * LDKL A8,LD:ECB LD:ECB ADDRESS STR A12,A8 SET DISC FILE CODE IN ECB CM ECBEL,A8 RESET EFFECTIVE LENGTH LDR A12,A3 LDKL A14,LD:STB LDTASK STACK BASE * IFT CPU852=1 ST A1,ECBCW1,A8 SET SECTOR NUMBER IN ECB ST A2,ECBCW2,A8 XIF * IFT CPU852=0 MS 2,ECBCW1,A8 SET SECTOR NUMBER IN ECB XIF * EJECT LDTASK * * IFT MMUPAG=1 ECR A1,A3 * IFT SWPBLK=1 LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) 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 LD A2,TTB:AP,A5 ACB ADDRESS LDR A12,A3 ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL OR A12,ACBLAP,A2 * LTD:40 EQU * SRL A1,2 ANK A1,/30 SCR A1,A8 XIF * EJECT LDTASK * * ST A3,ECBBA,A8 SET BUFFER ADDRESS * IFT SWPBLK=1 LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) RF(Z) LTD:45 SWB HANDLING XIF * IFT ASMPAG=1 LDR* A1,A9 SEGMENT STATUS SLL A1,1 CHECK IF ASSEMBLER SEGMENT RF(N) ASSPAG YES, ASSEMBLER SEGMENT XIF * * COMPUTE REQUESTED LENGTH AND * CHECK IF ONE OR TWO LKM:S NECCESSARY * LTD:45 EQU * ADKL A10,127 NEXT HIGHER MULTIPLE OF 128 ANKL A10,/7F80 SUR A4,A10 CHECK IF PAGE IS LARGE ENOUGH RF(NN) LTD:50 OK, JUST ONE LKM NEEDED LDR A10,A6 ANKL A10,/7F80 NEXT LOWER MULTIPLE OF 128 * LTD:50 EQU * SUR A6,A10 REMAINING LENGTH TO MOVE IN 2ND LKM ADR A10,A10 CONVERT LENGTH TO BYTES RF(Z) LTD:55 INTERMEDIATE BUFFER NEEDED ST A10,ECBRL,A8 SET REQUESTED LENGTH IN ECB * EJECT LDTASK * * READ/WRITE SEGMENT SWB * CF A14,LD:IO READ/WRITE SEGMENT/SWB ADK A6,0 CHECK IF ANYTHING LEFT TO READ/WRITE RF(NP) LDEXIT SEGMENT/SWB HANDLING FINISHED * LTD:55 EQU * CF A14,LDSECT READ AND MOVE LAST PART OF SEGMENT/SWB * * COMMON EXIT FOR DISC PAGING, ASSEMBLER PAGING * AND SWAPPABLE WORK BLOCK HANDLING REQUESTS. * LDEXIT EQU * IFT SWPBLK=1 LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) RF(Z) LDEXI3 SWB HANDLING XIF * LDKL A4,/8000 INDICATE SEGMENT SUCCESSFULLY LOADED * LDEXI2 EQU * ORRS A4,A9 * LDEXI3 EQU * ABL QMEXIT QUEUE TASK AND EXIT LDTASK * EJECT LDTASK * * ********** * LD:IO * ********** * * * LDTASK I/O ROUTINE FOR READING/WRITING FROM/TO DISC. * IF I/O ERROR IS DETECTED LOADING IS ABORTED AND THE * PAGE IS INSERTED INTO PAGQUE AGAIN. CREDIT APPLICATIONS * ARE RESTARTED AT THE SPECIFIED REENTER ADDRESS. * * INPUT: A5 = TTAB ADDRESS OF CALLING TASK * A7 = ORDER CODE * A8 = LD:ECB ADDRESS * A9 = SEGBLK ADDRESS (=0 IF SWB) * * OUTPUT: A2 IS DESTROYED * * LD:IO EQU * LKM DATA 1 * * CHECK RETURN CODE AND ABORT IF ERROR * LD A2,ECBRC,A8 RETURN CODE ANKL A2,/FEFF SKIP RETRY BIT RF(NZ) LDIO10 DISC ERROR RTN A14 NO, RETURN * EJECT LDTASK * * ERROR: SET RETURN CODE IN A7 OF CALLING TASK * LDIO10 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 A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) RB(Z) LDEXI3 SWB HANDLING XIF * * INSERT PAGE IN PAGQUE AGAIN * LD A3,SEG:PB,A9 PAGE BLOCK ADDRESS INH CF A15,RELPA2 RELEASE PAGE * IFT ASMPAG=1 LDR* A4,A9 SEGMENT STATUS SLL A4,1 CHECK IF ASSEMBLER SEGMENT RF(N) LDIO20 YES, ASSEMBLER SEGMENT XIF * LD* A4,TTB:AP,A5 APPLICATION RESTART ADDRESS ST A4,TTB:SA,A5 SET NEW DISPATCH ADDRESS * LDIO20 EQU * LDKL A4,/100 SEGMENT ERROR BIT RB LDEXI2 * EJECT LDTASK * * IFT ASMPAG=1 * * ********** * ASSPAG * ********** * * * THIS ENTRY IS CALLED FROM THE LDTASK MAIN FLOW * WHEN LOADING OF AN ASSEMBLER SEGMENT IS WANTED. * ASSPAG WILL READ ONE SECTOR AT A TIME AND * PERFORM THE NECESSARY RELOCATIONS. * * INPUT: A5 = TTAB ADDRESS OF CALLING TASK * A7 = ORDER CODE, PHYSICAL READ (/91) * A8 = LD:ECB ADDRESS * A9 = SEGBLK ADDRESS * A10 = SEGMENT LENGTH (WORDS) * A11 = PAGE SIZE (WORDS) * A12 = PAGE ADDRESS (RELOCATION BASE) * * ASSPAG EQU * ASSEMBLER PAGING ENTRY LDK A1,1 SC A1,ECBRL,A8 REQUESTED LENGTH := 256 * IFT MMUPAG=1 ST A12,LD:LAD SAVE LOGICAL ADDRESS TO PAGE XIF * EJECT LDTASK * * IFT ASMPAG=1 * * PREPARE FOR RELOCATION OF ONE SECTOR AND * CHECK REMAINING PAGE SIZE. IF NOT LARGE ENOUGH * THEN READ (LAST) SECTOR TO INTERMEDIATE BUFFER, * ELSE READ SECTOR DIRECTLY TO ALLOCATED PAGE. * ASS:00 EQU * ASSEMBLER PAGING MAIN LOOP ENTRY IFT MMUPAG=0 LD A1,ECBBA,A8 SEGMENT POINTER * XIF * IFT ASMPAG=1 IFT MMUPAG=1 LD A1,LD:LAD GET LOGICAL ADDRESS POINTER XIF * IFT ASMPAG=1 CWK A11,128 CHECK REMAINING PAGE SIZE RF(L) ASS:85 INTERMEDIATE BUFFER NEEDED SUKL A11,120 REMAINING PAGE SIZE CF A14,LD:IO READ SECTOR LDK A2,240 CALC ADDRESS TO RELOCATION BITS CWK A10,120 RF(NL) ASS:02 LDR A2,A10 ADR A2,A2 * ASS:02 EQU * ADR A2,A1 * EJECT LDTASK * * RELOCATE ONE SEGMENT SECTOR * ASS:05 EQU * SRL A2,1 WORD ADDRESS LDR A13,A2 RELOCATION END, THIS SECTOR SLL A2,1 * ASS:10 EQU * LDK A3,16 RELOCATION BITS COUNTER * IFT MMUPAG=1 LDR A8,A8 CHECK WHERE TO FIND RELOCATION BITS RF(Z) ASS:15 RELOCATION BITS IN LD:BUF ELR A4,A2 16 RELOCATION BITS RF ASS:20 XIF * IFT ASMPAG=1 ASS:15 EQU * LDR* A4,A2 16 RELOCATION BITS * ASS:20 EQU * RF(NZ) ASS:40 RELOCATION NEEDED * ASS:25 EQU * LDR A6,A3 NUMBER OF RELOCATION BITS TO SKIP RF ASS:45 * EJECT LDTASK * * ASS:30 EQU * SLL A4,1 NEXT RELOCATION BIT TO TEST RB(Z) ASS:25 NEXT RELOCATION WORD * ASS:40 EQU * RF(N) ASS:50 RELOCATION NEEDED SLN A4,A6 SKIP ALL ZERO BITS ADK A1,2 INCREMENT SEGMENT POINTER * ASS:45 EQU * SUR A3,A6 UPDATE RELOCATION BITS COUNTER SRL A1,1 WORD ADDRESS FOR SEGMENT POINTER =1 ADR A1,A6 UPDATE SEGMENT POINTER (WORD) =1 RF(O) ASS:70 ALL RELOCATED,END OF SECTOR =1 SLL A1,1 BYTE ADDRESS FOR SEGMENT POINTER =1 RF ASS:60 GO AND CHECK IF END OF SECTOR * EJECT LDTASK * * RELOCATE ONE WORD * ASS:50 EQU * IFT MMUPAG=0 ADRS A12,A1 ADD RELOCATION BASE XIF * IFT ASMPAG=1 IFT MMUPAG=1 ELR A6,A1 WORD TO RELOCATE ADR A6,A12 ADD RELOCATION BASE ESR A6,A1 STORE RELOCATED WORD XIF * IFT ASMPAG=1 ADK A1,2 INCREMENT SEGMENT POINTER * * CHECK IF END OF SECTOR OR IF NEW RELOCATION WORD NEEDED * ASS:60 EQU * LDR A6,A1 SEGMENT POINTER SRL A6,1 WORD ADDRESS SUR A6,A13 COMPARE WITH END OF REL. ADDRESS =2 ADK A6,0 SET CR =2 RF(NN) ASS:70 END OF SECTOR =2 SUK A3,1 DECREMENT RELOCATION BITS COUNTER RB(P) ASS:30 MORE RELOCATION BITS ADK A2,2 INCREMENT RELOCATION BITS POINTER RB ASS:10 NEXT RELOCATION BITS WORD * EJECT LDTASK * * RETURN IF SEGMENT LOADING IS COMPLETED, * ELSE PREPARE FOR READING OF NEXT SECTOR. * ASS:70 EQU * SUKL A10,120 DECREMENT SEGMENT LENGTH RB(NP) LDEXIT SEGMENT LOADING COMPLETED LDK A4,240 * IFT MMUPAG=0 ADS A4,ECBBA,A8 UPDATE PAGE ADDRESS XIF * IFT ASMPAG=1 IFT MMUPAG=1 ADS A4,LD:LAD UPDATE LOGICAL ADDRESS POINTER LDK A3,0 MLR 2,A8 BUFFER ADDRESS SLC A1,4 DLL 1 SRL A2,1 DAR A3 SLL A2,1 DRL 1 SRC A1,4 MSR 2,A8 SET UPDATED BUFFER ADDRESS IN ECB XIF * EJECT LDTASK * * IFT ASMPAG=1 IM ECBCW2,A8 INCREMENT SECTOR NUMBER RF(O) ASS:80 OVERFLOW RB ASS:00 READ NEXT SECTOR TO PAGE * ASS:80 EQU * LDKL A4,/7FFF OVERFLOW CORRECTION ANS A4,ECBCW2,A8 IM ECBCW1,A8 RB ASS:00 READ NEXT SECTOR TO PAGE * EJECT LDTASK * * READ LAST SECTOR TO INTERMEDIATE BUFFER. * MOVE CODE BUT NOT RELOCATION BITS TO PAGE. * ASS:85 EQU * LDR A13,A10 SAVE REMAINING SEGMENT LENGTH LDR A6,A10 LDR A11,A12 SAVE RELOCATION BASE LDR A12,A1 ACTUAL PAGE ADDRESS SUR A10,A10 MEANS,DON'T UPDATE SEC NBR IN LDSEC2 CF A14,LDSEC2 READ SECTOR AND MOVE IT TO PAGE LDR A1,A12 LOGICAL ADDRESS OF CODE TO RELOCATE LDR A10,A13 LDR A2,A13 REMAINING SEGMENT LENGTH (WORDS) ADR A2,A2 DISPL. IN SECTOR TO RELOCATION BITS ADKL A2,LD:BUF ADDRESS TO RELOCATION BITS * IFT MMUPAG=1 SUR A8,A8 INDICATE RELOCATION BITS IN LD:BUF XIF * IFT ASMPAG=1 SRL A1,1 ADR A13,A1 VIRTUAL BEGINNING OF RELOCATION BITS LDR A1,A12 LOGICAL ADDRESS OF CODE TO RELOCATE LDR A12,A11 RESTORE RELOCATION BASE RB ASS:10 RELOCATE LAST SECTOR AND RETURN XIF * EJECT LDTASK * * ********** * LDSECT * * LDSEC2 * ********** * * * NOT ROOM ENOUGH IN PAGE FOR LAST SECTOR: * READ IT TO MEMORY VIA INTERMEDIATE BUFFER * * INPUT: A6 = NO OF WORDS TO MOVE * A8 = LD:ECB ADDRESS * A9 = SEGBLK ADDRESS (=0 IF SWB) * A10 = EFFECTIVE LENGTH, LAST I/O * A12 = LAST USED PAGE ADDRESS, LOGICAL (LDSECT ONLY) * = ACTUAL PAGE ADDRESS, LOGICAL (LDSEC2 ONLY) * * OUTPUT: A6 = 0 * A12 = ACTUAL PAGE ADDRESS (LOGICAL) * A1-A4, A7, A10 ARE DESTROYED * * LDSECT EQU * ADR A12,A10 UPDATE DESTINATION POINTER * EJECT LDTASK * * SET ECB PARAMETERS * LDSEC2 EQU * IFT CPU852=1 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 LDKL A4,/7FFF XIF * IFT CPU852=0 MLK 4 DATA LD:BUF,256 DATA /80,/7FFF SCR A3,A8 INDICATE BUFFER NOW IN SYSTEM AREA MS 2,ECBBA,A8 SET BUFFER AND REQUESTED LENGTH XIF * ECR A2,A10 ADS A2,ECBCW2,A8 UPDATE SECTOR NUMBER RF(O) LDS:30 OVERFLOW * LDS:10 EQU * CF A14,LD:IO READ ONE SECTOR TO LD:BUF LDR A2,A12 DESTINATION POINTER ADR A6,A6 CONVERT LENGTH TO BYTES * EJECT LDTASK * * MOVE LAST PART OF SEGMENT/SWB * IFT MMUPAG=1 MVSU A6 MOVE LAST PART OF SEGMENT/SWB XIF * LDS:20 EQU * IFT MMUPAG=0 IFT CPU852=1 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) LDS:20 XIF * IFT MMUPAG=0 IFT CPU852=0 IFT CPU852=0 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) LDS:20 XIF * IFT MMUPAG=0 IFT CPU852=0 IFT CPU857=1 MVB A6 MOVE REMAINING PART OF SEGMENT TO PAGE XIF * RTN A14 * LDS:30 EQU * IM ECBCW1,A8 OVERFLOW CORRECTION ANS A4,ECBCW2,A8 RB LDS:10 * 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 11.0 81-06-10 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005e Head {h00=0x001c, h01=0x0050, text=» =2,REL 11.0 81-01-26 «, t00=0x0000, t01=0x0042}
0x005e…0094 Head {h00=0x0032, h01=0x0050, text=» =2,END OF RELOC. CHECK FAILS (SPECIAL CASE)«, t00=0x0000, t01=0x0062}
0x0094…00ba Head {h00=0x0022, h01=0x0050, text=» =1,PRR 11.0 80-06-12 BOFE «, t00=0x0000, t01=0x0098}
0x00ba…00e4 Head {h00=0x0026, h01=0x0050, text=» =1,CHECK FOR END OF RELOCATION «, t00=0x0000, t01=0x00be}
0x00e4…00ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e8}
0x00ee…0128 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x00f2}
0x0128…0132 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012c}
0x0132…015a Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0136}
0x015a…0164 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015e}
0x0164…0182 Head {h00=0x001a, h01=0x0050, text=»* LDTASK = LOAD TASK«, t00=0x0000, t01=0x0168}
0x0182…018c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0186}
0x018c…0196 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0190}
0x0196…01a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000a}
0x01a0…01aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0014}
0x01aa…01e4 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x001e}
0x01e4…01ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0058}
0x01ee…01f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0062}
0x01f8…0226 Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE CONTAINS THE LOAD TASK«, t00=0x0001, t01=0x006c}
0x0226…0256 Head {h00=0x002c, h01=0x0050, text=»* FOR TOSS MEMORY MANAGEMENT SYSTEMS. «, t00=0x0001, t01=0x009a}
0x0256…0260 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ca}
0x0260…028a Head {h00=0x0026, h01=0x0050, text=»* IT CONTAINS TWO ENTRY POINTS: «, t00=0x0001, t01=0x00d4}
0x028a…0294 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fe}
0x0294…02c6 Head {h00=0x002e, h01=0x0050, text=»* - LT:DSK USED IN DISC PAGING SYSTEMS«, t00=0x0001, t01=0x0108}
0x02c6…0302 Head {h00=0x0038, h01=0x0050, text=»* - LT:SWB USED IN SWAPPABLE WORK BLOCK SYSTEMS «, t00=0x0001, t01=0x013a}
0x0302…030c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0176}
0x030c…0316 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0180}
0x0316…032e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0001, t01=0x018a}
0x032e…0338 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0012}
0x0338…0342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x0342…0356 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0026}
0x0356…036a Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x003a}
0x036a…037e Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x004e}
0x037e…0388 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0062}
0x0388…0392 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006c}
0x0392…03ba Head {h00=0x0024, h01=0x0050, text=» ENTRY LT:DSK DISC PAGING ENTRY «, t00=0x0002, t01=0x0076}
0x03ba…03ea Head {h00=0x002c, h01=0x0050, text=» ENTRY LT:SWB SWAPPABLE WORK BLOCK ENTRY«, t00=0x0002, t01=0x009e}
0x03ea…040e Head {h00=0x0020, h01=0x0050, text=» ENTRY TTABLD LOAD TASK TTAB«, t00=0x0002, t01=0x00ce}
0x040e…0444 Head {h00=0x0032, h01=0x0050, text=» ENTRY QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK «, t00=0x0002, t01=0x00f2}
0x0444…047a Head {h00=0x0032, h01=0x0050, text=» ENTRY QLTSWB ACTIVATE LDTASK AT ENTRY LT:SWB «, t00=0x0002, t01=0x0128}
0x047a…04a0 Head {h00=0x0022, h01=0x0050, text=» ENTRY QLTASK ACTIVATE LDTASK «, t00=0x0002, t01=0x015e}
0x04a0…04c6 Head {h00=0x0022, h01=0x0050, text=» ENTRY LD:ECB LDTASK ECB AREA «, t00=0x0002, t01=0x0184}
0x04c6…04ea Head {h00=0x0020, h01=0x0050, text=» ENTRY LD:BUF LDTASK BUFFER «, t00=0x0003, t01=0x001a}
0x04ea…050e Head {h00=0x0020, h01=0x0050, text=» ENTRY LD:BUE END OF BUFFER «, t00=0x0003, t01=0x003e}
0x050e…053a Head {h00=0x0028, h01=0x0050, text=» ENTRY PQEMTY PAGE QUEUE EMPTY FLAG «, t00=0x0003, t01=0x0062}
0x053a…0562 Head {h00=0x0024, h01=0x0050, text=» ENTRY LD:STB LDTASK STACK BASE «, t00=0x0003, t01=0x008e}
0x0562…057a Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0003, t01=0x00b6}
0x057a…0584 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ce}
0x0584…058e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d8}
0x058e…05a4 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x00e2}
0x05a4…05ba Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x00f8}
0x05ba…05d0 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x010e}
0x05d0…05da Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0124}
0x05da…05e4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x012e}
0x05e4…0614 Head {h00=0x002c, h01=0x0050, text=» EXTRN TLSEG1 UPDATE PAGQUE, CSB AND MMU«, t00=0x0003, t01=0x0138}
0x0614…063c Head {h00=0x0024, h01=0x0050, text=» EXTRN TLSEG2 UPDATE CSB AND MMU«, t00=0x0003, t01=0x0168}
0x063c…0672 Head {h00=0x0032, h01=0x0050, text=» EXTRN QMEXIT QUEUE TASK AND EXIT MONITOR TASK«, t00=0x0003, t01=0x0190}
0x0672…06aa Head {h00=0x0034, h01=0x0050, text=» EXTRN LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR«, t00=0x0004, t01=0x0036}
0x06aa…06cc Head {h00=0x001e, h01=0x0050, text=» EXTRN ACTOT ACTIVATE TASK«, t00=0x0004, t01=0x006e}
0x06cc…06ee Head {h00=0x001e, h01=0x0050, text=» EXTRN RELPA2 RELEASE PAGE«, t00=0x0004, t01=0x0090}
0x06ee…0714 Head {h00=0x0022, h01=0x0050, text=» EXTRN PAGQUE FREE PAGE QUEUE «, t00=0x0004, t01=0x00b2}
0x0714…073e Head {h00=0x0026, h01=0x0050, text=» EXTRN PAG:QB QUEUE LINK BACKWARDS«, t00=0x0004, t01=0x00d8}
0x073e…0760 Head {h00=0x001e, h01=0x0050, text=» EXTRN PAG:PA PAGE ADDRESS«, t00=0x0004, t01=0x0102}
0x0760…078c Head {h00=0x0028, h01=0x0050, text=» EXTRN PAG:SB SEGMENT BLOCK ADDRESS «, t00=0x0004, t01=0x0124}
0x078c…07ac Head {h00=0x001c, h01=0x0050, text=» EXTRN SEG:FC FILE CODE «, t00=0x0004, t01=0x0150}
0x07ac…07d6 Head {h00=0x0026, h01=0x0050, text=» EXTRN SEG:DS DISC SECTOR ADDRESS «, t00=0x0004, t01=0x0170}
0x07d6…07fa Head {h00=0x0020, h01=0x0050, text=» EXTRN SEG:EL SEGMENT LENGTH«, t00=0x0005, t01=0x000a}
0x07fa…0822 Head {h00=0x0024, h01=0x0050, text=» EXTRN SEG:PB PAGE BLOCK ADDRESS«, t00=0x0005, t01=0x002e}
0x0822…085a Head {h00=0x0034, h01=0x0050, text=» EXTRN SWB:DS DISC SECTOR ADDRESS OF FIRST COPY «, t00=0x0005, t01=0x0056}
0x085a…0882 Head {h00=0x0024, h01=0x0050, text=» EXTRN SWB:EL SWB LENGTH (BYTES)«, t00=0x0005, t01=0x008e}
0x0882…08ac Head {h00=0x0026, h01=0x0050, text=» EXTRN SWB:NS SWB LENGTH (SECTORS)«, t00=0x0005, t01=0x00b6}
0x08ac…08d4 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0005, t01=0x00e0}
0x08d4…08fe Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0005, t01=0x0108}
0x08fe…0928 Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0005, t01=0x0132}
0x0928…094c Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0005, t01=0x015c}
0x094c…0974 Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBCW1 ECB CONTROL WORD 1«, t00=0x0005, t01=0x0180}
0x0974…099c Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBCW2 ECB CONTROL WORD 2«, t00=0x0006, t01=0x0018}
0x099c…09be Head {h00=0x001e, h01=0x0050, text=» EXTRN TTB:AP ACB ADDRESS «, t00=0x0006, t01=0x0040}
0x09be…09e2 Head {h00=0x0020, h01=0x0050, text=» EXTRN TTB:SA TTAB SAVE AREA«, t00=0x0006, t01=0x0062}
0x09e2…0a02 Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:MT MMU TABLE «, t00=0x0006, t01=0x0086}
0x0a02…0a2c Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:CB CURRENT SEGMENT BASE«, t00=0x0006, t01=0x00a6}
0x0a2c…0a50 Head {h00=0x0020, h01=0x0050, text=» EXTRN TTB:SP SEGTAB ADDRESS«, t00=0x0006, t01=0x00d0}
0x0a50…0a68 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0006, t01=0x00f4}
0x0a68…0a72 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010c}
0x0a72…0a7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0116}
0x0a7c…0aa8 Head {h00=0x0028, h01=0x0050, text=» EXTRN SCTIPL PROGRAM LOADING DEVICE«, t00=0x0006, t01=0x0120}
0x0aa8…0ac8 Head {h00=0x001c, h01=0x0050, text=» EXTRN SCTPSZ PAGE SIZE «, t00=0x0006, t01=0x014c}
0x0ac8…0af6 Head {h00=0x002a, h01=0x0050, text=» EXTRN ACBLAP LOGICAL ADDRESS OF PAGES«, t00=0x0006, t01=0x016c}
0x0af6…0b0e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0007, t01=0x000a}
0x0b0e…0b18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0022}
0x0b18…0b22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x002c}
0x0b22…0b54 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x0036}
0x0b54…0b5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0068}
0x0b5e…0b7c Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0007, t01=0x0072}
0x0b7c…0b86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0090}
0x0b86…0bb8 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x009a}
0x0bb8…0bc2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00cc}
0x0bc2…0bf4 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0007, t01=0x00d6}
0x0bf4…0c22 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0007, t01=0x0108}
0x0c22…0c2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0136}
0x0c2c…0c40 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0007, t01=0x0140}
0x0c40…0c4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0154}
0x0c4a…0c54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x015e}
0x0c54…0c8e Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0007, t01=0x0168}
0x0c8e…0cc0 Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0008, t01=0x0012}
0x0cc0…0cca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0044}
0x0cca…0cde Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0008, t01=0x004e}
0x0cde…0ce8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0062}
0x0ce8…0cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x006c}
0x0cf2…0d2c Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION INCLUDING TOSS SWAPPABLE WORK «, t00=0x0008, t01=0x0076}
0x0d2c…0d62 Head {h00=0x0032, h01=0x0050, text=»* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. «, t00=0x0008, t01=0x00b0}
0x0d62…0d6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e6}
0x0d6c…0d80 Head {h00=0x0010, h01=0x0050, text=»SWPBLK EQU 0«, t00=0x0008, t01=0x00f0}
0x0d80…0d8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0104}
0x0d8a…0d94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x010e}
0x0d94…0dcc Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU «, t00=0x0008, t01=0x0118}
0x0dcc…0dfa Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING CPU857 EQU 1.«, t00=0x0008, t01=0x0150}
0x0dfa…0e04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x017e}
0x0e04…0e16 Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0008, t01=0x0188}
0x0e16…0e2c Head {h00=0x0012, h01=0x0050, text=»CPU857 EQU X:B«, t00=0x0009, t01=0x000a}
0x0e2c…0e36 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0020}
0x0e36…0e4e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0009, t01=0x002a}
0x0e4e…0e58 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0042}
0x0e58…0e62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x004c}
0x0e62…0e9a Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS ASSEMBLER PAGING «, t00=0x0009, t01=0x0056}
0x0e9a…0ec8 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING ASMPAG EQU 1.«, t00=0x0009, t01=0x008e}
0x0ec8…0ed2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00bc}
0x0ed2…0ee4 Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x0009, t01=0x00c6}
0x0ee4…0efa Head {h00=0x0012, h01=0x0050, text=»ASMPAG EQU X:C«, t00=0x0009, t01=0x00d8}
0x0efa…0f04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ee}
0x0f04…0f1c Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0009, t01=0x00f8}
0x0f1c…0f26 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0110}
0x0f26…0f30 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x011a}
0x0f30…0f56 Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0009, t01=0x0124}
0x0f56…0f7c Head {h00=0x0022, h01=0x0050, text=»* ECB, STACK AND DATA AREAS * «, t00=0x0009, t01=0x014a}
0x0f7c…0fa2 Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x0009, t01=0x0170}
0x0fa2…0fac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0008}
0x0fac…0fb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0012}
0x0fb6…0fe8 Head {h00=0x002e, h01=0x0050, text=»LD:ECB DATA 0,0,0,0,0,0,0 LDTASK ECB AREA «, t00=0x000a, t01=0x001c}
0x0fe8…0ff2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x004e}
0x0ff2…102a Head {h00=0x0034, h01=0x0050, text=»LD:BUF RES 128 INTERMEDIATE BUFFER FOR LOAD TASK«, t00=0x000a, t01=0x0058}
0x102a…104c Head {h00=0x001e, h01=0x0050, text=»LD:BUE EQU * END OF BUFFER«, t00=0x000a, t01=0x0090}
0x104c…1056 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00b2}
0x1056…107e Head {h00=0x0024, h01=0x0050, text=» RES 4 LDTASK STACK (TWO LEVELS)«, t00=0x000a, t01=0x00bc}
0x107e…10aa Head {h00=0x0028, h01=0x0050, text=»LD:STB EQU *-2 LOAD TASK STACK BASE «, t00=0x000a, t01=0x00e4}
0x10aa…10b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0110}
0x10b4…10e0 Head {h00=0x0028, h01=0x0050, text=»PQEMTY DATA 0 PAGE QUEUE EMPTY FLAG «, t00=0x000a, t01=0x011a}
0x10e0…10ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0146}
0x10ea…1100 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000a, t01=0x0150}
0x1100…112e Head {h00=0x002a, h01=0x0050, text=»LD:LAD DATA 0 LOGICAL ADDRESS POINTER «, t00=0x000a, t01=0x0166}
0x112e…113a (11, 0, 400) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0004}
0x113a…1144 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0010}
0x1144…115c Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x000b, t01=0x001a}
0x115c…1166 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0032}
0x1166…1170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003c}
0x1170…1182 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000b, t01=0x0046}
0x1182…1194 Head {h00=0x000e, h01=0x0050, text=»* TTABLD *«, t00=0x000b, t01=0x0058}
0x1194…11a6 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000b, t01=0x006a}
0x11a6…11b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x007c}
0x11b0…11c6 Head {h00=0x0012, h01=0x0050, text=»* LDTASK TTAB «, t00=0x000b, t01=0x0086}
0x11c6…11d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x009c}
0x11d0…11e6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000b, t01=0x00a6}
0x11e6…1206 Head {h00=0x001c, h01=0x0050, text=» RES 16 LDTASK MMU TABLE«, t00=0x000b, t01=0x00bc}
0x1206…1212 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00dc}
0x1212…121c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00e8}
0x121c…1248 Head {h00=0x0028, h01=0x0050, text=» DATA 0 CURRENT SEGMENT BASE (DUMMY)«, t00=0x000b, t01=0x00f2}
0x1248…1276 Head {h00=0x002a, h01=0x0050, text=» DATA 0 SEGMENT TABLE ADDRESS (DUMMY) «, t00=0x000b, t01=0x011e}
0x1276…12a4 Head {h00=0x002a, h01=0x0050, text=» DATA 0 SEGMENT BLOCK ADDRESS (DUMMY) «, t00=0x000b, t01=0x014c}
0x12a4…12c8 Head {h00=0x0020, h01=0x0050, text=» DATA 0 ACB ADDRESS (DUMMY) «, t00=0x000b, t01=0x017a}
0x12c8…12d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x000e}
0x12d2…12f4 Head {h00=0x001e, h01=0x0050, text=»TTABLD EQU * TTABLD ENTRY «, t00=0x000c, t01=0x0018}
0x12f4…131a Head {h00=0x0022, h01=0x0050, text=» DATA 0 DISPATCHER QUEUE LINK «, t00=0x000c, t01=0x003a}
0x131a…1340 Head {h00=0x0022, h01=0x0050, text=» DATA '#L' TASK IDENTIFICATION«, t00=0x000c, t01=0x0060}
0x1340…1360 Head {h00=0x001c, h01=0x0050, text=» DATA 49 PRIORITY LEVEL «, t00=0x000c, t01=0x0086}
0x1360…1380 Head {h00=0x001c, h01=0x0050, text=» DATA 0 PENDING POINTER «, t00=0x000c, t01=0x00a6}
0x1380…13ae Head {h00=0x002a, h01=0x0050, text=» DATA /C4C0 PSW (PROGRAM STATUS WORD) «, t00=0x000c, t01=0x00c6}
0x13ae…13ce Head {h00=0x001c, h01=0x0050, text=» DATA 0 DISPATCH ADDRESS«, t00=0x000c, t01=0x00f4}
0x13ce…1404 Head {h00=0x0032, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14«, t00=0x000c, t01=0x0114}
0x1404…1420 Head {h00=0x0018, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 «, t00=0x000c, t01=0x014a}
0x1420…144a Head {h00=0x0026, h01=0x0050, text=» DATA 2 TASK DEVICE TABLE (DUMMY) «, t00=0x000c, t01=0x0166}
0x144a…1454 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0190}
0x1454…146c Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x000d, t01=0x000a}
0x146c…1476 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0022}
0x1476…1480 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x002c}
0x1480…1492 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000d, t01=0x0036}
0x1492…14a4 Head {h00=0x000e, h01=0x0050, text=»* LT:SWB *«, t00=0x000d, t01=0x0048}
0x14a4…14b6 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000d, t01=0x005a}
0x14b6…14c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x006c}
0x14c0…14ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0076}
0x14ca…1512 Head {h00=0x0044, h01=0x0050, text=»* LT:SWB HANDLES THE LOADING/STORING OF SWAPPABLE WORK BLOCKS.«, t00=0x000d, t01=0x0080}
0x1512…151c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c8}
0x151c…1552 Head {h00=0x0032, h01=0x0050, text=»* INPUT: A1 = SWAPPABLE WORK BLOCK ADDRESS «, t00=0x000d, t01=0x00d2}
0x1552…1588 Head {h00=0x0032, h01=0x0050, text=»* A3 = TTAB ADDRESS OF CALLING TASK «, t00=0x000d, t01=0x0108}
0x1588…15ac Head {h00=0x0020, h01=0x0050, text=»* A4 = LKM DATA DIRECTIVE«, t00=0x000d, t01=0x013e}
0x15ac…15b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0162}
0x15b6…15c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016c}
0x15c0…15ee Head {h00=0x002a, h01=0x0050, text=»LT:SWB EQU * LDTASK SWB HANDLING ENTRY«, t00=0x000d, t01=0x0176}
0x15ee…1604 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x000e, t01=0x0014}
0x1604…161a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x002a}
0x161a…1626 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x000e, t01=0x0040}
0x1626…1652 Head {h00=0x0028, h01=0x0050, text=» LDKL A5,TTABLD LDTASK TTAB ADDRESS «, t00=0x000e, t01=0x004c}
0x1652…1682 Head {h00=0x002c, h01=0x0050, text=» TL TTB:MT,A3 LOAD MMU WITH CALLING TASK«, t00=0x000e, t01=0x0078}
0x1682…16b2 Head {h00=0x002c, h01=0x0050, text=» TS TTB:MT,A5 STORE IN LDTASK MMU TABLE «, t00=0x000e, t01=0x00a8}
0x16b2…16be Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x000e, t01=0x00d8}
0x16be…16ca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00e4}
0x16ca…16d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f0}
0x16d4…16ea Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x000e, t01=0x00fa}
0x16ea…171a Head {h00=0x002c, h01=0x0050, text=» LDR A5,A3 TTAB ADDRESS OF CALLING TASK «, t00=0x000e, t01=0x0110}
0x171a…1740 Head {h00=0x0022, h01=0x0050, text=» LDR A7,A4 LKM DATA DIRECTIVE «, t00=0x000e, t01=0x0140}
0x1740…1774 Head {h00=0x0030, h01=0x0050, text=» SUR A9,A9 INDICATE SWB HANDLING (NO SEGBLK)«, t00=0x000e, t01=0x0166}
0x1774…17a2 Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A1 DISC ADDRESS OF FIRST COPY«, t00=0x000f, t01=0x000a}
0x17a2…17b6 Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FF «, t00=0x000f, t01=0x0038}
0x17b6…17ce Head {h00=0x0014, h01=0x0050, text=» LD A4,SWB:DS,A1«, t00=0x000f, t01=0x004c}
0x17ce…17fe Head {h00=0x002c, h01=0x0050, text=» LD A6,SWB:EL,A1 SWB COPY LENGTH (BYTES)«, t00=0x000f, t01=0x0064}
0x17fe…1830 Head {h00=0x002e, h01=0x0050, text=» LD A2,SWB:NS,A1 SWB COPY LENGTH (SECTORS)«, t00=0x000f, t01=0x0094}
0x1830…183a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c6}
0x183a…1852 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x000f, t01=0x00d0}
0x1852…185c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e8}
0x185c…188c Head {h00=0x002c, h01=0x0050, text=»* COMPUTE DISC ADDRESS OF REQUESTED SWB «, t00=0x000f, t01=0x00f2}
0x188c…1896 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0122}
0x1896…18b2 Head {h00=0x0018, h01=0x0050, text=» LD A1,TTB:SA+14,A5 «, t00=0x000f, t01=0x012c}
0x18b2…18d4 Head {h00=0x001e, h01=0x0050, text=» ANK A1,/FF SWB COPY INDEX«, t00=0x000f, t01=0x0148}
0x18d4…18de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x016a}
0x18de…18f2 Head {h00=0x0010, h01=0x0050, text=»LTS:10 EQU *«, t00=0x000f, t01=0x0174}
0x18f2…1904 Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000f, t01=0x0188}
0x1904…190e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x000a}
0x190e…1924 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0010, t01=0x0014}
0x1924…193a Head {h00=0x0012, h01=0x0050, text=» RF(NP) LTS:20«, t00=0x0010, t01=0x002a}
0x193a…1972 Head {h00=0x0034, h01=0x0050, text=» ADR A4,A2 COMPUTE DISC ADDRESS OF REQUESTED SWB«, t00=0x0010, t01=0x0040}
0x1972…1990 Head {h00=0x001a, h01=0x0050, text=» RF(O) LTS:15 OVERFLOW«, t00=0x0010, t01=0x0078}
0x1990…19a2 Head {h00=0x000e, h01=0x0050, text=» RB LTS:10«, t00=0x0010, t01=0x0096}
0x19a2…19ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a8}
0x19ac…19d4 Head {h00=0x0024, h01=0x0050, text=»LTS:15 EQU * OVERFLOW CORRECTION«, t00=0x0010, t01=0x00b2}
0x19d4…19e6 Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0010, t01=0x00da}
0x19e6…19fc Head {h00=0x0012, h01=0x0050, text=» ANKL A4,/7FFF«, t00=0x0010, t01=0x00ec}
0x19fc…1a0e Head {h00=0x000e, h01=0x0050, text=» RB LTS:10«, t00=0x0010, t01=0x0102}
0x1a0e…1a18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0114}
0x1a18…1a2c Head {h00=0x0010, h01=0x0050, text=»LTS:20 EQU *«, t00=0x0010, t01=0x011e}
0x1a2c…1a5c Head {h00=0x002c, h01=0x0050, text=» LDR A1,A3 DISC ADDRESS OF REQUESTED SWB«, t00=0x0010, t01=0x0132}
0x1a5c…1a6e Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0010, t01=0x0162}
0x1a6e…1a7a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0174}
0x1a7a…1a84 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0180}
0x1a84…1a9a Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0010, t01=0x018a}
0x1a9a…1ab0 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0011, t01=0x0010}
0x1ab0…1ac0 Head {h00=0x000c, h01=0x0050, text=» MUR A1 «, t00=0x0011, t01=0x0026}
0x1ac0…1ad0 Head {h00=0x000c, h01=0x0050, text=» DAR A3 «, t00=0x0011, t01=0x0036}
0x1ad0…1adc Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0046}
0x1adc…1ae6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0052}
0x1ae6…1afe Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0011, t01=0x005c}
0x1afe…1b08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0074}
0x1b08…1b12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x007e}
0x1b12…1b28 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0011, t01=0x0088}
0x1b28…1b5c Head {h00=0x0030, h01=0x0050, text=» LD A3,TTB:SA+16,A5 MEMORY ADDRESS (LOGICAL)«, t00=0x0011, t01=0x009e}
0x1b5c…1b6e Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0011, t01=0x00d2}
0x1b6e…1b80 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A6«, t00=0x0011, t01=0x00e4}
0x1b80…1baa Head {h00=0x0026, h01=0x0050, text=» LD A12,SCTIPL SWB DISC FILE CODE «, t00=0x0011, t01=0x00f6}
0x1baa…1bd6 Head {h00=0x0028, h01=0x0050, text=» SUK A7,19 CHECK LKM DATA DIRECTIVE «, t00=0x0011, t01=0x0120}
0x1bd6…1bf4 Head {h00=0x001a, h01=0x0050, text=» RF(Z) LTSWB1 LOAD SWB«, t00=0x0011, t01=0x014c}
0x1bf4…1c32 Head {h00=0x003a, h01=0x0050, text=» LDKL A4,/7FFF PARAMETER TO AVOID INTERMEDIATE BUFFER «, t00=0x0011, t01=0x016a}
0x1c32…1c54 Head {h00=0x001e, h01=0x0050, text=» LDK A7,/95 PHYSICAL WRITE«, t00=0x0012, t01=0x0018}
0x1c54…1c70 Head {h00=0x0018, h01=0x0050, text=» RF LTSWB2 STORE SWB«, t00=0x0012, t01=0x003a}
0x1c70…1c7c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0056}
0x1c7c…1c86 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0062}
0x1c86…1c9e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0012, t01=0x006c}
0x1c9e…1ca8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0084}
0x1ca8…1cb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x008e}
0x1cb2…1cc4 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0012, t01=0x0098}
0x1cc4…1cd6 Head {h00=0x000e, h01=0x0050, text=»* LT:DSK *«, t00=0x0012, t01=0x00aa}
0x1cd6…1ce8 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0012, t01=0x00bc}
0x1ce8…1cf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ce}
0x1cf2…1cfc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d8}
0x1cfc…1d44 Head {h00=0x0044, h01=0x0050, text=»* LT:DSK PERFORMS LOADING OF DISC RESIDENT SEGMENTS INTO CORE.«, t00=0x0012, t01=0x00e2}
0x1d44…1d4e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x012a}
0x1d4e…1d7c Head {h00=0x002a, h01=0x0050, text=»* INPUT: A1 = SEGMENT BLOCK ADDRESS«, t00=0x0012, t01=0x0134}
0x1d7c…1db2 Head {h00=0x0032, h01=0x0050, text=»* A3 = TTAB ADDRESS OF CALLING TASK «, t00=0x0012, t01=0x0162}
0x1db2…1dbc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0008}
0x1dbc…1dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0012}
0x1dc6…1df4 Head {h00=0x002a, h01=0x0050, text=»LT:DSK EQU * LDTASK DISC PAGING ENTRY «, t00=0x0013, t01=0x001c}
0x1df4…1e24 Head {h00=0x002c, h01=0x0050, text=» LDR A5,A3 TTAB ADDRESS OF CALLING TASK «, t00=0x0013, t01=0x004a}
0x1e24…1e46 Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A1 SEGMENT STATUS«, t00=0x0013, t01=0x007a}
0x1e46…1e78 Head {h00=0x002e, h01=0x0050, text=» RF(NN) LTD:05 SEGMENT NOT LOADED IN CORE «, t00=0x0013, t01=0x009c}
0x1e78…1e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ce}
0x1e82…1eb8 Head {h00=0x0032, h01=0x0050, text=»* UPDATE MMU TABLE FOR CALLING TASK (IF MMU), «, t00=0x0013, t01=0x00d8}
0x1eb8…1ede Head {h00=0x0022, h01=0x0050, text=»* UPDATE CURRENT SEGMENT BASE,«, t00=0x0013, t01=0x010e}
0x1ede…1f04 Head {h00=0x0022, h01=0x0050, text=»* AND REMOVE PAGE FROM PAGQUE.«, t00=0x0013, t01=0x0134}
0x1f04…1f0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x015a}
0x1f0e…1f2e Head {h00=0x001c, h01=0x0050, text=» LDR A7,A3 TTAB ADDRESS «, t00=0x0013, t01=0x0164}
0x1f2e…1f3a Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0013, t01=0x0184}
0x1f3a…1f50 Head {h00=0x0012, h01=0x0050, text=» CF A15,TLSEG1«, t00=0x0013, t01=0x0190}
0x1f50…1f80 Head {h00=0x002c, h01=0x0050, text=» LDR A5,A7 TTAB ADDRESS OF CALLING TASK «, t00=0x0014, t01=0x0016}
0x1f80…1fae Head {h00=0x002a, h01=0x0050, text=» ABL QMEXIT QUEUE TASK AND EXIT LDTASK«, t00=0x0014, t01=0x0046}
0x1fae…1fb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0074}
0x1fb8…1fd0 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0014, t01=0x007e}
0x1fd0…1fda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0096}
0x1fda…2014 Head {h00=0x0036, h01=0x0050, text=»* NO PAGE AVAILABLE. PAUSE LDTASK UNTIL RESTARTED «, t00=0x0014, t01=0x00a0}
0x2014…2042 Head {h00=0x002a, h01=0x0050, text=»* BY RELPAG WHEN PAGE AVAILABLE AGAIN.«, t00=0x0014, t01=0x00da}
0x2042…204c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0108}
0x204c…2060 Head {h00=0x0010, h01=0x0050, text=»LTD:00 EQU *«, t00=0x0014, t01=0x0112}
0x2060…208c Head {h00=0x0028, h01=0x0050, text=» IM PQEMTY INDICATE PAGE QUEUE EMPTY«, t00=0x0014, t01=0x0126}
0x208c…2098 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0014, t01=0x0152}
0x2098…20b4 Head {h00=0x0018, h01=0x0050, text=» DATA 5 PAUSE LDTASK«, t00=0x0014, t01=0x015e}
0x20b4…20be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x017a}
0x20be…20f2 Head {h00=0x0030, h01=0x0050, text=»* TAKE LEAST RECENTLY USED PAGE FROM PAGQUE «, t00=0x0014, t01=0x0184}
0x20f2…20fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0028}
0x20fc…2110 Head {h00=0x0010, h01=0x0050, text=»LTD:05 EQU *«, t00=0x0015, t01=0x0032}
0x2110…2128 Head {h00=0x0014, h01=0x0050, text=» LD A2,PAGQUE+2 «, t00=0x0015, t01=0x0046}
0x2128…213e Head {h00=0x0012, h01=0x0050, text=» CWK A2,PAGQUE«, t00=0x0015, t01=0x005e}
0x213e…2166 Head {h00=0x0024, h01=0x0050, text=» RB(E) LTD:00 NO PAGE AVAILABLE «, t00=0x0015, t01=0x0074}
0x2166…2170 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x009c}
0x2170…2188 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0015, t01=0x00a6}
0x2188…2192 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00be}
0x2192…21ba Head {h00=0x0024, h01=0x0050, text=»* TAKE FOUND PAGE OUT OF PAGQUE «, t00=0x0015, t01=0x00c8}
0x21ba…21c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00f0}
0x21c4…21d0 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0015, t01=0x00fa}
0x21d0…2204 Head {h00=0x0030, h01=0x0050, text=» LD A4,PAG:QB,A2 ADDRESS TO NEXT PAGE BLOCK «, t00=0x0015, t01=0x0106}
0x2204…2230 Head {h00=0x0028, h01=0x0050, text=» ST A4,PAGQUE+2 UPDATE QUEUE ANCHOR «, t00=0x0015, t01=0x013a}
0x2230…2252 Head {h00=0x001e, h01=0x0050, text=» LDR* A6,A2 PAGQUE ADDRESS«, t00=0x0015, t01=0x0166}
0x2252…228a Head {h00=0x0034, h01=0x0050, text=» STR A6,A4 UPDATE QUEUE LINK FORWARD NEXT BLOCK «, t00=0x0015, t01=0x0188}
0x228a…22be Head {h00=0x0030, h01=0x0050, text=» CMR A2 RESET QUEUE LINK FORWARD THIS BLOCK «, t00=0x0016, t01=0x0030}
0x22be…22f0 Head {h00=0x002e, h01=0x0050, text=» LD A4,PAG:SB,A2 OLD SEGMENT BLOCK ADDRESS«, t00=0x0016, t01=0x0064}
0x22f0…2306 Head {h00=0x0012, h01=0x0050, text=» RF(Z) LTD:10 «, t00=0x0016, t01=0x0096}
0x2306…231c Head {h00=0x0012, h01=0x0050, text=» LDKL A6,/7FFF«, t00=0x0016, t01=0x00ac}
0x231c…2354 Head {h00=0x0034, h01=0x0050, text=» ANRS A6,A4 INDICATE SEGMENT NOT LOADED ANYMORE «, t00=0x0016, t01=0x00c2}
0x2354…235e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00fa}
0x235e…2382 Head {h00=0x0020, h01=0x0050, text=»* CONNECT PAGBLK AND SEGBLK «, t00=0x0016, t01=0x0104}
0x2382…238c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0128}
0x238c…23a0 Head {h00=0x0010, h01=0x0050, text=»LTD:10 EQU *«, t00=0x0016, t01=0x0132}
0x23a0…23d4 Head {h00=0x0030, h01=0x0050, text=» ST A2,SEG:PB,A1 SET NEW PAGE BLOCK ADDRESS «, t00=0x0016, t01=0x0146}
0x23d4…240a Head {h00=0x0032, h01=0x0050, text=» ST A1,PAG:SB,A2 SET NEW SEGMENT BLOCK ADDRESS«, t00=0x0016, t01=0x017a}
0x240a…2414 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0020}
0x2414…242a Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0017, t01=0x002a}
0x242a…2434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0040}
0x2434…246a Head {h00=0x0032, h01=0x0050, text=»* UPDATE MMU TABLE FOR CALLING TASK AND LDTASK«, t00=0x0017, t01=0x004a}
0x246a…2474 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0080}
0x2474…24a0 Head {h00=0x0028, h01=0x0050, text=» LDKL A3,TTABLD LDTASK TTAB ADDRESS «, t00=0x0017, t01=0x008a}
0x24a0…24d6 Head {h00=0x0032, h01=0x0050, text=» MS 5,TTB:SA+2,A3 SAVE A1-A5 IN TTAB SAVE AREA«, t00=0x0017, t01=0x00b6}
0x24d6…2506 Head {h00=0x002c, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU WITH CALLING TASK«, t00=0x0017, t01=0x00ec}
0x2506…2536 Head {h00=0x002c, h01=0x0050, text=» TS TTB:MT,A3 STORE IN LDTASK MMU TABLE «, t00=0x0017, t01=0x011c}
0x2536…256c Head {h00=0x0032, h01=0x0050, text=» LD A1,TTB:CB,A5 CURRENT SEGMENT BASE ADDRESS «, t00=0x0017, t01=0x014c}
0x256c…2584 Head {h00=0x0014, h01=0x0050, text=» ST A1,TTB:CB,A3«, t00=0x0017, t01=0x0182}
0x2584…25ac Head {h00=0x0024, h01=0x0050, text=» LD A1,TTB:AP,A5 GET ACB ADDRESS«, t00=0x0018, t01=0x000a}
0x25ac…25dc Head {h00=0x002c, h01=0x0050, text=» ST A1,TTB:AP,A3 STORE IN LDTASK'S TTAB «, t00=0x0018, t01=0x0032}
0x25dc…25ee Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0018, t01=0x0062}
0x25ee…2614 Head {h00=0x0022, h01=0x0050, text=» LDR A5,A3 LDTASK TTAB ADDRESS«, t00=0x0018, t01=0x0074}
0x2614…2646 Head {h00=0x002e, h01=0x0050, text=» CF A15,TLSEG2 UPDATE MMU TABLE FOR LDTASK«, t00=0x0018, t01=0x009a}
0x2646…2680 Head {h00=0x0036, h01=0x0050, text=» TS TTB:MT,A5 STORE NEW MMU TABLE FOR CALLING TASK«, t00=0x0018, t01=0x00cc}
0x2680…268c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0106}
0x268c…2696 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0112}
0x2696…26ae Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0018, t01=0x011c}
0x26ae…26b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0134}
0x26b8…26e0 Head {h00=0x0024, h01=0x0050, text=»* PREPARE FOR READING OF SEGMENT«, t00=0x0018, t01=0x013e}
0x26e0…26ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0166}
0x26ea…26f6 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0018, t01=0x0170}
0x26f6…2726 Head {h00=0x002c, h01=0x0050, text=» LD A3,PAG:PA,A2 PAGE ADDRESS (PHYSICAL)«, t00=0x0018, t01=0x017c}
0x2726…2746 Head {h00=0x001c, h01=0x0050, text=» LD A4,SCTPSZ PAGE SIZE «, t00=0x0019, t01=0x001c}
0x2746…276e Head {h00=0x0024, h01=0x0050, text=» LD A6,SEG:EL,A1 SEGMENT LENGTH «, t00=0x0019, t01=0x003c}
0x276e…279c Head {h00=0x002a, h01=0x0050, text=» LDR A9,A1 SAVE SEGMENT BLOCK ADDRESS «, t00=0x0019, t01=0x0064}
0x279c…27c4 Head {h00=0x0024, h01=0x0050, text=» LD A12,TTB:SP,A5 SEGTAB ADDRESS«, t00=0x0019, t01=0x0092}
0x27c4…27f6 Head {h00=0x002e, h01=0x0050, text=» LD A12,SEG:FC,A12 SEGMENT DISC FILE CODE «, t00=0x0019, t01=0x00ba}
0x27f6…2800 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00ec}
0x2800…2816 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0019, t01=0x00f6}
0x2816…2844 Head {h00=0x002a, h01=0x0050, text=» LD A2,SEG:DS,A1 SEGMENT DISC ADDRESS «, t00=0x0019, t01=0x010c}
0x2844…2858 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A1 «, t00=0x0019, t01=0x013a}
0x2858…2864 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x014e}
0x2864…286e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x015a}
0x286e…2884 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0019, t01=0x0164}
0x2884…28aa Head {h00=0x0022, h01=0x0050, text=» MLR 2,A9 DISC SECTOR ADDRESS «, t00=0x0019, t01=0x017a}
0x28aa…28b6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0010}
0x28b6…28c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x001c}
0x28c0…28d6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001a, t01=0x0026}
0x28d6…290c Head {h00=0x0032, h01=0x0050, text=» ST* A3,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE «, t00=0x001a, t01=0x003c}
0x290c…2918 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0072}
0x2918…2922 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x007e}
0x2922…293a Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x001a, t01=0x0088}
0x293a…2944 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00a0}
0x2944…294e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00aa}
0x294e…2964 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x001a, t01=0x00b4}
0x2964…296e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00ca}
0x296e…2978 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d4}
0x2978…298a Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001a, t01=0x00de}
0x298a…299c Head {h00=0x000e, h01=0x0050, text=»* LTSWB1 *«, t00=0x001a, t01=0x00f0}
0x299c…29ae Head {h00=0x000e, h01=0x0050, text=»* LTSWB2 *«, t00=0x001a, t01=0x0102}
0x29ae…29c0 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x001a, t01=0x0114}
0x29c0…29ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0126}
0x29ca…29d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0130}
0x29d4…2a10 Head {h00=0x0038, h01=0x0050, text=»* ENTRIES USED BY LDTASK WHEN ACTIVATED AT LT:SWB.«, t00=0x001a, t01=0x013a}
0x2a10…2a48 Head {h00=0x0034, h01=0x0050, text=»* BELOW THIS POINT SWB HANDLING IS SIMILAR TO «, t00=0x001a, t01=0x0176}
0x2a48…2a6a Head {h00=0x001e, h01=0x0050, text=»* DISC PAGING HANDLING. «, t00=0x001b, t01=0x001e}
0x2a6a…2a74 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0040}
0x2a74…2aa8 Head {h00=0x0030, h01=0x0050, text=»* INPUT: A1 = DISC SECTOR NUMBER, PART 1 «, t00=0x001b, t01=0x004a}
0x2aa8…2adc Head {h00=0x0030, h01=0x0050, text=»* A2 = " " " , PART 2 «, t00=0x001b, t01=0x007e}
0x2adc…2b0e Head {h00=0x002e, h01=0x0050, text=»* A3 = MEMORY ADDRESS (LOGICAL) «, t00=0x001b, t01=0x00b2}
0x2b0e…2b38 Head {h00=0x0026, h01=0x0050, text=»* A4 = SWB SIZE (BYTES) «, t00=0x001b, t01=0x00e4}
0x2b38…2b6a Head {h00=0x002e, h01=0x0050, text=»* A5 = TTAB ADDRESS CALLING TASK«, t00=0x001b, t01=0x010e}
0x2b6a…2b94 Head {h00=0x0026, h01=0x0050, text=»* A6 = SWB SIZE (BYTES) «, t00=0x001b, t01=0x0140}
0x2b94…2bd6 Head {h00=0x003e, h01=0x0050, text=»* A7 = ORDER CODE, PHYSICAL WRITE (LTSWB2 ONLY) «, t00=0x001b, t01=0x016a}
0x2bd6…2c28 Head {h00=0x004e, h01=0x0050, text=»* A9 = 0 (INDICATES SWB HANDLING BY SETTING SEGBLK ADDRESS = 0) «, t00=0x001c, t01=0x001c}
0x2c28…2c50 Head {h00=0x0024, h01=0x0050, text=»* A12 = DISC FILE CODE «, t00=0x001c, t01=0x006e}
0x2c50…2c5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0096}
0x2c5a…2c64 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00a0}
0x2c64…2c70 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x00aa}
0x2c70…2c7a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00b6}
0x2c7a…2ca4 Head {h00=0x0026, h01=0x0050, text=»LTSWB1 EQU * ENTRY USED BY LT:SWB «, t00=0x001c, t01=0x00c0}
0x2ca4…2cb8 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FF «, t00=0x001c, t01=0x00ea}
0x2cb8…2cda Head {h00=0x001e, h01=0x0050, text=» LDK A7,/91 PHYSICAL READ «, t00=0x001c, t01=0x00fe}
0x2cda…2ce4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0120}
0x2ce4…2cfc Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x001c, t01=0x012a}
0x2cfc…2d06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0142}
0x2d06…2d10 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x014c}
0x2d10…2d3a Head {h00=0x0026, h01=0x0050, text=»LTSWB2 EQU * ENTRY USED BY LT:SWB «, t00=0x001c, t01=0x0156}
0x2d3a…2d4c Head {h00=0x000e, h01=0x0050, text=» SRL A4,1 «, t00=0x001c, t01=0x0180}
0x2d4c…2d76 (29, 0, 400) Head {h00=0x0026, h01=0x0050, text=» LDR A11,A4 PAGE/SWB SIZE (WORDS) «, t00=0x001d, t01=0x0004}
0x2d76…2d88 Head {h00=0x000e, h01=0x0050, text=» SRL A6,1 «, t00=0x001d, t01=0x002e}
0x2d88…2db4 Head {h00=0x0028, h01=0x0050, text=» LDR A10,A6 SEGMENT/SWB SIZE (WORDS)«, t00=0x001d, t01=0x0040}
0x2db4…2dbe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x006c}
0x2dbe…2dda Head {h00=0x0018, h01=0x0050, text=»* SET ECB PARAMETERS«, t00=0x001d, t01=0x0076}
0x2dda…2de4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0092}
0x2de4…2e0a Head {h00=0x0022, h01=0x0050, text=» LDKL A8,LD:ECB LD:ECB ADDRESS«, t00=0x001d, t01=0x009c}
0x2e0a…2e38 Head {h00=0x002a, h01=0x0050, text=» STR A12,A8 SET DISC FILE CODE IN ECB «, t00=0x001d, t01=0x00c2}
0x2e38…2e64 Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8 RESET EFFECTIVE LENGTH «, t00=0x001d, t01=0x00f0}
0x2e64…2e78 Head {h00=0x0010, h01=0x0050, text=» LDR A12,A3 «, t00=0x001d, t01=0x011c}
0x2e78…2ea2 Head {h00=0x0026, h01=0x0050, text=» LDKL A14,LD:STB LDTASK STACK BASE«, t00=0x001d, t01=0x0130}
0x2ea2…2eac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x015a}
0x2eac…2ec2 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001d, t01=0x0164}
0x2ec2…2ef4 Head {h00=0x002e, h01=0x0050, text=» ST A1,ECBCW1,A8 SET SECTOR NUMBER IN ECB «, t00=0x001d, t01=0x017a}
0x2ef4…2f0c Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBCW2,A8«, t00=0x001e, t01=0x001c}
0x2f0c…2f18 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0034}
0x2f18…2f22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0040}
0x2f22…2f38 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001e, t01=0x004a}
0x2f38…2f68 Head {h00=0x002c, h01=0x0050, text=» MS 2,ECBCW1,A8 SET SECTOR NUMBER IN ECB«, t00=0x001e, t01=0x0060}
0x2f68…2f74 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0090}
0x2f74…2f7e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x009c}
0x2f7e…2f96 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x001e, t01=0x00a6}
0x2f96…2fa0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00be}
0x2fa0…2faa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00c8}
0x2faa…2fc0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001e, t01=0x00d2}
0x2fc0…2fd2 Head {h00=0x000e, h01=0x0050, text=» ECR A1,A3«, t00=0x001e, t01=0x00e8}
0x2fd2…2fdc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00fa}
0x2fdc…2ff2 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x001e, t01=0x0104}
0x2ff2…3026 Head {h00=0x0030, h01=0x0050, text=» LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) «, t00=0x001e, t01=0x011a}
0x3026…3050 Head {h00=0x0026, h01=0x0050, text=» RF(NZ) LTD:30 DISC PAGING REQUEST«, t00=0x001e, t01=0x014e}
0x3050…305a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0178}
0x305a…3072 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x001e, t01=0x0182}
0x3072…307c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x000a}
0x307c…30ae Head {h00=0x002e, h01=0x0050, text=»* SWB: CONVERT LOGICAL ADDRESS TO PHYSICAL«, t00=0x001f, t01=0x0014}
0x30ae…30b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0046}
0x30b8…30ca Head {h00=0x000e, h01=0x0050, text=» SRL A1,3 «, t00=0x001f, t01=0x0050}
0x30ca…30f4 Head {h00=0x0026, h01=0x0050, text=» ANK A1,/1E MMUTAB INDEX (5 BITS) «, t00=0x001f, t01=0x0062}
0x30f4…3118 Head {h00=0x0020, h01=0x0050, text=» ADR A1,A5 ADD TTAB ADDRESS «, t00=0x001f, t01=0x008c}
0x3118…3146 Head {h00=0x002a, h01=0x0050, text=» LC A1,TTB:MT,A1 PHYSICAL PAGE ADDRESS«, t00=0x001f, t01=0x00b0}
0x3146…3158 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x001f, t01=0x00de}
0x3158…316c Head {h00=0x0010, h01=0x0050, text=» ANK A2,/3C «, t00=0x001f, t01=0x00f0}
0x316c…317e Head {h00=0x000e, h01=0x0050, text=» SRC A2,6 «, t00=0x001f, t01=0x0104}
0x317e…3194 Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/FFF «, t00=0x001f, t01=0x0116}
0x3194…31a6 Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x001f, t01=0x012c}
0x31a6…31b8 Head {h00=0x000e, h01=0x0050, text=» RF LTD:40«, t00=0x001f, t01=0x013e}
0x31b8…31c4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x0150}
0x31c4…31ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x015c}
0x31ce…31e2 Head {h00=0x0010, h01=0x0050, text=»LTD:30 EQU *«, t00=0x001f, t01=0x0166}
0x31e2…31f8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001f, t01=0x017a}
0x31f8…3202 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0190}
0x3202…3238 Head {h00=0x0032, h01=0x0050, text=»* SEGMENT: CONVERT PHYSICAL ADDRESS TO LOGICAL«, t00=0x0020, t01=0x000a}
0x3238…3242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0040}
0x3242…3254 Head {h00=0x000e, h01=0x0050, text=» SLL A3,2 «, t00=0x0020, t01=0x004a}
0x3254…3278 Head {h00=0x0020, h01=0x0050, text=» LD A2,TTB:AP,A5 ACB ADDRESS«, t00=0x0020, t01=0x005c}
0x3278…328c Head {h00=0x0010, h01=0x0050, text=» LDR A12,A3 «, t00=0x0020, t01=0x0080}
0x328c…32c6 Head {h00=0x0036, h01=0x0050, text=» ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL«, t00=0x0020, t01=0x0094}
0x32c6…32e0 Head {h00=0x0016, h01=0x0050, text=» OR A12,ACBLAP,A2 «, t00=0x0020, t01=0x00ce}
0x32e0…32ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00e8}
0x32ea…32fe Head {h00=0x0010, h01=0x0050, text=»LTD:40 EQU *«, t00=0x0020, t01=0x00f2}
0x32fe…3310 Head {h00=0x000e, h01=0x0050, text=» SRL A1,2 «, t00=0x0020, t01=0x0106}
0x3310…3324 Head {h00=0x0010, h01=0x0050, text=» ANK A1,/30 «, t00=0x0020, t01=0x0118}
0x3324…3336 Head {h00=0x000e, h01=0x0050, text=» SCR A1,A8«, t00=0x0020, t01=0x012c}
0x3336…3342 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x013e}
0x3342…334c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x014a}
0x334c…3364 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0020, t01=0x0154}
0x3364…336e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x016c}
0x336e…3378 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0176}
0x3378…33a2 Head {h00=0x0026, h01=0x0050, text=» ST A3,ECBBA,A8 SET BUFFER ADDRESS«, t00=0x0020, t01=0x0180}
0x33a2…33ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x001a}
0x33ac…33c2 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0021, t01=0x0024}
0x33c2…33f6 Head {h00=0x0030, h01=0x0050, text=» LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) «, t00=0x0021, t01=0x003a}
0x33f6…3418 Head {h00=0x001e, h01=0x0050, text=» RF(Z) LTD:45 SWB HANDLING«, t00=0x0021, t01=0x006e}
0x3418…3424 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0090}
0x3424…342e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x009c}
0x342e…3444 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x0021, t01=0x00a6}
0x3444…3466 Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A9 SEGMENT STATUS«, t00=0x0021, t01=0x00bc}
0x3466…3492 Head {h00=0x0028, h01=0x0050, text=» SLL A1,1 CHECK IF ASSEMBLER SEGMENT«, t00=0x0021, t01=0x00de}
0x3492…34be Head {h00=0x0028, h01=0x0050, text=» RF(N) ASSPAG YES, ASSEMBLER SEGMENT«, t00=0x0021, t01=0x010a}
0x34be…34ca Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0136}
0x34ca…34d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0142}
0x34d4…34fa Head {h00=0x0022, h01=0x0050, text=»* COMPUTE REQUESTED LENGTH AND«, t00=0x0021, t01=0x014c}
0x34fa…3528 Head {h00=0x002a, h01=0x0050, text=»* CHECK IF ONE OR TWO LKM:S NECCESSARY«, t00=0x0021, t01=0x0172}
0x3528…3532 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0010}
0x3532…3546 Head {h00=0x0010, h01=0x0050, text=»LTD:45 EQU *«, t00=0x0022, t01=0x001a}
0x3546…3578 Head {h00=0x002e, h01=0x0050, text=» ADKL A10,127 NEXT HIGHER MULTIPLE OF 128 «, t00=0x0022, t01=0x002e}
0x3578…3590 Head {h00=0x0014, h01=0x0050, text=» ANKL A10,/7F80 «, t00=0x0022, t01=0x0060}
0x3590…35c2 Head {h00=0x002e, h01=0x0050, text=» SUR A4,A10 CHECK IF PAGE IS LARGE ENOUGH «, t00=0x0022, t01=0x0078}
0x35c2…35f0 Head {h00=0x002a, h01=0x0050, text=» RF(NN) LTD:50 OK, JUST ONE LKM NEEDED«, t00=0x0022, t01=0x00aa}
0x35f0…3604 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A6 «, t00=0x0022, t01=0x00d8}
0x3604…3636 Head {h00=0x002e, h01=0x0050, text=» ANKL A10,/7F80 NEXT LOWER MULTIPLE OF 128«, t00=0x0022, t01=0x00ec}
0x3636…3640 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x011e}
0x3640…3654 Head {h00=0x0010, h01=0x0050, text=»LTD:50 EQU *«, t00=0x0022, t01=0x0128}
0x3654…368c Head {h00=0x0034, h01=0x0050, text=» SUR A6,A10 REMAINING LENGTH TO MOVE IN 2ND LKM «, t00=0x0022, t01=0x013c}
0x368c…36b8 Head {h00=0x0028, h01=0x0050, text=» ADR A10,A10 CONVERT LENGTH TO BYTES«, t00=0x0022, t01=0x0174}
0x36b8…36e8 Head {h00=0x002c, h01=0x0050, text=» RF(Z) LTD:55 INTERMEDIATE BUFFER NEEDED«, t00=0x0023, t01=0x0010}
0x36e8…371c Head {h00=0x0030, h01=0x0050, text=» ST A10,ECBRL,A8 SET REQUESTED LENGTH IN ECB«, t00=0x0023, t01=0x0040}
0x371c…3726 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0074}
0x3726…373e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0023, t01=0x007e}
0x373e…3748 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0096}
0x3748…3768 Head {h00=0x001c, h01=0x0050, text=»* READ/WRITE SEGMENT SWB«, t00=0x0023, t01=0x00a0}
0x3768…3772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c0}
0x3772…379e Head {h00=0x0028, h01=0x0050, text=» CF A14,LD:IO READ/WRITE SEGMENT/SWB«, t00=0x0023, t01=0x00ca}
0x379e…37d4 Head {h00=0x0032, h01=0x0050, text=» ADK A6,0 CHECK IF ANYTHING LEFT TO READ/WRITE«, t00=0x0023, t01=0x00f6}
0x37d4…3808 Head {h00=0x0030, h01=0x0050, text=» RF(NP) LDEXIT SEGMENT/SWB HANDLING FINISHED«, t00=0x0023, t01=0x012c}
0x3808…3812 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0160}
0x3812…3826 Head {h00=0x0010, h01=0x0050, text=»LTD:55 EQU *«, t00=0x0023, t01=0x016a}
0x3826…3864 Head {h00=0x003a, h01=0x0050, text=» CF A14,LDSECT READ AND MOVE LAST PART OF SEGMENT/SWB «, t00=0x0023, t01=0x017e}
0x3864…386e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x002c}
0x386e…38a6 Head {h00=0x0034, h01=0x0050, text=»* COMMON EXIT FOR DISC PAGING, ASSEMBLER PAGING «, t00=0x0024, t01=0x0036}
0x38a6…38dc Head {h00=0x0032, h01=0x0050, text=»* AND SWAPPABLE WORK BLOCK HANDLING REQUESTS. «, t00=0x0024, t01=0x006e}
0x38dc…38e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00a4}
0x38e6…38fa Head {h00=0x0010, h01=0x0050, text=»LDEXIT EQU *«, t00=0x0024, t01=0x00ae}
0x38fa…3910 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0024, t01=0x00c2}
0x3910…3944 Head {h00=0x0030, h01=0x0050, text=» LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) «, t00=0x0024, t01=0x00d8}
0x3944…3966 Head {h00=0x001e, h01=0x0050, text=» RF(Z) LDEXI3 SWB HANDLING«, t00=0x0024, t01=0x010c}
0x3966…3972 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x012e}
0x3972…397c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x013a}
0x397c…39b8 Head {h00=0x0038, h01=0x0050, text=» LDKL A4,/8000 INDICATE SEGMENT SUCCESSFULLY LOADED «, t00=0x0024, t01=0x0144}
0x39b8…39c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0180}
0x39c2…39d6 Head {h00=0x0010, h01=0x0050, text=»LDEXI2 EQU *«, t00=0x0024, t01=0x018a}
0x39d6…39ea Head {h00=0x0010, h01=0x0050, text=» ORRS A4,A9 «, t00=0x0025, t01=0x000e}
0x39ea…39f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0022}
0x39f4…3a08 Head {h00=0x0010, h01=0x0050, text=»LDEXI3 EQU *«, t00=0x0025, t01=0x002c}
0x3a08…3a36 Head {h00=0x002a, h01=0x0050, text=» ABL QMEXIT QUEUE TASK AND EXIT LDTASK«, t00=0x0025, t01=0x0040}
0x3a36…3a40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006e}
0x3a40…3a58 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0025, t01=0x0078}
0x3a58…3a62 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0090}
0x3a62…3a6c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x009a}
0x3a6c…3a7e Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0025, t01=0x00a4}
0x3a7e…3a90 Head {h00=0x000e, h01=0x0050, text=»* LD:IO *«, t00=0x0025, t01=0x00b6}
0x3a90…3aa2 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0025, t01=0x00c8}
0x3aa2…3aac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00da}
0x3aac…3ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00e4}
0x3ab6…3af6 Head {h00=0x003c, h01=0x0050, text=»* LDTASK I/O ROUTINE FOR READING/WRITING FROM/TO DISC.«, t00=0x0025, t01=0x00ee}
0x3af6…3b36 Head {h00=0x003c, h01=0x0050, text=»* IF I/O ERROR IS DETECTED LOADING IS ABORTED AND THE «, t00=0x0025, t01=0x012e}
0x3b36…3b7a Head {h00=0x0040, h01=0x0050, text=»* PAGE IS INSERTED INTO PAGQUE AGAIN. CREDIT APPLICATIONS «, t00=0x0025, t01=0x016e}
0x3b7a…3bb6 Head {h00=0x0038, h01=0x0050, text=»* ARE RESTARTED AT THE SPECIFIED REENTER ADDRESS. «, t00=0x0026, t01=0x0022}
0x3bb6…3bc0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x005e}
0x3bc0…3bf6 Head {h00=0x0032, h01=0x0050, text=»* INPUT: A5 = TTAB ADDRESS OF CALLING TASK «, t00=0x0026, t01=0x0068}
0x3bf6…3c12 Head {h00=0x0018, h01=0x0050, text=»* A7 = ORDER CODE«, t00=0x0026, t01=0x009e}
0x3c12…3c32 Head {h00=0x001c, h01=0x0050, text=»* A8 = LD:ECB ADDRESS«, t00=0x0026, t01=0x00ba}
0x3c32…3c5e Head {h00=0x0028, h01=0x0050, text=»* A9 = SEGBLK ADDRESS (=0 IF SWB)«, t00=0x0026, t01=0x00da}
0x3c5e…3c68 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0106}
0x3c68…3c8c Head {h00=0x0020, h01=0x0050, text=»* OUTPUT: A2 IS DESTROYED «, t00=0x0026, t01=0x0110}
0x3c8c…3c96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0134}
0x3c96…3ca0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x013e}
0x3ca0…3cb4 Head {h00=0x0010, h01=0x0050, text=»LD:IO EQU * «, t00=0x0026, t01=0x0148}
0x3cb4…3cc0 Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0026, t01=0x015c}
0x3cc0…3cd0 Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0026, t01=0x0168}
0x3cd0…3cda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0178}
0x3cda…3d08 Head {h00=0x002a, h01=0x0050, text=»* CHECK RETURN CODE AND ABORT IF ERROR«, t00=0x0026, t01=0x0182}
0x3d08…3d12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0020}
0x3d12…3d36 Head {h00=0x0020, h01=0x0050, text=» LD A2,ECBRC,A8 RETURN CODE «, t00=0x0027, t01=0x002a}
0x3d36…3d5c Head {h00=0x0022, h01=0x0050, text=» ANKL A2,/FEFF SKIP RETRY BIT «, t00=0x0027, t01=0x004e}
0x3d5c…3d7e Head {h00=0x001e, h01=0x0050, text=» RF(NZ) LDIO10 DISC ERROR «, t00=0x0027, t01=0x0074}
0x3d7e…3d9a Head {h00=0x0018, h01=0x0050, text=» RTN A14 NO, RETURN «, t00=0x0027, t01=0x0096}
0x3d9a…3da4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00b2}
0x3da4…3dbc Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0027, t01=0x00bc}
0x3dbc…3dc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00d4}
0x3dc6…3dfc Head {h00=0x0032, h01=0x0050, text=»* ERROR: SET RETURN CODE IN A7 OF CALLING TASK«, t00=0x0027, t01=0x00de}
0x3dfc…3e06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0114}
0x3e06…3e1e Head {h00=0x0014, h01=0x0050, text=»LDIO10 ANK A2,1 «, t00=0x0027, t01=0x011e}
0x3e1e…3e30 Head {h00=0x000e, h01=0x0050, text=» NGR A2,A2«, t00=0x0027, t01=0x0136}
0x3e30…3e62 Head {h00=0x002e, h01=0x0050, text=» SUK A2,2 ERROR, SET RETURN CODE -2 OR -3 «, t00=0x0027, t01=0x0148}
0x3e62…3e94 Head {h00=0x002e, h01=0x0050, text=» ST A2,TTB:SA+14,A5 SET RETURN CODE IN A7«, t00=0x0027, t01=0x017a}
0x3e94…3e9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x001c}
0x3e9e…3eb4 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0028, t01=0x0026}
0x3eb4…3ee8 Head {h00=0x0030, h01=0x0050, text=» LDR A9,A9 CHECK SEGBLK ADDRESS (=0 IF SWB) «, t00=0x0028, t01=0x003c}
0x3ee8…3f0a Head {h00=0x001e, h01=0x0050, text=» RB(Z) LDEXI3 SWB HANDLING«, t00=0x0028, t01=0x0070}
0x3f0a…3f16 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0092}
0x3f16…3f20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x009e}
0x3f20…3f46 Head {h00=0x0022, h01=0x0050, text=»* INSERT PAGE IN PAGQUE AGAIN «, t00=0x0028, t01=0x00a8}
0x3f46…3f50 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ce}
0x3f50…3f7c Head {h00=0x0028, h01=0x0050, text=» LD A3,SEG:PB,A9 PAGE BLOCK ADDRESS «, t00=0x0028, t01=0x00d8}
0x3f7c…3f88 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0028, t01=0x0104}
0x3f88…3fac Head {h00=0x0020, h01=0x0050, text=» CF A15,RELPA2 RELEASE PAGE «, t00=0x0028, t01=0x0110}
0x3fac…3fb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0134}
0x3fb6…3fcc Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x0028, t01=0x013e}
0x3fcc…3fee Head {h00=0x001e, h01=0x0050, text=» LDR* A4,A9 SEGMENT STATUS«, t00=0x0028, t01=0x0154}
0x3fee…401a Head {h00=0x0028, h01=0x0050, text=» SLL A4,1 CHECK IF ASSEMBLER SEGMENT«, t00=0x0028, t01=0x0176}
0x401a…4046 Head {h00=0x0028, h01=0x0050, text=» RF(N) LDIO20 YES, ASSEMBLER SEGMENT«, t00=0x0029, t01=0x0012}
0x4046…4052 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x003e}
0x4052…405c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x004a}
0x405c…4092 Head {h00=0x0032, h01=0x0050, text=» LD* A4,TTB:AP,A5 APPLICATION RESTART ADDRESS «, t00=0x0029, t01=0x0054}
0x4092…40c4 Head {h00=0x002e, h01=0x0050, text=» ST A4,TTB:SA,A5 SET NEW DISPATCH ADDRESS «, t00=0x0029, t01=0x008a}
0x40c4…40ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00bc}
0x40ce…40e2 Head {h00=0x0010, h01=0x0050, text=»LDIO20 EQU *«, t00=0x0029, t01=0x00c6}
0x40e2…410a Head {h00=0x0024, h01=0x0050, text=» LDKL A4,/100 SEGMENT ERROR BIT «, t00=0x0029, t01=0x00da}
0x410a…411c Head {h00=0x000e, h01=0x0050, text=» RB LDEXI2«, t00=0x0029, t01=0x0102}
0x411c…4126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0114}
0x4126…413e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0029, t01=0x011e}
0x413e…4148 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0136}
0x4148…4152 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0140}
0x4152…4168 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x0029, t01=0x014a}
0x4168…4172 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0160}
0x4172…417c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x016a}
0x417c…418e Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0029, t01=0x0174}
0x418e…41a0 Head {h00=0x000e, h01=0x0050, text=»* ASSPAG *«, t00=0x0029, t01=0x0186}
0x41a0…41b2 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x002a, t01=0x0008}
0x41b2…41bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x001a}
0x41bc…41c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0024}
0x41c6…4200 Head {h00=0x0036, h01=0x0050, text=»* THIS ENTRY IS CALLED FROM THE LDTASK MAIN FLOW«, t00=0x002a, t01=0x002e}
0x4200…423c Head {h00=0x0038, h01=0x0050, text=»* WHEN LOADING OF AN ASSEMBLER SEGMENT IS WANTED. «, t00=0x002a, t01=0x0068}
0x423c…4272 Head {h00=0x0032, h01=0x0050, text=»* ASSPAG WILL READ ONE SECTOR AT A TIME AND «, t00=0x002a, t01=0x00a4}
0x4272…42a0 Head {h00=0x002a, h01=0x0050, text=»* PERFORM THE NECESSARY RELOCATIONS.«, t00=0x002a, t01=0x00da}
0x42a0…42aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0108}
0x42aa…42e0 Head {h00=0x0032, h01=0x0050, text=»* INPUT: A5 = TTAB ADDRESS OF CALLING TASK «, t00=0x002a, t01=0x0112}
0x42e0…4312 Head {h00=0x002e, h01=0x0050, text=»* A7 = ORDER CODE, PHYSICAL READ (/91) «, t00=0x002a, t01=0x0148}
0x4312…4332 Head {h00=0x001c, h01=0x0050, text=»* A8 = LD:ECB ADDRESS«, t00=0x002a, t01=0x017a}
0x4332…4352 Head {h00=0x001c, h01=0x0050, text=»* A9 = SEGBLK ADDRESS«, t00=0x002b, t01=0x000a}
0x4352…437a Head {h00=0x0024, h01=0x0050, text=»* A10 = SEGMENT LENGTH (WORDS)«, t00=0x002b, t01=0x002a}
0x437a…439e Head {h00=0x0020, h01=0x0050, text=»* A11 = PAGE SIZE (WORDS) «, t00=0x002b, t01=0x0052}
0x439e…43ce Head {h00=0x002c, h01=0x0050, text=»* A12 = PAGE ADDRESS (RELOCATION BASE)«, t00=0x002b, t01=0x0076}
0x43ce…43d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00a6}
0x43d8…43e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00b0}
0x43e2…440e Head {h00=0x0028, h01=0x0050, text=»ASSPAG EQU * ASSEMBLER PAGING ENTRY «, t00=0x002b, t01=0x00ba}
0x440e…4420 Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x002b, t01=0x00e6}
0x4420…4450 Head {h00=0x002c, h01=0x0050, text=» SC A1,ECBRL,A8 REQUESTED LENGTH := 256 «, t00=0x002b, t01=0x00f8}
0x4450…445a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0128}
0x445a…4470 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x002b, t01=0x0132}
0x4470…44a4 Head {h00=0x0030, h01=0x0050, text=» ST A12,LD:LAD SAVE LOGICAL ADDRESS TO PAGE «, t00=0x002b, t01=0x0148}
0x44a4…44b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002b, t01=0x017c}
0x44b0…44ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0188}
0x44ba…44d2 (44, 0, 400) Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x002c, t01=0x0004}
0x44d2…44dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x001c}
0x44dc…44e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0026}
0x44e6…44fc Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x002c, t01=0x0030}
0x44fc…4506 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0046}
0x4506…4538 Head {h00=0x002e, h01=0x0050, text=»* PREPARE FOR RELOCATION OF ONE SECTOR AND«, t00=0x002c, t01=0x0050}
0x4538…4570 Head {h00=0x0034, h01=0x0050, text=»* CHECK REMAINING PAGE SIZE. IF NOT LARGE ENOUGH«, t00=0x002c, t01=0x0082}
0x4570…45aa Head {h00=0x0036, h01=0x0050, text=»* THEN READ (LAST) SECTOR TO INTERMEDIATE BUFFER, «, t00=0x002c, t01=0x00ba}
0x45aa…45e0 Head {h00=0x0032, h01=0x0050, text=»* ELSE READ SECTOR DIRECTLY TO ALLOCATED PAGE.«, t00=0x002c, t01=0x00f4}
0x45e0…45ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x012a}
0x45ea…4620 Head {h00=0x0032, h01=0x0050, text=»ASS:00 EQU * ASSEMBLER PAGING MAIN LOOP ENTRY «, t00=0x002c, t01=0x0134}
0x4620…4636 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x002c, t01=0x016a}
0x4636…465e Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBBA,A8 SEGMENT POINTER «, t00=0x002c, t01=0x0180}
0x465e…4668 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0018}
0x4668…4674 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0022}
0x4674…467e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x002e}
0x467e…4694 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x002d, t01=0x0038}
0x4694…46aa Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x002d, t01=0x004e}
0x46aa…46dc Head {h00=0x002e, h01=0x0050, text=» LD A1,LD:LAD GET LOGICAL ADDRESS POINTER «, t00=0x002d, t01=0x0064}
0x46dc…46e8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x0096}
0x46e8…46f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x00a2}
0x46f2…4708 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x002d, t01=0x00ac}
0x4708…4736 Head {h00=0x002a, h01=0x0050, text=» CWK A11,128 CHECK REMAINING PAGE SIZE«, t00=0x002d, t01=0x00c2}
0x4736…4766 Head {h00=0x002c, h01=0x0050, text=» RF(L) ASS:85 INTERMEDIATE BUFFER NEEDED«, t00=0x002d, t01=0x00f0}
0x4766…4790 Head {h00=0x0026, h01=0x0050, text=» SUKL A11,120 REMAINING PAGE SIZE «, t00=0x002d, t01=0x0120}
0x4790…47b2 Head {h00=0x001e, h01=0x0050, text=» CF A14,LD:IO READ SECTOR «, t00=0x002d, t01=0x014a}
0x47b2…47e6 Head {h00=0x0030, h01=0x0050, text=» LDK A2,240 CALC ADDRESS TO RELOCATION BITS «, t00=0x002d, t01=0x016c}
0x47e6…47fa Head {h00=0x0010, h01=0x0050, text=» CWK A10,120«, t00=0x002e, t01=0x0010}
0x47fa…4810 Head {h00=0x0012, h01=0x0050, text=» RF(NL) ASS:02«, t00=0x002e, t01=0x0024}
0x4810…4824 Head {h00=0x0010, h01=0x0050, text=» LDR A2,A10 «, t00=0x002e, t01=0x003a}
0x4824…4836 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x002e, t01=0x004e}
0x4836…4840 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0060}
0x4840…4854 Head {h00=0x0010, h01=0x0050, text=»ASS:02 EQU *«, t00=0x002e, t01=0x006a}
0x4854…4866 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A1«, t00=0x002e, t01=0x007e}
0x4866…4870 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0090}
0x4870…4888 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x002e, t01=0x009a}
0x4888…4892 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00b2}
0x4892…48b8 Head {h00=0x0022, h01=0x0050, text=»* RELOCATE ONE SEGMENT SECTOR «, t00=0x002e, t01=0x00bc}
0x48b8…48c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00e2}
0x48c2…48d6 Head {h00=0x0010, h01=0x0050, text=»ASS:05 EQU *«, t00=0x002e, t01=0x00ec}
0x48d6…48f4 Head {h00=0x001a, h01=0x0050, text=» SRL A2,1 WORD ADDRESS«, t00=0x002e, t01=0x0100}
0x48f4…4924 Head {h00=0x002c, h01=0x0050, text=» LDR A13,A2 RELOCATION END, THIS SECTOR «, t00=0x002e, t01=0x011e}
0x4924…4936 Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x002e, t01=0x014e}
0x4936…4940 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0160}
0x4940…4954 Head {h00=0x0010, h01=0x0050, text=»ASS:10 EQU *«, t00=0x002e, t01=0x016a}
0x4954…497e Head {h00=0x0026, h01=0x0050, text=» LDK A3,16 RELOCATION BITS COUNTER«, t00=0x002e, t01=0x017e}
0x497e…4988 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0018}
0x4988…499e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x002f, t01=0x0022}
0x499e…49d4 Head {h00=0x0032, h01=0x0050, text=» LDR A8,A8 CHECK WHERE TO FIND RELOCATION BITS«, t00=0x002f, t01=0x0038}
0x49d4…4a04 Head {h00=0x002c, h01=0x0050, text=» RF(Z) ASS:15 RELOCATION BITS IN LD:BUF «, t00=0x002f, t01=0x006e}
0x4a04…4a2a Head {h00=0x0022, h01=0x0050, text=» ELR A4,A2 16 RELOCATION BITS «, t00=0x002f, t01=0x009e}
0x4a2a…4a3c Head {h00=0x000e, h01=0x0050, text=» RF ASS:20«, t00=0x002f, t01=0x00c4}
0x4a3c…4a48 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00d6}
0x4a48…4a52 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00e2}
0x4a52…4a68 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x002f, t01=0x00ec}
0x4a68…4a7c Head {h00=0x0010, h01=0x0050, text=»ASS:15 EQU *«, t00=0x002f, t01=0x0102}
0x4a7c…4aa2 Head {h00=0x0022, h01=0x0050, text=» LDR* A4,A2 16 RELOCATION BITS«, t00=0x002f, t01=0x0116}
0x4aa2…4aac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x013c}
0x4aac…4ac0 Head {h00=0x0010, h01=0x0050, text=»ASS:20 EQU *«, t00=0x002f, t01=0x0146}
0x4ac0…4ae8 Head {h00=0x0024, h01=0x0050, text=» RF(NZ) ASS:40 RELOCATION NEEDED«, t00=0x002f, t01=0x015a}
0x4ae8…4af2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0182}
0x4af2…4b06 Head {h00=0x0010, h01=0x0050, text=»ASS:25 EQU *«, t00=0x002f, t01=0x018c}
0x4b06…4b3a Head {h00=0x0030, h01=0x0050, text=» LDR A6,A3 NUMBER OF RELOCATION BITS TO SKIP«, t00=0x0030, t01=0x0010}
0x4b3a…4b4c Head {h00=0x000e, h01=0x0050, text=» RF ASS:45«, t00=0x0030, t01=0x0044}
0x4b4c…4b56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0056}
0x4b56…4b6e Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0030, t01=0x0060}
0x4b6e…4b78 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0078}
0x4b78…4b82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0082}
0x4b82…4b96 Head {h00=0x0010, h01=0x0050, text=»ASS:30 EQU *«, t00=0x0030, t01=0x008c}
0x4b96…4bc4 Head {h00=0x002a, h01=0x0050, text=» SLL A4,1 NEXT RELOCATION BIT TO TEST «, t00=0x0030, t01=0x00a0}
0x4bc4…4bee Head {h00=0x0026, h01=0x0050, text=» RB(Z) ASS:25 NEXT RELOCATION WORD«, t00=0x0030, t01=0x00ce}
0x4bee…4bf8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00f8}
0x4bf8…4c0c Head {h00=0x0010, h01=0x0050, text=»ASS:40 EQU *«, t00=0x0030, t01=0x0102}
0x4c0c…4c34 Head {h00=0x0024, h01=0x0050, text=» RF(N) ASS:50 RELOCATION NEEDED «, t00=0x0030, t01=0x0116}
0x4c34…4c5a Head {h00=0x0022, h01=0x0050, text=» SLN A4,A6 SKIP ALL ZERO BITS «, t00=0x0030, t01=0x013e}
0x4c5a…4c86 Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT SEGMENT POINTER «, t00=0x0030, t01=0x0164}
0x4c86…4c90 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0190}
0x4c90…4ca4 Head {h00=0x0010, h01=0x0050, text=»ASS:45 EQU *«, t00=0x0031, t01=0x000a}
0x4ca4…4cd6 Head {h00=0x002e, h01=0x0050, text=» SUR A3,A6 UPDATE RELOCATION BITS COUNTER «, t00=0x0031, t01=0x001e}
0x4cd6…4d0c Head {h00=0x0032, h01=0x0050, text=» SRL A1,1 WORD ADDRESS FOR SEGMENT POINTER =1 «, t00=0x0031, t01=0x0050}
0x4d0c…4d40 Head {h00=0x0030, h01=0x0050, text=» ADR A1,A6 UPDATE SEGMENT POINTER (WORD) =1 «, t00=0x0031, t01=0x0086}
0x4d40…4d74 Head {h00=0x0030, h01=0x0050, text=» RF(O) ASS:70 ALL RELOCATED,END OF SECTOR =1«, t00=0x0031, t01=0x00ba}
0x4d74…4daa Head {h00=0x0032, h01=0x0050, text=» SLL A1,1 BYTE ADDRESS FOR SEGMENT POINTER =1 «, t00=0x0031, t01=0x00ee}
0x4daa…4dda Head {h00=0x002c, h01=0x0050, text=» RF ASS:60 GO AND CHECK IF END OF SECTOR«, t00=0x0031, t01=0x0124}
0x4dda…4de4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0154}
0x4de4…4dfc Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0031, t01=0x015e}
0x4dfc…4e06 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0176}
0x4e06…4e22 Head {h00=0x0018, h01=0x0050, text=»* RELOCATE ONE WORD «, t00=0x0031, t01=0x0180}
0x4e22…4e2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x000c}
0x4e2c…4e40 Head {h00=0x0010, h01=0x0050, text=»ASS:50 EQU *«, t00=0x0032, t01=0x0016}
0x4e40…4e56 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0032, t01=0x002a}
0x4e56…4e7e Head {h00=0x0024, h01=0x0050, text=» ADRS A12,A1 ADD RELOCATION BASE«, t00=0x0032, t01=0x0040}
0x4e7e…4e8a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0068}
0x4e8a…4e94 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0074}
0x4e94…4eaa Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x0032, t01=0x007e}
0x4eaa…4ec0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0032, t01=0x0094}
0x4ec0…4ee4 Head {h00=0x0020, h01=0x0050, text=» ELR A6,A1 WORD TO RELOCATE «, t00=0x0032, t01=0x00aa}
0x4ee4…4f0c Head {h00=0x0024, h01=0x0050, text=» ADR A6,A12 ADD RELOCATION BASE «, t00=0x0032, t01=0x00ce}
0x4f0c…4f34 Head {h00=0x0024, h01=0x0050, text=» ESR A6,A1 STORE RELOCATED WORD «, t00=0x0032, t01=0x00f6}
0x4f34…4f40 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x011e}
0x4f40…4f4a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x012a}
0x4f4a…4f60 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x0032, t01=0x0134}
0x4f60…4f8c Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT SEGMENT POINTER «, t00=0x0032, t01=0x014a}
0x4f8c…4f96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0176}
0x4f96…4fd8 Head {h00=0x003e, h01=0x0050, text=»* CHECK IF END OF SECTOR OR IF NEW RELOCATION WORD NEEDED «, t00=0x0032, t01=0x0180}
0x4fd8…4fe2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0032}
0x4fe2…4ff6 Head {h00=0x0010, h01=0x0050, text=»ASS:60 EQU *«, t00=0x0033, t01=0x003c}
0x4ff6…5018 Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 SEGMENT POINTER«, t00=0x0033, t01=0x0050}
0x5018…5036 Head {h00=0x001a, h01=0x0050, text=» SRL A6,1 WORD ADDRESS«, t00=0x0033, t01=0x0072}
0x5036…506e Head {h00=0x0034, h01=0x0050, text=» SUR A6,A13 COMPARE WITH END OF REL. ADDRESS =2 «, t00=0x0033, t01=0x0090}
0x506e…508a Head {h00=0x0018, h01=0x0050, text=» ADK A6,0 SET CR =2 «, t00=0x0033, t01=0x00c8}
0x508a…50b2 Head {h00=0x0024, h01=0x0050, text=» RF(NN) ASS:70 END OF SECTOR =2 «, t00=0x0033, t01=0x00e4}
0x50b2…50e6 Head {h00=0x0030, h01=0x0050, text=» SUK A3,1 DECREMENT RELOCATION BITS COUNTER «, t00=0x0033, t01=0x010c}
0x50e6…5110 Head {h00=0x0026, h01=0x0050, text=» RB(P) ASS:30 MORE RELOCATION BITS«, t00=0x0033, t01=0x0140}
0x5110…5144 Head {h00=0x0030, h01=0x0050, text=» ADK A2,2 INCREMENT RELOCATION BITS POINTER «, t00=0x0033, t01=0x016a}
0x5144…5170 Head {h00=0x0028, h01=0x0050, text=» RB ASS:10 NEXT RELOCATION BITS WORD«, t00=0x0034, t01=0x000e}
0x5170…517a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x003a}
0x517a…5192 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0034, t01=0x0044}
0x5192…519c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x005c}
0x519c…51ce Head {h00=0x002e, h01=0x0050, text=»* RETURN IF SEGMENT LOADING IS COMPLETED, «, t00=0x0034, t01=0x0066}
0x51ce…5200 Head {h00=0x002e, h01=0x0050, text=»* ELSE PREPARE FOR READING OF NEXT SECTOR.«, t00=0x0034, t01=0x0098}
0x5200…520a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00ca}
0x520a…521e Head {h00=0x0010, h01=0x0050, text=»ASS:70 EQU *«, t00=0x0034, t01=0x00d4}
0x521e…524c Head {h00=0x002a, h01=0x0050, text=» SUKL A10,120 DECREMENT SEGMENT LENGTH«, t00=0x0034, t01=0x00e8}
0x524c…527c Head {h00=0x002c, h01=0x0050, text=» RB(NP) LDEXIT SEGMENT LOADING COMPLETED«, t00=0x0034, t01=0x0116}
0x527c…5290 Head {h00=0x0010, h01=0x0050, text=» LDK A4,240 «, t00=0x0034, t01=0x0146}
0x5290…529a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x015a}
0x529a…52b0 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0034, t01=0x0164}
0x52b0…52dc Head {h00=0x0028, h01=0x0050, text=» ADS A4,ECBBA,A8 UPDATE PAGE ADDRESS«, t00=0x0034, t01=0x017a}
0x52dc…52e8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x0016}
0x52e8…52f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0022}
0x52f2…5308 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x0035, t01=0x002c}
0x5308…531e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0035, t01=0x0042}
0x531e…5354 Head {h00=0x0032, h01=0x0050, text=» ADS A4,LD:LAD UPDATE LOGICAL ADDRESS POINTER «, t00=0x0035, t01=0x0058}
0x5354…5366 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0035, t01=0x008e}
0x5366…5386 Head {h00=0x001c, h01=0x0050, text=» MLR 2,A8 BUFFER ADDRESS«, t00=0x0035, t01=0x00a0}
0x5386…5398 Head {h00=0x000e, h01=0x0050, text=» SLC A1,4 «, t00=0x0035, t01=0x00c0}
0x5398…53a6 Head {h00=0x000a, h01=0x0050, text=» DLL 1«, t00=0x0035, t01=0x00d2}
0x53a6…53b8 Head {h00=0x000e, h01=0x0050, text=» SRL A2,1 «, t00=0x0035, t01=0x00e0}
0x53b8…53c8 Head {h00=0x000c, h01=0x0050, text=» DAR A3 «, t00=0x0035, t01=0x00f2}
0x53c8…53da Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0035, t01=0x0102}
0x53da…53e8 Head {h00=0x000a, h01=0x0050, text=» DRL 1«, t00=0x0035, t01=0x0114}
0x53e8…53fa Head {h00=0x000e, h01=0x0050, text=» SRC A1,4 «, t00=0x0035, t01=0x0122}
0x53fa…542e Head {h00=0x0030, h01=0x0050, text=» MSR 2,A8 SET UPDATED BUFFER ADDRESS IN ECB «, t00=0x0035, t01=0x0134}
0x542e…543a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x0168}
0x543a…5444 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0174}
0x5444…545c Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0035, t01=0x017e}
0x545c…5466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0008}
0x5466…5470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0012}
0x5470…5486 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x0036, t01=0x001c}
0x5486…54b4 Head {h00=0x002a, h01=0x0050, text=» IM ECBCW2,A8 INCREMENT SECTOR NUMBER «, t00=0x0036, t01=0x0032}
0x54b4…54d2 Head {h00=0x001a, h01=0x0050, text=» RF(O) ASS:80 OVERFLOW«, t00=0x0036, t01=0x0060}
0x54d2…54fe Head {h00=0x0028, h01=0x0050, text=» RB ASS:00 READ NEXT SECTOR TO PAGE «, t00=0x0036, t01=0x007e}
0x54fe…5508 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00aa}
0x5508…551c Head {h00=0x0010, h01=0x0050, text=»ASS:80 EQU *«, t00=0x0036, t01=0x00b4}
0x551c…5546 Head {h00=0x0026, h01=0x0050, text=» LDKL A4,/7FFF OVERFLOW CORRECTION«, t00=0x0036, t01=0x00c8}
0x5546…5560 Head {h00=0x0016, h01=0x0050, text=» ANS A4,ECBCW2,A8 «, t00=0x0036, t01=0x00f2}
0x5560…5576 Head {h00=0x0012, h01=0x0050, text=» IM ECBCW1,A8 «, t00=0x0036, t01=0x010c}
0x5576…55a2 Head {h00=0x0028, h01=0x0050, text=» RB ASS:00 READ NEXT SECTOR TO PAGE «, t00=0x0036, t01=0x0122}
0x55a2…55ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x014e}
0x55ac…55c4 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0036, t01=0x0158}
0x55c4…55ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0170}
0x55ce…5600 Head {h00=0x002e, h01=0x0050, text=»* READ LAST SECTOR TO INTERMEDIATE BUFFER.«, t00=0x0036, t01=0x017a}
0x5600…5634 Head {h00=0x0030, h01=0x0050, text=»* MOVE CODE BUT NOT RELOCATION BITS TO PAGE.«, t00=0x0037, t01=0x001c}
0x5634…563e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0050}
0x563e…5652 Head {h00=0x0010, h01=0x0050, text=»ASS:85 EQU *«, t00=0x0037, t01=0x005a}
0x5652…5684 Head {h00=0x002e, h01=0x0050, text=» LDR A13,A10 SAVE REMAINING SEGMENT LENGTH«, t00=0x0037, t01=0x006e}
0x5684…5698 Head {h00=0x0010, h01=0x0050, text=» LDR A6,A10 «, t00=0x0037, t01=0x00a0}
0x5698…56c2 Head {h00=0x0026, h01=0x0050, text=» LDR A11,A12 SAVE RELOCATION BASE «, t00=0x0037, t01=0x00b4}
0x56c2…56ea Head {h00=0x0024, h01=0x0050, text=» LDR A12,A1 ACTUAL PAGE ADDRESS «, t00=0x0037, t01=0x00de}
0x56ea…5724 Head {h00=0x0036, h01=0x0050, text=» SUR A10,A10 MEANS,DON'T UPDATE SEC NBR IN LDSEC2 «, t00=0x0037, t01=0x0106}
0x5724…575a Head {h00=0x0032, h01=0x0050, text=» CF A14,LDSEC2 READ SECTOR AND MOVE IT TO PAGE«, t00=0x0037, t01=0x0140}
0x575a…5792 Head {h00=0x0034, h01=0x0050, text=» LDR A1,A12 LOGICAL ADDRESS OF CODE TO RELOCATE «, t00=0x0037, t01=0x0176}
0x5792…57a6 Head {h00=0x0010, h01=0x0050, text=» LDR A10,A13«, t00=0x0038, t01=0x001e}
0x57a6…57da Head {h00=0x0030, h01=0x0050, text=» LDR A2,A13 REMAINING SEGMENT LENGTH (WORDS)«, t00=0x0038, t01=0x0032}
0x57da…5810 Head {h00=0x0032, h01=0x0050, text=» ADR A2,A2 DISPL. IN SECTOR TO RELOCATION BITS«, t00=0x0038, t01=0x0066}
0x5810…5842 Head {h00=0x002e, h01=0x0050, text=» ADKL A2,LD:BUF ADDRESS TO RELOCATION BITS«, t00=0x0038, t01=0x009c}
0x5842…584c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00ce}
0x584c…5862 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0038, t01=0x00d8}
0x5862…5898 Head {h00=0x0032, h01=0x0050, text=» SUR A8,A8 INDICATE RELOCATION BITS IN LD:BUF «, t00=0x0038, t01=0x00ee}
0x5898…58a4 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0124}
0x58a4…58ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0130}
0x58ae…58c4 Head {h00=0x0012, h01=0x0050, text=» IFT ASMPAG=1 «, t00=0x0038, t01=0x013a}
0x58c4…58d6 Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x0038, t01=0x0150}
0x58d6…590e Head {h00=0x0034, h01=0x0050, text=» ADR A13,A1 VIRTUAL BEGINNING OF RELOCATION BITS«, t00=0x0038, t01=0x0162}
0x590e…5946 Head {h00=0x0034, h01=0x0050, text=» LDR A1,A12 LOGICAL ADDRESS OF CODE TO RELOCATE «, t00=0x0039, t01=0x000a}
0x5946…5972 Head {h00=0x0028, h01=0x0050, text=» LDR A12,A11 RESTORE RELOCATION BASE«, t00=0x0039, t01=0x0042}
0x5972…59a4 Head {h00=0x002e, h01=0x0050, text=» RB ASS:10 RELOCATE LAST SECTOR AND RETURN«, t00=0x0039, t01=0x006e}
0x59a4…59b0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x00a0}
0x59b0…59ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00ac}
0x59ba…59d2 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0039, t01=0x00b6}
0x59d2…59dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00ce}
0x59dc…59e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x00d8}
0x59e6…59f8 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0039, t01=0x00e2}
0x59f8…5a0a Head {h00=0x000e, h01=0x0050, text=»* LDSECT *«, t00=0x0039, t01=0x00f4}
0x5a0a…5a1c Head {h00=0x000e, h01=0x0050, text=»* LDSEC2 *«, t00=0x0039, t01=0x0106}
0x5a1c…5a2e Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0039, t01=0x0118}
0x5a2e…5a38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x012a}
0x5a38…5a42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0134}
0x5a42…5a76 Head {h00=0x0030, h01=0x0050, text=»* NOT ROOM ENOUGH IN PAGE FOR LAST SECTOR:«, t00=0x0039, t01=0x013e}
0x5a76…5aac Head {h00=0x0032, h01=0x0050, text=»* READ IT TO MEMORY VIA INTERMEDIATE BUFFER «, t00=0x0039, t01=0x0172}
0x5aac…5ab6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0018}
0x5ab6…5ae2 Head {h00=0x0028, h01=0x0050, text=»* INPUT: A6 = NO OF WORDS TO MOVE«, t00=0x003a, t01=0x0022}
0x5ae2…5b0a Head {h00=0x0024, h01=0x0050, text=»* A8 = LD:ECB ADDRESS «, t00=0x003a, t01=0x004e}
0x5b0a…5b36 Head {h00=0x0028, h01=0x0050, text=»* A9 = SEGBLK ADDRESS (=0 IF SWB)«, t00=0x003a, t01=0x0076}
0x5b36…5b6a Head {h00=0x0030, h01=0x0050, text=»* A10 = EFFECTIVE LENGTH, LAST I/O «, t00=0x003a, t01=0x00a2}
0x5b6a…5bb0 Head {h00=0x0042, h01=0x0050, text=»* A12 = LAST USED PAGE ADDRESS, LOGICAL (LDSECT ONLY)«, t00=0x003a, t01=0x00d6}
0x5bb0…5bec Head {h00=0x0038, h01=0x0050, text=»* = ACTUAL PAGE ADDRESS, LOGICAL (LDSEC2 ONLY)«, t00=0x003a, t01=0x011c}
0x5bec…5bf6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0158}
0x5bf6…5c10 Head {h00=0x0016, h01=0x0050, text=»* OUTPUT: A6 = 0«, t00=0x003a, t01=0x0162}
0x5c10…5c46 Head {h00=0x0032, h01=0x0050, text=»* A12 = ACTUAL PAGE ADDRESS (LOGICAL)«, t00=0x003a, t01=0x017c}
0x5c46…5c76 Head {h00=0x002c, h01=0x0050, text=»* A1-A4, A7, A10 ARE DESTROYED«, t00=0x003b, t01=0x0022}
0x5c76…5c80 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0052}
0x5c80…5c8a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x005c}
0x5c8a…5c9e Head {h00=0x0010, h01=0x0050, text=»LDSECT EQU *«, t00=0x003b, t01=0x0066}
0x5c9e…5cce Head {h00=0x002c, h01=0x0050, text=» ADR A12,A10 UPDATE DESTINATION POINTER «, t00=0x003b, t01=0x007a}
0x5cce…5cd8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00aa}
0x5cd8…5cf0 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x003b, t01=0x00b4}
0x5cf0…5cfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00cc}
0x5cfa…5d16 Head {h00=0x0018, h01=0x0050, text=»* SET ECB PARAMETERS«, t00=0x003b, t01=0x00d6}
0x5d16…5d20 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00f2}
0x5d20…5d34 Head {h00=0x0010, h01=0x0050, text=»LDSEC2 EQU *«, t00=0x003b, t01=0x00fc}
0x5d34…5d4a Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x003b, t01=0x0110}
0x5d4a…5d78 Head {h00=0x002a, h01=0x0050, text=» LDKL A1,LD:BUF LDTASK BUFFER ADDRESS «, t00=0x003b, t01=0x0126}
0x5d78…5d90 Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBBA,A8 «, t00=0x003b, t01=0x0154}
0x5d90…5da4 Head {h00=0x0010, h01=0x0050, text=» LDK A2,/80 «, t00=0x003b, t01=0x016c}
0x5da4…5dda Head {h00=0x0032, h01=0x0050, text=» SCR A2,A8 INDICATE BUFFER NOW IN SYSTEM AREA «, t00=0x003b, t01=0x0180}
0x5dda…5df8 Head {h00=0x001a, h01=0x0050, text=» ADK A2,/80 A2 := 256 «, t00=0x003c, t01=0x0026}
0x5df8…5e32 Head {h00=0x0036, h01=0x0050, text=» ST A2,ECBRL,A8 SET REQUESTED LENGTH TO ONE SECTOR«, t00=0x003c, t01=0x0044}
0x5e32…5e48 Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/7FFF«, t00=0x003c, t01=0x007e}
0x5e48…5e54 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0094}
0x5e54…5e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00a0}
0x5e5e…5e74 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x003c, t01=0x00aa}
0x5e74…5e82 Head {h00=0x000a, h01=0x0050, text=» MLK 4«, t00=0x003c, t01=0x00c0}
0x5e82…5e9a Head {h00=0x0014, h01=0x0050, text=» DATA LD:BUF,256«, t00=0x003c, t01=0x00ce}
0x5e9a…5eb2 Head {h00=0x0014, h01=0x0050, text=» DATA /80,/7FFF «, t00=0x003c, t01=0x00e6}
0x5eb2…5ee8 Head {h00=0x0032, h01=0x0050, text=» SCR A3,A8 INDICATE BUFFER NOW IN SYSTEM AREA «, t00=0x003c, t01=0x00fe}
0x5ee8…5f1e Head {h00=0x0032, h01=0x0050, text=» MS 2,ECBBA,A8 SET BUFFER AND REQUESTED LENGTH«, t00=0x003c, t01=0x0134}
0x5f1e…5f2a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x016a}
0x5f2a…5f34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0176}
0x5f34…5f48 Head {h00=0x0010, h01=0x0050, text=» ECR A2,A10 «, t00=0x003c, t01=0x0180}
0x5f48…5f76 (61, 0, 398) Head {h00=0x002a, h01=0x0050, text=» ADS A2,ECBCW2,A8 UPDATE SECTOR NUMBER«, t00=0x003d, t01=0x0004}
0x5f76…5f94 Head {h00=0x001a, h01=0x0050, text=» RF(O) LDS:30 OVERFLOW«, t00=0x003d, t01=0x0032}
0x5f94…5f9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0050}
0x5f9e…5fb2 Head {h00=0x0010, h01=0x0050, text=»LDS:10 EQU *«, t00=0x003d, t01=0x005a}
0x5fb2…5fe2 Head {h00=0x002c, h01=0x0050, text=» CF A14,LD:IO READ ONE SECTOR TO LD:BUF «, t00=0x003d, t01=0x006e}
0x5fe2…600a Head {h00=0x0024, h01=0x0050, text=» LDR A2,A12 DESTINATION POINTER «, t00=0x003d, t01=0x009e}
0x600a…6034 Head {h00=0x0026, h01=0x0050, text=» ADR A6,A6 CONVERT LENGTH TO BYTES«, t00=0x003d, t01=0x00c6}
0x6034…603e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00f0}
0x603e…6056 Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x003d, t01=0x00fa}
0x6056…6060 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0112}
0x6060…6088 Head {h00=0x0024, h01=0x0050, text=»* MOVE LAST PART OF SEGMENT/SWB «, t00=0x003d, t01=0x011c}
0x6088…6092 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0144}
0x6092…60a8 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x003d, t01=0x014e}
0x60a8…60d6 Head {h00=0x002a, h01=0x0050, text=» MVSU A6 MOVE LAST PART OF SEGMENT/SWB«, t00=0x003d, t01=0x0164}
0x60d6…60e2 (62, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0004}
0x60e2…60ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0010}
0x60ec…6100 Head {h00=0x0010, h01=0x0050, text=»LDS:20 EQU *«, t00=0x003e, t01=0x001a}
0x6100…6116 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003e, t01=0x002e}
0x6116…612c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x003e, t01=0x0044}
0x612c…614e Head {h00=0x001e, h01=0x0050, text=» LDR* A10,A1 MOVE ONE WORD«, t00=0x003e, t01=0x005a}
0x614e…6162 Head {h00=0x0010, h01=0x0050, text=» STR A10,A2 «, t00=0x003e, t01=0x007c}
0x6162…618e Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT BUFFER POINTERS «, t00=0x003e, t01=0x0090}
0x618e…61a0 Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x003e, t01=0x00bc}
0x61a0…61c4 Head {h00=0x0020, h01=0x0050, text=» SUK A6,2 DECREMENT COUNTER «, t00=0x003e, t01=0x00ce}
0x61c4…61da Head {h00=0x0012, h01=0x0050, text=» RB(P) LDS:20 «, t00=0x003e, t01=0x00f2}
0x61da…61e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0108}
0x61e6…61f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0114}
0x61f0…6206 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003e, t01=0x011e}
0x6206…621c Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x003e, t01=0x0134}
0x621c…6232 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x003e, t01=0x014a}
0x6232…6254 Head {h00=0x001e, h01=0x0050, text=» LDR* A10,A1 MOVE ONE WORD«, t00=0x003e, t01=0x0160}
0x6254…6268 Head {h00=0x0010, h01=0x0050, text=» STR A10,A2 «, t00=0x003e, t01=0x0182}
0x6268…6294 Head {h00=0x0028, h01=0x0050, text=» ADK A1,2 INCREMENT BUFFER POINTERS «, t00=0x003f, t01=0x0008}
0x6294…62a6 Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x003f, t01=0x0034}
0x62a6…62ca Head {h00=0x0020, h01=0x0050, text=» SUK A6,2 DECREMENT COUNTER «, t00=0x003f, t01=0x0046}
0x62ca…62e0 Head {h00=0x0012, h01=0x0050, text=» RB(P) LDS:20 «, t00=0x003f, t01=0x006a}
0x62e0…62ec Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x0080}
0x62ec…62f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x008c}
0x62f6…630c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x003f, t01=0x0096}
0x630c…6322 Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x003f, t01=0x00ac}
0x6322…6338 Head {h00=0x0012, h01=0x0050, text=» IFT CPU857=1 «, t00=0x003f, t01=0x00c2}
0x6338…636e Head {h00=0x0032, h01=0x0050, text=» MVB A6 MOVE REMAINING PART OF SEGMENT TO PAGE«, t00=0x003f, t01=0x00d8}
0x636e…637a Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x010e}
0x637a…6384 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x011a}
0x6384…6394 Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x003f, t01=0x0124}
0x6394…639e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0134}
0x639e…63b2 Head {h00=0x0010, h01=0x0050, text=»LDS:30 EQU *«, t00=0x003f, t01=0x013e}
0x63b2…63dc Head {h00=0x0026, h01=0x0050, text=» IM ECBCW1,A8 OVERFLOW CORRECTION «, t00=0x003f, t01=0x0152}
0x63dc…63f6 Head {h00=0x0016, h01=0x0050, text=» ANS A4,ECBCW2,A8 «, t00=0x003f, t01=0x017c}
0x63f6…6408 Head {h00=0x000e, h01=0x0050, text=» RB LDS:10«, t00=0x0040, t01=0x0008}
0x6408…6412 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x001a}
0x6412…642a Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0040, t01=0x0024}
0x642a…6434 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x003c}
0x6434…643e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0046}
0x643e…6450 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0040, t01=0x0050}
0x6450…6462 Head {h00=0x000e, h01=0x0050, text=»* QLTDSK *«, t00=0x0040, t01=0x0062}
0x6462…6474 Head {h00=0x000e, h01=0x0050, text=»* QLTSWB *«, t00=0x0040, t01=0x0074}
0x6474…6486 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0040, t01=0x0086}
0x6486…6490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0098}
0x6490…649a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00a2}
0x649a…64d8 Head {h00=0x003a, h01=0x0050, text=»* THIS ROUTINE PERFORMS ACTIVATION OF THE LOAD TASK.«, t00=0x0040, t01=0x00ac}
0x64d8…64e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00ea}
0x64e2…6520 Head {h00=0x003a, h01=0x0050, text=»* ACTIVATION IS AT LT:DSK WHEN DISC PAGING REQUEST. «, t00=0x0040, t01=0x00f4}
0x6520…6566 Head {h00=0x0042, h01=0x0050, text=»* ACTIVATION IS AT LT:SWB WHEN SWAPPABLE WORK BLOCK REQUEST.«, t00=0x0040, t01=0x0132}
0x6566…6570 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0178}
0x6570…65a8 Head {h00=0x0034, h01=0x0050, text=»* INPUT: A1 = SEGMENT BLOCK ADDRESS (LT:DSK) «, t00=0x0040, t01=0x0182}
0x65a8…65e2 Head {h00=0x0036, h01=0x0050, text=»* = SWAPPABLE WORK BLOCK ADDRESS (LT:SWB) «, t00=0x0041, t01=0x002a}
0x65e2…6618 Head {h00=0x0032, h01=0x0050, text=»* A3 = TTAB ADDRESS OF CALLING TASK «, t00=0x0041, t01=0x0064}
0x6618…6646 Head {h00=0x002a, h01=0x0050, text=»* A4 = LKM DATA DIRECTIVE (LT:SWB) «, t00=0x0041, t01=0x009a}
0x6646…6650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00c8}
0x6650…6678 Head {h00=0x0024, h01=0x0050, text=»* OUTPUT: A2, A5 ARE DESTROYED«, t00=0x0041, t01=0x00d2}
0x6678…6682 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00fa}
0x6682…668c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0104}
0x668c…66c0 Head {h00=0x0030, h01=0x0050, text=»QLTSWB EQU * ACTIVATE LDTASK AT ENTRY LT:SWB«, t00=0x0041, t01=0x010e}
0x66c0…66d6 Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=1 «, t00=0x0041, t01=0x0142}
0x66d6…66fe Head {h00=0x0024, h01=0x0050, text=» LDKL A2,LT:SWB DISPATCH ADDRESS«, t00=0x0041, t01=0x0158}
0x66fe…6710 Head {h00=0x000e, h01=0x0050, text=» RF QLTASK«, t00=0x0041, t01=0x0180}
0x6710…671c (66, 0, 398) Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x0004}
0x671c…6726 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0010}
0x6726…673c Head {h00=0x0012, h01=0x0050, text=» IFT SWPBLK=0 «, t00=0x0042, t01=0x001a}
0x673c…6776 Head {h00=0x0036, h01=0x0050, text=» ABL LKMERR INDICATE SYSGEN ERROR AND HALT SYSTEM «, t00=0x0042, t01=0x0030}
0x6776…6782 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x006a}
0x6782…678c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0076}
0x678c…67c0 Head {h00=0x0030, h01=0x0050, text=»QLTDSK EQU * ACTIVATE LDTASK AT ENTRY LT:DSK«, t00=0x0042, t01=0x0080}
0x67c0…67e8 Head {h00=0x0024, h01=0x0050, text=» LDKL A2,LT:DSK DISPATCH ADDRESS«, t00=0x0042, t01=0x00b4}
0x67e8…67f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00dc}
0x67f2…680a Head {h00=0x0014, h01=0x0050, text=» EJECT LDTASK «, t00=0x0042, t01=0x00e6}
0x680a…6814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00fe}
0x6814…681e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0108}
0x681e…6832 Head {h00=0x0010, h01=0x0050, text=»QLTASK EQU *«, t00=0x0042, t01=0x0112}
0x6832…685e Head {h00=0x0028, h01=0x0050, text=» LDKL A5,TTABLD LDTASK TTAB ADDRESS «, t00=0x0042, t01=0x0126}
0x685e…6880 Head {h00=0x001e, h01=0x0050, text=» ABL ACTOT ACTIVATE LDTASK«, t00=0x0042, t01=0x0152}
0x6880…688a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0174}
0x688a…6894 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x017e}
0x6894…689e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0188}
0x689e…68aa (67, 2, 20) Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0043, t01=0x0004}
0x68aa…68ae Head {h00=0x4004, h01=0x0000}
0x68ae…68b0 00 43 ┆ C┆
0x68b0…68b2 00 10 ┆ ┆
0x68b2…68ba (68, 1, 8) 20 04 00 00 00 44 00 04 ┆ D ┆