DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦b9ee4a392⟧

    Length: 9932 (0x26cc)
    Notes: pts_type(SC)
    Names: »TLDSEG.SC«

Derivation

└─⟦7b35573c9⟧ Bits:30009690 Philips computer tape "600402"
    └─⟦this⟧ »M:AF/TLDSEG.SC« 

PTS(SC)

	IDENT TLDSEG 	REL 11.0 81-01-26 870105041100 

* 
* 
**************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   TLDSEG = LOAD SEGMENT 
* 
* 
* 
* 
**************************************************
* 
* 
*   THIS MODULE CONTAINS THE LOAD SEGMENT LKM PROCESSOR,
*   USED IN TOSS MEMORY MANAGEMENT SYSTEMS. 
* 
* 
	EJECT			TLDSEG 
* 
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	TLDSEG	LOAD SEGMENT
	ENTRY	TLSEG1	UPDATE PAGQUE, CSB AND MMU
	ENTRY	TLSEG2	UPDATE CSB AND MMU
	EJECT			TLDSEG 
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	PRUN	TTAB ADDRESS OF RUNNING PROGRAM 
	EXTRN	TDISP	DISPATCHER 
	EXTRN	RELPAG	RELEASE PAGE
	EXTRN	LKM030	LKM REQUEST ERROR 
	EXTRN	PAG:QB	QUEUE LINK BACKWARDS
	EXTRN	PAG:PA	PAGE ADDRESS
	EXTRN	SEG:NS	NUMBER OF SEGMENTS
	EXTRN	SEG:DS	DISC SECTOR ADDRESS 
	EXTRN	SEG:PB	PAGE BLOCK ADDRESS
	EXTRN	TTB:AP	ACB ADDRESS 
	EXTRN	TTB:PW	PROGRAM STATUS WORD 
	EXTRN	TTB:SA	TTAB SAVE AREA
	EXTRN	TTB:MT	MMU TABLE 
	EXTRN	TTB:CB	CURRENT SEGMENT BASE
	EXTRN	TTB:SP	SEGMENT TABLE ADDRESS 
	EXTRN	TTB:SB	SEGMENT BLOCK ADDRESS 
	EXTRN	QLTDSK	ACTIVATE LDTASK AT ENTRY LT:DSK 
	EXTRN	ACBMMP	MMU TABLE PAGE ENTRY
	EXTRN	ACBNPE	NUMBER OF PAGE ENTRIES
	EXTRN	ACBLAP	LOGICAL ADDRESS OF PAGES
	EJECT			TLDSEG 
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	1
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	0
* 
* 
*	A PROGRAM VERSION USING TOSS DISC PAGING
*	IS OBTAINED BY SETTING DSKPAG EQU 1.
* 
DSKPAG	EQU	0
* 
	EJECT			TLDSEG 
* 
* 
**********
* TLDSEG *
**********
* 
* 
*   THIS IS THE LOAD SEGMENT LKM PROCESSOR. 
* 
*   IT IS ENTERED FROM THE LKM HANDLER
*   WITH THE FOLLOWING PARAMETERS:
* 
*   A2 = DISPATCH ADDRESS 
*   A5 = TTAB ADDRESS 
*   A7 = SEGMENT NUMBER 
* 
*   IT RETURNS TO CALLING TASK WITH 
*   THE FOLLOWING PARAMETERS: 
* 
*   A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE 
*   A7 = -1 IF REQUEST ERROR, ELSE
*   A7 = -2 IF DISC I/O ERROR, ELSE 
*   A7 = -3 IF DISC NOT OPERABLE
* 
*   WHEN REQUESTED SEGMENT IS ALREADY IN CORE:
*   THE REQUEST WILL NOT GO THROUGH THE DISPATCHER AFTER
*   COMPLETION, THUS NO TASK SWITCHING WILL BE PERFORMED, 
*   IN PURPOSE TO MAKE THE REQUEST AS FAST AS POSSIBLE. 
* 
*   WHEN REQUESTED SEGMENT IS NOT IN CORE TLDSEG WILL 
*   ACTIVATE LDTASK WHICH WILL LOAD SEGMENT INTO CORE.
* 
* 
	EJECT			TLDSEG 
* 
* 
TLDSEG	EQU	*	LOAD SEGMENT 
	IFT	DSKPAG=1 
	LD	A3,TTB:SB,A5	SEGMENT BLOCK ADDRESS
	RF(Z)	TLDS00	NO SEGMENT
	LCR	A4,A3	SEGMENT STATUS 
	ANK	A4,/1E	CHECK IF CORE RESIDENT OR...
	RF(NZ)	TLDS00	...USED BY AN INTERRUPTED TASK 
* 
*   INSERT PAGE BLOCK IN PAGE QUEUE 
* 
	CF	A15,RELPAG	RELEASE PAGE 
	LD	A4,TTB:PW,A5	PSW
	ST	A4,-2,A15	RESTORE PSW ON STACK
	XIF
* 
*	CHECK VALIDITY OF SEGMENT NUMBER
* 
TLDS00	EQU	*
	LD	A3,TTB:SP,A5	SEGTAB ADDRESS 
	LDR	A1,A7	CHECK IF SEGMENT NUMBER < 0
	RF(N)	TLDERR	REQUEST ERROR 
	CW	A1,SEG:NS,A3	CHECK IF SEGMENT NUMBER TOO BIG
	RF(NG)	TLDS03	OK 
* 
TLDERR	LDK	A6,/FF	INDICATE ERROR
	ABL	LKM030	BRANCH TO LKM REQUEST ERROR 
* 
	EJECT			TLDSEG 
* 
*	GET SEGMENT BLOCK ADDRESS 
* 
TLDS03	EQU	*
	SLL	A1,3	ADJUST FOR INDEXING IN SEGTAB 
	ADR	A1,A3	ADD SEGTAB ADDRESS 
	LDR	A3,A5	GET TTAB ADDRESS 
* 
	IFT	DSKPAG=0 
	SUKL	A15,4	ADJUST STACKPOINTER 
	ST	A2,4,A15	SET DISPATCH ADDRESS ON STACK
	XIF
* 
	ADK	A7,0	CHECK SEGMENT NUMBER
	RF(NZ)	TLDS05	NOT SEGMENT 0
	ST	A7,TTB:SB,A3	RESET SEGMENT BLOCK ADDRESS
	LD	A1,SEG:DS,A1	GET LOGICAL ADDRESS OF SEGMENT 0 
* 
	IFT	DSKPAG=1 
	SUKL	A15,4	ADJUST STACKPOINTER 
	ST	A2,4,A15	SET DISPATCH ADDRESS ON STACK
	XIF
	RF	TLDS40
* 
	EJECT			TLDSEG 
* 
* 
TLDS05	EQU	*
	IFT	DSKPAG=1 
	ST	A1,TTB:SB,A3	UPDATE SEGMENT BLOCK ADDRESS 
	LDR*	A4,A1	GET SEGMENT STATUS
	RF(N)	TLDS10	SEGMENT LOADED IN CORE
	ST	A2,TTB:SA,A3
	CM	PRUN
