|
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: 4606 (0x11fe)
Notes: pts_type(SC)
Names: »TABORT.SC«
└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
└─⟦this⟧ »TOSSWORK/TABORT.SC«
└─⟦726a6c4ca⟧ Bits:30009685 Philips computer tape "600309"
└─⟦this⟧ »M:PTB/TABORT.SC«
└─⟦this⟧ »M:PTD/TABORT.SC«
└─⟦781e933ac⟧ Bits:30009686 Philips computer tape "600310"
└─⟦this⟧ »M:92T1/TABORT.SC«
└─⟦7e2393f80⟧ Bits:30009710 Philips computer tape "M_KONV"
└─⟦this⟧ »M:KONV/TABORT.SC«
IDENT TABORT REL 9.2 79-11-16 870105040920 * * ************************************************* * * PHILIPS TERMINAL SYSTEM PTS * * TABORT = ABORT I/O REQUEST * * * * * * ************************************************* * * * THIS MODULE CONTAINS THE * ABORT I/O REQUEST LKM PROCESSOR. * * EJECT TABORT * * *********** * ENTRIES * *********** * * ENTRY TABORT * * ************* * EXTERNALS * ************* * * EXTRN FNDDWT FIND DWT ADDRESS EXTRN DWTST DWT STATUS EXTRN DWTADR DRIVER ADDRESS BLOCK EXTRN DWTTAB TTAB ADDRESS IN DWT EXTRN DWTWAT WAIT ACTIVATE INDICATOR IN DWT EXTRN DWTECH ECHO DEVICE DWT EXTRN ABTADR ABORT ROUTINE ADDRESS EXTRN TENDIO END I/O EXTRN LKMQDI QUEUE JOB AND DISPATCH EXTRN LKMRQE LKM REQUEST ERROR EXTRN FREBLK FREE ONE BLOCK EJECT TABORT * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 0 * EJECT TABORT * * ********** * TABORT * ********** * * * THIS IS THE ABORT I/O REQUEST LKM PROCESSOR. * * IT IS ENTERED FROM THE LKM HANDLER * WITH THE FOLLOWING PARAMETERS: * * A5 = TTAB ADDRESS * A8 = ECB ADDRESS * * A PENDING I/O REQUEST IS ABORTED. * THE ABORT REQUEST MUST BE ISSUED FROM THE SAME TASK * THAT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN * NOT BE ABORTED. * * TABORT EQU * IFT MMUPAG=0 LDR* A3,A8 GET FIRST WORD OF ECB XIF * IFT MMUPAG=1 ELR A3,A8 GET FIRST WORD OF ECB XIF * RF(N) TABOER REQUEST ALREADY COMPLETED? CF A15,FNDDWT LOOK FOR DWT ADDRESS LDR A8,A6 RF(Z) TABOER DWT UNKNOWN? * EJECT TABORT * * CW A5,DWTTAB,A6 RF(NE) TABOER ILLEGAL TASK? LD A7,DWTST,A6 RF(N) TABOER DEVICE NOT BUSY? SLC A7,2 RF(NN) TABO20 NOT ECHO REQUEST? * * ABORT ECHO DEVICE * LD A6,DWTECH,A6 GET ECHO DWT LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) RF(Z) TABO10 NO SPECIAL ABORT ROUTINE? CFR A15,A2 PERFORM ABORT ROUTINE * TABO10 EQU * CF A15,TENDIO ABORT ECHO DEVICE LDR A6,A8 RESTORE DWT * EJECT TABORT * * TABO20 EQU * LD A4,DWTWAT,A6 RF(Z) TABO30 I/O WITH NO WAIT? CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK CM DWTWAT,A6 INDICATE NO WAIT * TABO30 EQU * LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) RF(Z) TABO40 NO SPECIAL ABORT ROUTINE? CFR A15,A2 PERFORM ABORT ROUTINE * TABO40 EQU * LDKL A1,/C000 RETURN CODE CF A15,TENDIO ABORT ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER * TABOER ABL LKMRQE GO AND INDICATE LKM ERROR * * * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT TABORT REL 9.2 79-11-16 870105040920 «, 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…00ee Head {h00=0x0022, h01=0x0050, text=»* TABORT = ABORT I/O REQUEST«, t00=0x0000, t01=0x00cc}
0x00ee…00f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f2}
0x00f8…0102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…010c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…012a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0124}
0x012a…0164 Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x012e}
0x0164…016e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0168}
0x016e…0178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0172}
0x0178…019c Head {h00=0x0020, h01=0x0050, text=»* THIS MODULE CONTAINS THE«, t00=0x0000, t01=0x017c}
0x019c…01c8 Head {h00=0x0028, h01=0x0050, text=»* ABORT I/O REQUEST LKM PROCESSOR.«, t00=0x0001, t01=0x0010}
0x01c8…01d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003c}
0x01d2…01dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0046}
0x01dc…01f4 Head {h00=0x0014, h01=0x0050, text=» EJECT TABORT «, t00=0x0001, t01=0x0050}
0x01f4…01fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0068}
0x01fe…0208 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0072}
0x0208…021c Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x007c}
0x021c…0230 Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x0090}
0x0230…0244 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x00a4}
0x0244…024e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b8}
0x024e…0258 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c2}
0x0258…026e Head {h00=0x0012, h01=0x0050, text=» ENTRY TABORT «, t00=0x0001, t01=0x00cc}
0x026e…0276 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x00e2}
0x0276…027e Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x00ea}
0x027e…0286 Head {h00=0x0004, h01=0x0050, t00=0x0001, t01=0x00f2}
0x0286…0290 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fa}
0x0290…029a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0104}
0x029a…02b0 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0001, t01=0x010e}
0x02b0…02c6 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0001, t01=0x0124}
0x02c6…02dc Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0001, t01=0x013a}
0x02dc…02e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0150}
0x02e6…02f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x015a}
0x02f0…0316 Head {h00=0x0022, h01=0x0050, text=» EXTRN FNDDWT FIND DWT ADDRESS«, t00=0x0001, t01=0x0164}
0x0316…0336 Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0001, t01=0x018a}
0x0336…0360 Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK«, t00=0x0002, t01=0x001a}
0x0360…038a Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTTAB TTAB ADDRESS IN DWT «, t00=0x0002, t01=0x0044}
0x038a…03be Head {h00=0x0030, h01=0x0050, text=» EXTRN DWTWAT WAIT ACTIVATE INDICATOR IN DWT«, t00=0x0002, t01=0x006e}
0x03be…03e4 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTECH ECHO DEVICE DWT «, t00=0x0002, t01=0x00a2}
0x03e4…0410 Head {h00=0x0028, h01=0x0050, text=» EXTRN ABTADR ABORT ROUTINE ADDRESS «, t00=0x0002, t01=0x00c8}
0x0410…042e Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0002, t01=0x00f4}
0x042e…045a Head {h00=0x0028, h01=0x0050, text=» EXTRN LKMQDI QUEUE JOB AND DISPATCH«, t00=0x0002, t01=0x0112}
0x045a…0482 Head {h00=0x0024, h01=0x0050, text=» EXTRN LKMRQE LKM REQUEST ERROR «, t00=0x0002, t01=0x013e}
0x0482…04a6 Head {h00=0x0020, h01=0x0050, text=» EXTRN FREBLK FREE ONE BLOCK«, t00=0x0002, t01=0x0166}
0x04a6…04be Head {h00=0x0014, h01=0x0050, text=» EJECT TABORT «, t00=0x0002, t01=0x018a}
0x04be…04c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0012}
0x04c8…04d2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x001c}
0x04d2…0504 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0003, t01=0x0026}
0x0504…050e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0058}
0x050e…052c Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0003, t01=0x0062}
0x052c…0536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0080}
0x0536…0568 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0003, t01=0x008a}
0x0568…0572 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0572…05a4 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0003, t01=0x00c6}
0x05a4…05d2 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0003, t01=0x00f8}
0x05d2…05dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0126}
0x05dc…05f0 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0003, t01=0x0130}
0x05f0…05fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0144}
0x05fa…0612 Head {h00=0x0014, h01=0x0050, text=» EJECT TABORT «, t00=0x0003, t01=0x014e}
0x0612…061c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0166}
0x061c…0626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0170}
0x0626…0638 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0003, t01=0x017a}
0x0638…064a Head {h00=0x000e, h01=0x0050, text=»* TABORT *«, t00=0x0003, t01=0x018c}
0x064a…065c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0004, t01=0x000e}
0x065c…0666 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0020}
0x0666…0670 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x002a}
0x0670…06a8 Head {h00=0x0034, h01=0x0050, text=»* THIS IS THE ABORT I/O REQUEST LKM PROCESSOR.«, t00=0x0004, t01=0x0034}
0x06a8…06b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006c}
0x06b2…06e0 Head {h00=0x002a, h01=0x0050, text=»* IT IS ENTERED FROM THE LKM HANDLER«, t00=0x0004, t01=0x0076}
0x06e0…070a Head {h00=0x0026, h01=0x0050, text=»* WITH THE FOLLOWING PARAMETERS:«, t00=0x0004, t01=0x00a4}
0x070a…0714 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ce}
0x0714…0732 Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0004, t01=0x00d8}
0x0732…074e Head {h00=0x0018, h01=0x0050, text=»* A8 = ECB ADDRESS«, t00=0x0004, t01=0x00f6}
0x074e…0758 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0112}
0x0758…0786 Head {h00=0x002a, h01=0x0050, text=»* A PENDING I/O REQUEST IS ABORTED. «, t00=0x0004, t01=0x011c}
0x0786…07c6 Head {h00=0x003c, h01=0x0050, text=»* THE ABORT REQUEST MUST BE ISSUED FROM THE SAME TASK «, t00=0x0004, t01=0x014a}
0x07c6…0804 Head {h00=0x003a, h01=0x0050, text=»* THAT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN «, t00=0x0004, t01=0x018a}
0x0804…0820 Head {h00=0x0018, h01=0x0050, text=»* NOT BE ABORTED. «, t00=0x0005, t01=0x0038}
0x0820…082a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0054}
0x082a…0834 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x005e}
0x0834…0848 Head {h00=0x0010, h01=0x0050, text=»TABORT EQU *«, t00=0x0005, t01=0x0068}
0x0848…085e Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0005, t01=0x007c}
0x085e…0888 Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A8 GET FIRST WORD OF ECB «, t00=0x0005, t01=0x0092}
0x0888…0894 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0005, t01=0x00bc}
0x0894…089e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c8}
0x089e…08b4 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0005, t01=0x00d2}
0x08b4…08dc Head {h00=0x0024, h01=0x0050, text=» ELR A3,A8 GET FIRST WORD OF ECB«, t00=0x0005, t01=0x00e8}
0x08dc…08e8 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0005, t01=0x0110}
0x08e8…08f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x011c}
0x08f2…0922 Head {h00=0x002c, h01=0x0050, text=» RF(N) TABOER REQUEST ALREADY COMPLETED?«, t00=0x0005, t01=0x0126}
0x0922…094e Head {h00=0x0028, h01=0x0050, text=» CF A15,FNDDWT LOOK FOR DWT ADDRESS «, t00=0x0005, t01=0x0156}
0x094e…0960 Head {h00=0x000e, h01=0x0050, text=» LDR A8,A6«, t00=0x0005, t01=0x0182}
0x0960…0982 (6, 0, 400) Head {h00=0x001e, h01=0x0050, text=» RF(Z) TABOER DWT UNKNOWN?«, t00=0x0006, t01=0x0004}
0x0982…098c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0026}
0x098c…09a4 Head {h00=0x0014, h01=0x0050, text=» EJECT TABORT «, t00=0x0006, t01=0x0030}
0x09a4…09ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0048}
0x09ae…09b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0052}
0x09b8…09d0 Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x0006, t01=0x005c}
0x09d0…09f4 Head {h00=0x0020, h01=0x0050, text=» RF(NE) TABOER ILLEGAL TASK?«, t00=0x0006, t01=0x0074}
0x09f4…0a0c Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTST,A6 «, t00=0x0006, t01=0x0098}
0x0a0c…0a32 Head {h00=0x0022, h01=0x0050, text=» RF(N) TABOER DEVICE NOT BUSY?«, t00=0x0006, t01=0x00b0}
0x0a32…0a44 Head {h00=0x000e, h01=0x0050, text=» SLC A7,2 «, t00=0x0006, t01=0x00d6}
0x0a44…0a6c Head {h00=0x0024, h01=0x0050, text=» RF(NN) TABO20 NOT ECHO REQUEST?«, t00=0x0006, t01=0x00e8}
0x0a6c…0a76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0110}
0x0a76…0a92 Head {h00=0x0018, h01=0x0050, text=»* ABORT ECHO DEVICE «, t00=0x0006, t01=0x011a}
0x0a92…0a9c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0136}
0x0a9c…0ac2 Head {h00=0x0022, h01=0x0050, text=» LD A6,DWTECH,A6 GET ECHO DWT «, t00=0x0006, t01=0x0140}
0x0ac2…0afe Head {h00=0x0038, h01=0x0050, text=» LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x0006, t01=0x0166}
0x0afe…0b3a Head {h00=0x0038, h01=0x0050, text=» LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) «, t00=0x0007, t01=0x0012}
0x0b3a…0b6a Head {h00=0x002c, h01=0x0050, text=» RF(Z) TABO10 NO SPECIAL ABORT ROUTINE? «, t00=0x0007, t01=0x004e}
0x0b6a…0b94 Head {h00=0x0026, h01=0x0050, text=» CFR A15,A2 PERFORM ABORT ROUTINE «, t00=0x0007, t01=0x007e}
0x0b94…0b9e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a8}
0x0b9e…0bb2 Head {h00=0x0010, h01=0x0050, text=»TABO10 EQU *«, t00=0x0007, t01=0x00b2}
0x0bb2…0bda Head {h00=0x0024, h01=0x0050, text=» CF A15,TENDIO ABORT ECHO DEVICE«, t00=0x0007, t01=0x00c6}
0x0bda…0bf8 Head {h00=0x001a, h01=0x0050, text=» LDR A6,A8 RESTORE DWT«, t00=0x0007, t01=0x00ee}
0x0bf8…0c02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x010c}
0x0c02…0c1a Head {h00=0x0014, h01=0x0050, text=» EJECT TABORT «, t00=0x0007, t01=0x0116}
0x0c1a…0c24 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012e}
0x0c24…0c2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0138}
0x0c2e…0c42 Head {h00=0x0010, h01=0x0050, text=»TABO20 EQU *«, t00=0x0007, t01=0x0142}
0x0c42…0c5a Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTWAT,A6«, t00=0x0007, t01=0x0156}
0x0c5a…0c82 Head {h00=0x0024, h01=0x0050, text=» RF(Z) TABO30 I/O WITH NO WAIT? «, t00=0x0007, t01=0x016e}
0x0c82…0cc0 Head {h00=0x003a, h01=0x0050, text=» CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK«, t00=0x0008, t01=0x0008}
0x0cc0…0ce6 Head {h00=0x0022, h01=0x0050, text=» CM DWTWAT,A6 INDICATE NO WAIT«, t00=0x0008, t01=0x0046}
0x0ce6…0cf0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x006c}
0x0cf0…0d04 Head {h00=0x0010, h01=0x0050, text=»TABO30 EQU *«, t00=0x0008, t01=0x0076}
0x0d04…0d40 Head {h00=0x0038, h01=0x0050, text=» LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK«, t00=0x0008, t01=0x008a}
0x0d40…0d7c Head {h00=0x0038, h01=0x0050, text=» LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) «, t00=0x0008, t01=0x00c6}
0x0d7c…0dac Head {h00=0x002c, h01=0x0050, text=» RF(Z) TABO40 NO SPECIAL ABORT ROUTINE? «, t00=0x0008, t01=0x0102}
0x0dac…0dd6 Head {h00=0x0026, h01=0x0050, text=» CFR A15,A2 PERFORM ABORT ROUTINE «, t00=0x0008, t01=0x0132}
0x0dd6…0de0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015c}
0x0de0…0df4 Head {h00=0x0010, h01=0x0050, text=»TABO40 EQU *«, t00=0x0008, t01=0x0166}
0x0df4…0e16 Head {h00=0x001e, h01=0x0050, text=» LDKL A1,/C000 RETURN CODE«, t00=0x0008, t01=0x017a}
0x0e16…0e32 Head {h00=0x0018, h01=0x0050, text=» CF A15,TENDIO ABORT«, t00=0x0009, t01=0x000c}
0x0e32…0e66 Head {h00=0x0030, h01=0x0050, text=» ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER «, t00=0x0009, t01=0x0028}
0x0e66…0e70 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x005c}
0x0e70…0ea4 Head {h00=0x0030, h01=0x0050, text=»TABOER ABL LKMRQE GO AND INDICATE LKM ERROR «, t00=0x0009, t01=0x0066}
0x0ea4…0eae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x009a}
0x0eae…0eb8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a4}
0x0eb8…0ec2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ae}
0x0ec2…0ece Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0009, t01=0x00b8}
0x0ece…0ed2 Head {h00=0x4004, h01=0x0000}
0x0ed2…0ed6 00 09 00 c4 ┆ ┆
0x0ed6…0ede (10, 1, 8) 20 04 00 00 00 0a 00 04 ┆ ┆
0x0ede…0f2e (11, 0, 400) 5c 45 4a 45 43 54 5c 5c 5c 54 50 52 4f 43 00 0a 01 90 00 06 00 50 2a 20 00 0b 00 16 00 06 00 50 2a 20 00 0b 00 20 00 0e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 0b 00 2a 00 0e 00 50 2a 20 54 50 41 55 53 45 20 2a 00 0b 00 3c 00 0e 00 50 2a 2a ┆ EJECT TPROC P* P* P********** * P* TPAUSE * < P**┆
0x0f2e…0f7e 2a 2a 2a 2a 2a 2a 2a 2a 00 0b 00 4e 00 06 00 50 2a 20 00 0b 00 60 00 06 00 50 2a 20 00 0b 00 6a 00 28 00 50 2a 20 20 20 54 48 49 53 20 49 53 20 54 48 45 20 50 41 55 53 45 20 4c 4b 4d 20 50 52 4f 43 45 53 53 4f 52 2e 00 0b 00 74 00 06 00 50 ┆******** N P* ` P* j ( P* THIS IS THE PAUSE LKM PROCESSOR. t P┆
0x0f7e…0fce 2a 20 00 0b 00 a0 00 3a 00 50 2a 20 20 20 54 48 49 53 20 4d 4f 44 55 4c 45 20 49 53 20 45 4e 54 45 52 45 44 20 46 52 4f 4d 20 54 48 45 20 4c 4b 4d 20 48 41 4e 44 4c 45 52 20 57 48 45 4e 20 41 00 0b 00 aa 00 3a 00 50 2a 20 20 20 54 41 53 4b ┆* : P* THIS MODULE IS ENTERED FROM THE LKM HANDLER WHEN A : P* TASK┆
0x0fce…101e 20 57 41 4e 54 53 20 54 4f 20 28 54 45 4d 50 4f 52 41 52 49 4c 59 29 20 48 41 4c 54 20 49 54 27 53 20 50 52 4f 43 45 53 53 49 4e 47 2e 20 00 0b 00 e8 00 06 00 50 2a 20 00 0b 01 26 00 06 00 50 2a 20 00 0b 01 30 00 26 00 50 54 50 41 55 53 45 ┆ WANTS TO (TEMPORARILY) HALT IT'S PROCESSING. P* & P* 0 & PTPAUSE┆
0x101e…106e 5c 45 51 55 5c 54 3a 44 49 53 50 5c 47 4f 20 54 4f 20 44 49 53 50 41 54 43 48 45 52 00 0b 01 3a 00 06 00 50 2a 20 00 0b 01 64 00 12 00 50 5c 45 4a 45 43 54 5c 5c 5c 54 50 52 4f 43 00 0b 01 6e 00 06 00 50 2a 20 00 0b 01 84 00 06 00 50 2a 20 ┆ EQU T:DISP GO TO DISPATCHER : P* d P EJECT TPROC n P* P* ┆
0x106e…10be (12, 0, 400) 00 0b 01 8e 00 0e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 0c 00 08 00 0e 00 50 2a 20 54 4d 57 41 49 54 20 2a 00 0c 00 1a 00 0e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 0c 00 2c 00 06 00 50 2a 20 00 0c 00 3e 00 06 00 50 2a 20 00 0c 00 48 00 30 ┆ P********** P* TMWAIT * P********** , P* > P* H 0┆
0x10be…110e 00 50 2a 20 20 20 54 48 49 53 20 49 53 20 54 48 45 20 4d 55 4c 54 49 50 4c 45 20 57 41 49 54 20 4c 4b 4d 20 50 52 4f 43 45 53 53 4f 52 2e 00 0c 00 52 00 06 00 50 2a 20 00 0c 00 86 00 2a 00 50 2a 20 20 20 49 54 20 49 53 20 45 4e 54 45 52 45 ┆ P* THIS IS THE MULTIPLE WAIT LKM PROCESSOR. R P* * P* IT IS ENTERE┆
0x110e…115e 44 20 46 52 4f 4d 20 54 48 45 20 4c 4b 4d 20 48 41 4e 44 4c 45 52 00 0c 00 90 00 26 00 50 2a 20 20 20 57 49 54 48 20 54 48 45 20 46 4f 4c 4c 4f 57 49 4e 47 20 50 41 52 41 4d 45 54 45 52 53 3a 00 0c 00 be 00 06 00 50 2a 20 00 0c 00 e8 00 1a ┆D FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: P* ┆
0x115e…11ae 00 50 2a 20 20 20 41 35 20 3d 20 54 54 41 42 20 41 44 44 52 45 53 53 20 00 0c 00 f2 00 1c 00 50 2a 20 20 20 41 37 20 3d 20 45 43 42 42 4c 4b 20 41 44 44 52 45 53 53 20 00 0c 01 10 00 06 00 50 2a 20 00 0c 01 30 00 36 00 50 2a 20 20 20 57 48 ┆ P* A5 = TTAB ADDRESS P* A7 = ECBBLK ADDRESS P* 0 6 P* WH┆
0x11ae…11fe 45 4e 20 4f 4e 45 20 4f 46 20 54 48 45 20 53 50 45 43 49 46 49 45 44 20 45 56 45 4e 54 53 20 49 53 20 43 4f 4d 50 4c 45 54 45 44 2c 00 0c 01 3a 00 36 00 50 2a 20 20 20 52 45 54 55 52 4e 20 49 53 20 4d 41 44 45 20 54 4f 20 54 48 45 20 43 41 ┆EN ONE OF THE SPECIFIED EVENTS IS COMPLETED, : 6 P* RETURN IS MADE TO THE CA┆