* 
*	ACTIVATE LOAD TASK
* 
	CF	A15,QLTDSK	ACTIVATE LOAD TASK AT ENTRY LT:DSK 
	ABL	TDISP	GO TO DISPATCHER 
* 
TLDS10	EQU	*
	SUKL	A15,4	ADJUST STACKPOINTER 
	ST	A2,4,A15	SET DISPATCH ADDRESS ON STACK
* 
	EJECT			TLDSEG 
* 
* 
**********
* TLSEG1 *
* TLSEG2 *
**********
* 
* 
*   ENTRIES USED BY LDTASK IN PURPOSE TO REMOVE PAGE BLOCK
*   FROM PAGQUE, UPDATE CURRENT SEGMENT BASE AND MMU TABLE. 
* 
*   INPUT:
*   TLSEG1: A1 = SEGBLK ADDRESS 
*           A3 = TTAB ADDRESS CALLING TASK
*           A5 =  "      "       "     "
* 
*   TLSEG2: A1 = PAGBLK ADDRESS 
*           A3 = TTAB ADDRESS LDTASK
*           A5 =  "      "      " 
* 
*   OUTPUT: A1-A6 FROM TTAB SAVE AREA (A5)
* 
	XIF
* 
TLSEG1	EQU	*	ENTRY USED BY LDTASK 
	LD	A1,SEG:PB,A1	PAGE BLOCK ADDRESS 
* 
	IFT	DSKPAG=1 
	LDR*	A2,A1	GET QUEUE LINK FORWARD
	RF(Z)	TLSEG2	PAGE BLOCK NOT IN QUEUE 
	LD	A4,PAG:QB,A1	GET QUEUE LINK BACKWARD
	CMR	A1	RESET QUEUE LINK FORWARD OF REMOVED BLK 
	STR	A2,A4	UPDATE QUEUE LINKS 
	ST	A4,PAG:QB,A2
	XIF
* 
	EJECT			TLDSEG 
* 
*	GET PAGE ADDRESS OF REQUESTED SEGMENT 
* 
TLSEG2	EQU	*	ENTRY USED BY LDTASK 
	LD	A1,PAG:PA,A1	GET PAGE ADDRESS 
* 
	IFT	MMUPAG=1 
	ECR	A2,A1
	ANK	A2,/FC 
* 
*	GET PAGE ENTRY/ENTRIES TO UPDATE IN MMU TABLE 
* 
	LD	A6,TTB:AP,A5	ACB ADDRESS
	AD	A3,ACBMMP,A6	POINT TO FIRST USED PAGE ENTRY 
	LD	A4,ACBNPE,A6	GET NUMBER OF PAGE ENTRIES 
* 
*	UPDATE PAGE ENTRY/ENTRIES 
* 
TLDS25	EQU	*
	SCR	A2,A3	UPDATE PAGE ENTRY
	SUK	A4,1 
	RF(NP)	TLDS30	NO MORE PAGE ENTRIES 
	ADK	A3,2	POINT TO NEXT PAGE ENTRY
	ADK	A2,4	UPDATE PAGE ADDRESS 
	RB	TLDS25
* 
	EJECT			TLDSEG 
* 
* 
TLDS30	ANKL	A1,/300	COMPUTE CURRENT SEGMENT BASE
	SLL	A1,2 
	OR	A1,ACBLAP,A6
	TL	TTB:MT,A5	LOAD MMU REGISTERS
* 
TLDS40	EQU	*
	ES*	A1,TTB:CB,A5	UPDATE CURRENT SEGMENT BASE 
	XIF
* 
	IFT	MMUPAG=0 
TLDS40	EQU	*
	ST*	A1,TTB:CB,A5	UPDATE CURRENT SEGMENT BASE 
	XIF
* 
	IFT	CPU852=0 
	LDR	A6,A5
	ML	6,TTB:SA+2,A6	RESTORE A1-A6 
	RTN	A15	RETURN TO CALLING TASK 
	XIF
* 
	IFT	CPU852=1 
	LD	A1,TTB:SA+2,A5	RESTORE A1-A6
	LD	A2,TTB:SA+4,A5
	LD	A3,TTB:SA+6,A5
	LD	A4,TTB:SA+8,A5
	LD	A6,TTB:SA+12,A5 
	LD	A5,TTB:SA+10,A5 
	RTN	A15	RETURN TO CALLING TASK 
	XIF
* 
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT TLDSEG  REL 11.0 81-01-26 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0052              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004c}
0x0052…008c              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0056}
0x008c…0096              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0090}
0x0096…00be              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x009a}
0x00be…00c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c2}
0x00c8…00ea              Head {h00=0x001e, h01=0x0050, text=»*   TLDSEG = LOAD SEGMENT «, t00=0x0000, t01=0x00cc}
0x00ea…00f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ee}
0x00f4…00fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f8}
0x00fe…0108              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0102}
0x0108…0112              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010c}
0x0112…014c              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0116}
0x014c…0156              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0150}
0x0156…0160              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015a}
0x0160…01a0              Head {h00=0x003c, h01=0x0050, text=»*   THIS MODULE CONTAINS THE LOAD SEGMENT LKM PROCESSOR,«, t00=0x0000, t01=0x0164}
0x01a0…01d4              Head {h00=0x0030, h01=0x0050, text=»*   USED IN TOSS MEMORY MANAGEMENT SYSTEMS. «, t00=0x0001, t01=0x0014}
0x01d4…01de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0048}
0x01de…01e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0052}
0x01e8…0200              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x0001, t01=0x005c}
0x0200…020a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0074}
0x020a…0214              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x007e}
0x0214…0228              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x0088}
0x0228…023c              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x009c}
0x023c…0250              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x00b0}
0x0250…025a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c4}
0x025a…0264              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ce}
0x0264…0286              Head {h00=0x001e, h01=0x0050, text=» ENTRY TLDSEG LOAD SEGMENT«, t00=0x0001, t01=0x00d8}
0x0286…02b6              Head {h00=0x002c, h01=0x0050, text=» ENTRY TLSEG1 UPDATE PAGQUE, CSB AND MMU«, t00=0x0001, t01=0x00fa}
0x02b6…02de              Head {h00=0x0024, h01=0x0050, text=» ENTRY TLSEG2 UPDATE CSB AND MMU«, t00=0x0001, t01=0x012a}
0x02de…02f6              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x0001, t01=0x0152}
0x02f6…0300              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x016a}
0x0300…030a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0174}
0x030a…0320              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0001, t01=0x017e}
0x0320…0336 (2, 0, 400)  Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x0004}
0x0336…034c              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x001a}
0x034c…0356              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0030}
0x0356…0360              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003a}
0x0360…0394              Head {h00=0x0030, h01=0x0050, text=» EXTRN PRUN TTAB ADDRESS OF RUNNING PROGRAM «, t00=0x0002, t01=0x0044}
0x0394…03b4              Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0002, t01=0x0078}
0x03b4…03d6              Head {h00=0x001e, h01=0x0050, text=» EXTRN RELPAG RELEASE PAGE«, t00=0x0002, t01=0x0098}
0x03d6…03fe              Head {h00=0x0024, h01=0x0050, text=» EXTRN LKM030 LKM REQUEST ERROR «, t00=0x0002, t01=0x00ba}
0x03fe…0428              Head {h00=0x0026, h01=0x0050, text=» EXTRN PAG:QB QUEUE LINK BACKWARDS«, t00=0x0002, t01=0x00e2}
0x0428…044a              Head {h00=0x001e, h01=0x0050, text=» EXTRN PAG:PA PAGE ADDRESS«, t00=0x0002, t01=0x010c}
0x044a…0472              Head {h00=0x0024, h01=0x0050, text=» EXTRN SEG:NS NUMBER OF SEGMENTS«, t00=0x0002, t01=0x012e}
0x0472…049c              Head {h00=0x0026, h01=0x0050, text=» EXTRN SEG:DS DISC SECTOR ADDRESS «, t00=0x0002, t01=0x0156}
0x049c…04c4              Head {h00=0x0024, h01=0x0050, text=» EXTRN SEG:PB PAGE BLOCK ADDRESS«, t00=0x0002, t01=0x0180}
0x04c4…04e6              Head {h00=0x001e, h01=0x0050, text=» EXTRN TTB:AP ACB ADDRESS «, t00=0x0003, t01=0x0018}
0x04e6…0510              Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:PW PROGRAM STATUS WORD «, t00=0x0003, t01=0x003a}
0x0510…0534              Head {h00=0x0020, h01=0x0050, text=» EXTRN TTB:SA TTAB SAVE AREA«, t00=0x0003, t01=0x0064}
0x0534…0554              Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:MT MMU TABLE «, t00=0x0003, t01=0x0088}
0x0554…057e              Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:CB CURRENT SEGMENT BASE«, t00=0x0003, t01=0x00a8}
0x057e…05aa              Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:SP SEGMENT TABLE ADDRESS «, t00=0x0003, t01=0x00d2}
0x05aa…05d6              Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:SB SEGMENT BLOCK ADDRESS «, t00=0x0003, t01=0x00fe}
0x05d6…060c              Head {h00=0x0032, h01=0x0050, text=» EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK «, t00=0x0003, t01=0x012a}
0x060c…0636              Head {h00=0x0026, h01=0x0050, text=» EXTRN ACBMMP MMU TABLE PAGE ENTRY«, t00=0x0003, t01=0x0160}
0x0636…0662              Head {h00=0x0028, h01=0x0050, text=» EXTRN ACBNPE NUMBER OF PAGE ENTRIES«, t00=0x0003, t01=0x018a}
0x0662…0690              Head {h00=0x002a, h01=0x0050, text=» EXTRN ACBLAP LOGICAL ADDRESS OF PAGES«, t00=0x0004, t01=0x0026}
0x0690…06a8              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x0004, t01=0x0054}
0x06a8…06b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006c}
0x06b2…06bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0076}
0x06bc…06ee              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0004, t01=0x0080}
0x06ee…06f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b2}
0x06f8…0716              Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0004, t01=0x00bc}
0x0716…0720              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00da}
0x0720…0752              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0004, t01=0x00e4}
0x0752…075c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0116}
0x075c…078e              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0004, t01=0x0120}
0x078e…07bc              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0004, t01=0x0152}
0x07bc…07c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0180}
0x07c6…07da              Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0004, t01=0x018a}
0x07da…07e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x000e}
0x07e4…07ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0018}
0x07ee…0828              Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0005, t01=0x0022}
0x0828…085a              Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0005, t01=0x005c}
0x085a…0864              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x008e}
0x0864…0878              Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0005, t01=0x0098}
0x0878…0882              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ac}
0x0882…088c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00b6}
0x088c…08be              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x0005, t01=0x00c0}
0x08be…08ec              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x0005, t01=0x00f2}
0x08ec…08f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0120}
0x08f6…090a              Head {h00=0x0010, h01=0x0050, text=»DSKPAG EQU 0«, t00=0x0005, t01=0x012a}
0x090a…0914              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013e}
0x0914…092c              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x0005, t01=0x0148}
0x092c…0936              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0160}
0x0936…0940              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016a}
0x0940…0952              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0005, t01=0x0174}
0x0952…0964              Head {h00=0x000e, h01=0x0050, text=»* TLDSEG *«, t00=0x0005, t01=0x0186}
0x0964…0976              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0006, t01=0x0008}
0x0976…0980              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x001a}
0x0980…098a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0024}
0x098a…09be              Head {h00=0x0030, h01=0x0050, text=»*   THIS IS THE LOAD SEGMENT LKM PROCESSOR. «, t00=0x0006, t01=0x002e}
0x09be…09c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0062}
0x09c8…09f6              Head {h00=0x002a, h01=0x0050, text=»*   IT IS ENTERED FROM THE LKM HANDLER«, t00=0x0006, t01=0x006c}
0x09f6…0a20              Head {h00=0x0026, h01=0x0050, text=»*   WITH THE FOLLOWING PARAMETERS:«, t00=0x0006, t01=0x009a}
0x0a20…0a2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c4}
0x0a2a…0a4c              Head {h00=0x001e, h01=0x0050, text=»*   A2 = DISPATCH ADDRESS «, t00=0x0006, t01=0x00ce}
0x0a4c…0a6a              Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x0006, t01=0x00f0}
0x0a6a…0a8a              Head {h00=0x001c, h01=0x0050, text=»*   A7 = SEGMENT NUMBER «, t00=0x0006, t01=0x010e}
0x0a8a…0a94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012e}
0x0a94…0ac0              Head {h00=0x0028, h01=0x0050, text=»*   IT RETURNS TO CALLING TASK WITH «, t00=0x0006, t01=0x0138}
0x0ac0…0ae6              Head {h00=0x0022, h01=0x0050, text=»*   THE FOLLOWING PARAMETERS: «, t00=0x0006, t01=0x0164}
0x0ae6…0af0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018a}
0x0af0…0b32 (7, 0, 400)  Head {h00=0x003e, h01=0x0050, text=»*   A7 = UNCHANGED IF SEGMENT LOADING IS SUCCESSFUL, ELSE «, t00=0x0007, t01=0x0004}
0x0b32…0b5c              Head {h00=0x0026, h01=0x0050, text=»*   A7 = -1 IF REQUEST ERROR, ELSE«, t00=0x0007, t01=0x0046}
0x0b5c…0b88              Head {h00=0x0028, h01=0x0050, text=»*   A7 = -2 IF DISC I/O ERROR, ELSE «, t00=0x0007, t01=0x0070}
0x0b88…0bb0              Head {h00=0x0024, h01=0x0050, text=»*   A7 = -3 IF DISC NOT OPERABLE«, t00=0x0007, t01=0x009c}
0x0bb0…0bba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c4}
0x0bba…0bf0              Head {h00=0x0032, h01=0x0050, text=»*   WHEN REQUESTED SEGMENT IS ALREADY IN CORE:«, t00=0x0007, t01=0x00ce}
0x0bf0…0c30              Head {h00=0x003c, h01=0x0050, text=»*   THE REQUEST WILL NOT GO THROUGH THE DISPATCHER AFTER«, t00=0x0007, t01=0x0104}
0x0c30…0c72              Head {h00=0x003e, h01=0x0050, text=»*   COMPLETION, THUS NO TASK SWITCHING WILL BE PERFORMED, «, t00=0x0007, t01=0x0144}
0x0c72…0cb2              Head {h00=0x003c, h01=0x0050, text=»*   IN PURPOSE TO MAKE THE REQUEST AS FAST AS POSSIBLE. «, t00=0x0007, t01=0x0186}
0x0cb2…0cbc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x0cbc…0cfa              Head {h00=0x003a, h01=0x0050, text=»*   WHEN REQUESTED SEGMENT IS NOT IN CORE TLDSEG WILL «, t00=0x0008, t01=0x0040}
0x0cfa…0d38              Head {h00=0x003a, h01=0x0050, text=»*   ACTIVATE LDTASK WHICH WILL LOAD SEGMENT INTO CORE.«, t00=0x0008, t01=0x007e}
0x0d38…0d42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00bc}
0x0d42…0d4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c6}
0x0d4c…0d64              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x0008, t01=0x00d0}
0x0d64…0d6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e8}
0x0d6e…0d78              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00f2}
0x0d78…0d9a              Head {h00=0x001e, h01=0x0050, text=»TLDSEG EQU * LOAD SEGMENT «, t00=0x0008, t01=0x00fc}
0x0d9a…0db0              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x0008, t01=0x011e}
0x0db0…0dde              Head {h00=0x002a, h01=0x0050, text=» LD A3,TTB:SB,A5 SEGMENT BLOCK ADDRESS«, t00=0x0008, t01=0x0134}
0x0dde…0dfe              Head {h00=0x001c, h01=0x0050, text=» RF(Z) TLDS00 NO SEGMENT«, t00=0x0008, t01=0x0162}
0x0dfe…0e20              Head {h00=0x001e, h01=0x0050, text=» LCR A4,A3 SEGMENT STATUS «, t00=0x0008, t01=0x0182}
0x0e20…0e50              Head {h00=0x002c, h01=0x0050, text=» ANK A4,/1E CHECK IF CORE RESIDENT OR...«, t00=0x0009, t01=0x0014}
0x0e50…0e86              Head {h00=0x0032, h01=0x0050, text=» RF(NZ) TLDS00 ...USED BY AN INTERRUPTED TASK «, t00=0x0009, t01=0x0044}
0x0e86…0e90              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007a}
0x0e90…0ebc              Head {h00=0x0028, h01=0x0050, text=»*   INSERT PAGE BLOCK IN PAGE QUEUE «, t00=0x0009, t01=0x0084}
0x0ebc…0ec6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b0}
0x0ec6…0eea              Head {h00=0x0020, h01=0x0050, text=» CF A15,RELPAG RELEASE PAGE «, t00=0x0009, t01=0x00ba}
0x0eea…0f06              Head {h00=0x0018, h01=0x0050, text=» LD A4,TTB:PW,A5 PSW«, t00=0x0009, t01=0x00de}
0x0f06…0f30              Head {h00=0x0026, h01=0x0050, text=» ST A4,-2,A15 RESTORE PSW ON STACK«, t00=0x0009, t01=0x00fa}
0x0f30…0f3c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0009, t01=0x0124}
0x0f3c…0f46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0130}
0x0f46…0f70              Head {h00=0x0026, h01=0x0050, text=»* CHECK VALIDITY OF SEGMENT NUMBER«, t00=0x0009, t01=0x013a}
0x0f70…0f7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0164}
0x0f7a…0f8e              Head {h00=0x0010, h01=0x0050, text=»TLDS00 EQU *«, t00=0x0009, t01=0x016e}
0x0f8e…0fb6              Head {h00=0x0024, h01=0x0050, text=» LD A3,TTB:SP,A5 SEGTAB ADDRESS «, t00=0x0009, t01=0x0182}
0x0fb6…0fe4              Head {h00=0x002a, h01=0x0050, text=» LDR A1,A7 CHECK IF SEGMENT NUMBER < 0«, t00=0x000a, t01=0x001a}
0x0fe4…1008              Head {h00=0x0020, h01=0x0050, text=» RF(N) TLDERR REQUEST ERROR «, t00=0x000a, t01=0x0048}
0x1008…1040              Head {h00=0x0034, h01=0x0050, text=» CW A1,SEG:NS,A3 CHECK IF SEGMENT NUMBER TOO BIG«, t00=0x000a, t01=0x006c}
0x1040…105a              Head {h00=0x0016, h01=0x0050, text=» RF(NG) TLDS03 OK «, t00=0x000a, t01=0x00a4}
0x105a…1064              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00be}
0x1064…108c              Head {h00=0x0024, h01=0x0050, text=»TLDERR LDK A6,/FF INDICATE ERROR«, t00=0x000a, t01=0x00c8}
0x108c…10bc              Head {h00=0x002c, h01=0x0050, text=» ABL LKM030 BRANCH TO LKM REQUEST ERROR «, t00=0x000a, t01=0x00f0}
0x10bc…10c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0120}
0x10c6…10de              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x000a, t01=0x012a}
0x10de…10e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0142}
0x10e8…110c              Head {h00=0x0020, h01=0x0050, text=»* GET SEGMENT BLOCK ADDRESS «, t00=0x000a, t01=0x014c}
0x110c…1116              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0170}
0x1116…112a              Head {h00=0x0010, h01=0x0050, text=»TLDS03 EQU *«, t00=0x000a, t01=0x017a}
0x112a…115a              Head {h00=0x002c, h01=0x0050, text=» SLL A1,3 ADJUST FOR INDEXING IN SEGTAB «, t00=0x000a, t01=0x018e}
0x115a…1180              Head {h00=0x0022, h01=0x0050, text=» ADR A1,A3 ADD SEGTAB ADDRESS «, t00=0x000b, t01=0x002e}
0x1180…11a4              Head {h00=0x0020, h01=0x0050, text=» LDR A3,A5 GET TTAB ADDRESS «, t00=0x000b, t01=0x0054}
0x11a4…11ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0078}
0x11ae…11c4              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=0 «, t00=0x000b, t01=0x0082}
0x11c4…11ec              Head {h00=0x0024, h01=0x0050, text=» SUKL A15,4 ADJUST STACKPOINTER «, t00=0x000b, t01=0x0098}
0x11ec…121e              Head {h00=0x002e, h01=0x0050, text=» ST A2,4,A15 SET DISPATCH ADDRESS ON STACK«, t00=0x000b, t01=0x00c0}
0x121e…122a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00f2}
0x122a…1234              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00fe}
0x1234…125a              Head {h00=0x0022, h01=0x0050, text=» ADK A7,0 CHECK SEGMENT NUMBER«, t00=0x000b, t01=0x0108}
0x125a…127e              Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TLDS05 NOT SEGMENT 0«, t00=0x000b, t01=0x012e}
0x127e…12b2              Head {h00=0x0030, h01=0x0050, text=» ST A7,TTB:SB,A3 RESET SEGMENT BLOCK ADDRESS«, t00=0x000b, t01=0x0152}
0x12b2…12ec              Head {h00=0x0036, h01=0x0050, text=» LD A1,SEG:DS,A1 GET LOGICAL ADDRESS OF SEGMENT 0 «, t00=0x000b, t01=0x0186}
0x12ec…12f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0030}
0x12f6…130c              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x000c, t01=0x003a}
0x130c…1334              Head {h00=0x0024, h01=0x0050, text=» SUKL A15,4 ADJUST STACKPOINTER «, t00=0x000c, t01=0x0050}
0x1334…1366              Head {h00=0x002e, h01=0x0050, text=» ST A2,4,A15 SET DISPATCH ADDRESS ON STACK«, t00=0x000c, t01=0x0078}
0x1366…1372              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00aa}
0x1372…1384              Head {h00=0x000e, h01=0x0050, text=» RF TLDS40«, t00=0x000c, t01=0x00b6}
0x1384…138e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00c8}
0x138e…13a6              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x000c, t01=0x00d2}
0x13a6…13b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ea}
0x13b0…13ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f4}
0x13ba…13ce              Head {h00=0x0010, h01=0x0050, text=»TLDS05 EQU *«, t00=0x000c, t01=0x00fe}
0x13ce…13e4              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x000c, t01=0x0112}
0x13e4…141a              Head {h00=0x0032, h01=0x0050, text=» ST A1,TTB:SB,A3 UPDATE SEGMENT BLOCK ADDRESS «, t00=0x000c, t01=0x0128}
0x141a…1440              Head {h00=0x0022, h01=0x0050, text=» LDR* A4,A1 GET SEGMENT STATUS«, t00=0x000c, t01=0x015e}
0x1440…146c              Head {h00=0x0028, h01=0x0050, text=» RF(N) TLDS10 SEGMENT LOADED IN CORE«, t00=0x000c, t01=0x0184}
0x146c…1484              Head {h00=0x0014, h01=0x0050, text=» ST A2,TTB:SA,A3«, t00=0x000d, t01=0x0020}
0x1484…1494              Head {h00=0x000c, h01=0x0050, text=» CM PRUN«, t00=0x000d, t01=0x0038}
0x1494…149e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0048}
0x149e…14ba              Head {h00=0x0018, h01=0x0050, text=»* ACTIVATE LOAD TASK«, t00=0x000d, t01=0x0052}
0x14ba…14c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x006e}
0x14c4…14fe              Head {h00=0x0036, h01=0x0050, text=» CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK «, t00=0x000d, t01=0x0078}
0x14fe…1522              Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x000d, t01=0x00b2}
0x1522…152c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00d6}
0x152c…1540              Head {h00=0x0010, h01=0x0050, text=»TLDS10 EQU *«, t00=0x000d, t01=0x00e0}
0x1540…1568              Head {h00=0x0024, h01=0x0050, text=» SUKL A15,4 ADJUST STACKPOINTER «, t00=0x000d, t01=0x00f4}
0x1568…159a              Head {h00=0x002e, h01=0x0050, text=» ST A2,4,A15 SET DISPATCH ADDRESS ON STACK«, t00=0x000d, t01=0x011c}
0x159a…15a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x014e}
0x15a4…15bc              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x000d, t01=0x0158}
0x15bc…15c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0170}
0x15c6…15d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017a}
0x15d0…15e2              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000d, t01=0x0184}
0x15e2…15f4              Head {h00=0x000e, h01=0x0050, text=»* TLSEG1 *«, t00=0x000e, t01=0x0008}
0x15f4…1606              Head {h00=0x000e, h01=0x0050, text=»* TLSEG2 *«, t00=0x000e, t01=0x001a}
0x1606…1618              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x002c}
0x1618…1622              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003e}
0x1622…162c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0048}
0x162c…166e              Head {h00=0x003e, h01=0x0050, text=»*   ENTRIES USED BY LDTASK IN PURPOSE TO REMOVE PAGE BLOCK«, t00=0x000e, t01=0x0052}
0x166e…16b2              Head {h00=0x0040, h01=0x0050, text=»*   FROM PAGQUE, UPDATE CURRENT SEGMENT BASE AND MMU TABLE. «, t00=0x000e, t01=0x0094}
0x16b2…16bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d8}
0x16bc…16ce              Head {h00=0x000e, h01=0x0050, text=»*   INPUT:«, t00=0x000e, t01=0x00e2}
0x16ce…16f6              Head {h00=0x0024, h01=0x0050, text=»*   TLSEG1: A1 = SEGBLK ADDRESS «, t00=0x000e, t01=0x00f4}
0x16f6…1728              Head {h00=0x002e, h01=0x0050, text=»*           A3 = TTAB ADDRESS CALLING TASK«, t00=0x000e, t01=0x011c}
0x1728…1758              Head {h00=0x002c, h01=0x0050, text=»*           A5 =  "      "       "     "«, t00=0x000e, t01=0x014e}
0x1758…1762              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x017e}
0x1762…178a              Head {h00=0x0024, h01=0x0050, text=»*   TLSEG2: A1 = PAGBLK ADDRESS «, t00=0x000e, t01=0x0188}
0x178a…17b6              Head {h00=0x0028, h01=0x0050, text=»*           A3 = TTAB ADDRESS LDTASK«, t00=0x000f, t01=0x0020}
0x17b6…17e0              Head {h00=0x0026, h01=0x0050, text=»*           A5 =  "      "      " «, t00=0x000f, t01=0x004c}
0x17e0…17ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0076}
0x17ea…181c              Head {h00=0x002e, h01=0x0050, text=»*   OUTPUT: A1-A6 FROM TTAB SAVE AREA (A5)«, t00=0x000f, t01=0x0080}
0x181c…1826              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b2}
0x1826…1832              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x00bc}
0x1832…183c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c8}
0x183c…1866              Head {h00=0x0026, h01=0x0050, text=»TLSEG1 EQU * ENTRY USED BY LDTASK «, t00=0x000f, t01=0x00d2}
0x1866…1892              Head {h00=0x0028, h01=0x0050, text=» LD A1,SEG:PB,A1 PAGE BLOCK ADDRESS «, t00=0x000f, t01=0x00fc}
0x1892…189c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0128}
0x189c…18b2              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x000f, t01=0x0132}
0x18b2…18dc              Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A1 GET QUEUE LINK FORWARD«, t00=0x000f, t01=0x0148}
0x18dc…190a              Head {h00=0x002a, h01=0x0050, text=» RF(Z) TLSEG2 PAGE BLOCK NOT IN QUEUE «, t00=0x000f, t01=0x0172}
0x190a…193a              Head {h00=0x002c, h01=0x0050, text=» LD A4,PAG:QB,A1 GET QUEUE LINK BACKWARD«, t00=0x0010, t01=0x0010}
0x193a…1972              Head {h00=0x0034, h01=0x0050, text=» CMR A1 RESET QUEUE LINK FORWARD OF REMOVED BLK «, t00=0x0010, t01=0x0040}
0x1972…1998              Head {h00=0x0022, h01=0x0050, text=» STR A2,A4 UPDATE QUEUE LINKS «, t00=0x0010, t01=0x0078}
0x1998…19b0              Head {h00=0x0014, h01=0x0050, text=» ST A4,PAG:QB,A2«, t00=0x0010, t01=0x009e}
0x19b0…19bc              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x00b6}
0x19bc…19c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c2}
0x19c6…19de              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x0010, t01=0x00cc}
0x19de…19e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00e4}
0x19e8…1a18              Head {h00=0x002c, h01=0x0050, text=»* GET PAGE ADDRESS OF REQUESTED SEGMENT «, t00=0x0010, t01=0x00ee}
0x1a18…1a22              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x011e}
0x1a22…1a4c              Head {h00=0x0026, h01=0x0050, text=»TLSEG2 EQU * ENTRY USED BY LDTASK «, t00=0x0010, t01=0x0128}
0x1a4c…1a76              Head {h00=0x0026, h01=0x0050, text=» LD A1,PAG:PA,A1 GET PAGE ADDRESS «, t00=0x0010, t01=0x0152}
0x1a76…1a80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x017c}
0x1a80…1a96              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0010, t01=0x0186}
0x1a96…1aa8              Head {h00=0x000e, h01=0x0050, text=» ECR A2,A1«, t00=0x0011, t01=0x000c}
0x1aa8…1abc              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FC «, t00=0x0011, t01=0x001e}
0x1abc…1ac6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0032}
0x1ac6…1afe              Head {h00=0x0034, h01=0x0050, text=»* GET PAGE ENTRY/ENTRIES TO UPDATE IN MMU TABLE «, t00=0x0011, t01=0x003c}
0x1afe…1b08              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0074}
0x1b08…1b2c              Head {h00=0x0020, h01=0x0050, text=» LD A6,TTB:AP,A5 ACB ADDRESS«, t00=0x0011, t01=0x007e}
0x1b2c…1b64              Head {h00=0x0034, h01=0x0050, text=» AD A3,ACBMMP,A6 POINT TO FIRST USED PAGE ENTRY «, t00=0x0011, t01=0x00a2}
0x1b64…1b98              Head {h00=0x0030, h01=0x0050, text=» LD A4,ACBNPE,A6 GET NUMBER OF PAGE ENTRIES «, t00=0x0011, t01=0x00da}
0x1b98…1ba2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x010e}
0x1ba2…1bc6              Head {h00=0x0020, h01=0x0050, text=»* UPDATE PAGE ENTRY/ENTRIES «, t00=0x0011, t01=0x0118}
0x1bc6…1bd0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x013c}
0x1bd0…1be4              Head {h00=0x0010, h01=0x0050, text=»TLDS25 EQU *«, t00=0x0011, t01=0x0146}
0x1be4…1c08              Head {h00=0x0020, h01=0x0050, text=» SCR A2,A3 UPDATE PAGE ENTRY«, t00=0x0011, t01=0x015a}
0x1c08…1c1a              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0011, t01=0x017e}
0x1c1a…1c46              Head {h00=0x0028, h01=0x0050, text=» RF(NP) TLDS30 NO MORE PAGE ENTRIES «, t00=0x0011, t01=0x0190}
0x1c46…1c70              Head {h00=0x0026, h01=0x0050, text=» ADK A3,2 POINT TO NEXT PAGE ENTRY«, t00=0x0012, t01=0x002c}
0x1c70…1c96              Head {h00=0x0022, h01=0x0050, text=» ADK A2,4 UPDATE PAGE ADDRESS «, t00=0x0012, t01=0x0056}
0x1c96…1ca8              Head {h00=0x000e, h01=0x0050, text=» RB TLDS25«, t00=0x0012, t01=0x007c}
0x1ca8…1cb2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x008e}
0x1cb2…1cca              Head {h00=0x0014, h01=0x0050, text=» EJECT   TLDSEG «, t00=0x0012, t01=0x0098}
0x1cca…1cd4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b0}
0x1cd4…1cde              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ba}
0x1cde…1d16              Head {h00=0x0034, h01=0x0050, text=»TLDS30 ANKL A1,/300 COMPUTE CURRENT SEGMENT BASE«, t00=0x0012, t01=0x00c4}
0x1d16…1d28              Head {h00=0x000e, h01=0x0050, text=» SLL A1,2 «, t00=0x0012, t01=0x00fc}
0x1d28…1d40              Head {h00=0x0014, h01=0x0050, text=» OR A1,ACBLAP,A6«, t00=0x0012, t01=0x010e}
0x1d40…1d68              Head {h00=0x0024, h01=0x0050, text=» TL TTB:MT,A5 LOAD MMU REGISTERS«, t00=0x0012, t01=0x0126}
0x1d68…1d72              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x014e}
0x1d72…1d86              Head {h00=0x0010, h01=0x0050, text=»TLDS40 EQU *«, t00=0x0012, t01=0x0158}
0x1d86…1dbc              Head {h00=0x0032, h01=0x0050, text=» ES* A1,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE «, t00=0x0012, t01=0x016c}
0x1dbc…1dc8              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0012}
0x1dc8…1dd2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x001e}
0x1dd2…1de8              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0013, t01=0x0028}
0x1de8…1dfc              Head {h00=0x0010, h01=0x0050, text=»TLDS40 EQU *«, t00=0x0013, t01=0x003e}
0x1dfc…1e32              Head {h00=0x0032, h01=0x0050, text=» ST* A1,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE «, t00=0x0013, t01=0x0052}
0x1e32…1e3e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0088}
0x1e3e…1e48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0094}
0x1e48…1e5e              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0013, t01=0x009e}
0x1e5e…1e70              Head {h00=0x000e, h01=0x0050, text=» LDR A6,A5«, t00=0x0013, t01=0x00b4}
0x1e70…1e98              Head {h00=0x0024, h01=0x0050, text=» ML 6,TTB:SA+2,A6 RESTORE A1-A6 «, t00=0x0013, t01=0x00c6}
0x1e98…1ec0              Head {h00=0x0024, h01=0x0050, text=» RTN A15 RETURN TO CALLING TASK «, t00=0x0013, t01=0x00ee}
0x1ec0…1ecc              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0116}
0x1ecc…1ed6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0122}
0x1ed6…1eec              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0013, t01=0x012c}
0x1eec…1f14              Head {h00=0x0024, h01=0x0050, text=» LD A1,TTB:SA+2,A5 RESTORE A1-A6«, t00=0x0013, t01=0x0142}
0x1f14…1f2e              Head {h00=0x0016, h01=0x0050, text=» LD A2,TTB:SA+4,A5«, t00=0x0013, t01=0x016a}
0x1f2e…1f48              Head {h00=0x0016, h01=0x0050, text=» LD A3,TTB:SA+6,A5«, t00=0x0013, t01=0x0184}
0x1f48…1f62              Head {h00=0x0016, h01=0x0050, text=» LD A4,TTB:SA+8,A5«, t00=0x0014, t01=0x000e}
0x1f62…1f7e              Head {h00=0x0018, h01=0x0050, text=» LD A6,TTB:SA+12,A5 «, t00=0x0014, t01=0x0028}
0x1f7e…1f9a              Head {h00=0x0018, h01=0x0050, text=» LD A5,TTB:SA+10,A5 «, t00=0x0014, t01=0x0044}
0x1f9a…1fc2              Head {h00=0x0024, h01=0x0050, text=» RTN A15 RETURN TO CALLING TASK «, t00=0x0014, t01=0x0060}
0x1fc2…1fce              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0088}
0x1fce…1fd8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0094}
0x1fd8…1fe2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x009e}
0x1fe2…1fec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a8}
0x1fec…1ff8              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0014, t01=0x00b2}
0x1ff8…1ffc              Head {h00=0x4004, h01=0x0000}
0x1ffc…2000              00 14 00 be                                                                                                                                                                                                                                       ┆    ┆
0x2000…2008 (21, 1, 8)   20 04 00 00 00 15 00 04                                                                                                                                                                                                                           ┆        ┆
0x2008…2058 (22, 0, 400) 50 4f 4e 44 49 4e 47 20 4d 4f 44 55 4c 45 20 43 41 4c 4c 45 44 20 42 59 20 27 54 45 4e 44 49 4f 27 20 41 54 00 4d 01 84 00 2c 00 50 2a 20 43 4f 4d 50 4c 45 54 49 4f 4e 20 4f 46 20 54 48 45 20 52 45 51 55 45 53 54 20 49 53 20 27 54 45 4e 3a   ┆PONDING MODULE CALLED BY 'TENDIO' AT M   , P* COMPLETION OF THE REQUEST IS 'TEN:┆
0x2058…20a8              44 4d 27 2e 00 4e 00 2c 00 06 00 50 2a 20 00 4e 00 5c 00 22 00 50 2a 20 49 4e 50 55 54 3a 20 20 41 38 20 3d 20 44 57 54 20 45 43 42 20 41 44 44 52 45 53 53 00 4e 00 66 00 24 00 50 2a 20 20 20 20 20 20 20 20 20 41 39 20 3d 20 55 53 45 52 20   ┆DM'. N ,   P*  N   " P* INPUT:  A8 = DWT ECB ADDRESS N f $ P*         A9 = USER ┆
0x20a8…20f8              45 43 42 20 41 44 44 52 45 53 53 20 00 4e 00 8c 00 06 00 50 2a 20 00 4e 00 b4 00 1e 00 50 2a 20 4f 55 54 50 55 54 3a 20 41 32 20 49 53 20 44 45 53 54 52 4f 59 45 44 20 00 4e 00 be 00 06 00 50 2a 20 00 4e 00 e0 00 2e 00 50 54 49 4f 3a 44 4d   ┆ECB ADDRESS  N     P*  N     P* OUTPUT: A2 IS DESTROYED  N     P*  N   . PTIO:DM┆
0x20f8…2148              5c 45 51 55 5c 2a 5c 44 41 54 41 20 4d 41 4e 41 47 45 4d 45 4e 54 2c 20 49 4e 50 55 54 2f 4f 55 54 50 55 54 00 4e 00 ea 00 28 00 50 5c 45 4c 5c 41 32 2c 45 43 42 42 41 2c 41 39 5c 55 53 45 52 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 20   ┆ EQU * DATA MANAGEMENT, INPUT/OUTPUT N   ( P EL A2,ECBBA,A9 USER BUFFER ADDRESS ┆
0x2148…2198              00 4e 01 1c 00 14 00 50 5c 53 54 5c 41 32 2c 45 43 42 42 41 2c 41 38 20 00 4e 01 48 00 06 00 50 2a 20 00 4e 01 60 00 10 00 50 54 49 4f 43 57 32 5c 45 51 55 5c 2a 00 4e 01 6a 00 28 00 50 5c 45 4c 5c 41 32 2c 45 43 42 43 57 32 2c 41 39 5c 53   ┆ N     P ST A2,ECBBA,A8  N H   P*  N `   PTIOCW2 EQU * N j ( P EL A2,ECBCW2,A9 S┆
0x2198…219a (23, 0, 2)   05 58                                                                                                                                                                                                                                             ┆ X┆
0x219a…21ea (24, 0, 400) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 54 4d 4d 4c 4b 4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 31 31 2e 30 20 38 31 2d 30 31 2d 32 36 20 38 37 30 31 30 35 30 34 31 31 30 30 00 00 00 04 00 1e   ┆ J F         IDENT TMMLKM                   REL 11.0 81-01-26 870105041100      ┆
0x21ea…223a              00 1a 01 0c c4 54 43 48 50 41 47 4b c4 54 43 48 4d 4d 55 00 c4 54 4c 55 53 45 47 c4 00 00 00 52 00 10 00 0c 05 05 dc 54 43 48 50 41 47 4b 00 00 00 00 00 74 00 0e 00 0a 02 04 c2 54 54 42 3a 4d 54 de 00 00 00 88 00 0e 00 0a 02 04 c2 4c 4b 4d   ┆     TCHPAGK TCHMMU  TLUSEG    R       TCHPAGK     t       TTB:MT            LKM┆
0x223a…228a              51 44 49 d3 00 00 00 9a 00 10 00 0c 05 05 dc 54 43 48 4d 4d 55 00 00 14 00 00 00 ac 00 0e 00 0a 02 04 c2 46 4e 44 54 49 44 00 00 00 00 c0 00 2c 00 28 03 13 00 00 00 01 01 24 27 0f 97 1c 97 14 82 02 22 3f 3a 42 e2 5d 00 00 00 02 8f 20 00 00   ┆QDI            TCHMMU              FNDTID      , (       $'       "?:B ]        ┆
0x228a…22da              00 04 f7 a1 00 00 00 06 12 00 00 00 00 d2 00 10 00 0c 05 05 dc 54 4c 55 53 45 47 c4 00 26 00 00 01 02 00 0e 00 0a 02 04 c2 54 54 42 3a 53 50 e0 00 00 01 16 00 0e 00 0a 02 04 c2 53 45 47 3a 4e 53 ff 00 00 01 28 00 2c 00 28 03 13 00 00 00 1b   ┆                     TLUSEG  &           TTB:SP            SEG:NS    ( , (      ┆
0x22da…232a              24 42 50 00 b8 48 00 00 00 02 b8 55 00 00 00 02 5f 16 84 54 00 00 00 08 83 1c 55 00 eb 50 00 00 00 0a 00 00 01 3a 00 0e 00 0a 02 04 c2 4c 4b 4d 52 51 45 4c 00 00 01 6a 00 2c 00 28 03 13 00 00 00 33 20 00 55 00 8f 20 00 00 00 0c 3b 43 93 10   ┆$BP  H     U    _  T      U  P       :       LKMRQEL   j , (     3  U       ;C  ┆
0x232a…237a (25, 2, 122) e4 2c 24 08 5c 0e 84 20 02 00 80 82 54 00 ac 2d 5f 3e fc 10 00 00 01 7c 00 0e 00 0a 02 04 c2 52 45 4c 50 41 47 ff 00 01 00 1c 00 16 00 12 03 08 00 00 00 51 20 00 a4 2d f7 a1 00 00 00 0e 5f 48 00 01 00 2e 00 18 00 14 04 09 00 00 00 1b 50 18   ┆ ,$         T  -_>     |       RELPAG              Q   -      _H   .          P ┆
0x237a…23a4              00 2d 55 06 00 33 55 04 00 49 54 04 00 01 00 48 00 0e 00 0a 07 04 00 00 00 00 00 58 00 00 00 01 00 64 40 04 00 00 00 01 00 76                                                                                                                     ┆ -U  3U  IT    H           X     d@      v┆
0x23a4…23ac (26, 1, 8)   20 04 00 00 00 02 00 04                                                                                                                                                                                                                           ┆        ┆
0x23ac…23fc (27, 0, 400) 55 58 20 42 59 20 54 48 45 20 44 52 49 56 45 52 2e 20 00 52 01 7a 00 34 00 50 2a 20 54 48 45 20 43 4f 52 52 45 53 50 4f 4e 44 49 4e 47 20 4d 4f 44 55 4c 45 20 43 41 4c 4c 45 44 20 42 59 20 27 54 45 4e 44 49 4f 27 20 41 54 00 53 00 1a 00 2c   ┆UX BY THE DRIVER.  R z 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT S   ,┆
0x23fc…244c              00 50 2a 20 43 4f 4d 50 4c 45 54 49 4f 4e 20 4f 46 20 54 48 45 20 52 45 51 55 45 53 54 20 49 53 20 27 54 45 4e 4d 58 49 27 2e 00 53 00 52 00 4e 00 50 2a 20 4e 4f 54 49 43 45 20 54 48 41 54 20 4d 4f 44 55 4c 45 53 20 27 54 49 4f 4d 58 4f 27   ┆ P* COMPLETION OF THE REQUEST IS 'TENMXI'. S R N P* NOTICE THAT MODULES 'TIOMXO'┆
0x244c…249c              2c 20 27 54 49 4f 44 4b 49 27 20 41 4e 44 20 27 54 49 4f 44 4b 4f 27 20 41 52 45 20 45 51 55 41 4c 20 54 4f 20 54 49 4f 4d 58 49 2e 00 53 00 82 00 06 00 50 2a 20 00 53 00 d4 00 20 00 50 2a 20 49 4e 50 55 54 3a 20 20 41 35 20 3d 20 54 54 41   ┆, 'TIODKI' AND 'TIODKO' ARE EQUAL TO TIOMXI. S     P*  S     P* INPUT:  A5 = TTA┆
0x249c…24ec              42 20 41 44 44 52 45 53 53 20 00 53 00 de 00 22 00 50 2a 20 20 20 20 20 20 20 20 20 41 38 20 3d 20 44 57 54 20 45 43 42 20 41 44 44 52 45 53 53 00 53 01 02 00 1c 00 50 2a 5c 20 41 39 20 3d 20 55 53 45 52 20 45 43 42 20 41 44 44 52 45 53 53   ┆B ADDRESS  S   " P*         A8 = DWT ECB ADDRESS S     P*  A9 = USER ECB ADDRESS┆
0x24ec…253c              00 53 01 28 00 06 00 50 2a 20 00 53 01 48 00 22 00 50 2a 20 4f 55 54 50 55 54 3a 20 41 31 2d 41 32 20 41 52 45 20 44 45 53 54 52 4f 59 45 44 20 00 53 01 52 00 42 00 50 2a 20 20 20 20 20 20 20 20 20 31 38 20 42 49 54 20 55 53 45 52 20 42 55   ┆ S (   P*  S H " P* OUTPUT: A1-A2 ARE DESTROYED  S R B P*         18 BIT USER BU┆
0x253c…258c (28, 0, 400) 46 46 45 52 20 41 44 44 52 45 53 53 20 49 53 20 54 52 41 4e 53 46 45 52 52 45 44 20 54 4f 20 44 57 54 20 45 43 42 00 53 01 78 00 06 00 50 2a 20 00 54 00 2e 00 1c 00 50 54 49 4f 4d 58 49 5c 45 51 55 5c 2a 5c 4d 55 58 2c 20 49 4e 50 55 54 20   ┆FFER ADDRESS IS TRANSFERRED TO DWT ECB S x   P*  T .   PTIOMXI EQU * MUX, INPUT ┆
0x258c…25dc              00 54 00 38 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 54 00 58 00 32 00 50 5c 45 4c 5c 41 32 2c 45 43 42 42 41 2c 41 39 5c 55 53 45 52 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 20 28 4c 4f 47 49 43 41 4c 29 20 00 54 00 6a 00 22 00 50   ┆ T 8   P LDK A1,0  T X 2 P EL A2,ECBBA,A9 USER BUFFER ADDRESS (LOGICAL)  T j " P┆
0x25dc…262c              5c 44 4c 4c 5c 34 5c 34 20 4c 45 46 54 4d 4f 53 54 20 42 49 54 53 20 49 4e 54 4f 20 41 31 00 54 00 a0 00 1c 00 50 5c 41 44 52 5c 41 31 2c 41 31 5c 44 4f 55 42 4c 45 20 49 4e 44 45 58 20 00 54 00 c6 00 0e 00 50 5c 41 44 52 5c 41 31 2c 41 35   ┆ DLL 4 4 LEFTMOST BITS INTO A1 T     P ADR A1,A1 DOUBLE INDEX  T     P ADR A1,A5┆
0x262c…267c              00 54 00 e6 00 22 00 50 5c 4c 43 5c 41 31 2c 54 54 42 3a 4d 54 2c 41 31 5c 50 41 47 45 20 41 44 44 52 45 53 53 20 00 54 00 f8 00 10 00 50 5c 41 4e 4b 5c 41 31 2c 2f 46 43 20 00 54 01 1e 00 0e 00 50 5c 53 52 4c 5c 41 31 2c 32 20 00 54 01 32   ┆ T   " P LC A1,TTB:MT,A1 PAGE ADDRESS  T     P ANK A1,/FC  T     P SRL A1,2  T 2┆
0x267c…26cc              00 0a 00 50 5c 44 52 4c 5c 34 00 54 01 44 00 0e 00 50 5c 53 4c 4c 5c 41 31 2c 34 20 00 54 01 52 00 30 00 50 5c 53 43 52 5c 41 31 2c 41 38 5c 53 45 54 20 42 49 54 53 20 20 30 2d 31 20 49 4e 20 44 57 54 20 45 43 42 20 31 53 54 20 57 4f 52 44   ┆   P DRL 4 T D   P SLL A1,4  T R 0 P SCR A1,A8 SET BITS  0-1 IN DWT ECB 1ST WORD┆

Reduced view