|
DataMuseum.dkPresents historical artifacts from the history of: Bogika Butler |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Bogika Butler Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: 5 C E I K L P T
Length: 819200 (0xc8000)
Description: Bits:30009789/_.ft.Ibm2.50007359.imd Mogens Pelles Zilog 80,000 / EOS projekt
Types: 5¼" Floppy Disk, CpmFSButler1a, ImdContainer
Notes: CP/M-fs(512_2048_0x0_*3+1+3+2_2:0_159:1_96)
Media: [0, 0, 1] … [159, 1, 10] {512: 1600}
Signature: 512_2048_0x0_*3+1+3+2_2:0_159:1_96
Confidence score: +54/-0
Sector size: 512
Block size: 2048
Directory entries: 96
Block number size: 16
Extent-mask: 0x00
Sector-interleave: 1, 4, 7, 10, 3, 6, 9, 2, 5, 8
Tracks: (2, 0), (3, 1), (4, 0), (5, 1), (6, 0), (7, 1) […] (154, 0), (155, 1), (156, 0), (157, 1), (158, 0), (159, 1)
| user | bc | length | name | artifact |
|---|---|---|---|---|
| 0 | 0 | 16896 | COMDEF.BAK | ⟦39214a891⟧ TextFile |
| 0 | 0 | 16896 | COMDEF.PAS | ⟦22f968f00⟧ TextFile |
| 0 | 0 | 32640 | COMDEF.S | ⟦d50a62df8⟧ TextFile |
| 0 | 0 | 15360 | COMDEF2.BAK | ⟦a214d60ab⟧ TextFile |
| 0 | 0 | 15360 | COMDEF2.PAS | ⟦e3cc477c3⟧ TextFile |
| 0 | 0 | 1408 | COPYRGHT.PAS | ⟦cf396b876⟧ TextFile |
| 0 | 0 | 13184 | ENTER.S | ⟦b9bbaf7a5⟧ TextFile |
| 0 | 0 | 21760 | IMMUPROC.BAK | ⟦ba83664d5⟧ TextFile |
| 0 | 0 | 20224 | IMMUPROC.PAS | ⟦75e9ae17b⟧ TextFile |
| 0 | 0 | 2560 | IPREFACE.PAS | ⟦416572908⟧ TextFile |
| 0 | 0 | 2944 | KERNEL.BAK | ⟦136707e83⟧ TextFile |
| 0 | 0 | 52352 | KERNEL.LOG | ⟦6d0b8123e⟧ TextFile |
| 0 | 0 | 4480 | KERNEL.PAS | ⟦28bda6790⟧ TextFile |
| 0 | 0 | 114816 | KERNEL.PRN | ⟦8ca895bba⟧ TextFile |
| 0 | 0 | 17920 | KNELVAR.BAK | ⟦55141ecd5⟧ TextFile |
| 0 | 0 | 21632 | KNELVAR.PAS | ⟦b1dc8e7f7⟧ TextFile |
| 0 | 0 | 1920 | LOG.BAK | ⟦572303afb⟧ TextFile |
| 0 | 0 | 1920 | LOG.TXT | ⟦3937deb94⟧ TextFile |
| 0 | 0 | 16256 | PREFACE.S | ⟦e94e751f7⟧ TextFile |
| 0 | 0 | 1664 | PRGNOTES.BAK | ⟦a87d32d6a⟧ TextFile |
| 0 | 0 | 1664 | PRGNOTES.TXT | ⟦48abf46e3⟧ TextFile |
0x00000…00200 (0, 0, 1) 0xe5[0x200]
[…0x13…]
0x02800…02820 (2, 0, 1) [0, 'COMDEF.PAS', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [2, 0, 33, 0, 34, 0, 35, 0, 37, 0, 38, 0, 41, 0, 42, 0]]
0x02820…02840 [0, 'COMDEF.S', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [3, 0, 4, 0, 5, 0, 6, 0, 7, 0, 8, 0, 9, 0, 10, 0]]
0x02840…02860 [0, 'COMDEF.S', 1, 127, 'xl=01', 'bc=00', 'xh=00', 'rc=7f', '0-0-0-0-0-0-0-0-0-0-0', [11, 0, 12, 0, 13, 0, 14, 0, 15, 0, 16, 0, 17, 0, 18, 0]]
0x02860…02880 [0, 'COPYRGHT.PAS', 0, 11, 'xl=00', 'bc=00', 'xh=00', 'rc=0b', '0-0-0-0-0-0-0-0-0-0-0', [19, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02880…028a0 [0, 'COMDEF.BAK', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [20, 0, 21, 0, 22, 0, 36, 0, 39, 0, 40, 0, 47, 0, 48, 0]]
0x028a0…028c0 [0, 'KERNEL.BAK', 0, 23, 'xl=00', 'bc=00', 'xh=00', 'rc=17', '0-0-0-0-0-0-0-0-0-0-0', [23, 0, 24, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x028c0…028e0 [0, 'KERNEL.PAS', 0, 35, 'xl=00', 'bc=00', 'xh=00', 'rc=23', '0-0-0-0-0-0-0-0-0-0-0', [25, 0, 26, 0, 138, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x028e0…02900 [0, 'PRGNOTES.BAK', 0, 13, 'xl=00', 'bc=00', 'xh=00', 'rc=0d', '0-0-0-0-0-0-0-0-0-0-0', [31, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02900…02920 [0, 'COMDEF.PAS', 1, 4, 'xl=01', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [43, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02920…02940 [0, 'COMDEF.BAK', 1, 4, 'xl=01', 'bc=00', 'xh=00', 'rc=04', '0-0-0-0-0-0-0-0-0-0-0', [49, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02940…02960 [0, 'COMDEF2.PAS', 0, 120, 'xl=00', 'bc=00', 'xh=00', 'rc=78', '0-0-0-0-0-0-0-0-0-0-0', [54, 0, 55, 0, 56, 0, 57, 0, 58, 0, 65, 0, 68, 0, 69, 0]]
0x02960…02980 [0, 'COMDEF2.BAK', 0, 120, 'xl=00', 'bc=00', 'xh=00', 'rc=78', '0-0-0-0-0-0-0-0-0-0-0', [59, 0, 60, 0, 61, 0, 62, 0, 63, 0, 64, 0, 66, 0, 67, 0]]
0x02980…029a0 [0, 'KNELVAR.BAK', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [28, 0, 29, 0, 30, 0, 32, 0, 45, 0, 46, 0, 50, 0, 51, 0]]
0x029a0…029c0 [0, 'LOG.BAK', 0, 15, 'xl=00', 'bc=00', 'xh=00', 'rc=0f', '0-0-0-0-0-0-0-0-0-0-0', [27, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x029c0…029e0 [0, 'LOG.TXT', 0, 15, 'xl=00', 'bc=00', 'xh=00', 'rc=0f', '0-0-0-0-0-0-0-0-0-0-0', [44, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x029e0…02a00 [0, 'KNELVAR.BAK', 1, 12, 'xl=01', 'bc=00', 'xh=00', 'rc=0c', '0-0-0-0-0-0-0-0-0-0-0', [52, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02a00…02c00 (2, 0, 2) 0xe5[0x200]
0x02c00…02c20 (2, 0, 3) Dirent {Status=0xe5}
[…0xf…]
0x02e00…02e20 (2, 0, 4) [0, 'PRGNOTES.TXT', 0, 13, 'xl=00', 'bc=00', 'xh=00', 'rc=0d', '0-0-0-0-0-0-0-0-0-0-0', [77, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02e20…02e40 [0, 'KERNEL.LOG', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [90, 0, 141, 0, 173, 0, 174, 0, 175, 0, 176, 0, 177, 0, 178, 0]]
0x02e40…02e60 [0, 'KERNEL.PRN', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [72, 0, 78, 0, 79, 0, 80, 0, 81, 0, 82, 0, 83, 0, 84, 0]]
0x02e60…02e80 [0, 'KERNEL.PRN', 1, 128, 'xl=01', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [85, 0, 86, 0, 87, 0, 88, 0, 89, 0, 91, 0, 92, 0, 93, 0]]
0x02e80…02ea0 [0, 'KERNEL.PRN', 2, 128, 'xl=02', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [94, 0, 95, 0, 96, 0, 97, 0, 98, 0, 99, 0, 100, 0, 101, 0]]
0x02ea0…02ec0 [0, 'PREFACE.S', 0, 127, 'xl=00', 'bc=00', 'xh=00', 'rc=7f', '0-0-0-0-0-0-0-0-0-0-0', [149, 0, 150, 0, 151, 0, 152, 0, 153, 0, 154, 0, 155, 0, 156, 0]]
0x02ec0…02ee0 [0, 'KERNEL.PRN', 3, 128, 'xl=03', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [102, 0, 103, 0, 104, 0, 105, 0, 106, 0, 107, 0, 108, 0, 109, 0]]
0x02ee0…02f00 [0, 'KERNEL.PRN', 4, 128, 'xl=04', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [110, 0, 111, 0, 112, 0, 113, 0, 114, 0, 115, 0, 116, 0, 117, 0]]
0x02f00…02f20 [0, 'KERNEL.PRN', 5, 128, 'xl=05', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [118, 0, 119, 0, 120, 0, 121, 0, 122, 0, 139, 0, 142, 0, 143, 0]]
0x02f20…02f40 [0, 'KNELVAR.PAS', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [53, 0, 70, 0, 71, 0, 73, 0, 74, 0, 75, 0, 76, 0, 123, 0]]
0x02f40…02f60 [0, 'KNELVAR.PAS', 1, 41, 'xl=01', 'bc=00', 'xh=00', 'rc=29', '0-0-0-0-0-0-0-0-0-0-0', [124, 0, 125, 0, 126, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02f60…02f80 Dirent {Status=0xe5}
0x02f80…02fa0 [0, 'IPREFACE.PAS', 0, 20, 'xl=00', 'bc=00', 'xh=00', 'rc=14', '0-0-0-0-0-0-0-0-0-0-0', [145, 0, 146, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02fa0…02fc0 [0, 'IMMUPROC.BAK', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [140, 0, 147, 0, 148, 0, 157, 0, 158, 0, 159, 0, 160, 0, 161, 0]]
0x02fc0…02fe0 [0, 'IMMUPROC.BAK', 1, 42, 'xl=01', 'bc=00', 'xh=00', 'rc=2a', '0-0-0-0-0-0-0-0-0-0-0', [162, 0, 163, 0, 164, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x02fe0…03000 [0, 'IMMUPROC.PAS', 0, 128, 'xl=00', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [128, 0, 129, 0, 130, 0, 131, 0, 132, 0, 133, 0, 134, 0, 135, 0]]
0x03000…03200 (2, 0, 5) DataBlock {»COMDEF.PAS«}
0x03200…03220 (2, 0, 6) Dirent {Status=0xe5}
[…0xf…]
0x03400…03420 (2, 0, 7) [0, 'IMMUPROC.PAS', 1, 30, 'xl=01', 'bc=00', 'xh=00', 'rc=1e', '0-0-0-0-0-0-0-0-0-0-0', [136, 0, 137, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x03420…03440 [0, 'KERNEL.PRN', 6, 128, 'xl=06', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [144, 0, 165, 0, 166, 0, 167, 0, 168, 0, 169, 0, 170, 0, 171, 0]]
0x03440…03460 [0, 'KERNEL.PRN', 7, 1, 'xl=07', 'bc=00', 'xh=00', 'rc=01', '0-0-0-0-0-0-0-0-0-0-0', [172, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x03460…03480 [0, 'KERNEL.LOG', 1, 128, 'xl=01', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [179, 0, 180, 0, 181, 0, 182, 0, 183, 0, 184, 0, 185, 0, 186, 0]]
0x03480…034a0 [0, 'KERNEL.LOG', 2, 128, 'xl=02', 'bc=00', 'xh=00', 'rc=80', '0-0-0-0-0-0-0-0-0-0-0', [187, 0, 188, 0, 189, 0, 190, 0, 191, 0, 192, 0, 193, 0, 194, 0]]
0x034a0…034c0 [0, 'KERNEL.LOG', 3, 25, 'xl=03', 'bc=00', 'xh=00', 'rc=19', '0-0-0-0-0-0-0-0-0-0-0', [195, 0, 196, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]
0x034c0…034e0 Dirent {Status=0xe5}
[…0x3…]
0x03540…03560 [0, 'ENTER.S', 0, 103, 'xl=00', 'bc=00', 'xh=00', 'rc=67', '0-0-0-0-0-0-0-0-0-0-0', [53, 1, 54, 1, 55, 1, 56, 1, 57, 1, 58, 1, 59, 1, 0, 0]]
0x03560…03580 Dirent {Status=0xe5}
[…0x4…]
0x03600…03800 (2, 0, 8) DataBlock {»COMDEF.PAS«}
0x03800…03a00 (2, 0, 9) 0xe5[0x200]
0x03a00…03a20 (2, 0, 10) Dirent {Status=0xe5}
[…0xf…]
0x03c00…03e00 (3, 1, 1) DataBlock {»COMDEF.PAS«}
0x03e00…04000 (3, 1, 2) DataBlock {»COMDEF.S«}
[…0x1…]
0x04200…04400 (3, 1, 4) DataBlock {»COMDEF.PAS«}
0x04400…04600 (3, 1, 5) DataBlock {»COMDEF.S«}
[…0x38…]
0x0b600…0b800 (9, 1, 2) DataBlock {»COPYRGHT.PAS«}
0x0b800…0ba00 (9, 1, 3) DataBlock {»COMDEF.S«}
[…0x1…]
0x0bc00…0bd80 (9, 1, 5) DataBlock {»COPYRGHT.PAS«}
0x0bd80…0bda0 41 56 45 5f 53 54 4b 20 20 20 20 20 20 53 41 56 45 20 53 55 50 45 52 56 49 53 4f 52 20 53 54 41 ┆AVE_STK SAVE SUPERVISOR STA┆
0x0bda0…0bdc0 43 4b 0d 0a 2a 20 52 53 54 4f 5f 53 54 4b 20 20 20 20 20 20 52 45 53 54 4f 52 45 20 53 55 50 45 ┆CK * RSTO_STK RESTORE SUPE┆
0x0bdc0…0bde0 52 56 49 53 4f 52 20 53 54 41 43 4b 0d 0a 2a 20 45 4e 54 5f 43 54 58 20 20 20 20 20 20 20 45 4e ┆RVISOR STACK * ENT_CTX EN┆
0x0bde0…0be00 54 45 52 20 43 4f 4e 54 45 58 54 0d 0a 2a 20 50 52 45 50 5f 52 45 54 20 20 20 20 20 20 50 52 45 ┆TER CONTEXT * PREP_RET PRE┆
0x0be00…0bf80 (9, 1, 6) DataBlock {»COMDEF.S«}
0x0bf80…0bfa0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆
[…0x3…]
0x0c000…0c200 (9, 1, 7) DataBlock {»COMDEF.S«}
0x0c200…0c220 (9, 1, 8) 50 41 52 45 20 52 45 54 55 52 4e 0d 0a 2a 20 4c 4f 41 44 5f 4d 4d 55 20 20 20 20 20 20 4c 4f 41 ┆PARE RETURN * LOAD_MMU LOA┆
0x0c220…0c240 44 20 4d 4d 55 20 52 45 47 49 53 54 45 52 53 0d 0a 2a 20 43 52 45 5f 43 54 58 20 20 20 20 20 20 ┆D MMU REGISTERS * CRE_CTX ┆
0x0c240…0c260 20 43 52 45 41 54 45 20 43 4f 4e 54 45 58 54 0d 0a 2a 20 53 45 54 5f 46 50 20 20 20 20 20 20 20 ┆ CREATE CONTEXT * SET_FP ┆
0x0c260…0c280 20 53 45 54 20 46 4f 52 4d 41 4c 20 50 4f 49 4e 54 45 52 53 0d 0a 2a 20 53 45 54 5f 41 43 54 20 ┆ SET FORMAL POINTERS * SET_ACT ┆
0x0c280…0c2a0 20 20 20 20 20 20 53 45 54 20 41 43 54 55 41 4c 20 52 45 46 0d 0a 2a 20 52 45 53 45 54 4c 4d 53 ┆ SET ACTUAL REF * RESETLMS┆
0x0c2a0…0c2c0 20 20 20 20 20 20 52 45 53 45 54 20 43 48 41 49 4e 20 49 4e 20 45 4c 45 4d 45 4e 54 53 0d 0a 2a ┆ RESET CHAIN IN ELEMENTS *┆
0x0c2c0…0c2e0 20 52 45 54 5f 46 50 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 20 46 4f 52 4d 41 4c 53 0d 0a 2a ┆ RET_FP RETURN FORMALS *┆
0x0c2e0…0c300 20 44 45 4c 5f 43 54 58 20 20 20 20 20 20 20 44 45 4c 45 54 45 20 43 4f 4e 54 45 58 54 0d 0a 20 ┆ DEL_CTX DELETE CONTEXT ┆
0x0c300…0c320 0d 0a 2a 20 4f 42 4a 45 43 54 20 43 52 45 41 54 49 4f 4e 20 41 4e 44 20 44 45 4c 45 54 49 4f 4e ┆ * OBJECT CREATION AND DELETION┆
0x0c320…0c340 3a 0d 0a 2a 20 44 45 43 4c 5f 47 45 4e 20 20 20 20 2a 20 44 45 43 4c 41 52 45 20 47 45 4e 45 52 ┆: * DECL_GEN * DECLARE GENER┆
0x0c340…0c360 41 4c 0d 0a 2a 20 43 52 45 5f 45 4e 56 20 20 20 20 20 20 20 43 52 45 41 54 45 20 41 4e 44 20 49 ┆AL * CRE_ENV CREATE AND I┆
0x0c360…0c380 4e 49 54 20 45 4e 56 45 4c 4f 50 45 0d 0a 2a 20 44 45 43 4c 5f 53 45 47 20 20 20 20 2a 20 44 45 ┆NIT ENVELOPE * DECL_SEG * DE┆
0x0c380…0c3a0 43 4c 41 52 45 20 53 45 47 4d 45 4e 54 20 28 4e 4f 4e 5f 45 4d 42 45 44 44 45 44 29 0d 0a 2a 20 ┆CLARE SEGMENT (NON_EMBEDDED) * ┆
0x0c3a0…0c3c0 44 45 43 4c 5f 53 55 42 20 20 20 20 2a 20 44 45 43 4c 41 52 45 20 53 55 42 53 45 47 4d 20 28 4e ┆DECL_SUB * DECLARE SUBSEGM (N┆
0x0c3c0…0c3e0 4f 4e 5f 45 4d 42 45 44 44 45 44 29 0d 0a 2a 20 4e 45 57 5f 53 45 47 20 20 20 20 20 2a 20 4e 45 ┆ON_EMBEDDED) * NEW_SEG * NE┆
0x0c3e0…0c400 57 20 45 4d 42 45 44 44 45 44 20 53 45 47 4d 45 4e 54 0d 0a 2a 20 4e 45 57 5f 53 55 42 20 20 20 ┆W EMBEDDED SEGMENT * NEW_SUB ┆
0x0c400…0c600 (9, 1, 9) DataBlock {»COPYRGHT.PAS«}
0x0c600…0c800 (9, 1, 10) DataBlock {»COMDEF.S«}
0x0c800…0ca00 (10, 0, 1) DataBlock {»COMDEF.BAK«}
[…0xa…]
0x0de00…0df80 (11, 1, 2) DataBlock {»KERNEL.BAK«}
0x0df80…0dfa0 20 20 20 20 49 6e 69 74 48 65 61 64 28 54 69 6d 65 72 2c 20 20 20 44 75 6d 6d 79 29 3b 20 20 28 ┆ InitHead(Timer, Dummy); (┆
0x0dfa0…0dfc0 2a 20 51 75 65 75 65 73 20 3a 3d 20 65 6d 70 74 79 20 2a 29 0d 0a 20 20 20 20 20 20 49 6e 69 74 ┆* Queues := empty *) Init┆
0x0dfc0…0dfe0 48 65 61 64 28 52 75 6e 6e 69 6e 67 2c 20 44 75 6d 6d 79 29 3b 0d 0a 20 20 20 20 20 20 49 6e 69 ┆Head(Running, Dummy); Ini┆
0x0dfe0…0e000 74 48 65 61 64 28 44 72 69 76 69 6e 67 2c 20 44 75 6d 6d 79 29 3b 0d 0a 20 20 20 20 20 20 57 49 ┆tHead(Driving, Dummy); WI┆
0x0e000…0e200 (11, 1, 3) DataBlock {»KERNEL.BAK«}
0x0e200…0e400 (11, 1, 4) DataBlock {»COMDEF.BAK«}
0x0e400…0e420 (11, 1, 5) 20 20 20 20 20 20 20 20 28 2a 20 61 73 73 69 67 6e 20 74 65 73 74 70 72 69 6e 74 20 70 72 6f 63 ┆ (* assign testprint proc┆
0x0e420…0e440 65 64 75 72 65 20 74 6f 20 74 72 61 70 20 23 39 20 2a 29 0d 0a 20 20 20 20 20 20 53 74 61 63 6b ┆edure to trap #9 *) Stack┆
0x0e440…0e460 5f 54 61 62 28 2e 33 32 2b 39 2e 29 20 3a 3d 20 2d 31 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ┆_Tab(.32+9.) := -1; ┆
0x0e460…0e480 20 20 20 20 20 20 20 20 28 2a 20 63 68 61 6e 6e 65 6c 20 33 32 2b 39 20 28 74 72 61 70 20 23 39 ┆ (* channel 32+9 (trap #9┆
0x0e480…0e4a0 29 20 3a 3d 20 72 65 73 65 72 76 65 64 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 28 2a 2a 2a 2a 20 ┆) := reserved *) (**** ┆
0x0e4a0…0e4c0 49 6e 69 74 69 61 6c 69 7a 65 20 74 65 73 74 20 70 72 69 6e 74 20 2a 29 0d 0a 0d 0a 20 20 20 20 ┆Initialize test print *) ┆
0x0e4c0…0e4e0 20 20 54 73 74 43 6f 75 6e 74 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 20 20 54 73 74 53 74 61 74 75 ┆ TstCount := 0; TstStatu┆
0x0e4e0…0e500 73 20 3a 3d 20 30 3b 0d 0a 0d 0a 20 20 20 20 20 20 28 2a 2a 2a 2a 20 49 6e 69 74 69 61 6c 69 7a ┆s := 0; (**** Initializ┆
0x0e500…0e520 65 20 70 72 69 6e 74 65 72 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 50 72 74 43 6f 6e 74 41 20 3a ┆e printer *) PrtContA :┆
0x0e520…0e540 3d 20 31 36 23 30 30 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 ┆= 16#00; (* ┆
0x0e540…0e560 73 65 6c 65 63 74 20 64 61 74 61 20 64 69 72 65 63 74 69 6f 6e 20 72 65 67 69 73 74 65 72 20 66 ┆select data direction register f┆
0x0e560…0e580 6f 72 20 61 2d 70 61 72 74 20 2a 29 0d 0a 20 20 20 20 20 20 50 72 74 42 75 66 20 3a 3d 20 31 36 ┆or a-part *) PrtBuf := 16┆
0x0e580…0e5a0 23 46 46 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 61 6c 6c 20 ┆#FF; (* all ┆
0x0e5a0…0e5c0 6c 69 6e 65 73 20 75 73 65 64 20 66 6f 72 20 6f 75 74 70 75 74 20 2a 29 0d 0a 20 20 20 20 20 20 ┆lines used for output *) ┆
0x0e5c0…0e5e0 50 72 74 43 6f 6e 74 41 20 3a 3d 20 31 36 23 33 43 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆PrtContA := 16#3C; ┆
0x0e5e0…0e600 20 20 20 20 20 20 20 28 2a 20 61 73 73 69 67 6e 20 63 6f 6e 74 72 6f 6c 20 62 69 74 73 20 74 6f ┆ (* assign control bits to┆
0x0e600…0e800 (11, 1, 6) DataBlock {»KERNEL.BAK«}
[…0x1…]
0x0ea00…0ea20 (11, 1, 8) 20 6f 75 74 70 75 74 20 70 61 72 74 20 2a 29 0d 0a 20 20 20 20 20 20 50 72 74 43 6f 6e 74 42 20 ┆ output part *) PrtContB ┆
0x0ea20…0ea40 3a 3d 20 31 36 23 30 30 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a ┆:= 16#00; (*┆
0x0ea40…0ea60 20 73 65 6c 65 63 74 20 64 61 74 61 20 64 69 72 65 63 74 69 6f 6e 20 72 65 67 69 73 74 65 72 20 ┆ select data direction register ┆
0x0ea60…0ea80 66 6f 72 20 62 2d 70 61 72 74 20 2a 29 0d 0a 20 20 20 20 20 20 50 72 74 53 74 61 74 75 20 3a 3d ┆for b-part *) PrtStatu :=┆
0x0ea80…0eaa0 20 31 36 23 30 38 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 61 ┆ 16#08; (* a┆
0x0eaa0…0eac0 6c 6c 20 6c 69 6e 65 73 20 75 73 65 64 20 66 6f 72 20 69 6e 70 75 74 20 62 75 74 20 62 69 74 20 ┆ll lines used for input but bit ┆
0x0eac0…0eae0 33 20 3f 3f 3f 20 2a 29 0d 0a 20 20 20 20 20 20 50 72 74 43 6f 6e 74 42 20 3a 3d 20 31 36 23 33 ┆3 ??? *) PrtContB := 16#3┆
0x0eae0…0eb00 43 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 61 73 73 69 67 6e ┆C; (* assign┆
0x0eb00…0eb20 20 63 6f 6e 74 72 6f 6c 20 62 69 74 73 20 74 6f 20 69 6e 70 75 74 20 70 61 72 74 20 2a 29 0d 0a ┆ control bits to input part *) ┆
0x0eb20…0eb40 0d 0a 20 20 20 20 20 20 4e 65 77 4c 69 6e 65 3b 0d 0a 20 20 20 20 20 20 50 72 74 43 68 61 72 28 ┆ NewLine; PrtChar(┆
0x0eb40…0eb60 27 45 27 29 3b 0d 0a 20 20 20 20 20 20 50 72 74 43 68 61 72 28 27 4f 27 29 3b 0d 0a 20 20 20 20 ┆'E'); PrtChar('O'); ┆
0x0eb60…0eb80 20 20 50 72 74 43 68 61 72 28 27 53 27 29 3b 0d 0a 20 20 20 20 20 20 4e 65 77 4c 69 6e 65 3b 0d ┆ PrtChar('S'); NewLine; ┆
0x0eb80…0eba0 0a 0d 0a 20 20 20 20 20 20 28 2a 2a 2a 2a 20 50 72 65 70 61 72 65 20 74 68 65 20 73 74 61 63 6b ┆ (**** Prepare the stack┆
0x0eba0…0ebc0 20 73 70 61 63 65 20 63 6f 6d 70 75 74 61 74 69 6f 6e 20 61 6c 67 6f 72 69 74 68 6d 20 2a 29 0d ┆ space computation algorithm *) ┆
0x0ebc0…0ebe0 0a 0d 0a 20 20 20 20 20 20 53 74 61 6b 5f 54 61 62 28 2e 30 2e 29 20 3a 3d 20 54 72 70 37 53 74 ┆ Stak_Tab(.0.) := Trp7St┆
0x0ebe0…0ec00 61 6b 20 2a 20 32 2a 2a 31 36 20 2b 20 30 3b 20 28 2a 20 30 20 69 73 20 69 6e 74 65 72 72 75 70 ┆ak * 2**16 + 0; (* 0 is interrup┆
0x0ec00…0ee00 (11, 1, 9) DataBlock {»KERNEL.BAK«}
[…0x1…]
0x0f000…0f200 (12, 0, 1) DataBlock {»KERNEL.PAS«}
[…0x3…]
0x0f800…0fa00 (12, 0, 5) DataBlock {»LOG.BAK«}
0x0fa00…0fc00 (12, 0, 6) DataBlock {»KERNEL.PAS«}
[…0x1…]
0x0fe00…10000 (12, 0, 8) DataBlock {»LOG.BAK«}
0x10000…10200 (12, 0, 9) DataBlock {»KERNEL.PAS«}
[…0x1…]
0x10400…10600 (13, 1, 1) DataBlock {»LOG.BAK«}
0x10600…10800 (13, 1, 2) DataBlock {»KNELVAR.BAK«}
[…0x1…]
0x10a00…10b80 (13, 1, 4) DataBlock {»LOG.BAK«}
0x10b80…10ba0 20 20 20 20 46 55 4e 43 54 49 4f 4e 20 53 75 50 74 72 28 0d 0a 20 20 20 20 20 20 20 20 20 28 2a ┆ FUNCTION SuPtr( (*┆
0x10ba0…10bc0 55 4e 49 56 2a 29 20 78 3a 20 53 75 50 74 72 54 79 70 65 29 3a 20 53 75 50 74 72 54 79 70 65 3b ┆UNIV*) x: SuPtrType): SuPtrType;┆
0x10bc0…10be0 0d 0a 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 53 75 50 74 ┆ BEGIN SuPt┆
0x10be0…10c00 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 46 55 ┆r := x END; FU┆
0x10c00…10e00 (13, 1, 5) DataBlock {»KNELVAR.BAK«}
[…0x6…]
0x11a00…11a80 (14, 0, 2) DataBlock {»PRGNOTES.BAK«}
0x11a80…11aa0 20 20 20 20 20 20 50 4f 50 20 52 45 47 49 53 54 45 52 53 3b 20 41 37 2e 4c 3a 3d 41 37 2e 4c 20 ┆ POP REGISTERS; A7.L:=A7.L ┆
0x11aa0…11ac0 2b 20 36 38 3b 0d 0a 20 20 20 20 43 4c 52 2e 4c 20 20 44 36 20 20 20 20 20 20 20 20 20 20 20 20 ┆+ 68; CLR.L D6 ┆
0x11ac0…11ae0 20 20 20 20 20 20 20 20 20 20 20 20 20 44 36 2f 44 37 3a 3d 52 45 53 55 4c 54 3a 3d 53 54 41 54 ┆ D6/D7:=RESULT:=STAT┆
0x11ae0…11b00 55 53 2c 44 55 4d 4d 59 46 49 45 44 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 23 45 43 53 44 55 ┆US,DUMMYFIED; MOVE.L #ECSDU┆
0x11b00…11b20 4d 4d 59 2c 44 37 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 33 2c 41 32 20 20 20 20 20 20 20 20 ┆MMY,D7 MOVE.L A3,A2 ┆
0x11b20…11b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 32 3a 3d 43 55 52 52 45 4e 54 20 43 54 58 3b 0d 0a ┆ A2:=CURRENT CTX; ┆
0x11b40…11b60 20 20 20 20 54 53 54 20 20 20 20 44 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ TST D4 ┆
0x11b60…11b80 20 20 20 20 49 46 20 43 41 4c 4c 45 52 20 4e 4f 52 4d 41 4c 20 4d 4f 44 45 20 54 48 45 4e 0d 0a ┆ IF CALLER NORMAL MODE THEN ┆
0x11b80…11ba0 20 20 20 20 42 45 51 20 20 20 20 4f 42 4a 5f 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BEQ OBJ_RET ┆
0x11ba0…11bc0 20 20 20 20 20 20 4f 42 4a 5f 52 45 54 55 52 4e 0d 0a 20 20 20 20 42 52 41 20 20 20 20 4f 42 4a ┆ OBJ_RETURN BRA OBJ┆
0x11bc0…11be0 5f 52 52 45 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 20 52 45 53 49 44 ┆_RRET ELSE RESID┆
0x11be0…11c00 45 4e 54 5f 52 45 54 55 52 4e 20 45 4e 44 3b 0d 0a 20 20 20 20 50 41 47 45 0d 0a 20 20 20 20 53 ┆ENT_RETURN END; PAGE S┆
0x11c00…11e00 (14, 0, 3) DataBlock {»PRGNOTES.BAK«}
0x11e00…12000 (14, 0, 4) DataBlock {»KNELVAR.BAK«}
[…0x1…]
0x12200…12400 (14, 0, 6) DataBlock {»PRGNOTES.BAK«}
0x12400…12600 (14, 0, 7) DataBlock {»KNELVAR.BAK«}
[…0x1…]
0x12800…12a00 (14, 0, 9) DataBlock {»PRGNOTES.BAK«}
0x12a00…12c00 (14, 0, 10) DataBlock {»KNELVAR.BAK«}
[…0x1…]
0x12e00…13000 (15, 1, 2) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x13200…13400 (15, 1, 4) DataBlock {»KNELVAR.BAK«}
0x13400…13600 (15, 1, 5) DataBlock {»COMDEF.PAS«}
[…0x6…]
0x14200…14400 (16, 0, 2) DataBlock {»COMDEF.BAK«}
[…0x1…]
0x14600…14800 (16, 0, 4) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x14a00…14c00 (16, 0, 6) DataBlock {»COMDEF.BAK«}
0x14c00…14e00 (16, 0, 7) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x15000…15200 (16, 0, 9) DataBlock {»COMDEF.BAK«}
0x15200…15400 (16, 0, 10) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x15600…15800 (17, 1, 2) DataBlock {»COMDEF.BAK«}
0x15800…15a00 (17, 1, 3) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x15c00…15e00 (17, 1, 5) DataBlock {»COMDEF.BAK«}
0x15e00…16000 (17, 1, 6) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x16200…16400 (17, 1, 8) DataBlock {»COMDEF.BAK«}
[…0x1…]
0x16600…16800 (17, 1, 10) DataBlock {»COMDEF.PAS«}
0x16800…16a00 (18, 0, 1) DataBlock {»COMDEF.BAK«}
0x16a00…16c00 (18, 0, 2) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x16e00…17000 (18, 0, 4) DataBlock {»COMDEF.BAK«}
0x17000…17200 (18, 0, 5) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x17400…17600 (18, 0, 7) DataBlock {»COMDEF.BAK«}
0x17600…17800 (18, 0, 8) DataBlock {»COMDEF.PAS«}
[…0x1…]
0x17a00…17c00 (18, 0, 10) DataBlock {»COMDEF.BAK«}
0x17c00…17e00 (19, 1, 1) DataBlock {»COMDEF.PAS«}
0x17e00…18000 (19, 1, 2) DataBlock {»LOG.TXT«}
0x18000…18020 (19, 1, 3) 0d 0a 20 20 20 20 20 20 20 20 20 28 4d 4d 55 5f 52 65 67 73 3a 20 4d 4d 55 5f 52 65 67 69 73 74 ┆ (MMU_Regs: MMU_Regist┆
0x18020…18040 65 72 54 79 70 65 0d 0a 20 20 20 20 20 20 20 20 20 29 3b 0d 0a 20 20 20 20 20 20 44 36 37 5f 52 ┆erType ); D67_R┆
0x18040…18060 65 67 4b 69 6e 64 3a 0d 0a 20 20 20 20 20 20 20 20 20 28 64 36 0d 0a 20 20 20 20 20 20 20 20 20 ┆egKind: (d6 ┆
0x18060…18080 2c 64 37 3a 20 52 65 67 69 73 74 65 72 54 79 70 65 0d 0a 20 20 20 20 20 20 20 20 20 29 0d 0a 20 ┆,d7: RegisterType ) ┆
0x18080…180a0 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 4d 4d 55 5f 44 65 73 63 72 69 70 ┆ END; MMU_Descrip┆
0x180a0…180c0 74 6f 72 54 79 70 65 20 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 4d 4d 5f 6d 61 ┆torType = RECORD MM_ma┆
0x180c0…180e0 70 3a 20 50 6f 69 6e 74 65 72 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆p: PointerType; ┆
0x180e0…18100 20 20 20 20 28 2a 20 50 6f 69 6e 74 73 20 74 6f 20 73 65 67 6d 65 6e 74 20 6f 72 20 73 75 62 20 ┆ (* Points to segment or sub ┆
0x18100…18120 73 65 67 6d 65 6e 74 20 6d 61 70 70 65 64 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆segment mapped ┆
0x18120…18140 20 20 20 20 20 20 4d 4d 5f 72 65 66 20 3d 20 50 54 5f 72 65 66 20 3d 20 61 64 64 72 65 73 73 20 ┆ MM_ref = PT_ref = address ┆
0x18140…18160 6f 66 20 73 65 67 6d 65 6e 74 20 6f 72 20 73 75 62 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆of segment or sub ┆
0x18160…18180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 65 67 6d 65 6e 74 20 6f 62 6a 65 63 74 ┆ segment object┆
0x18180…181a0 2e 20 30 20 69 66 20 75 6e 6d 61 70 70 65 64 20 6f 72 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆. 0 if unmapped or ┆
0x181a0…181c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 61 73 65 20 73 65 67 6d 65 6e 74 20 ┆ base segment ┆
0x181c0…181e0 72 65 6d 6f 76 65 64 2e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆removed. ┆
0x181e0…18200 4d 4d 5f 6b 69 6e 20 3d 20 50 54 5f 6b 69 6e 20 3d 20 4d 4d 55 5f 64 65 73 63 72 69 70 74 6f 72 ┆MM_kin = PT_kin = MMU_descriptor┆
0x18200…18400 (19, 1, 4) DataBlock {»COMDEF.PAS«}
0x18400…18600 (19, 1, 5) DataBlock {»LOG.TXT«}
0x18600…18620 (19, 1, 6) 20 28 3d 50 54 5f 4d 4d 55 29 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 4d 4d 5f 72 65 67 3a 20 ┆ (=PT_MMU) *) MM_reg: ┆
0x18620…18640 4d 4d 55 5f 53 61 76 65 41 72 65 61 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MMU_SaveAreaType; ┆
0x18640…18660 20 20 20 20 20 20 28 2a 20 4d 4d 55 20 72 65 67 69 73 74 65 72 20 63 6f 6e 74 65 6e 74 73 2e 20 ┆ (* MMU register contents. ┆
0x18660…18680 41 6c 73 6f 20 75 73 65 64 20 74 6f 20 73 61 76 65 20 64 36 2f 64 37 0d 0a 20 20 20 20 20 20 20 ┆Also used to save d6/d7 ┆
0x18680…186a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 72 65 73 75 6c 74 29 20 64 75 72 69 6e 67 20 ┆ (=result) during ┆
0x186a0…186c0 64 65 6c 65 74 65 20 63 6f 6e 74 65 78 74 20 28 64 65 6c 5f 63 74 78 29 20 69 6e 0d 0a 20 20 20 ┆delete context (del_ctx) in ┆
0x186c0…186e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 6e 65 6c 6f 70 2e 20 2a 29 0d 0a 20 ┆ knelop. *) ┆
0x186e0…18700 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 43 4f 4e 53 54 0d 0a 20 20 20 20 20 20 4d ┆ END; CONST M┆
0x18700…18720 4d 5f 73 69 7a 20 3d 20 73 69 7a 65 6f 66 28 4d 4d 55 5f 44 65 73 63 72 69 70 74 6f 72 54 79 70 ┆M_siz = sizeof(MMU_DescriptorTyp┆
0x18720…18740 65 29 3b 0d 0a 0d 0a 28 2a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆e); (*-----------------------┆
0x18740…18760 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆--------------------------------┆
0x18760…18780 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 20 20 47 45 4e 45 52 41 4c 20 4f 42 4a 45 43 54 20 ┆------------- GENERAL OBJECT ┆
0x18780…187a0 20 2a 29 0d 0a 0d 0a 20 20 20 54 59 50 45 0d 0a 20 20 20 20 20 20 4f 62 6a 65 63 74 47 65 6e 65 ┆ *) TYPE ObjectGene┆
0x187a0…187c0 72 61 6c 50 61 72 74 54 79 70 65 20 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 47 ┆ralPartType = RECORD G┆
0x187c0…187e0 45 5f 65 78 3a 20 43 68 61 69 6e 54 79 70 65 3b 20 20 20 28 2a 20 45 78 65 63 75 74 65 64 20 62 ┆E_ex: ChainType; (* Executed b┆
0x187e0…18800 79 3a 20 47 65 6e 65 72 61 6c 20 6f 62 6a 20 2d 3e 20 63 74 78 20 2a 29 0d 0a 20 20 20 20 20 20 ┆y: General obj -> ctx *) ┆
0x18800…18a00 (19, 1, 7) DataBlock {»COMDEF.PAS«}
0x18a00…18b80 (19, 1, 8) DataBlock {»LOG.TXT«}
0x18b80…18ba0 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 28 2a 20 50 6f 69 6e 74 65 72 73 20 61 6c 6c 6f 63 61 74 ┆ END; (* Pointers allocat┆
0x18ba0…18bc0 65 64 20 68 65 72 65 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 28 2a 20 4e 4f 54 45 3a 20 53 69 7a ┆ed here *) (* NOTE: Siz┆
0x18bc0…18be0 65 20 6f 66 20 65 6e 76 65 6c 6f 70 65 2f 63 6f 6e 74 65 78 74 69 6e 63 6c 75 64 69 6e 67 20 70 ┆e of envelope/contextincluding p┆
0x18be0…18c00 6f 69 6e 74 65 72 73 20 61 6e 64 20 65 6d 62 65 64 64 65 64 0d 0a 20 20 20 20 20 20 20 20 20 73 ┆ointers and embedded s┆
0x18c00…18e00 (19, 1, 9) DataBlock {»LOG.TXT«}
0x18e00…18e20 (19, 1, 10) 63 61 6c 29 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆cal) *) ┆
0x18e20…18e40 20 20 20 20 20 20 20 2c 46 6c 61 67 73 20 20 20 20 20 20 20 20 20 28 2a 20 62 69 74 30 3d 31 3a ┆ ,Flags (* bit0=1:┆
0x18e40…18e60 20 45 4e 41 42 4c 45 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ENABLE ┆
0x18e60…18e80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 31 3d 31 3a ┆ bit1=1:┆
0x18e80…18ea0 20 52 45 41 44 20 4f 4e 4c 59 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ READ ONLY *) ┆
0x18ea0…18ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 4d 4d 55 5f 52 65 67 ┆ ); MMU_Reg┆
0x18ec0…18ee0 69 73 74 65 72 54 79 70 65 20 3d 20 41 52 52 41 59 20 28 2e 20 4d 4d 55 5f 52 65 67 69 73 74 65 ┆isterType = ARRAY (. MMU_Registe┆
0x18ee0…18f00 72 49 6e 64 65 78 54 79 70 65 20 2e 29 20 4f 46 20 77 6f 72 64 3b 0d 0a 0d 0a 20 20 20 20 20 20 ┆rIndexType .) OF word; ┆
0x18f00…18f20 4d 4d 55 5f 53 61 76 65 41 72 65 61 4b 69 6e 64 54 79 70 65 20 3d 20 28 4d 4d 55 5f 52 65 67 4b ┆MMU_SaveAreaKindType = (MMU_RegK┆
0x18f20…18f40 69 6e 64 2c 20 44 26 27 5f 52 65 67 4b 69 6e 64 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 4d 4d 55 5f ┆ind, D&'_RegKind); MMU_┆
0x18f40…18f60 73 61 76 65 41 72 65 61 54 79 70 65 20 3d 20 52 45 43 4f 52 44 0d 0a 0d 0a 20 20 20 20 20 20 28 ┆saveAreaType = RECORD (┆
0x18f60…18f80 2a 20 54 68 65 20 70 61 73 63 61 6c 20 69 6e 74 65 72 70 72 65 74 61 74 69 6f 6e 20 69 73 20 62 ┆* The pascal interpretation is b┆
0x18f80…18fa0 61 73 65 64 20 6f 6e 20 74 68 65 20 63 6f 6d 6d 65 6e 74 20 69 6e 20 6c 69 6e 65 0d 0a 20 20 20 ┆ased on the comment in line ┆
0x18fa0…18fc0 20 20 20 20 20 20 32 35 33 20 69 6e 20 66 69 6c 65 20 63 6f 6d 64 65 66 2e 73 61 20 70 61 67 65 ┆ 253 in file comdef.sa page┆
0x18fc0…18fe0 20 36 2e 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 43 41 53 45 20 4d 4d 55 5f 53 61 76 65 41 72 65 ┆ 6. *) CASE MMU_SaveAre┆
0x18fe0…19000 61 4b 69 6e 64 54 79 70 65 20 4f 46 0d 0a 20 20 20 20 20 20 4d 4d 55 5f 52 65 67 4b 69 6e 64 3a ┆aKindType OF MMU_RegKind:┆
0x19000…19200 (20, 0, 1) DataBlock {»KNELVAR.BAK«}
[…0x3…]
0x19800…19a00 (20, 0, 5) DataBlock {»COMDEF.BAK«}
0x19a00…19c00 (20, 0, 6) DataBlock {»KNELVAR.BAK«}
[…0x1…]
0x19e00…1a000 (20, 0, 8) DataBlock {»COMDEF.BAK«}
0x1a000…1a200 (20, 0, 9) DataBlock {»KNELVAR.BAK«}
[…0x1…]
0x1a400…1a600 (21, 1, 1) DataBlock {»COMDEF.BAK«}
0x1a600…1a620 (21, 1, 2) 63 61 6c 29 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆cal) *) ┆
0x1a620…1a640 20 20 20 20 20 20 20 2c 46 6c 61 67 73 20 20 20 20 20 20 20 20 20 28 2a 20 62 69 74 30 3d 31 3a ┆ ,Flags (* bit0=1:┆
0x1a640…1a660 20 45 4e 41 42 4c 45 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ENABLE ┆
0x1a660…1a680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 31 3d 31 3a ┆ bit1=1:┆
0x1a680…1a6a0 20 52 45 41 44 20 4f 4e 4c 59 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ READ ONLY *) ┆
0x1a6a0…1a6c0 20 20 20 20 20 20 20 20 20 20 20 20 20 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 4d 4d 55 5f 52 65 67 ┆ ); MMU_Reg┆
0x1a6c0…1a6e0 69 73 74 65 72 54 79 70 65 20 3d 20 41 52 52 41 59 20 28 2e 20 4d 4d 55 5f 52 65 67 69 73 74 65 ┆isterType = ARRAY (. MMU_Registe┆
0x1a6e0…1a700 72 49 6e 64 65 78 54 79 70 65 20 2e 29 20 4f 46 20 77 6f 72 64 3b 0d 0a 0d 0a 20 20 20 20 20 20 ┆rIndexType .) OF word; ┆
0x1a700…1a720 4d 4d 55 5f 53 61 76 65 41 72 65 61 4b 69 6e 64 54 79 70 65 20 3d 20 28 4d 4d 55 5f 52 65 67 4b ┆MMU_SaveAreaKindType = (MMU_RegK┆
0x1a720…1a740 69 6e 64 2c 20 44 26 27 5f 52 65 67 4b 69 6e 64 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 4d 4d 55 5f ┆ind, D&'_RegKind); MMU_┆
0x1a740…1a760 73 61 76 65 41 72 65 61 54 79 70 65 20 3d 20 52 45 43 4f 52 44 0d 0a 0d 0a 20 20 20 20 20 20 28 ┆saveAreaType = RECORD (┆
0x1a760…1a780 2a 20 54 68 65 20 70 61 73 63 61 6c 20 69 6e 74 65 72 70 72 65 74 61 74 69 6f 6e 20 69 73 20 62 ┆* The pascal interpretation is b┆
0x1a780…1a7a0 61 73 65 64 20 6f 6e 20 74 68 65 20 63 6f 6d 6d 65 6e 74 20 69 6e 20 6c 69 6e 65 0d 0a 20 20 20 ┆ased on the comment in line ┆
0x1a7a0…1a7c0 20 20 20 20 20 20 32 35 33 20 69 6e 20 66 69 6c 65 20 63 6f 6d 64 65 66 2e 73 61 20 70 61 67 65 ┆ 253 in file comdef.sa page┆
0x1a7c0…1a7e0 20 36 2e 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 43 41 53 45 20 4d 4d 55 5f 53 61 76 65 41 72 65 ┆ 6. *) CASE MMU_SaveAre┆
0x1a7e0…1a800 61 4b 69 6e 64 54 79 70 65 20 4f 46 0d 0a 20 20 20 20 20 20 4d 4d 55 5f 52 65 67 4b 69 6e 64 3a ┆aKindType OF MMU_RegKind:┆
0x1a800…1aa00 (21, 1, 3) DataBlock {»COMDEF.BAK«}
[…0x1…]
0x1ac00…1ac20 (21, 1, 5) 0d 0a 20 20 20 20 20 20 20 20 20 28 4d 4d 55 5f 52 65 67 73 3a 20 4d 4d 55 5f 52 65 67 69 73 74 ┆ (MMU_Regs: MMU_Regist┆
0x1ac20…1ac40 65 72 54 79 70 65 0d 0a 20 20 20 20 20 20 20 20 20 29 3b 0d 0a 20 20 20 20 20 20 44 36 37 5f 52 ┆erType ); D67_R┆
0x1ac40…1ac60 65 67 4b 69 6e 64 3a 0d 0a 20 20 20 20 20 20 20 20 20 28 64 36 0d 0a 20 20 20 20 20 20 20 20 20 ┆egKind: (d6 ┆
0x1ac60…1ac80 2c 64 37 3a 20 52 65 67 69 73 74 65 72 54 79 70 65 0d 0a 20 20 20 20 20 20 20 20 20 29 0d 0a 20 ┆,d7: RegisterType ) ┆
0x1ac80…1aca0 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 4d 4d 55 5f 44 65 73 63 72 69 70 ┆ END; MMU_Descrip┆
0x1aca0…1acc0 74 6f 72 54 79 70 65 20 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 4d 4d 5f 6d 61 ┆torType = RECORD MM_ma┆
0x1acc0…1ace0 70 3a 20 50 6f 69 6e 74 65 72 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆p: PointerType; ┆
0x1ace0…1ad00 20 20 20 20 28 2a 20 50 6f 69 6e 74 73 20 74 6f 20 73 65 67 6d 65 6e 74 20 6f 72 20 73 75 62 20 ┆ (* Points to segment or sub ┆
0x1ad00…1ad20 73 65 67 6d 65 6e 74 20 6d 61 70 70 65 64 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆segment mapped ┆
0x1ad20…1ad40 20 20 20 20 20 20 4d 4d 5f 72 65 66 20 3d 20 50 54 5f 72 65 66 20 3d 20 61 64 64 72 65 73 73 20 ┆ MM_ref = PT_ref = address ┆
0x1ad40…1ad60 6f 66 20 73 65 67 6d 65 6e 74 20 6f 72 20 73 75 62 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆of segment or sub ┆
0x1ad60…1ad80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 73 65 67 6d 65 6e 74 20 6f 62 6a 65 63 74 ┆ segment object┆
0x1ad80…1ada0 2e 20 30 20 69 66 20 75 6e 6d 61 70 70 65 64 20 6f 72 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆. 0 if unmapped or ┆
0x1ada0…1adc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 61 73 65 20 73 65 67 6d 65 6e 74 20 ┆ base segment ┆
0x1adc0…1ade0 72 65 6d 6f 76 65 64 2e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆removed. ┆
0x1ade0…1ae00 4d 4d 5f 6b 69 6e 20 3d 20 50 54 5f 6b 69 6e 20 3d 20 4d 4d 55 5f 64 65 73 63 72 69 70 74 6f 72 ┆MM_kin = PT_kin = MMU_descriptor┆
0x1ae00…1b000 (21, 1, 6) DataBlock {»COMDEF.BAK«}
[…0x1…]
0x1b200…1b220 (21, 1, 8) 20 28 3d 50 54 5f 4d 4d 55 29 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 4d 4d 5f 72 65 67 3a 20 ┆ (=PT_MMU) *) MM_reg: ┆
0x1b220…1b240 4d 4d 55 5f 53 61 76 65 41 72 65 61 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MMU_SaveAreaType; ┆
0x1b240…1b260 20 20 20 20 20 20 28 2a 20 4d 4d 55 20 72 65 67 69 73 74 65 72 20 63 6f 6e 74 65 6e 74 73 2e 20 ┆ (* MMU register contents. ┆
0x1b260…1b280 41 6c 73 6f 20 75 73 65 64 20 74 6f 20 73 61 76 65 20 64 36 2f 64 37 0d 0a 20 20 20 20 20 20 20 ┆Also used to save d6/d7 ┆
0x1b280…1b2a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3d 72 65 73 75 6c 74 29 20 64 75 72 69 6e 67 20 ┆ (=result) during ┆
0x1b2a0…1b2c0 64 65 6c 65 74 65 20 63 6f 6e 74 65 78 74 20 28 64 65 6c 5f 63 74 78 29 20 69 6e 0d 0a 20 20 20 ┆delete context (del_ctx) in ┆
0x1b2c0…1b2e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6b 6e 65 6c 6f 70 2e 20 2a 29 0d 0a 20 ┆ knelop. *) ┆
0x1b2e0…1b300 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 43 4f 4e 53 54 0d 0a 20 20 20 20 20 20 4d ┆ END; CONST M┆
0x1b300…1b320 4d 5f 73 69 7a 20 3d 20 73 69 7a 65 6f 66 28 4d 4d 55 5f 44 65 73 63 72 69 70 74 6f 72 54 79 70 ┆M_siz = sizeof(MMU_DescriptorTyp┆
0x1b320…1b340 65 29 3b 0d 0a 0d 0a 28 2a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆e); (*-----------------------┆
0x1b340…1b360 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆--------------------------------┆
0x1b360…1b380 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 20 20 47 45 4e 45 52 41 4c 20 4f 42 4a 45 43 54 20 ┆------------- GENERAL OBJECT ┆
0x1b380…1b3a0 20 2a 29 0d 0a 0d 0a 20 20 20 54 59 50 45 0d 0a 20 20 20 20 20 20 4f 62 6a 65 63 74 47 65 6e 65 ┆ *) TYPE ObjectGene┆
0x1b3a0…1b3c0 72 61 6c 50 61 72 74 54 79 70 65 20 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 47 ┆ralPartType = RECORD G┆
0x1b3c0…1b3e0 45 5f 65 78 3a 20 43 68 61 69 6e 54 79 70 65 3b 20 20 20 28 2a 20 45 78 65 63 75 74 65 64 20 62 ┆E_ex: ChainType; (* Executed b┆
0x1b3e0…1b400 79 3a 20 47 65 6e 65 72 61 6c 20 6f 62 6a 20 2d 3e 20 63 74 78 20 2a 29 0d 0a 20 20 20 20 20 20 ┆y: General obj -> ctx *) ┆
0x1b400…1b600 (21, 1, 9) DataBlock {»COMDEF.BAK«}
[…0x1…]
0x1b800…1ba00 (22, 0, 1) DataBlock {»KNELVAR.BAK«}
[…0xa…]
0x1ce00…1d000 (23, 1, 2) DataBlock {»COMDEF2.PAS«}
0x1d000…1d200 (23, 1, 3) DataBlock {»KNELVAR.PAS«}
0x1d200…1d220 (23, 1, 4) 20 6d 61 79 20 68 61 76 65 20 62 65 65 6e 20 64 61 6d 61 67 65 64 20 62 79 20 74 68 65 0d 0a 20 ┆ may have been damaged by the ┆
0x1d220…1d240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70 72 65 76 69 6f 75 73 20 69 6e 69 74 69 61 6c 69 7a ┆ previous initializ┆
0x1d240…1d260 61 74 69 6f 6e 20 69 66 20 74 68 65 79 20 77 65 72 65 20 6c 6f 63 61 74 65 64 20 74 6f 6f 20 6e ┆ation if they were located too n┆
0x1d260…1d280 65 61 72 20 74 6f 20 74 68 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 20 28 ┆ear to the end (┆
0x1d280…1d2a0 6f 72 20 62 65 67 69 6e 6e 69 6e 67 29 20 6f 66 20 74 68 65 20 72 61 6d 20 61 72 65 61 20 74 68 ┆or beginning) of the ram area th┆
0x1d2a0…1d2c0 61 74 20 68 6f 6c 64 73 20 74 68 65 20 6d 6f 64 75 6c 65 73 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 ┆at holds the modules *) ┆
0x1d2c0…1d2e0 20 20 20 20 43 4d 52 50 74 72 20 3a 3d 20 4d 65 6d 52 65 63 50 74 72 28 46 5f 41 6c 6c 6f 63 29 ┆ CMRPtr := MemRecPtr(F_Alloc)┆
0x1d2e0…1d300 3b 20 28 2a 20 46 69 72 73 74 20 6d 65 6d 20 72 65 63 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 ┆; (* First mem rec *) ┆
0x1d300…1d320 52 45 50 45 41 54 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 48 6f 6c 64 65 72 20 3a 3d 20 43 4d ┆REPEAT Holder := CM┆
0x1d320…1d340 4d 52 50 74 72 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 43 4d 52 50 74 72 20 3a 3d 20 43 4d ┆MRPtr; CMRPtr := CM┆
0x1d340…1d360 52 50 74 72 5e 2e 4d 52 5f 4e 78 74 0d 0a 20 20 20 20 20 20 20 20 20 55 4e 54 49 4c 20 50 74 72 ┆RPtr^.MR_Nxt UNTIL Ptr┆
0x1d360…1d380 56 61 6c 28 43 75 72 72 50 74 72 29 20 3e 20 4b 56 5f 42 6f 74 4c 64 3b 0d 0a 0d 0a 20 20 20 20 ┆Val(CurrPtr) > KV_BotLd; ┆
0x1d380…1d3a0 20 20 20 20 20 28 2a 2a 2a 2a 20 20 46 69 6e 64 20 6c 65 6e 67 74 68 20 6f 66 20 62 6f 6f 74 20 ┆ (**** Find length of boot ┆
0x1d3a0…1d3c0 6c 6f 61 64 65 64 20 6d 6f 64 75 6c 65 73 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 54 6f 70 4d ┆loaded modules *) TopM┆
0x1d3c0…1d3e0 6f 64 75 6c 65 41 64 64 72 65 73 73 20 3a 3d 20 4b 56 5f 42 6f 74 4c 64 20 2b 20 32 35 36 3b 20 ┆oduleAddress := KV_BotLd + 256; ┆
0x1d3e0…1d400 28 2a 20 69 6e 63 6c 75 64 69 6e 67 20 74 68 65 20 7a 65 72 6f 20 6d 6f 64 75 6c 65 20 2a 29 0d ┆(* including the zero module *) ┆
0x1d400…1d600 (23, 1, 5) DataBlock {»COMDEF2.PAS«}
0x1d600…1d800 (23, 1, 6) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x1da00…1dc00 (23, 1, 8) DataBlock {»COMDEF2.PAS«}
[…0x1…]
0x1de00…1e000 (23, 1, 10) DataBlock {»KNELVAR.PAS«}
0x1e000…1e200 (24, 0, 1) DataBlock {»COMDEF2.PAS«}
[…0xa…]
0x1f600…1f800 (25, 1, 2) DataBlock {»COMDEF2.BAK«}
0x1f800…1fa00 (25, 1, 3) DataBlock {»COMDEF2.PAS«}
[…0x1…]
0x1fc00…1fe00 (25, 1, 5) DataBlock {»COMDEF2.BAK«}
0x1fe00…20000 (25, 1, 6) DataBlock {»COMDEF2.PAS«}
[…0x1…]
0x20200…20400 (25, 1, 8) DataBlock {»COMDEF2.BAK«}
[…0x1…]
0x20600…20800 (25, 1, 10) DataBlock {»COMDEF2.PAS«}
0x20800…20a00 (26, 0, 1) DataBlock {»COMDEF2.BAK«}
[…0x13…]
0x23000…23200 (28, 0, 1) DataBlock {»COMDEF2.PAS«}
0x23200…23400 (28, 0, 2) DataBlock {»COMDEF2.BAK«}
[…0x1…]
0x23600…23800 (28, 0, 4) DataBlock {»COMDEF2.PAS«}
0x23800…23a00 (28, 0, 5) DataBlock {»COMDEF2.BAK«}
[…0x1…]
0x23c00…23e00 (28, 0, 7) DataBlock {»COMDEF2.PAS«}
0x23e00…24000 (28, 0, 8) DataBlock {»COMDEF2.BAK«}
[…0x1…]
0x24200…24400 (28, 0, 10) DataBlock {»COMDEF2.PAS«}
0x24400…24420 (29, 1, 1) 20 20 20 20 28 2a 20 23 54 65 6d 70 20 64 61 74 61 20 62 79 74 65 73 20 69 6e 20 63 6f 6e 74 65 ┆ (* #Temp data bytes in conte┆
0x24420…24440 78 74 20 69 6e 20 67 65 6e 65 72 61 6c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆xt in general ┆
0x24440…24460 20 20 20 20 20 73 63 68 65 64 75 6c 65 72 20 6f 62 6a 65 63 74 73 20 2a 29 0d 0a 20 20 20 20 20 ┆ scheduler objects *) ┆
0x24460…24480 20 4b 56 5f 53 74 6b 53 69 7a 20 3d 20 31 36 23 38 30 30 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 ┆ KV_StkSiz = 16#800; ┆
0x24480…244a0 20 20 20 20 20 20 20 20 20 28 2a 20 49 6e 69 74 69 61 6c 20 73 69 7a 65 20 6f 66 20 74 68 65 20 ┆ (* Initial size of the ┆
0x244a0…244c0 73 75 70 65 72 76 69 73 6f 72 20 73 74 61 63 6b 20 28 69 6e 20 62 79 74 65 73 29 20 2a 29 0d 0a ┆supervisor stack (in bytes) *) ┆
0x244c0…244e0 20 20 20 20 20 20 54 72 70 37 53 74 61 6b 20 3d 20 31 36 23 31 30 30 3b 0d 0a 20 20 20 20 20 20 ┆ Trp7Stak = 16#100; ┆
0x244e0…24500 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 53 74 61 63 6b 20 73 70 61 63 65 20 72 65 71 75 ┆ (* Stack space requ┆
0x24500…24520 69 72 65 64 20 62 79 20 6e 6f 72 6d 61 6c 20 6b 65 72 6e 65 6c 20 6f 70 65 72 61 74 69 6f 6e 73 ┆ired by normal kernel operations┆
0x24520…24540 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 2e 65 2e 20 6f 70 65 ┆ i.e. ope┆
0x24540…24560 72 61 74 69 6f 6e 73 20 63 61 6c 6c 65 64 20 66 72 6f 6d 20 6e 6f 72 6d 61 6c 20 63 6f 6e 74 65 ┆rations called from normal conte┆
0x24560…24580 78 74 73 20 6f 6e 6c 79 20 2a 29 0d 0a 20 20 20 20 20 20 54 72 70 37 52 65 73 69 20 3d 20 31 36 ┆xts only *) Trp7Resi = 16┆
0x24580…245a0 23 38 30 20 2b 20 31 36 23 46 46 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆#80 + 16#FF; ┆
0x245a0…245c0 20 28 2a 20 31 36 23 46 46 20 69 73 20 61 20 22 72 6f 75 6e 64 20 75 70 22 20 76 61 6c 75 65 2e ┆ (* 16#FF is a "round up" value.┆
0x245c0…245e0 20 54 68 65 20 72 65 73 74 20 69 73 20 74 68 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ The rest is the ┆
0x245e0…24600 20 20 20 20 20 20 20 20 73 74 61 63 6b 20 73 70 61 63 65 20 6e 65 65 64 65 64 20 62 79 20 74 68 ┆ stack space needed by th┆
0x24600…24800 (29, 1, 2) DataBlock {»COMDEF2.PAS«}
[…0x1…]
0x24a00…24a20 (29, 1, 4) 65 20 6b 65 72 6e 65 6c 20 6f 6e 20 65 61 63 68 20 6f 66 0d 0a 20 20 20 20 20 20 20 20 20 20 20 ┆e kernel on each of ┆
0x24a20…24a40 20 20 20 20 20 20 20 20 20 20 20 74 68 65 20 69 6e 74 65 72 72 72 75 70 74 20 6c 65 76 65 6c 73 ┆ the interrrupt levels┆
0x24a40…24a60 20 74 6f 20 65 78 65 63 75 74 65 20 74 68 65 20 6b 65 72 6e 65 6c 0d 0a 20 20 20 20 20 20 20 20 ┆ to execute the kernel ┆
0x24a60…24a80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 70 65 72 61 74 69 6f 6e 73 20 63 61 6c 6c 65 64 20 ┆ operations called ┆
0x24a80…24aa0 62 79 20 72 65 73 69 64 65 6e 74 20 63 6f 6e 74 65 78 74 73 20 61 6e 64 20 62 79 0d 0a 20 20 20 ┆by resident contexts and by ┆
0x24aa0…24ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 68 65 20 69 6e 74 65 72 72 75 70 74 ┆ the interrupt┆
0x24ac0…24ae0 20 70 72 6f 63 65 64 75 72 65 73 2e 20 2a 29 0d 0a 20 20 20 20 20 20 28 2a 20 4b 56 5f 53 74 6b ┆ procedures. *) (* KV_Stk┆
0x24ae0…24b00 53 69 7a 20 2d 20 54 72 70 37 53 74 61 6b 20 2d 20 28 54 72 70 37 52 65 73 69 20 2d 20 31 36 23 ┆Siz - Trp7Stak - (Trp7Resi - 16#┆
0x24b00…24b20 46 46 29 2a 38 0d 0a 20 20 20 20 20 20 20 20 20 6d 75 73 74 20 62 65 20 70 6f 73 69 74 69 76 65 ┆FF)*8 must be positive┆
0x24b20…24b40 2e 20 54 68 65 20 76 61 6c 75 65 20 67 69 76 65 73 20 6e 75 6d 62 65 72 20 6f 66 20 62 79 74 65 ┆. The value gives number of byte┆
0x24b40…24b60 73 20 69 6e 20 74 68 65 0d 0a 20 20 20 20 20 20 20 20 20 73 75 70 65 72 76 69 73 6f 72 20 73 74 ┆s in the supervisor st┆
0x24b60…24b80 61 63 6b 20 74 68 61 74 20 63 61 6e 20 62 65 20 75 73 65 64 20 62 79 20 74 68 65 20 69 6e 74 65 ┆ack that can be used by the inte┆
0x24b80…24ba0 72 72 75 70 74 0d 0a 20 20 20 20 20 20 20 20 20 70 72 6f 63 65 64 75 72 65 73 2e 0d 0a 0d 0a 20 ┆rrupt procedures. ┆
0x24ba0…24bc0 20 20 20 20 20 20 20 20 54 72 70 38 53 74 61 63 6b 20 3d 20 31 36 23 46 45 20 3f 20 53 74 61 63 ┆ Trp8Stack = 16#FE ? Stac┆
0x24bc0…24be0 6b 20 73 70 61 63 65 20 72 65 71 75 69 72 65 64 20 74 6f 20 73 61 76 65 20 74 68 65 20 70 72 6f ┆k space required to save the pro┆
0x24be0…24c00 63 65 73 73 6f 72 0d 0a 20 20 20 20 20 20 20 20 20 73 74 61 74 65 20 77 68 65 6e 20 74 72 61 70 ┆cessor state when trap┆
0x24c00…24c20 (29, 1, 5) 68 62 6f 75 72 20 63 68 61 69 6e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆hbour chain ┆
0x24c20…24c40 20 20 20 20 65 6c 65 6d 65 6e 74 20 74 6f 77 61 72 64 73 20 74 68 65 20 63 68 61 69 6e 20 68 65 ┆ element towards the chain he┆
0x24c40…24c60 61 64 20 61 6c 6f 6e 67 20 74 68 65 20 6c 69 6e 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ad along the line ┆
0x24c60…24c80 20 20 20 20 20 20 20 20 20 20 6f 66 20 6e 65 78 74 2d 70 6f 69 6e 74 65 72 73 2e 0d 0a 20 20 20 ┆ of next-pointers. ┆
0x24c80…24ca0 20 20 20 50 72 65 76 3a 20 41 74 20 63 61 6c 6c 3a 20 41 6e 79 20 76 61 6c 75 65 2e 0d 0a 20 20 ┆ Prev: At call: Any value. ┆
0x24ca0…24cc0 20 20 20 20 20 20 20 20 20 20 41 74 20 72 65 74 75 72 6e 3a 20 3d 20 45 6c 65 6d 5e 2e 50 72 65 ┆ At return: = Elem^.Pre┆
0x24cc0…24ce0 76 3b 20 50 6f 69 6e 74 73 20 74 6f 20 74 68 65 20 6e 65 69 67 68 62 6f 75 72 20 63 68 61 69 6e ┆v; Points to the neighbour chain┆
0x24ce0…24d00 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6c 65 6d 65 6e 74 ┆ element┆
0x24d00…24d20 20 74 6f 77 61 72 64 73 20 74 68 65 6e 20 63 68 61 69 6e 20 68 65 61 64 20 61 6c 6f 6e 67 20 74 ┆ towards then chain head along t┆
0x24d20…24d40 68 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6c 69 6e 65 20 ┆he line ┆
0x24d40…24d60 6f 66 20 70 72 65 76 2d 70 6f 69 6e 74 65 72 73 2e 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 42 45 47 ┆of prev-pointers. *) BEG┆
0x24d60…24d80 49 4e 0d 0a 0d 0a 20 20 20 20 20 20 28 2a 20 4f 62 76 69 6f 75 73 20 70 65 72 66 6f 72 6d 61 6e ┆IN (* Obvious performan┆
0x24d80…24da0 63 65 20 69 6d 70 72 6f 76 65 6d 65 6e 74 73 20 63 61 6e 20 62 65 20 6f 62 74 61 69 6e 65 64 20 ┆ce improvements can be obtained ┆
0x24da0…24dc0 69 66 20 74 68 65 0d 0a 20 20 20 20 20 20 20 20 72 65 64 75 6e 64 61 6e 74 20 70 61 72 61 6d 65 ┆if the redundant parame┆
0x24dc0…24de0 74 65 72 73 20 61 72 65 20 6f 6d 69 74 74 65 64 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 4e 65 78 ┆ters are omitted *) Nex┆
0x24de0…24e00 74 20 3a 3d 20 45 6c 65 6d 5e 2e 4e 65 78 74 3b 0d 0a 20 20 20 20 20 20 50 72 65 76 20 3a 3d 20 ┆t := Elem^.Next; Prev := ┆
0x24e00…25000 (29, 1, 6) DataBlock {»COMDEF2.PAS«}
[…0x1…]
0x25200…25220 (29, 1, 8) 45 6c 65 6d 5e 2e 50 72 65 76 3b 0d 0a 20 20 20 20 20 20 50 72 65 76 5e 2e 4e 65 78 74 20 3a 3d ┆Elem^.Prev; Prev^.Next :=┆
0x25220…25240 20 4e 65 78 74 3b 0d 0a 20 20 20 20 20 20 4e 65 78 74 5e 2e 50 72 65 76 20 3a 3d 20 50 72 65 76 ┆ Next; Next^.Prev := Prev┆
0x25240…25260 3b 0d 0a 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 28 2a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆; END; (*--------------┆
0x25260…25280 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d ┆--------------------------------┆
0x25280…252a0 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 20 20 49 4e 49 54 5f 48 ┆---------------------- INIT_H┆
0x252a0…252c0 45 41 44 20 4d 41 43 52 4f 20 20 2a 29 0d 0a 0d 0a 20 20 20 50 52 4f 43 45 44 55 52 45 20 49 6e ┆EAD MACRO *) PROCEDURE In┆
0x252c0…252e0 69 74 48 65 61 64 28 55 4e 49 56 20 20 20 20 20 45 6c 65 6d 3a 20 43 68 61 69 6e 50 6f 69 6e 74 ┆itHead(UNIV Elem: ChainPoint┆
0x252e0…25300 65 72 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2c 20 ┆erType; , ┆
0x25300…25320 20 20 20 20 56 41 52 20 41 62 73 45 6c 65 6d 3a 20 52 65 66 53 74 6f 72 65 0d 0a 20 20 20 20 20 ┆ VAR AbsElem: RefStore ┆
0x25320…25340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 3b 0d 0a 0d 0a 20 20 20 28 2a 20 4d 61 6b 65 ┆ ); (* Make┆
0x25340…25360 73 20 63 68 61 69 6e 20 65 6c 65 6d 65 6e 74 20 73 65 6c 66 2d 72 65 66 65 72 65 6e 63 69 6e 67 ┆s chain element self-referencing┆
0x25360…25380 0d 0a 0d 0a 20 20 20 20 20 20 45 6c 65 6d 3a 20 50 6f 69 6e 74 73 20 74 6f 20 63 68 61 69 6e 20 ┆ Elem: Points to chain ┆
0x25380…253a0 65 6c 65 6d 65 6e 74 20 74 6f 20 62 65 20 6d 61 64 65 20 73 65 6c 66 2d 72 65 66 65 72 65 6e 63 ┆element to be made self-referenc┆
0x253a0…253c0 69 6e 67 2e 0d 0a 20 20 20 20 20 20 41 62 73 45 6c 65 6d 3a 20 41 74 20 63 61 6c 6c 3a 20 41 6e ┆ing. AbsElem: At call: An┆
0x253c0…253e0 79 20 76 61 6c 75 65 2e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 74 20 72 65 74 75 ┆y value. At retu┆
0x253e0…25400 72 6e 3a 20 54 68 65 20 65 66 66 65 63 74 69 76 65 20 28 76 69 72 74 75 61 6c 29 20 61 64 64 72 ┆rn: The effective (virtual) addr┆
0x25400…25600 (29, 1, 9) DataBlock {»COMDEF2.PAS«}
[…0x1…]
0x25800…25a00 (30, 0, 1) DataBlock {»KNELVAR.PAS«}
[…0x3…]
0x26000…26200 (30, 0, 5) DataBlock {»KERNEL.PRN«}
0x26200…26400 (30, 0, 6) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x26600…26800 (30, 0, 8) DataBlock {»KERNEL.PRN«}
0x26800…26a00 (30, 0, 9) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x26c00…26e00 (31, 1, 1) DataBlock {»KERNEL.PRN«}
0x26e00…27000 (31, 1, 2) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x27200…27400 (31, 1, 4) DataBlock {»KERNEL.PRN«}
0x27400…27600 (31, 1, 5) DataBlock {»KNELVAR.PAS«}
[…0x9…]
0x28800…28a00 (32, 0, 5) DataBlock {»PRGNOTES.TXT«}
0x28a00…28c00 (32, 0, 6) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x28e00…29000 (32, 0, 8) DataBlock {»PRGNOTES.TXT«}
0x29000…29200 (32, 0, 9) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x29400…29600 (33, 1, 1) DataBlock {»PRGNOTES.TXT«}
0x29600…29800 (33, 1, 2) DataBlock {»KERNEL.PRN«}
[…0x1…]
0x29a00…29a80 (33, 1, 4) DataBlock {»PRGNOTES.TXT«}
0x29a80…29aa0 20 20 20 41 31 3a 3d 4d 41 4e 41 47 45 52 20 53 54 52 55 43 54 3b 0d 0a 20 20 20 20 4d 4f 56 45 ┆ A1:=MANAGER STRUCT; MOVE┆
0x29aa0…29ac0 20 20 20 45 4e 5f 4f 46 46 28 41 32 29 2c 44 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 31 ┆ EN_OFF(A2),D1 D1┆
0x29ac0…29ae0 3a 3d 4d 41 4e 41 47 45 52 20 50 54 20 52 45 4c 3b 0d 0a 20 20 20 20 42 54 53 54 2e 42 20 23 50 ┆:=MANAGER PT REL; BTST.B #P┆
0x29ae0…29b00 54 5f 4c 53 43 2c 50 54 5f 49 4e 46 28 41 31 2c 44 31 29 0d 0a 20 20 49 46 20 3c 45 51 3e 20 54 ┆T_LSC,PT_INF(A1,D1) IF <EQ> T┆
0x29b00…29b20 48 45 4e 2e 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 4e 4f 4e 20 ┆HEN.S IF NON ┆
0x29b20…29b40 4c 4f 43 41 4c 20 4d 41 4e 5f 53 45 54 20 54 48 45 4e 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 23 ┆LOCAL MAN_SET THEN MOVE.L #┆
0x29b40…29b60 44 55 4d 5f 4d 41 4e 2c 41 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 35 3a 3d 4d 41 ┆DUM_MAN,A5 A5:=MA┆
0x29b60…29b80 4e 41 47 45 52 20 4f 42 4a 3a 3d 44 55 4d 4d 59 20 4d 41 4e 41 47 45 52 0d 0a 20 20 45 4c 53 45 ┆NAGER OBJ:=DUMMY MANAGER ELSE┆
0x29b80…29ba0 2e 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c ┆.S EL┆
0x29ba0…29bc0 53 45 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 45 4e 5f 4f 42 4a 28 41 31 29 2c 41 35 20 20 20 20 ┆SE MOVE.L EN_OBJ(A1),A5 ┆
0x29bc0…29be0 20 20 20 20 20 20 20 20 20 20 41 35 3a 3d 4d 41 4e 41 47 45 52 20 4f 42 4a 3a 3d 4d 41 4e 41 47 ┆ A5:=MANAGER OBJ:=MANAG┆
0x29be0…29c00 45 52 20 53 54 52 55 43 54 2e 4f 42 4a 45 43 54 3b 0d 0a 20 20 45 4e 44 49 20 20 20 20 20 20 20 ┆ER STRUCT.OBJECT; ENDI ┆
0x29c00…29e00 (33, 1, 5) DataBlock {»KERNEL.PRN«}
[…0x2d…]
0x2f800…2fa00 (38, 0, 1) DataBlock {»KERNEL.LOG«}
0x2fa00…2fc00 (38, 0, 2) DataBlock {»KERNEL.PRN«}
[…0x1…]
0x2fe00…30000 (38, 0, 4) DataBlock {»KERNEL.LOG«}
0x30000…30200 (38, 0, 5) DataBlock {»KERNEL.PRN«}
[…0x1…]
0x30400…30600 (38, 0, 7) DataBlock {»KERNEL.LOG«}
0x30600…30800 (38, 0, 8) DataBlock {»KERNEL.PRN«}
[…0x1…]
0x30a00…30c00 (38, 0, 10) DataBlock {»KERNEL.LOG«}
0x30c00…30e00 (39, 1, 1) DataBlock {»KERNEL.PRN«}
[…0x78…]
0x3fe00…40000 (51, 1, 2) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x40200…40400 (51, 1, 4) DataBlock {»KERNEL.PRN«}
0x40400…40600 (51, 1, 5) DataBlock {»KNELVAR.PAS«}
[…0x6…]
0x41200…41220 (52, 0, 2) 64 72 2e 20 6f 66 20 70 72 69 6f 72 20 6d 65 6d 20 72 65 63 20 2a 29 0d 0a 20 20 20 20 20 20 20 ┆dr. of prior mem rec *) ┆
0x41220…41240 20 20 4d 52 5f 46 73 74 3a 20 41 64 64 72 65 73 73 54 79 70 65 3b 20 20 28 2a 20 41 64 64 72 2e ┆ MR_Fst: AddressType; (* Addr.┆
0x41240…41260 20 6f 66 20 66 69 72 73 74 20 66 72 65 65 20 62 79 74 65 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 ┆ of first free byte *) ┆
0x41260…41280 20 4d 52 5f 46 72 65 3a 20 49 6e 74 65 67 65 72 3b 20 28 2a 20 4e 75 6d 62 65 72 20 6f 66 20 62 ┆ MR_Fre: Integer; (* Number of b┆
0x41280…412a0 79 74 65 73 20 69 6e 20 74 68 65 20 66 72 65 65 20 70 61 72 74 20 2a 29 0d 0a 20 20 20 20 20 20 ┆ytes in the free part *) ┆
0x412a0…412c0 20 20 20 4d 52 5f 46 69 78 3a 20 4d 52 5f 46 69 78 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 ┆ MR_Fix: MR_FixType; ┆
0x412c0…412e0 20 4d 52 5f 54 79 70 3a 20 4d 52 5f 54 79 70 54 79 70 65 3b 0d 0a 20 20 20 20 20 20 20 20 45 4e ┆ MR_Typ: MR_TypType; EN┆
0x412e0…41300 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 4c 6f 61 64 4d 6f 64 75 6c 65 48 65 61 64 65 72 50 6f 69 6e ┆D; LoadModuleHeaderPoin┆
0x41300…41320 74 65 72 54 79 70 65 20 3d 20 5e 4c 6f 61 64 4d 6f 64 75 6c 65 48 61 65 61 64 65 72 54 79 70 65 ┆terType = ^LoadModuleHaeaderType┆
0x41320…41340 3b 0d 0a 20 20 20 20 20 20 4c 6f 61 64 4d 6f 64 75 6c 65 48 65 61 64 65 72 54 79 70 65 20 3d 20 ┆; LoadModuleHeaderType = ┆
0x41340…41360 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 4d 4f 44 5f 48 73 69 7a 3a 20 77 6f 72 64 3b ┆RECORD MOD_Hsiz: word;┆
0x41360…41380 20 28 2a 20 54 68 65 20 73 69 7a 65 20 6f 66 20 74 68 65 20 6d 6f 64 75 6c 65 20 68 65 61 64 65 ┆ (* The size of the module heade┆
0x41380…413a0 72 20 73 65 67 6d 65 6e 74 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 4d 4f 44 5f 53 69 7a 65 3a ┆r segment *) MOD_Size:┆
0x413a0…413c0 20 69 6e 74 65 67 65 72 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ integer; ┆
0x413c0…413e0 20 20 20 20 28 2a 20 54 68 65 20 73 69 7a 65 20 6f 66 20 74 68 65 20 77 68 6f 6c 65 20 6d 6f 64 ┆ (* The size of the whole mod┆
0x413e0…41400 75 6c 65 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ule ┆
0x41400…41600 (52, 0, 3) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x41800…41820 (52, 0, 5) 0d 0a 20 20 20 20 20 20 46 55 4e 43 54 49 4f 4e 20 50 74 72 56 61 6c 28 0d 0a 20 20 20 20 20 20 ┆ FUNCTION PtrVal( ┆
0x41820…41840 20 20 20 28 2a 55 4e 49 56 2a 29 20 78 3a 20 41 64 64 72 65 73 73 54 79 70 65 29 3a 20 41 64 64 ┆ (*UNIV*) x: AddressType): Add┆
0x41840…41860 72 65 73 73 54 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 ┆ressType; BEGIN ┆
0x41860…41880 20 20 20 20 20 50 74 72 56 61 6c 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a ┆ PtrVal := x END; ┆
0x41880…418a0 0d 0a 20 20 20 20 20 20 46 55 4e 43 54 49 4f 4e 20 4d 65 6d 52 65 63 50 74 72 28 0d 0a 20 20 20 ┆ FUNCTION MemRecPtr( ┆
0x418a0…418c0 20 20 20 20 20 20 28 2a 55 4e 49 56 2a 29 20 78 3a 20 4d 65 6d 52 65 63 50 6f 69 6e 74 65 72 54 ┆ (*UNIV*) x: MemRecPointerT┆
0x418c0…418e0 79 70 65 29 3a 20 4d 65 6d 52 65 63 50 6f 69 6e 74 65 72 54 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 ┆ype): MemRecPointerType; ┆
0x418e0…41900 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 4d 65 6d 52 65 63 50 74 72 20 3a 3d ┆ BEGIN MemRecPtr :=┆
0x41900…41920 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 46 55 4e 43 54 49 ┆ x END; FUNCTI┆
0x41920…41940 4f 4e 20 4c 64 4d 64 50 74 72 28 0d 0a 20 20 20 20 20 20 20 20 20 28 2a 55 4e 49 56 2a 29 20 78 ┆ON LdMdPtr( (*UNIV*) x┆
0x41940…41960 3a 20 4c 6f 61 64 4d 6f 64 75 6c 65 48 65 61 64 65 72 50 6f 69 6e 74 65 72 54 79 70 65 29 3a 20 ┆: LoadModuleHeaderPointerType): ┆
0x41960…41980 4c 6f 61 64 4d 6f 64 75 6c 65 48 65 61 64 65 72 50 6f 69 6e 74 65 72 54 79 70 65 3b 0d 0a 0d 0a ┆LoadModuleHeaderPointerType; ┆
0x41980…419a0 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 4c 64 4d 64 50 74 72 20 ┆ BEGIN LdMdPtr ┆
0x419a0…419c0 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 46 55 4e 43 ┆:= x END; FUNC┆
0x419c0…419e0 54 49 4f 4e 20 43 68 61 69 6e 50 74 72 28 0d 0a 20 20 20 20 20 20 20 20 20 28 2a 55 4e 49 56 2a ┆TION ChainPtr( (*UNIV*┆
0x419e0…41a00 29 20 78 3a 20 43 68 61 69 6e 50 6f 69 6e 74 65 72 54 79 70 65 29 3a 20 43 68 61 69 6e 50 6f 69 ┆) x: ChainPointerType): ChainPoi┆
0x41a00…41c00 (52, 0, 6) DataBlock {»KNELVAR.PAS«}
[…0x1…]
0x41e00…41e20 (52, 0, 8) 6e 74 65 72 54 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 ┆nterType; BEGIN ┆
0x41e20…41e40 20 20 20 20 20 43 68 61 69 6e 50 74 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b ┆ ChainPtr := x END;┆
0x41e40…41e60 0d 0a 0d 0a 20 20 20 20 20 20 46 55 4e 43 54 49 4f 4e 20 4c 64 4d 64 4f 62 6a 44 73 63 50 74 72 ┆ FUNCTION LdMdObjDscPtr┆
0x41e60…41e80 28 0d 0a 20 20 20 20 20 20 20 20 20 28 2a 55 4e 49 56 2a 29 20 78 3a 20 4c 64 4d 64 4f 62 6a 44 ┆( (*UNIV*) x: LdMdObjD┆
0x41e80…41ea0 73 63 54 79 70 65 29 3a 20 4c 64 4d 64 4f 62 6a 44 73 63 54 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 ┆scType): LdMdObjDscType; ┆
0x41ea0…41ec0 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 4c 64 4d 64 4f 62 6a 44 73 63 50 74 ┆ BEGIN LdMdObjDscPt┆
0x41ec0…41ee0 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 46 55 ┆r := x END; FU┆
0x41ee0…41f00 4e 43 54 49 4f 4e 20 4c 64 4d 64 48 64 72 50 74 72 28 0d 0a 20 20 20 20 20 20 20 20 20 28 2a 55 ┆NCTION LdMdHdrPtr( (*U┆
0x41f00…41f20 4e 49 56 2a 29 20 78 3a 20 4c 64 4d 64 48 64 72 50 74 72 54 79 70 65 29 3a 20 4c 64 4d 64 48 64 ┆NIV*) x: LdMdHdrPtrType): LdMdHd┆
0x41f20…41f40 72 50 74 72 54 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 ┆rPtrType; BEGIN ┆
0x41f40…41f60 20 20 20 20 20 4c 64 4d 64 48 64 72 50 74 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e ┆ LdMdHdrPtr := x EN┆
0x41f60…41f80 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 46 55 4e 43 54 49 4f 4e 20 4c 64 4d 64 4c 44 53 44 50 74 72 ┆D; FUNCTION LdMdLDSDPtr┆
0x41f80…41fa0 28 0d 0a 20 20 20 20 20 20 20 20 20 28 2a 55 4e 49 56 2a 29 20 78 3a 20 4c 64 4d 64 4c 44 53 44 ┆( (*UNIV*) x: LdMdLDSD┆
0x41fa0…41fc0 50 74 72 54 79 70 65 29 3a 20 4c 64 4d 64 4c 44 53 44 50 74 72 54 79 70 65 3b 0d 0a 0d 0a 20 20 ┆PtrType): LdMdLDSDPtrType; ┆
0x41fc0…41fe0 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 4c 64 4d 64 4c 44 53 44 50 74 ┆ BEGIN LdMdLDSDPt┆
0x41fe0…42000 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 46 55 ┆r := x END; FU┆
0x42000…42080 (52, 0, 9) DataBlock {»KNELVAR.PAS«}
0x42080…420a0 75 74 20 66 72 6f 6d 20 61 6c 6c 6f 63 2f 64 65 61 6c 6c 6f 63 20 69 73 20 67 65 6e 65 72 61 74 ┆ut from alloc/dealloc is generat┆
0x420a0…420c0 65 64 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 62 ┆ed when b┆
0x420c0…420e0 69 74 20 7a 65 72 6f 20 6f 66 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 65 71 75 61 6c 73 20 ┆it zero of this variable equals ┆
0x420e0…42100 6f 6e 65 20 2a 29 0d 0a 0d 0a 20 20 20 54 59 50 45 20 28 2a 20 4d 4d 50 52 4f 43 53 20 2a 29 0d ┆one *) TYPE (* MMPROCS *) ┆
0x42100…42120 0a 20 20 20 20 20 20 4d 52 5f 46 69 78 54 79 70 65 20 3d 20 28 44 79 6e 61 6d 69 63 2c 20 49 6e ┆ MR_FixType = (Dynamic, In┆
0x42120…42140 69 74 69 61 6c 29 3b 0d 0a 20 20 20 20 20 20 4d 52 5f 54 79 70 54 79 70 65 20 3d 20 28 46 72 65 ┆itial); MR_TypType = (Fre┆
0x42140…42160 65 2c 20 4b 65 72 6e 65 6c 2c 20 55 73 65 72 29 3b 0d 0a 20 20 20 20 20 20 4d 65 6d 52 65 63 50 ┆e, Kernel, User); MemRecP┆
0x42160…42180 6f 69 6e 74 65 72 54 79 70 65 20 3d 20 5e 4d 65 6d 52 65 63 54 79 70 65 3b 0d 0a 20 20 20 20 20 ┆ointerType = ^MemRecType; ┆
0x42180…421a0 20 4d 65 6d 52 65 63 54 79 70 65 20 3d 20 52 45 43 4f 52 44 0d 0a 20 20 20 20 20 20 20 20 20 4d ┆ MemRecType = RECORD M┆
0x421a0…421c0 52 5f 4e 78 74 3a 20 4d 65 6d 52 65 63 50 6f 69 6e 74 65 72 54 79 70 65 3b 20 28 2a 20 41 64 64 ┆R_Nxt: MemRecPointerType; (* Add┆
0x421c0…421e0 72 2e 20 6f 66 20 6e 65 78 74 20 6d 65 6d 20 72 65 63 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 ┆r. of next mem rec *) ┆
0x421e0…42200 4d 52 5f 50 72 76 3a 20 4d 65 6d 52 65 63 50 6f 69 6e 74 65 72 54 79 70 65 3b 20 28 2a 20 41 64 ┆MR_Prv: MemRecPointerType; (* Ad┆
0x42200…42400 (52, 0, 10) DataBlock {»KNELVAR.PAS«}
0x42400…42420 (53, 1, 1) 4e 43 54 49 4f 4e 20 4c 64 4d 64 4c 53 44 50 74 72 28 0d 0a 20 20 20 20 20 20 20 20 20 28 2a 55 ┆NCTION LdMdLSDPtr( (*U┆
0x42420…42440 4e 49 56 2a 29 20 78 3a 20 4c 64 4d 64 4c 53 44 50 74 72 54 79 70 65 29 3a 20 4c 64 4d 64 4c 53 ┆NIV*) x: LdMdLSDPtrType): LdMdLS┆
0x42440…42460 44 50 74 72 54 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 ┆DPtrType; BEGIN ┆
0x42460…42480 20 20 20 20 20 4c 64 4d 64 4c 53 44 50 74 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e ┆ LdMdLSDPtr := x EN┆
0x42480…424a0 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 46 55 4e 43 54 49 4f 4e 20 47 65 50 74 72 28 0d 0a 20 20 20 ┆D; FUNCTION GePtr( ┆
0x424a0…424c0 20 20 20 20 20 20 28 2a 55 4e 49 56 2a 29 20 78 3a 20 47 65 50 74 72 54 79 70 65 29 3a 20 47 65 ┆ (*UNIV*) x: GePtrType): Ge┆
0x424c0…424e0 50 74 72 54 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 ┆PtrType; BEGIN ┆
0x424e0…42500 20 20 20 20 47 65 50 74 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a ┆ GePtr := x END; ┆
0x42500…42520 20 20 20 20 20 20 46 55 4e 43 54 49 4f 4e 20 53 75 50 74 72 28 0d 0a 20 20 20 20 20 20 20 20 20 ┆ FUNCTION SuPtr( ┆
0x42520…42540 28 2a 55 4e 49 56 2a 29 20 78 3a 20 53 75 50 74 72 54 79 70 65 29 3a 20 53 75 50 74 72 54 79 70 ┆(*UNIV*) x: SuPtrType): SuPtrTyp┆
0x42540…42560 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 53 75 ┆e; BEGIN Su┆
0x42560…42580 50 74 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 20 20 20 ┆Ptr := x END; ┆
0x42580…425a0 46 55 4e 43 54 49 4f 4e 20 50 6f 69 6e 74 65 72 50 74 72 28 0d 0a 20 20 20 20 20 20 20 20 20 28 ┆FUNCTION PointerPtr( (┆
0x425a0…425c0 2a 55 4e 49 56 2a 29 20 78 3a 20 50 6f 69 6e 74 65 72 50 74 72 54 79 70 65 20 29 3a 20 50 6f 69 ┆*UNIV*) x: PointerPtrType ): Poi┆
0x425c0…425e0 6e 74 65 72 50 74 72 54 79 70 65 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 ┆nterPtrType; BEGIN ┆
0x425e0…42600 20 20 20 20 20 20 20 20 50 6f 69 6e 74 65 72 50 74 72 20 3a 3d 20 78 0d 0a 20 20 20 20 20 20 20 ┆ PointerPtr := x ┆
0x42600…42800 (53, 1, 2) DataBlock {»IMMUPROC.PAS«}
[…0x1…]
0x42a00…42a20 (53, 1, 4) 20 45 4e 44 3b 0d 0a 0d 0a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆ END; ┆
0x42a20…42a40 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆ ┆
[…0x2…]
0x42a80…42aa0 6c 6f 61 64 20 73 65 63 74 69 6f 6e 20 64 65 73 63 72 69 70 74 69 6f 6e 20 2a 29 0d 0a 20 20 20 ┆load section description *) ┆
0x42aa0…42ac0 20 20 20 20 20 45 4e 44 3b 0d 0a 0d 0a 20 20 20 43 4f 4e 53 54 20 28 2a 20 4d 4d 50 52 4f 43 53 ┆ END; CONST (* MMPROCS┆
0x42ac0…42ae0 20 2a 29 0d 0a 20 20 20 20 20 20 4d 52 5f 53 69 7a 20 3d 20 73 69 7a 65 6f 66 28 4d 65 6d 52 65 ┆ *) MR_Siz = sizeof(MemRe┆
0x42ae0…42b00 63 54 79 70 65 29 3b 0d 0a 0d 0a 20 20 20 56 41 52 20 28 2a 20 4d 4d 50 72 6f 63 73 20 2a 29 0d ┆cType); VAR (* MMProcs *) ┆
0x42b00…42b20 0a 20 20 20 20 20 20 46 5f 41 6c 6c 6f 63 3a 20 41 64 64 72 65 73 73 54 79 70 65 3b 20 20 20 28 ┆ F_Alloc: AddressType; (┆
0x42b20…42b40 2a 20 41 64 64 72 65 73 73 20 6f 66 20 74 68 65 20 66 69 72 73 74 20 6d 65 6d 5f 72 65 63 20 2a ┆* Address of the first mem_rec *┆
0x42b40…42b60 29 0d 0a 20 20 20 20 20 20 4c 5f 41 6c 6c 6f 63 3a 20 41 64 64 72 65 73 73 54 79 70 65 3b 20 20 ┆) L_Alloc: AddressType; ┆
0x42b60…42b80 20 28 2a 20 41 64 64 72 65 73 73 20 6f 66 20 74 68 65 20 6c 61 73 74 20 6d 65 6d 5f 72 65 63 20 ┆ (* Address of the last mem_rec ┆
0x42b80…42ba0 2a 29 0d 0a 20 20 20 20 20 20 46 5f 53 75 70 76 73 3a 20 41 64 64 72 65 73 73 54 79 70 65 3b 20 ┆*) F_Supvs: AddressType; ┆
0x42ba0…42bc0 20 20 28 2a 20 41 64 64 72 65 73 73 20 6f 66 20 74 68 65 20 73 75 70 65 72 76 69 73 6f 72 20 73 ┆ (* Address of the supervisor s┆
0x42bc0…42be0 74 61 63 6b 20 28 66 69 72 73 74 20 62 79 74 65 29 20 2a 29 0d 0a 20 20 20 20 20 20 50 61 67 65 ┆tack (first byte) *) Page┆
0x42be0…42c00 5f 54 61 62 3a 20 41 64 64 72 65 73 73 54 79 70 65 3b 20 20 28 2a 20 41 64 64 72 65 73 73 20 6f ┆_Tab: AddressType; (* Address o┆
0x42c00…42e00 (53, 1, 5) DataBlock {»IMMUPROC.PAS«}
[…0x24…]
0x47600…47800 (57, 1, 2) DataBlock {»KERNEL.PRN«}
0x47800…47820 (57, 1, 3) 69 62 69 6e 67 20 74 68 65 20 6c 6f 63 61 6c 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 73 65 63 ┆ibing the local sec┆
0x47820…47840 74 69 6f 6e 73 20 6f 66 20 74 68 65 20 6d 6f 64 75 6c 65 20 2a 29 0d 0a 0d 0a 20 20 20 20 20 20 ┆tions of the module *) ┆
0x47840…47860 20 20 20 4d 4d 5f 43 72 65 28 53 55 5f 53 69 7a 2b 53 50 5f 53 69 7a 2c 20 30 2c 20 4b 65 72 6e ┆ MM_Cre(SU_Siz+SP_Siz, 0, Kern┆
0x47860…47880 65 6c 50 61 72 74 2c 20 55 73 65 72 50 61 72 74 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 57 49 54 ┆elPart, UserPart); WIT┆
0x47880…478a0 48 20 4c 64 4d 64 48 64 72 50 74 72 28 4b 56 5f 53 74 75 62 29 5e 2c 20 53 75 50 74 72 28 4b 65 ┆H LdMdHdrPtr(KV_Stub)^, SuPtr(Ke┆
0x478a0…478c0 72 6e 65 6c 50 61 72 74 29 5e 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d ┆rnelPart)^ DO BEGIN ┆
0x478c0…478e0 0a 20 20 20 20 20 20 20 20 20 20 20 20 57 49 54 48 20 43 6f 6d 6d 6f 6e 50 61 72 74 20 44 4f 0d ┆ WITH CommonPart DO ┆
0x478e0…47900 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 ┆ BEGIN ┆
0x47900…47920 20 20 20 20 20 4f 42 5f 4b 69 6e 20 3a 3d 20 4f 42 5f 53 45 4f 42 3b 0d 0a 20 20 20 20 20 20 20 ┆ OB_Kin := OB_SEOB; ┆
0x47920…47940 20 20 20 20 20 20 20 20 4f 42 5f 53 74 61 20 3a 3d 20 4f 42 5f 53 55 42 3b 0d 0a 20 20 20 20 20 ┆ OB_Sta := OB_SUB; ┆
0x47940…47960 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 57 49 54 48 20 ┆ END; WITH ┆
0x47960…47980 53 65 67 6d 65 6e 74 50 61 72 74 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 ┆SegmentPart DO BE┆
0x47980…479a0 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 45 5f 49 6f 20 3a 3d 20 30 3b 0d ┆GIN SE_Io := 0; ┆
0x479a0…479c0 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 45 5f 46 69 72 20 3a 3d 20 4b 56 5f 53 74 75 ┆ SE_Fir := KV_Stu┆
0x479c0…479e0 62 20 2b 20 4d 4f 44 5f 48 53 69 7a 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 45 ┆b + MOD_HSiz; SE┆
0x479e0…47a00 5f 4c 65 6e 20 3a 3d 20 4d 4f 44 5f 53 69 7a 65 20 2d 20 4d 4f 44 5f 48 53 69 7a 3b 0d 0a 20 20 ┆_Len := MOD_Size - MOD_HSiz; ┆
0x47a00…47b00 (57, 1, 4) DataBlock {»IMMUPROC.PAS«}
0x47b00…47b20 64 4d 64 2c 20 4b 65 72 6e 65 6c 50 61 72 74 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆dMd, KernelPart); ┆
0x47b20…47b40 20 20 28 2a 2a 2a 2a 20 52 65 6d 6f 76 65 20 64 61 74 61 20 66 72 6f 6d 20 74 68 65 20 70 72 6f ┆ (**** Remove data from the pro┆
0x47b40…47b60 74 65 63 74 69 6e 67 20 61 6c 6c 6f 63 20 73 65 67 6d 65 6e 74 20 2a 29 0d 0a 20 20 20 20 20 20 ┆tecting alloc segment *) ┆
0x47b60…47b80 20 20 20 20 20 20 20 20 20 57 49 54 48 20 41 6c 6c 6f 63 4f 62 6a 20 44 4f 0d 0a 20 20 20 20 20 ┆ WITH AllocObj DO ┆
0x47b80…47ba0 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BEGIN ┆
0x47ba0…47bc0 20 20 20 20 20 53 45 5f 46 69 72 20 3a 3d 20 53 45 5f 46 69 72 20 2b 20 53 65 67 6d 65 6e 74 53 ┆ SE_Fir := SE_Fir + SegmentS┆
0x47bc0…47be0 69 7a 65 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 45 5f 4c 65 6e 20 3a ┆ize; SE_Len :┆
0x47be0…47c00 3d 20 53 45 5f 4c 65 6e 20 2d 20 53 65 67 6d 65 6e 74 53 69 7a 65 3b 0d 0a 20 20 20 20 20 20 20 ┆= SE_Len - SegmentSize; ┆
0x47c00…47e00 (57, 1, 5) DataBlock {»KERNEL.PRN«}
0x47e00…47e20 (57, 1, 6) 20 20 20 20 20 20 20 20 20 20 20 20 20 49 6e 69 74 48 65 61 64 28 53 45 5f 57 61 69 74 2c 20 44 ┆ InitHead(SE_Wait, D┆
0x47e20…47e40 75 6d 6d 79 41 64 64 72 29 3b 20 20 28 2a 20 4d 61 6b 65 20 6c 69 73 74 20 65 6d 70 74 79 20 2a ┆ummyAddr); (* Make list empty *┆
0x47e40…47e60 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 0d 0a 20 20 20 20 20 20 20 20 20 ┆) END; ┆
0x47e60…47e80 20 20 20 43 68 61 69 6e 4f 77 6e 28 4b 65 72 6e 65 6c 50 61 72 74 2c 20 47 65 74 53 74 75 62 45 ┆ ChainOwn(KernelPart, GetStubE┆
0x47e80…47ea0 2c 20 45 4e 5f 53 69 7a 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 2a 2a 2a 20 ┆, EN_Siz); (**** ┆
0x47ea0…47ec0 4c 65 74 20 74 68 65 20 73 65 67 6d 65 6e 74 20 70 6f 69 6e 74 65 72 20 6f 66 20 74 68 65 20 73 ┆Let the segment pointer of the s┆
0x47ec0…47ee0 75 62 73 65 67 6d 65 6e 74 20 70 6f 69 6e 74 20 74 6f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 ┆ubsegment point to ┆
0x47ee0…47f00 20 20 20 20 20 20 74 68 65 20 66 75 6c 73 70 61 63 65 20 73 65 67 6d 65 6e 74 20 6f 62 6a 65 63 ┆ the fulspace segment objec┆
0x47f00…47f20 74 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 57 49 54 48 20 53 75 62 53 65 67 6d 65 6e ┆t *) WITH SubSegmen┆
0x47f20…47f40 74 50 61 72 74 20 44 4f 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 42 45 47 49 4e 0d 0a 20 ┆tPart DO BEGIN ┆
0x47f40…47f60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 69 6d 70 6c 65 50 74 28 53 55 5f 50 2c 20 46 75 6c ┆ SimplePt(SU_P, Ful┆
0x47f60…47f80 53 70 61 63 65 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 55 5f 50 2e 43 6f 6d ┆Space); SU_P.Com┆
0x47f80…47fa0 6d 6f 6e 2e 50 54 5f 4b 69 6e 20 3a 3d 20 50 54 5f 53 65 67 0d 0a 20 20 20 20 20 20 20 20 20 20 ┆mon.PT_Kin := PT_Seg ┆
0x47fa0…47fc0 20 20 20 20 45 4e 44 0d 0a 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 0d 0a 20 20 20 20 20 20 20 ┆ END END ┆
0x47fc0…47fe0 20 45 4e 44 0d 0a 20 20 20 20 20 20 45 4c 53 45 0d 0a 20 20 20 20 20 20 20 20 20 28 2a 20 54 68 ┆ END ELSE (* Th┆
0x47fe0…48000 65 20 73 74 75 62 20 69 73 20 69 6e 20 52 41 4d 2e 20 54 68 65 20 73 65 63 6f 6e 64 20 6f 62 6a ┆e stub is in RAM. The second obj┆
0x48000…48180 (57, 1, 7) DataBlock {»KERNEL.PAS«}
0x48180…481a0 20 2a 29 0d 0a 20 20 20 20 20 20 49 6e 69 74 48 65 61 64 28 54 69 6d 65 72 2c 20 20 20 44 75 6d ┆ *) InitHead(Timer, Dum┆
0x481a0…481c0 6d 79 29 3b 20 20 28 2a 20 51 75 65 75 65 73 20 3a 3d 20 65 6d 70 74 79 20 2a 29 0d 0a 20 20 20 ┆my); (* Queues := empty *) ┆
0x481c0…481e0 20 20 20 49 6e 69 74 48 65 61 64 28 52 75 6e 6e 69 6e 67 2c 20 44 75 6d 6d 79 29 3b 0d 0a 20 20 ┆ InitHead(Running, Dummy); ┆
0x481e0…48200 20 20 20 20 49 6e 69 74 48 65 61 64 28 44 72 69 76 69 6e 67 2c 20 44 75 6d 6d 79 29 3b 0d 0a 20 ┆ InitHead(Driving, Dummy); ┆
0x48200…48400 (57, 1, 8) DataBlock {»KERNEL.PRN«}
[…0x1…]
0x48600…48620 (57, 1, 10) 6e 74 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 54 49 4c 20 28 2a 20 61 36 20 3d ┆nt *) UNTIL (* a6 =┆
0x48620…48640 20 61 37 20 2a 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 20 52 65 73 74 6f 72 65 20 ┆ a7 *); (* Restore ┆
0x48640…48660 6f 6c 64 20 73 74 61 6b 20 70 6f 69 6e 74 65 72 20 61 37 20 3a 3d 20 61 36 3b 20 2a 29 0d 0a 0d ┆old stak pointer a7 := a6; *) ┆
0x48660…48680 0a 0d 0a 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 0d 0a 20 20 20 20 20 20 20 20 20 55 4e 54 49 ┆ END UNTI┆
0x48680…486a0 4c 20 4c 64 4d 44 48 64 72 50 74 72 28 47 65 74 5f 4c 64 4d 64 29 5e 2e 4d 4f 44 5f 53 69 7a 65 ┆L LdMDHdrPtr(Get_LdMd)^.MOD_Size┆
0x486a0…486c0 20 3d 20 30 20 28 2a 20 7a 65 72 6f 20 6d 6f 64 75 6c 65 20 69 73 20 72 65 61 63 68 65 64 20 2a ┆ = 0 (* zero module is reached *┆
0x486c0…486e0 29 3b 0d 0a 20 20 20 20 20 20 20 20 20 49 46 20 41 6c 6c 6f 63 4f 62 6a 2e 53 45 5f 4c 65 6e 20 ┆); IF AllocObj.SE_Len ┆
0x486e0…48700 3c 3e 20 32 35 36 20 54 48 45 4e 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 45 72 72 6f 72 28 37 ┆<> 256 THEN Error(7┆
0x48700…48720 29 3b 20 20 28 2a 20 4d 6f 64 75 6c 65 20 6a 61 6d 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 20 52 ┆); (* Module jam *) R┆
0x48720…48740 65 6d 6f 76 65 55 53 28 41 6c 6c 6f 63 4f 62 6a 2e 53 45 5f 4c 65 6e 2c 20 47 65 74 5f 4c 64 4d ┆emoveUS(AllocObj.SE_Len, Get_LdM┆
0x48740…48760 64 29 3b 0d 0a 0d 0a 20 20 20 20 20 20 28 2a 2a 2a 2a 20 53 65 74 20 75 70 20 70 72 6f 67 72 61 ┆d); (**** Set up progra┆
0x48760…48780 6d 20 72 65 66 20 69 6e 20 6c 6f 63 61 6c 2d 31 20 6f 66 20 73 74 75 62 20 2a 29 0d 0a 20 20 20 ┆m ref in local-1 of stub *) ┆
0x48780…487a0 20 20 20 49 46 20 4b 56 5f 53 74 75 62 20 3c 3e 20 2d 31 20 54 48 45 4e 20 20 28 2a 20 53 74 75 ┆ IF KV_Stub <> -1 THEN (* Stu┆
0x487a0…487c0 62 20 6d 6f 64 75 6c 65 20 69 6e 20 52 4f 4d 20 2a 29 0d 0a 20 20 20 20 20 20 20 20 42 45 47 49 ┆b module in ROM *) BEGI┆
0x487c0…487e0 4e 0d 0a 20 20 20 20 20 20 20 20 20 28 2a 20 43 72 65 61 74 65 20 61 20 73 75 62 73 65 67 6d 65 ┆N (* Create a subsegme┆
0x487e0…48800 6e 74 20 6f 66 20 74 68 65 20 66 75 6c 73 70 61 63 65 20 73 65 67 6d 65 6e 74 20 64 65 73 63 72 ┆nt of the fulspace segment descr┆
0x48800…48a00 (58, 0, 1) DataBlock {»IMMUPROC.BAK«}
0x48a00…48c00 (58, 0, 2) DataBlock {»KERNEL.LOG«}
[…0x1…]
0x48e00…49000 (58, 0, 4) DataBlock {»IMMUPROC.BAK«}
0x49000…49200 (58, 0, 5) DataBlock {»KERNEL.PRN«}
0x49200…49400 (58, 0, 6) DataBlock {»KERNEL.LOG«}
0x49400…49600 (58, 0, 7) DataBlock {»IMMUPROC.BAK«}
0x49600…49800 (58, 0, 8) DataBlock {»KERNEL.PRN«}
0x49800…49a00 (58, 0, 9) DataBlock {»KERNEL.LOG«}
0x49a00…49c00 (58, 0, 10) DataBlock {»IMMUPROC.BAK«}
0x49c00…49e00 (59, 1, 1) DataBlock {»KERNEL.PRN«}
[…0x9…]
0x4b000…4b200 (60, 0, 1) DataBlock {»IPREFACE.PAS«}
0x4b200…4b400 (60, 0, 2) 0xe5[0x200]
0x4b400…4b600 (60, 0, 3) DataBlock {»IPREFACE.PAS«}
[…0x1…]
0x4b800…4ba00 (60, 0, 5) DataBlock {»IMMUPROC.BAK«}
0x4ba00…4bc00 (60, 0, 6) 0xe5[0x200]
0x4bc00…4be00 (60, 0, 7) DataBlock {»IPREFACE.PAS«}
0x4be00…4c000 (60, 0, 8) DataBlock {»IMMUPROC.BAK«}
0x4c000…4c200 (60, 0, 9) 0xe5[0x200]
0x4c200…4c400 (60, 0, 10) DataBlock {»IPREFACE.PAS«}
0x4c400…4c600 (61, 1, 1) DataBlock {»IMMUPROC.BAK«}
0x4c600…4c800 (61, 1, 2) DataBlock {»PREFACE.S«}
0x4c800…4ca00 (61, 1, 3) DataBlock {»IMMUPROC.BAK«}
[…0x1…]
0x4cc00…4ce00 (61, 1, 5) DataBlock {»PREFACE.S«}
0x4ce00…4d000 (61, 1, 6) DataBlock {»IMMUPROC.BAK«}
[…0x1…]
0x4d200…4d400 (61, 1, 8) DataBlock {»PREFACE.S«}
[…0x1…]
0x4d600…4d800 (61, 1, 10) DataBlock {»IMMUPROC.BAK«}
0x4d800…4da00 (62, 0, 1) DataBlock {»PREFACE.S«}
[…0x15…]
0x50380…503a0 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 e5 ┆ ┆
[…0x3…]
0x50400…50600 (64, 0, 3) DataBlock {»PREFACE.S«}
[…0x1…]
0x50800…50a00 (64, 0, 5) DataBlock {»IMMUPROC.BAK«}
0x50a00…50c00 (64, 0, 6) DataBlock {»PREFACE.S«}
[…0x1…]
0x50e00…51000 (64, 0, 8) DataBlock {»IMMUPROC.BAK«}
0x51000…51200 (64, 0, 9) DataBlock {»PREFACE.S«}
[…0x1…]
0x51400…51600 (65, 1, 1) DataBlock {»IMMUPROC.BAK«}
[…0x18…]
0x54500…54520 20 53 49 5a 45 20 4f 46 20 42 4f 4f 54 20 50 52 4f 43 0d 0a 4d 4f 44 5f 45 4e 54 20 20 20 20 44 ┆ SIZE OF BOOT PROC MOD_ENT D┆
0x54520…54540 53 2e 4c 20 20 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 54 52 59 20 41 44 44 52 ┆S.L 1 ENTRY ADDR┆
0x54540…54560 45 53 53 20 54 4f 20 50 52 4f 47 52 41 4d 0d 0a 4d 4f 44 5f 4e 55 4c 31 20 20 20 44 53 2e 57 20 ┆ESS TO PROGRAM MOD_NUL1 DS.W ┆
0x54560…54580 20 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 55 53 45 44 20 46 49 45 4c 44 0d 0a ┆ 1 UNUSED FIELD ┆
0x54580…545a0 4d 4f 44 5f 4c 44 53 53 20 20 20 44 53 2e 57 20 20 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MOD_LDSS DS.W 1 ┆
0x545a0…545c0 20 20 4e 55 4d 42 45 52 20 4f 46 20 4c 4f 43 41 4c 20 44 41 54 41 20 53 45 47 4d 45 4e 54 20 44 ┆ NUMBER OF LOCAL DATA SEGMENT D┆
0x545c0…545e0 45 53 43 52 49 50 54 49 4f 4e 53 0d 0a 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20 4f 46 46 53 45 ┆ESCRIPTIONS OFFSE┆
0x545e0…54600 54 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 4f 43 41 4c 20 44 41 54 41 20 53 45 47 ┆T 0 LOCAL DATA SEG┆
0x54600…54800 (67, 1, 6) DataBlock {»IMMUPROC.BAK«}
[…0x1…]
0x54a00…54a20 (67, 1, 8) 4d 45 4e 54 20 44 45 53 43 52 49 50 54 49 4f 4e 20 46 49 45 4c 44 53 0d 0a 4d 4f 44 5f 44 53 49 ┆MENT DESCRIPTION FIELDS MOD_DSI┆
0x54a20…54a40 5a 20 20 20 44 53 2e 57 20 20 20 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 49 5a 45 20 ┆Z DS.W 1 SIZE ┆
0x54a40…54a60 4f 46 20 44 45 53 43 52 49 50 54 49 4f 4e 0d 0a 4d 4f 44 5f 4e 55 4c 32 20 20 20 44 53 2e 42 20 ┆OF DESCRIPTION MOD_NUL2 DS.B ┆
0x54a60…54a80 20 32 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 48 45 53 45 20 46 49 45 4c 44 53 20 41 ┆ 24 THESE FIELDS A┆
0x54a80…54aa0 52 45 20 4e 4f 54 20 55 53 45 44 0d 0a 4d 4f 44 5f 4c 53 44 53 20 20 20 44 53 2e 57 20 20 20 31 ┆RE NOT USED MOD_LSDS DS.W 1┆
0x54aa0…54ac0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4e 4f 20 4f 46 20 4c 4f 41 44 20 53 45 43 54 49 4f ┆ NO OF LOAD SECTIO┆
0x54ac0…54ae0 4e 20 44 45 53 43 52 49 50 54 49 4f 4e 53 0d 0a 4d 4f 44 5f 4c 44 53 5a 20 20 20 44 53 2e 57 20 ┆N DESCRIPTIONS MOD_LDSZ DS.W ┆
0x54ae0…54b00 20 20 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 49 5a 45 20 4f 46 20 46 49 58 45 44 20 ┆ 0 SIZE OF FIXED ┆
0x54b00…54b20 50 41 52 54 20 4f 46 20 44 41 54 41 20 53 45 47 4d 45 4e 54 20 44 45 53 43 52 49 50 54 49 4f 4e ┆PART OF DATA SEGMENT DESCRIPTION┆
0x54b20…54b40 0d 0a 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20 4f 46 46 53 45 54 20 30 20 20 20 20 20 20 20 20 ┆ OFFSET 0 ┆
0x54b40…54b60 20 20 20 20 20 20 20 4c 4f 41 44 20 53 45 43 54 49 4f 4e 20 44 45 53 43 52 49 50 54 49 4f 4e 20 ┆ LOAD SECTION DESCRIPTION ┆
0x54b60…54b80 46 49 45 4c 44 53 0d 0a 4d 4f 44 5f 4e 55 4c 33 20 20 20 44 53 2e 42 20 20 20 34 20 20 20 20 20 ┆FIELDS MOD_NUL3 DS.B 4 ┆
0x54b80…54ba0 20 20 20 20 20 20 20 20 20 20 54 48 45 53 45 20 46 49 45 4c 44 53 20 41 52 45 20 4e 4f 54 20 55 ┆ THESE FIELDS ARE NOT U┆
0x54ba0…54bc0 53 45 44 0d 0a 4d 4f 44 5f 53 4c 45 4e 20 20 20 44 53 2e 4c 20 20 20 31 20 20 20 20 20 20 20 20 ┆SED MOD_SLEN DS.L 1 ┆
0x54bc0…54be0 20 20 20 20 20 20 20 54 48 45 20 4c 45 4e 47 54 48 20 4f 46 20 54 48 45 20 4c 4f 41 44 20 53 45 ┆ THE LENGTH OF THE LOAD SE┆
0x54be0…54c00 43 54 49 4f 4e 20 53 45 47 4d 45 4e 54 0d 0a 4d 4f 44 5f 4e 55 4c 34 20 20 20 44 53 2e 42 20 20 ┆CTION SEGMENT MOD_NUL4 DS.B ┆
0x54c00…54e00 (67, 1, 9) DataBlock {»IMMUPROC.BAK«}
[…0x1…]
0x55000…55200 (68, 0, 1) DataBlock {»KERNEL.PRN«}
[…0x18…]
0x58080…580a0 00 44 49 4b 55 20 20 20 20 52 4e 4f 00 00 00 04 24 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ DIKU RNO $ ┆
0x580a0…580c0 00 52 45 4e 20 20 20 20 20 53 55 42 00 00 00 02 38 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ REN SUB 8 ┆
0x580c0…580e0 00 39 36 20 20 20 20 20 20 20 20 20 00 00 00 01 39 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ 96 9 ┆
0x580e0…58100 00 50 54 45 4d 24 4e 41 4d 24 24 24 00 00 00 28 3a 01 3c 01 3e 01 00 00 00 00 00 00 00 00 00 00 ┆ PTEM$NAM$$$ (: < > ┆
0x58100…58120 00 50 52 54 53 54 54 59 50 50 41 53 00 00 00 03 46 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ PRTSTTYPPAS F ┆
0x58120…58140 00 50 52 54 53 54 43 4f 4d 50 41 53 00 00 00 03 47 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ PRTSTCOMPAS G ┆
0x58140…58160 00 50 54 45 4d 24 49 4c 31 24 24 24 00 00 00 40 3b 01 3d 01 3f 01 40 01 00 00 00 00 00 00 00 00 ┆ PTEM$IL1$$$ @; = ? @ ┆
0x58160…58180 e5 50 54 45 4d 24 49 4c 32 24 24 24 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ PTEM$IL2$$$ ┆
0x58180…581a0 00 4c 4e 4b 20 20 20 20 20 43 4f 4d 01 00 00 80 75 01 76 01 77 01 78 01 79 01 7a 01 7b 01 7c 01 ┆ LNK COM u v w x y z æ ø ┆
0x581a0…581c0 00 50 52 54 53 54 42 54 43 50 41 53 00 00 00 21 2c 01 51 01 52 01 00 00 00 00 00 00 00 00 00 00 ┆ PRTSTBTCPAS !, Q R ┆
0x581c0…581e0 00 4c 4e 4b 20 20 20 20 20 43 4f 4d 02 00 00 02 7d 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ LNK COM å ┆
0x581e0…58200 e5 50 54 45 4d 24 49 4c 32 24 24 24 00 00 00 80 49 01 4a 01 4b 01 4c 01 4d 01 4e 01 4f 01 50 01 ┆ PTEM$IL2$$$ I J K L M N O P ┆
0x58200…58400 (70, 0, 6) DataBlock {»KERNEL.PRN«}
[…0x1…]
0x58600…58620 (70, 0, 8) 54 48 41 54 20 48 4f 4c 44 53 20 54 48 45 20 42 4f 4f 54 20 4c 4f 41 44 45 44 20 4d 4f 44 55 4c ┆THAT HOLDS THE BOOT LOADED MODUL┆
0x58620…58640 45 53 2e 20 54 48 49 53 20 4d 45 4d 5f 52 45 43 20 49 53 0d 0a 2a 20 43 41 4c 4c 45 44 20 22 48 ┆ES. THIS MEM_REC IS * CALLED "H┆
0x58640…58660 4f 4c 44 45 52 22 2e 20 54 48 45 20 4d 4f 44 55 4c 45 53 20 4d 55 53 54 20 42 45 20 50 52 45 53 ┆OLDER". THE MODULES MUST BE PRES┆
0x58660…58680 45 4e 54 20 49 4e 20 4f 4e 45 20 4f 46 20 54 48 45 20 4d 45 4d 5f 52 45 43 53 2e 0d 0a 2a 20 54 ┆ENT IN ONE OF THE MEM_RECS. * T┆
0x58680…586a0 48 45 20 4d 4f 44 55 4c 45 53 20 48 41 56 45 20 42 45 45 4e 20 44 41 4d 41 47 45 44 20 42 59 20 ┆HE MODULES HAVE BEEN DAMAGED BY ┆
0x586a0…586c0 54 48 45 20 50 52 45 56 49 4f 55 53 20 49 4e 49 54 49 41 4c 49 5a 41 54 49 4f 4e 20 49 46 0d 0a ┆THE PREVIOUS INITIALIZATION IF ┆
0x586c0…586e0 2a 20 54 48 45 59 20 57 45 52 45 20 4c 4f 43 41 54 45 44 20 54 4f 4f 20 4e 45 41 52 20 54 4f 20 ┆* THEY WERE LOCATED TOO NEAR TO ┆
0x586e0…58700 54 48 45 20 45 4e 44 20 28 4f 52 20 42 45 47 49 4e 4e 49 4e 47 29 20 4f 46 20 54 48 45 0d 0a 2a ┆THE END (OR BEGINNING) OF THE *┆
0x58700…58720 20 52 41 4d 20 41 52 45 41 20 54 48 41 54 20 48 4f 4c 44 53 20 54 48 45 20 4d 4f 44 55 4c 45 53 ┆ RAM AREA THAT HOLDS THE MODULES┆
0x58720…58740 2e 0d 0a 2a 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 46 5f 41 4c 4c 4f 43 2c 41 31 20 20 20 20 20 ┆. * MOVE.L F_ALLOC,A1 ┆
0x58740…58760 20 20 20 20 20 20 20 20 20 20 20 20 41 31 3a 3d 43 55 52 5f 4d 45 4d 5f 52 45 43 3a 3d 46 49 52 ┆ A1:=CUR_MEM_REC:=FIR┆
0x58760…58780 53 54 5f 4d 45 4d 5f 52 45 43 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 4b 56 5f 42 4f 54 4c 44 2c ┆ST_MEM_REC MOVE.L KV_BOTLD,┆
0x58780…587a0 41 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 33 3a 3d 42 4f 4f 54 20 4c 4f 41 44 45 ┆A3 A3:=BOOT LOADE┆
0x587a0…587c0 44 20 4d 4f 44 55 4c 45 53 3b 0d 0a 20 20 52 45 50 45 41 54 20 20 20 20 20 20 20 20 20 20 20 20 ┆D MODULES; REPEAT ┆
0x587c0…587e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 50 45 41 54 0d 0a 20 20 20 20 4d 4f 56 45 ┆ REPEAT MOVE┆
0x587e0…58800 2e 4c 20 41 31 2c 41 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 30 ┆.L A1,A0 A0┆
0x58800…58a00 (70, 0, 9) DataBlock {»KERNEL.PRN«}
[…0x1…]
0x58c00…58c20 (71, 1, 1) 3a 3d 48 4f 4c 44 45 52 3a 3d 43 55 52 5f 4d 45 4d 5f 52 45 43 3b 0d 0a 20 20 20 20 4d 4f 56 45 ┆:=HOLDER:=CUR_MEM_REC; MOVE┆
0x58c20…58c40 2e 4c 20 28 41 31 29 2c 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 31 ┆.L (A1),A1 A1┆
0x58c40…58c60 3a 3d 43 55 52 5f 4d 45 4d 5f 52 45 43 3a 3d 4e 45 58 54 5f 4d 45 4d 5f 52 45 43 0d 0a 20 20 55 ┆:=CUR_MEM_REC:=NEXT_MEM_REC U┆
0x58c60…58c80 4e 54 49 4c 2e 4c 20 41 31 20 3c 47 54 3e 20 41 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NTIL.L A1 <GT> A3 ┆
0x58c80…58ca0 20 20 20 55 4e 54 49 4c 20 43 55 52 5f 4d 45 4d 5f 52 45 43 20 3e 20 42 4f 4f 54 20 4c 4f 41 44 ┆ UNTIL CUR_MEM_REC > BOOT LOAD┆
0x58ca0…58cc0 45 44 20 4d 4f 44 55 4c 45 53 3b 0d 0a 2a 20 41 30 20 3d 20 48 4f 4c 44 45 52 3b 20 46 49 4e 44 ┆ED MODULES; * A0 = HOLDER; FIND┆
0x58cc0…58ce0 20 4c 45 4e 47 54 48 20 4f 46 20 42 4f 4f 54 20 4c 4f 41 44 45 44 20 4d 4f 44 55 4c 45 53 0d 0a ┆ LENGTH OF BOOT LOADED MODULES ┆
0x58ce0…58d00 2a 20 41 33 3d 46 49 52 53 54 5f 4d 4f 44 55 4c 45 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 33 ┆* A3=FIRST_MODULE MOVE.L A3┆
0x58d00…58d20 2c 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 31 3a 3d 46 49 52 ┆,A1 A1:=FIR┆
0x58d20…58d40 53 54 20 4d 4f 44 55 4c 45 3b 0d 0a 20 20 52 45 50 45 41 54 20 20 20 20 20 20 20 20 20 20 20 20 ┆ST MODULE; REPEAT ┆
0x58d40…58d60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 50 45 41 54 0d 0a 20 20 20 20 4d 4f 56 45 ┆ REPEAT MOVE┆
0x58d60…58d80 2e 4c 20 4d 4f 44 5f 53 49 5a 45 28 41 33 29 2c 44 31 20 20 20 20 20 20 20 20 20 20 20 20 44 31 ┆.L MOD_SIZE(A3),D1 D1┆
0x58d80…58da0 3a 3d 4c 45 4e 47 54 48 20 4f 46 20 4e 45 58 54 20 4d 4f 44 55 4c 45 0d 0a 20 20 20 20 41 44 44 ┆:=LENGTH OF NEXT MODULE ADD┆
0x58da0…58dc0 41 2e 4c 20 44 31 2c 41 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 ┆A.L D1,A3 A┆
0x58dc0…58de0 33 3a 3d 4e 45 58 54 5f 4d 4f 44 55 4c 45 3a 3d 2e 2e 2e 2b 4c 45 4e 47 54 48 3b 0d 0a 20 20 20 ┆3:=NEXT_MODULE:=...+LENGTH; ┆
0x58de0…58e00 20 54 53 54 2e 4c 20 20 44 31 0d 0a 20 20 55 4e 54 49 4c 20 3c 45 51 3e 20 20 20 20 20 20 20 20 ┆ TST.L D1 UNTIL <EQ> ┆
0x58e00…59000 (71, 1, 2) DataBlock {»KERNEL.LOG«}
[…0x1…]
0x59200…59220 (71, 1, 4) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 54 49 4c 20 4c 45 4e 47 54 48 3d 30 3b 0d ┆ UNTIL LENGTH=0; ┆
0x59220…59240 0a 20 20 20 20 4c 45 41 20 20 20 20 32 35 36 28 41 33 29 2c 41 33 20 20 20 20 20 20 20 20 20 20 ┆ LEA 256(A3),A3 ┆
0x59240…59260 20 20 20 20 20 20 20 41 33 3a 3d 41 33 2b 32 35 36 3b 22 49 4e 43 4c 55 44 45 20 54 48 45 20 22 ┆ A3:=A3+256;"INCLUDE THE "┆
0x59260…59280 5a 45 52 4f 22 20 4d 4f 44 55 4c 45 22 0d 0a 20 0d 0a 2a 20 41 30 3d 48 4f 4c 44 45 52 2c 41 31 ┆ZERO" MODULE" * A0=HOLDER,A1┆
0x59280…592a0 3d 46 49 52 53 54 5f 46 49 52 53 54 5f 4d 4f 44 55 4c 45 2c 41 33 3d 54 4f 50 5f 4c 41 53 54 5f ┆=FIRST_FIRST_MODULE,A3=TOP_LAST_┆
0x592a0…592c0 4d 4f 44 55 4c 45 2c 0d 0a 2a 20 52 45 53 54 52 55 43 54 55 52 45 20 54 48 45 20 4d 45 4d 5f 52 ┆MODULE, * RESTRUCTURE THE MEM_R┆
0x592c0…592e0 45 43 20 49 4e 20 41 30 3b 20 43 52 45 41 54 45 20 4d 45 4d 5f 52 45 43 20 41 54 20 41 33 3b 0d ┆EC IN A0; CREATE MEM_REC AT A3; ┆
0x592e0…59300 0a 2a 0d 0a 20 20 20 20 50 52 54 5f 52 45 47 20 42 4f 4f 54 5f 4d 4f 44 55 4c 45 5f 41 30 2f 41 ┆ * PRT_REG BOOT_MODULE_A0/A┆
0x59300…59320 31 2f 41 33 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 ┆1/A3 ******** MOVE.L A┆
0x59320…59340 33 2c 44 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 31 3a 3d 54 4f ┆3,D1 D1:=TO┆
0x59340…59360 50 5f 4c 41 53 54 5f 4d 4f 44 55 4c 45 53 3b 0d 0a 20 20 20 20 54 53 54 2e 42 20 20 44 31 20 20 ┆P_LAST_MODULES; TST.B D1 ┆
0x59360…59380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 45 53 54 20 54 4f 50 5f ┆ TEST TOP_┆
0x59380…593a0 4c 41 53 54 5f 41 44 44 52 45 53 53 3b 0d 0a 20 20 49 46 20 3c 4e 45 3e 20 54 48 45 4e 2e 53 20 ┆LAST_ADDRESS; IF <NE> THEN.S ┆
0x593a0…593c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 44 44 52 45 53 53 20 3c 3e ┆ IF ADDRESS <>┆
0x593c0…593e0 20 50 41 47 45 20 53 54 41 52 54 20 54 48 45 4e 0d 0a 20 20 20 20 45 52 52 4f 52 20 20 31 20 20 ┆ PAGE START THEN ERROR 1 ┆
0x593e0…59400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 54 4f 50 20 57 49 54 ┆ STOP WIT┆
0x59400…59600 (71, 1, 5) DataBlock {»KERNEL.LOG«}
[…0x56…]
0x64200…64220 (80, 0, 2) 20 20 20 20 20 52 45 54 55 52 4e 3b 0d 0a 20 0d 0a 20 20 20 20 50 41 47 45 0d 0a 49 4e 49 54 47 ┆ RETURN; PAGE INITG┆
0x64220…64240 45 49 4e 20 20 20 45 51 55 20 2a 20 20 49 4e 49 54 49 41 4c 49 5a 45 20 47 45 4e 45 52 41 4c 20 ┆EIN EQU * INITIALIZE GENERAL ┆
0x64240…64260 50 41 52 54 20 4f 46 20 53 54 55 42 20 4f 52 20 53 43 48 45 44 55 4c 45 52 20 4f 42 4a 45 43 54 ┆PART OF STUB OR SCHEDULER OBJECT┆
0x64260…64280 2e 0d 0a 2a 20 43 41 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆. * CALL ┆
0x64280…642a0 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 0d 0a 2a 20 41 30 3d 4b 45 52 4e 45 4c 20 50 41 52 54 ┆ RETURN * A0=KERNEL PART┆
0x642a0…642c0 20 4f 46 20 4f 42 4a 45 43 54 20 20 20 20 20 20 20 20 20 20 20 53 41 4d 45 0d 0a 2a 20 41 31 3d ┆ OF OBJECT SAME * A1=┆
0x642c0…642e0 45 4e 54 52 59 20 50 4f 49 4e 54 20 4f 46 20 43 4f 44 45 20 53 45 47 4d 45 4e 54 20 20 20 20 20 ┆ENTRY POINT OF CODE SEGMENT ┆
0x642e0…64300 55 4e 44 45 46 0d 0a 2a 0d 0a 2a 20 46 55 4e 43 54 49 4f 4e 3a 20 41 53 53 49 47 4e 20 45 4e 54 ┆UNDEF * * FUNCTION: ASSIGN ENT┆
0x64300…64320 52 59 20 50 4f 49 4e 54 2c 20 45 58 5f 43 48 41 49 4e 2c 43 4f 4e 54 52 4f 4c 5f 50 52 4f 43 2c ┆RY POINT, EX_CHAIN,CONTROL_PROC,┆
0x64320…64340 4e 4f 5f 4f 46 5f 54 45 4d 50 20 50 4f 49 4e 54 45 52 2f 42 59 54 45 53 2c 0d 0a 2a 20 20 20 20 ┆NO_OF_TEMP POINTER/BYTES, * ┆
0x64340…64360 20 20 20 20 20 20 20 53 54 41 43 4b 20 41 44 44 52 45 53 53 2c 20 52 45 51 55 49 52 45 44 20 46 ┆ STACK ADDRESS, REQUIRED F┆
0x64360…64380 52 45 45 20 53 54 41 43 4b 20 53 50 41 43 45 2c 4f 42 4a 45 43 54 20 53 54 41 54 45 3b 0d 0a 20 ┆REE STACK SPACE,OBJECT STATE; ┆
0x64380…643a0 0d 0a 20 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 31 2c 47 45 5f 45 4e 54 28 41 30 29 20 20 20 ┆ MOVE.L A1,GE_ENT(A0) ┆
0x643a0…643c0 20 20 20 20 20 20 20 20 20 20 20 45 4e 54 52 59 20 50 4f 49 4e 54 20 4f 46 20 4f 42 4a 45 43 54 ┆ ENTRY POINT OF OBJECT┆
0x643c0…643e0 3a 3d 41 31 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 57 20 23 4f 42 5f 47 45 4f 42 3c 3c 38 2b 31 3c ┆:=A1; MOVE.W #OB_GEOB<<8+1<┆
0x643e0…64400 3c 4f 42 5f 52 45 45 4e 2b 31 3c 3c 4f 42 5f 4f 43 43 2c 4f 42 5f 4b 49 4e 28 41 30 29 20 20 4f ┆<OB_REEN+1<<OB_OCC,OB_KIN(A0) O┆
0x64400…64600 (80, 0, 3) DataBlock {»KERNEL.LOG«}
[…0x1…]
0x64800…64820 (80, 0, 5) 42 4a 2e 4b 49 4e 44 3a 3d 47 45 4e 45 52 41 4c 3b 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 ┆BJ.KIND:=GENERAL; * ┆
0x64820…64840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4f 42 4a 2e 53 54 41 ┆ OBJ.STA┆
0x64840…64860 54 45 3a 3d 20 52 45 45 4e 54 52 41 4e 54 2b 4f 57 4e 45 52 53 20 43 41 4c 4c 20 43 41 50 3b 0d ┆TE:= REENTRANT+OWNERS CALL CAP; ┆
0x64860…64880 0a 20 20 20 20 4d 4f 56 45 41 2e 4c 20 4f 42 5f 53 50 41 28 41 30 29 2c 41 31 20 20 20 20 20 20 ┆ MOVEA.L OB_SPA(A0),A1 ┆
0x64880…648a0 20 20 20 20 20 20 20 41 31 3a 3d 53 50 41 43 45 20 44 45 53 43 52 20 4f 46 20 4f 42 4a 45 43 54 ┆ A1:=SPACE DESCR OF OBJECT┆
0x648a0…648c0 0d 0a 20 20 20 20 53 55 42 49 2e 57 20 23 28 47 45 5f 53 49 5a 2d 4f 42 5f 53 49 5a 29 2c 53 50 ┆ SUBI.W #(GE_SIZ-OB_SIZ),SP┆
0x648c0…648e0 5f 46 52 45 4b 28 41 31 29 20 20 20 52 45 53 45 52 56 45 20 52 4f 4f 4d 20 46 4f 52 20 47 45 4e ┆_FREK(A1) RESERVE ROOM FOR GEN┆
0x648e0…64900 45 52 41 4c 20 46 49 45 4c 44 53 0d 0a 20 20 20 20 41 44 44 49 2e 4c 20 23 28 47 45 5f 53 49 5a ┆ERAL FIELDS ADDI.L #(GE_SIZ┆
0x64900…64920 2d 4f 42 5f 53 49 5a 29 2c 53 50 5f 46 49 52 4b 28 41 31 29 20 20 20 2e 0d 0a 20 20 20 20 4c 45 ┆-OB_SIZ),SP_FIRK(A1) . LE┆
0x64920…64940 41 20 20 20 20 47 45 5f 45 58 28 41 30 29 2c 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A GE_EX(A0),A1 ┆
0x64940…64960 41 31 3a 3d 48 45 41 44 20 4f 46 20 45 58 45 43 55 54 45 44 5f 42 59 20 43 48 41 49 4e 3b 0d 0a ┆A1:=HEAD OF EXECUTED_BY CHAIN; ┆
0x64960…64980 20 20 20 20 4d 4f 56 45 2e 4c 20 41 31 2c 28 41 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MOVE.L A1,(A1) ┆
0x64980…649a0 20 20 20 20 20 20 45 58 45 43 55 54 45 44 5f 42 59 20 43 48 41 49 4e 0d 0a 20 20 20 20 4d 4f 56 ┆ EXECUTED_BY CHAIN MOV┆
0x649a0…649c0 45 2e 4c 20 41 31 2c 34 28 41 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆E.L A1,4(A1) ┆
0x649c0…649e0 20 3a 3d 20 45 4d 50 54 59 3b 0d 0a 20 20 20 20 43 4c 52 2e 57 20 20 47 45 5f 43 4f 4e 28 41 30 ┆ := EMPTY; CLR.W GE_CON(A0┆
0x649e0…64a00 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4f 4e 54 52 4f 4c 20 50 52 4f 43 45 44 ┆) CONTROL PROCED┆
0x64a00…64c00 (80, 0, 6) DataBlock {»KERNEL.LOG«}
[…0x1…]
0x64e00…64e20 (80, 0, 8) 55 52 45 3a 3d 4e 4f 20 43 4f 4e 54 52 4f 4c 3a 3d 30 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 57 20 ┆URE:=NO CONTROL:=0; MOVE.W ┆
0x64e20…64e40 23 53 43 48 54 45 4d 50 2c 47 45 5f 54 45 4d 50 28 41 30 29 20 20 20 20 20 20 20 49 4e 49 54 49 ┆#SCHTEMP,GE_TEMP(A0) INITI┆
0x64e40…64e60 41 4c 49 5a 45 20 4e 4f 5f 4f 46 5f 54 45 4d 50 20 50 4f 49 4e 54 45 52 53 20 49 4e 20 43 4f 4e ┆ALIZE NO_OF_TEMP POINTERS IN CON┆
0x64e60…64e80 54 45 58 54 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 23 53 43 48 54 45 4d 44 2c 47 45 5f 54 45 4d ┆TEXT MOVE.L #SCHTEMD,GE_TEM┆
0x64e80…64ea0 44 28 41 30 29 20 20 20 20 20 20 20 49 4e 49 54 49 41 4c 49 5a 45 20 4e 4f 20 4f 46 20 54 45 4d ┆D(A0) INITIALIZE NO OF TEM┆
0x64ea0…64ec0 50 20 42 59 54 45 53 20 49 4e 20 43 4f 4e 54 45 58 54 53 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c ┆P BYTES IN CONTEXTS; MOVE.L┆
0x64ec0…64ee0 20 23 46 4c 5f 54 45 4d 50 44 2c 47 45 5f 53 54 4b 4d 28 41 30 29 20 20 20 20 20 20 20 4c 4f 47 ┆ #FL_TEMPD,GE_STKM(A0) LOG┆
0x64ee0…64f00 49 43 41 4c 20 41 44 44 52 45 53 53 20 4f 46 20 46 49 52 53 54 20 4f 46 20 53 54 41 43 4b 3b 0d ┆ICAL ADDRESS OF FIRST OF STACK; ┆
0x64f00…64f20 0a 20 20 20 20 43 4c 52 2e 57 20 20 47 45 5f 53 54 4b 28 41 30 29 20 20 20 20 20 20 20 20 20 20 ┆ CLR.W GE_STK(A0) ┆
0x64f20…64f40 20 20 20 20 20 20 20 52 45 51 55 49 52 45 44 20 46 52 45 45 20 43 41 4c 4c 20 53 54 41 43 4b 0d ┆ REQUIRED FREE CALL STACK ┆
0x64f40…64f60 0a 20 20 20 20 43 4c 52 2e 4c 20 20 47 45 5f 53 54 4b 2b 32 28 41 30 29 20 20 20 20 20 20 20 20 ┆ CLR.L GE_STK+2(A0) ┆
0x64f60…64f80 20 20 20 20 20 20 20 20 20 3a 3d 20 30 3b 0d 0a 20 20 20 20 50 52 54 5f 4d 45 4d 20 49 4e 49 54 ┆ := 0; PRT_MEM INIT┆
0x64f80…64fa0 47 45 49 4e 2c 28 41 30 29 2c 47 45 5f 53 49 5a 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a ┆GEIN,(A0),GE_SIZ ******** ┆
0x64fa0…64fc0 20 20 20 20 52 54 53 0d 0a 20 0d 0a 2a 20 4e 4f 54 45 2c 20 54 48 41 54 20 53 49 5a 45 20 4f 46 ┆ RTS * NOTE, THAT SIZE OF┆
0x64fc0…64fe0 20 52 45 51 55 49 52 45 44 20 46 52 45 45 20 43 41 4c 4c 20 53 54 41 43 4b 20 49 53 20 53 45 54 ┆ REQUIRED FREE CALL STACK IS SET┆
0x64fe0…65000 20 54 4f 20 5a 45 52 4f 2e 0d 0a 2a 20 4d 41 4e 59 20 56 41 4c 55 45 53 20 41 52 45 20 52 45 41 ┆ TO ZERO. * MANY VALUES ARE REA┆
0x65000…65080 (80, 0, 9) DataBlock {»KERNEL.LOG«}
0x65080…650a0 4d 50 54 59 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 57 20 23 50 54 5f 4e 49 4c 3c 3c 38 2b 31 3c 3c ┆MPTY; MOVE.W #PT_NIL<<8+1<<┆
0x650a0…650c0 50 54 5f 4c 53 43 2c 50 54 5f 4b 49 4e 28 41 32 29 20 20 50 4f 49 4e 54 45 52 2e 4b 49 4e 44 3a ┆PT_LSC,PT_KIN(A2) POINTER.KIND:┆
0x650c0…650e0 3d 4e 49 4c 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆=NIL * ┆
0x650e0…65100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 4f 49 4e 54 45 52 2e 49 4e 46 3a 3d 4c ┆ POINTER.INF:=L┆
0x65100…65120 4f 43 41 4c 3b 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 50 54 5f 53 49 5a 28 41 32 29 2c 41 32 20 ┆OCAL; LEA PT_SIZ(A2),A2 ┆
0x65120…65140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 55 52 52 45 4e 54 20 50 4f 49 4e 54 45 52 3a 3d ┆ CURRENT POINTER:=┆
0x65140…65160 4e 45 58 54 5f 50 4f 49 4e 54 45 52 3b 0d 0a 20 20 45 4e 44 57 20 20 20 20 20 20 20 20 20 20 20 ┆NEXT_POINTER; ENDW ┆
0x65160…65180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 57 3b 0d 0a 20 20 20 20 50 52 ┆ ENDW; PR┆
0x65180…651a0 54 5f 4d 45 4d 20 49 4e 49 54 5f 45 4e 56 2c 28 41 33 29 2c 45 4e 5f 53 49 5a 2b 33 2a 50 54 5f ┆T_MEM INIT_ENV,(A3),EN_SIZ+3*PT_┆
0x651a0…651c0 53 49 5a 20 20 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 20 20 20 50 52 54 5f 4d 45 4d 20 54 4f 50 4f 46 ┆SIZ ******** PRT_MEM TOPOF┆
0x651c0…651e0 45 4e 56 2c 28 41 34 29 2c 53 50 5f 53 49 5a 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 ┆ENV,(A4),SP_SIZ ******** ┆
0x651e0…65200 20 20 20 52 45 54 55 52 4e 20 2e 49 4e 49 54 5f 45 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN .INIT_EN ┆
0x65200…65400 (80, 0, 10) DataBlock {»KERNEL.LOG«}
0x65400…65420 (81, 1, 1) 53 53 49 47 4e 45 44 20 57 48 45 4e 20 41 30 20 49 53 20 54 48 45 20 53 54 55 42 2e 0d 0a 20 0d ┆SSIGNED WHEN A0 IS THE STUB. ┆
0x65420…65440 0a 20 20 20 20 50 41 47 45 0d 0a 49 4e 49 54 4b 4e 45 4c 20 20 20 45 51 55 20 2a 20 20 49 4e 49 ┆ PAGE INITKNEL EQU * INI┆
0x65440…65460 54 49 41 4c 49 5a 45 20 4f 42 20 41 4e 44 20 53 50 20 46 49 45 4c 44 53 20 4f 46 20 4f 42 4a 45 ┆TIALIZE OB AND SP FIELDS OF OBJE┆
0x65460…65480 43 54 2e 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 3a 20 20 20 20 20 20 20 20 20 20 20 ┆CT. * CALL: ┆
0x65480…654a0 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3a 0d 0a 2a 20 41 30 20 20 4b 45 52 4e 45 4c ┆ RETURN: * A0 KERNEL┆
0x654a0…654c0 20 50 41 52 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 4d 45 0d 0a ┆ PART SAME ┆
0x654c0…654e0 2a 20 44 30 20 20 4c 45 4e 47 54 48 20 4f 46 20 4b 45 52 4e 45 4c 20 50 41 52 54 20 20 20 20 20 ┆* D0 LENGTH OF KERNEL PART ┆
0x654e0…65500 20 20 20 20 20 20 53 41 4d 45 0d 0a 2a 0d 0a 2a 20 41 46 54 45 52 20 49 4e 49 54 4b 4e 45 4c 2c ┆ SAME * * AFTER INITKNEL,┆
0x65500…65520 20 54 48 45 20 46 4f 4c 4c 4f 57 49 4e 47 20 49 53 20 54 52 55 45 0d 0a 2a 20 54 48 45 20 53 50 ┆ THE FOLLOWING IS TRUE * THE SP┆
0x65520…65540 41 43 45 20 50 41 52 54 20 44 45 53 43 52 49 42 45 53 20 54 48 45 20 46 52 45 45 20 4b 45 52 4e ┆ACE PART DESCRIBES THE FREE KERN┆
0x65540…65560 45 4c 20 42 59 54 45 53 0d 0a 2a 20 54 48 45 20 45 4e 56 45 4c 4f 50 45 20 53 54 41 43 4b 20 49 ┆EL BYTES * THE ENVELOPE STACK I┆
0x65560…65580 53 20 45 4d 50 54 59 0d 0a 2a 20 53 49 5a 45 20 4f 46 20 4b 45 52 4e 45 4c 20 50 41 52 54 20 41 ┆S EMPTY * SIZE OF KERNEL PART A┆
0x65580…655a0 4e 44 20 41 44 44 52 45 53 53 20 4f 46 20 53 50 41 43 45 20 50 41 52 54 20 49 53 20 53 41 56 45 ┆ND ADDRESS OF SPACE PART IS SAVE┆
0x655a0…655c0 44 20 49 4e 20 4f 42 4a 45 43 54 0d 0a 2a 20 52 45 53 49 44 45 4e 54 20 43 4f 55 4e 54 20 49 53 ┆D IN OBJECT * RESIDENT COUNT IS┆
0x655c0…655e0 20 5a 45 52 4f 0d 0a 2a 20 54 48 45 20 4f 57 4e 45 52 20 43 48 41 49 4e 20 41 4e 44 20 52 45 46 ┆ ZERO * THE OWNER CHAIN AND REF┆
0x655e0…65600 5f 4f 42 4a 45 43 54 20 43 48 41 49 4e 20 49 53 20 45 4d 50 54 59 2e 0d 0a 20 0d 0a 20 20 20 20 ┆_OBJECT CHAIN IS EMPTY. ┆
0x65600…65620 (81, 1, 2) 20 20 20 20 42 53 52 2e 53 20 20 47 45 54 4b 52 45 43 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BSR.S GETKREC ┆
0x65620…65640 20 20 20 20 20 20 41 30 3a 3d 4d 45 4d 5f 52 45 43 20 48 4f 4c 44 49 4e 47 20 54 48 45 20 4b 45 ┆ A0:=MEM_REC HOLDING THE KE┆
0x65640…65660 52 4e 45 4c 20 50 41 52 54 3b 0d 0a 20 20 20 20 42 53 52 2e 4c 20 20 52 45 43 48 41 49 4e 52 20 ┆RNEL PART; BSR.L RECHAINR ┆
0x65660…65680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4d 4f 56 45 20 41 4e 44 20 52 45 53 ┆ REMOVE AND RES┆
0x65680…656a0 54 52 55 43 54 55 52 45 20 28 44 31 2c 41 30 2c 41 31 29 3b 0d 0a 20 20 20 20 52 54 53 20 20 20 ┆TRUCTURE (D1,A0,A1); RTS ┆
0x656a0…656c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 ┆ RETU┆
0x656c0…656e0 52 4e 3b 0d 0a 20 0d 0a 47 45 54 55 52 45 43 20 20 20 20 45 51 55 20 2a 20 20 20 20 20 20 20 20 ┆RN; GETUREC EQU * ┆
0x656e0…65700 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4d 45 4d 5f 52 45 43 20 48 4f 4c 44 49 4e ┆ GET MEM_REC HOLDIN┆
0x65700…65720 47 20 55 53 45 52 20 50 41 52 54 0d 0a 2a 20 20 20 20 43 41 4c 4c 3a 20 20 20 20 20 20 20 20 20 ┆G USER PART * CALL: ┆
0x65720…65740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3a 0d 0a 2a 20 41 31 ┆ RETURN: * A1┆
0x65740…65760 20 55 53 45 52 20 50 41 52 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ USER PART ┆
0x65760…65780 20 20 53 41 4d 45 0d 0a 2a 20 41 30 20 41 4e 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SAME * A0 ANY ┆
0x65780…657a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 45 4d 5f 52 45 43 0d 0a 2a 0d 0a 20 0d 0a 20 20 20 ┆ MEM_REC * ┆
0x657a0…657c0 20 4d 4f 56 45 2e 4c 20 4c 5f 41 4c 4c 4f 43 2c 41 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MOVE.L L_ALLOC,A0 ┆
0x657c0…657e0 20 20 20 41 30 3a 3d 4c 41 53 54 20 4d 45 4d 5f 52 45 43 3b 20 22 3d 44 55 4d 4d 59 20 4d 45 4d ┆ A0:=LAST MEM_REC; "=DUMMY MEM┆
0x657e0…65800 5f 52 45 43 22 0d 0a 20 20 52 45 50 45 41 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆_REC" REPEAT ┆
0x65800…65820 (81, 1, 3) 20 20 20 20 20 53 41 56 45 20 52 45 47 53 3b 0d 0a 20 20 20 20 54 53 54 2e 4c 20 20 44 31 0d 0a ┆ SAVE REGS; TST.L D1 ┆
0x65820…65840 20 20 49 46 20 3c 45 51 3e 20 54 48 45 4e 2e 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ IF <EQ> THEN.S ┆
0x65840…65860 20 20 20 20 49 46 20 53 49 5a 45 20 55 53 45 52 20 50 41 52 54 20 3d 20 30 20 54 48 45 4e 0d 0a ┆ IF SIZE USER PART = 0 THEN ┆
0x65860…65880 20 20 20 20 4d 4f 56 45 2e 4c 20 44 31 2c 41 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MOVE.L D1,A0 ┆
0x65880…658a0 20 20 20 20 20 20 55 53 45 52 20 50 41 52 54 20 41 44 44 52 45 53 53 3a 3d 30 3b 0d 0a 20 20 45 ┆ USER PART ADDRESS:=0; E┆
0x658a0…658c0 4e 44 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆NDI ┆
0x658c0…658e0 20 45 4e 44 49 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 4f 42 5f 53 50 41 28 41 31 29 2c 41 32 ┆ ENDI; MOVE.L OB_SPA(A1),A2┆
0x658e0…65900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 32 3a 3d 53 50 41 43 45 20 50 41 52 54 3b 0d 0a 20 ┆ A2:=SPACE PART; ┆
0x65900…65920 20 20 20 4d 4f 56 45 2e 4c 20 41 30 2c 53 50 5f 46 49 52 55 28 41 32 29 20 20 20 20 20 20 20 20 ┆ MOVE.L A0,SP_FIRU(A2) ┆
0x65920…65940 20 20 20 20 20 53 41 56 45 20 55 53 45 52 20 50 41 52 54 20 41 44 44 52 45 53 53 3b 0d 0a 20 20 ┆ SAVE USER PART ADDRESS; ┆
0x65940…65960 20 20 4d 4f 56 45 2e 4c 20 44 31 2c 53 50 5f 46 52 45 55 28 41 32 29 20 20 20 20 20 20 20 20 20 ┆ MOVE.L D1,SP_FREU(A2) ┆
0x65960…65980 20 20 20 20 46 52 45 45 20 55 53 45 52 20 42 59 54 45 53 3a 3d 53 49 5a 45 20 4f 46 20 55 53 45 ┆ FREE USER BYTES:=SIZE OF USE┆
0x65980…659a0 52 20 50 41 52 54 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 44 31 2c 53 50 5f 53 49 5a 55 28 41 ┆R PART; MOVE.L D1,SP_SIZU(A┆
0x659a0…659c0 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 56 45 20 53 49 5a 45 20 4f 46 20 55 53 45 52 ┆2) SAVE SIZE OF USER┆
0x659c0…659e0 20 50 41 52 54 3b 0d 0a 20 20 20 20 50 52 54 5f 4d 45 4d 20 41 53 53 49 47 4e 55 53 2c 2d 53 50 ┆ PART; PRT_MEM ASSIGNUS,-SP┆
0x659e0…65a00 5f 53 49 5a 28 41 32 29 2c 53 50 5f 53 49 5a 20 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 20 20 20 4c 45 ┆_SIZ(A2),SP_SIZ ******** LE┆
0x65a00…65a20 (81, 1, 4) 45 4e 54 52 59 53 41 56 20 44 30 2f 41 30 2f 41 31 2f 41 32 2c 2e 49 4e 49 54 4b 4e 45 20 20 20 ┆ENTRYSAV D0/A0/A1/A2,.INITKNE ┆
0x65a20…65a40 20 20 53 41 56 45 20 52 45 47 49 53 54 45 52 53 3b 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 28 41 ┆ SAVE REGISTERS; LEA (A┆
0x65a40…65a60 30 2c 44 30 2e 4c 29 2c 41 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 32 3a 3d 53 50 41 ┆0,D0.L),A2 A2:=SPA┆
0x65a60…65a80 43 45 20 50 41 52 54 3a 3d 4b 4e 45 4c 50 41 52 54 2b 4c 45 4e 47 54 48 20 4f 46 20 4b 4e 45 4c ┆CE PART:=KNELPART+LENGTH OF KNEL┆
0x65a80…65aa0 50 41 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 32 2c 4f 42 5f 53 50 41 28 41 30 29 20 20 20 20 ┆PA MOVE.L A2,OB_SPA(A0) ┆
0x65aa0…65ac0 20 20 20 20 20 20 20 20 20 20 53 41 56 45 20 53 50 41 43 45 20 50 41 52 54 20 41 44 44 52 45 53 ┆ SAVE SPACE PART ADDRES┆
0x65ac0…65ae0 53 20 49 4e 20 4f 42 4a 45 43 54 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 57 20 44 30 2c 4f 42 5f 53 ┆S IN OBJECT; MOVE.W D0,OB_S┆
0x65ae0…65b00 49 5a 4b 28 41 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 56 45 20 4c 45 4e 47 54 48 20 ┆IZK(A0) SAVE LENGTH ┆
0x65b00…65b20 4f 46 20 4b 4e 45 4c 20 50 41 52 54 3b 0d 0a 20 20 20 20 53 55 42 49 2e 57 20 23 4f 42 5f 53 49 ┆OF KNEL PART; SUBI.W #OB_SI┆
0x65b20…65b40 5a 2b 53 50 5f 53 49 5a 2c 44 30 20 20 20 20 20 20 20 20 20 20 44 30 3a 3d 46 52 45 45 5f 4b 4e ┆Z+SP_SIZ,D0 D0:=FREE_KN┆
0x65b40…65b60 45 4c 5f 42 59 54 45 53 3a 3d 4c 45 4e 47 54 48 2d 46 49 58 45 44 0d 0a 20 20 20 20 4d 4f 56 45 ┆EL_BYTES:=LENGTH-FIXED MOVE┆
0x65b60…65b80 2e 57 20 44 30 2c 53 50 5f 46 52 45 4b 28 41 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 ┆.W D0,SP_FREK(A2) SA┆
0x65b80…65ba0 56 45 20 46 52 45 45 5f 4b 4e 45 4c 5f 42 59 54 45 53 20 49 4e 20 53 50 41 43 45 20 50 41 52 54 ┆VE FREE_KNEL_BYTES IN SPACE PART┆
0x65ba0…65bc0 20 4f 46 20 4f 42 4a 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 4f 42 5f 53 49 5a 28 41 30 29 2c 41 ┆ OF OBJ LEA OB_SIZ(A0),A┆
0x65bc0…65be0 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 31 3a 3d 46 49 52 53 54 20 46 52 45 45 20 4b 45 ┆1 A1:=FIRST FREE KE┆
0x65be0…65c00 52 4e 45 4c 20 42 59 54 45 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 31 2c 53 50 5f 46 49 52 ┆RNEL BYTE; MOVE.L A1,SP_FIR┆
0x65c00…65c20 (81, 1, 5) 20 20 20 20 20 20 20 20 20 20 20 52 45 50 45 41 54 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 4d 52 ┆ REPEAT MOVE.L MR┆
0x65c20…65c40 5f 50 52 56 28 41 30 29 2c 41 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 30 3a 3d 50 52 49 ┆_PRV(A0),A0 A0:=PRI┆
0x65c40…65c60 4f 52 20 4d 45 4d 5f 52 45 43 3b 0d 0a 20 20 55 4e 54 49 4c 2e 4c 20 41 30 20 3c 4c 54 3e 20 41 ┆OR MEM_REC; UNTIL.L A0 <LT> A┆
0x65c60…65c80 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 54 49 4c 20 50 52 49 4f 52 20 4d 45 4d ┆1 UNTIL PRIOR MEM┆
0x65c80…65ca0 5f 52 45 43 20 48 4f 4c 44 53 20 55 53 45 52 20 50 41 52 54 3b 0d 0a 20 20 20 20 52 54 53 20 20 ┆_REC HOLDS USER PART; RTS ┆
0x65ca0…65cc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 ┆ RET┆
0x65cc0…65ce0 55 52 4e 3b 0d 0a 20 0d 0a 47 45 54 4b 52 45 43 20 20 20 20 45 51 55 20 2a 20 20 20 20 20 20 20 ┆URN; GETKREC EQU * ┆
0x65ce0…65d00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4d 45 4d 5f 52 45 43 20 48 4f 4c 44 49 ┆ GET MEM_REC HOLDI┆
0x65d00…65d20 4e 47 20 4b 45 52 4e 45 4c 20 50 41 52 54 0d 0a 2a 20 20 20 20 43 41 4c 4c 3a 20 20 20 20 20 20 ┆NG KERNEL PART * CALL: ┆
0x65d20…65d40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3a 0d 0a 2a ┆ RETURN: *┆
0x65d40…65d60 20 41 31 20 4b 45 52 4e 45 4c 20 50 41 52 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1 KERNEL PART ┆
0x65d60…65d80 20 20 20 20 20 53 41 4d 45 0d 0a 2a 20 41 30 20 41 4e 59 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ SAME * A0 ANY ┆
0x65d80…65da0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4d 45 4d 5f 52 45 43 0d 0a 2a 0d 0a 20 20 20 ┆ MEM_REC * ┆
0x65da0…65dc0 20 4d 4f 56 45 2e 4c 20 46 5f 41 4c 4c 4f 43 2c 41 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MOVE.L F_ALLOC,A0 ┆
0x65dc0…65de0 20 20 20 41 30 3a 3d 46 49 52 53 54 20 4d 45 4d 5f 52 45 43 3b 20 22 4e 4f 54 20 44 55 4d 4d 59 ┆ A0:=FIRST MEM_REC; "NOT DUMMY┆
0x65de0…65e00 22 0d 0a 20 20 52 45 50 45 41 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆" REPEAT ┆
0x65e00…65e20 (81, 1, 6) 41 20 20 20 20 28 41 30 2c 44 31 2e 4c 29 2c 41 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆A (A0,D1.L),A2 ┆
0x65e20…65e40 41 32 3a 3d 54 4f 50 20 55 53 45 52 20 50 41 52 54 3a 3d 55 53 45 52 20 50 41 52 54 2b 53 49 5a ┆A2:=TOP USER PART:=USER PART+SIZ┆
0x65e40…65e60 45 20 4f 46 20 55 53 45 52 0d 0a 20 20 49 46 2e 57 20 41 32 20 3c 4e 45 3e 20 23 30 20 54 48 45 ┆E OF USER IF.W A2 <NE> #0 THE┆
0x65e60…65e80 4e 2e 53 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 55 53 45 52 20 50 41 52 54 20 50 52 45 53 ┆N.S IF USER PART PRES┆
0x65e80…65ea0 45 4e 54 20 54 48 45 4e 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 32 2c 44 30 20 20 20 20 20 20 ┆ENT THEN MOVE.L A2,D0 ┆
0x65ea0…65ec0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 30 3a 3d 54 4f 50 20 55 53 45 52 20 50 41 52 ┆ D0:=TOP USER PAR┆
0x65ec0…65ee0 54 3b 0d 0a 20 20 20 20 42 53 52 2e 4c 20 20 50 47 54 41 42 53 45 54 20 20 20 20 20 20 20 20 20 ┆T; BSR.L PGTABSET ┆
0x65ee0…65f00 20 20 20 20 20 20 20 20 20 20 50 41 47 45 20 54 41 42 4c 45 20 28 54 4f 50 20 55 53 45 52 20 50 ┆ PAGE TABLE (TOP USER P┆
0x65f00…65f20 41 52 54 29 3a 3d 4b 4e 45 4c 20 50 41 52 54 3d 41 31 3b 0d 0a 20 20 45 4e 44 49 20 20 20 20 20 ┆ART):=KNEL PART=A1; ENDI ┆
0x65f20…65f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 49 3b 0d 0a ┆ ENDI; ┆
0x65f40…65f60 20 20 20 20 52 45 54 55 52 4e 20 2e 41 53 53 49 47 4e 55 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ RETURN .ASSIGNU ┆
0x65f60…65f80 20 20 20 20 20 20 52 45 54 55 52 4e 3b 0d 0a 20 0d 0a 20 20 20 20 50 41 47 45 0d 0a 52 45 4d 4f ┆ RETURN; PAGE REMO┆
0x65f80…65fa0 56 45 55 53 20 20 20 45 51 55 20 2a 20 20 52 45 4d 4f 56 45 20 55 53 45 52 20 50 41 52 54 0d 0a ┆VEUS EQU * REMOVE USER PART ┆
0x65fa0…65fc0 2a 20 20 20 20 43 41 4c 4c 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆* CALL: ┆
0x65fc0…65fe0 20 20 20 20 20 20 52 45 54 55 52 4e 3a 0d 0a 2a 20 44 31 20 4e 4f 5f 4f 46 5f 42 59 54 45 53 20 ┆ RETURN: * D1 NO_OF_BYTES ┆
0x65fe0…66000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 4d 45 0d 0a 2a 20 41 31 20 ┆ SAME * A1 ┆
0x66000…66020 (81, 1, 7) 4b 28 41 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 56 45 20 46 49 52 53 54 5f 46 52 45 ┆K(A2) SAVE FIRST_FRE┆
0x66020…66040 45 5f 4b 45 52 4e 45 4c 5f 42 59 54 45 20 49 4e 20 53 50 41 43 45 20 50 41 52 54 3b 0d 0a 20 20 ┆E_KERNEL_BYTE IN SPACE PART; ┆
0x66040…66060 20 20 43 4c 52 2e 4c 20 20 53 50 5f 53 49 5a 55 28 41 32 29 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CLR.L SP_SIZU(A2) ┆
0x66060…66080 20 20 20 20 4e 4f 20 55 53 45 52 20 50 41 52 54 20 49 53 20 50 52 45 53 45 4e 54 3b 0d 0a 20 20 ┆ NO USER PART IS PRESENT; ┆
0x66080…660a0 20 20 4c 45 41 20 20 20 20 53 50 5f 45 4e 56 28 41 32 29 2c 41 32 20 20 20 20 20 20 20 20 20 20 ┆ LEA SP_ENV(A2),A2 ┆
0x660a0…660c0 20 20 20 20 41 32 3a 3d 45 4e 56 45 4c 4f 50 45 20 53 54 41 43 4b 3b 0d 0a 20 20 20 20 4d 4f 56 ┆ A2:=ENVELOPE STACK; MOV┆
0x660c0…660e0 45 2e 4c 20 41 32 2c 28 41 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 ┆E.L A2,(A2) E┆
0x660e0…66100 4e 56 45 4c 4f 50 45 20 53 54 41 43 4b 3a 3d 45 4d 50 54 59 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e ┆NVELOPE STACK:=EMPTY; MOVE.┆
0x66100…66120 4c 20 41 32 2c 34 28 41 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 0d 0a ┆L A2,4(A2) . ┆
0x66120…66140 20 20 20 20 4d 4f 56 45 2e 4c 20 41 30 2c 28 41 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ MOVE.L A0,(A0) ┆
0x66140…66160 20 20 20 20 20 20 4f 57 4e 53 45 54 20 43 48 41 49 4e 3a 3d 45 4d 50 54 59 3b 0d 0a 20 20 20 20 ┆ OWNSET CHAIN:=EMPTY; ┆
0x66160…66180 4d 4f 56 45 2e 4c 20 41 30 2c 34 28 41 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆MOVE.L A0,4(A0) ┆
0x66180…661a0 20 20 2e 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 4f 42 5f 52 45 46 28 41 30 29 2c 41 32 20 20 20 ┆ . LEA OB_REF(A0),A2 ┆
0x661a0…661c0 20 20 20 20 20 20 20 20 20 20 20 41 32 3a 3d 4f 42 5f 52 45 46 20 43 48 41 49 4e 20 48 45 41 44 ┆ A2:=OB_REF CHAIN HEAD┆
0x661c0…661e0 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 32 2c 28 41 32 29 20 20 20 20 20 20 20 20 20 20 20 ┆; MOVE.L A2,(A2) ┆
0x661e0…66200 20 20 20 20 20 20 20 20 20 4f 42 5f 52 45 46 20 43 48 41 49 4e 3a 3d 45 4d 50 54 59 3b 0d 0a 20 ┆ OB_REF CHAIN:=EMPTY; ┆
0x66200…66220 (81, 1, 8) 20 20 20 20 20 20 20 52 45 50 45 41 54 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 28 41 30 29 2c 41 ┆ REPEAT MOVE.L (A0),A┆
0x66220…66240 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 30 3a 3d 4e 45 58 54 20 4d 45 ┆0 A0:=NEXT ME┆
0x66240…66260 4d 5f 52 45 43 3b 0d 0a 20 20 55 4e 54 49 4c 2e 4c 20 41 30 20 3c 47 54 3e 20 41 31 20 20 20 20 ┆M_REC; UNTIL.L A0 <GT> A1 ┆
0x66260…66280 20 20 20 20 20 20 20 20 20 20 20 20 55 4e 54 49 4c 20 4e 45 58 54 20 4d 45 4d 5f 52 45 43 20 49 ┆ UNTIL NEXT MEM_REC I┆
0x66280…662a0 53 20 4e 45 58 54 20 54 4f 20 4b 45 52 4e 45 4c 20 50 41 52 54 0d 0a 20 20 20 20 4d 4f 56 45 2e ┆S NEXT TO KERNEL PART MOVE.┆
0x662a0…662c0 4c 20 4d 52 5f 50 52 56 28 41 30 29 2c 41 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 30 3a ┆L MR_PRV(A0),A0 A0:┆
0x662c0…662e0 3d 50 52 49 4f 52 20 4d 45 4d 5f 52 45 43 3b 0d 0a 20 20 20 20 52 54 53 20 20 20 20 20 20 20 20 ┆=PRIOR MEM_REC; RTS ┆
0x662e0…66300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 0d 0a ┆ RETURN; ┆
0x66300…66320 20 0d 0a 20 20 20 20 50 41 47 45 0d 0a 43 52 45 41 54 45 55 53 20 20 20 45 51 55 20 2a 20 20 43 ┆ PAGE CREATEUS EQU * C┆
0x66320…66340 52 45 41 54 45 20 55 53 45 52 20 50 41 52 54 0d 0a 2a 20 20 20 20 43 41 4c 4c 3a 20 20 20 20 20 ┆REATE USER PART * CALL: ┆
0x66340…66360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3a 0d 0a ┆ RETURN: ┆
0x66360…66380 2a 20 44 31 20 4e 4f 5f 4f 46 5f 42 59 54 45 53 20 49 4e 20 55 53 45 52 20 50 41 52 54 20 20 20 ┆* D1 NO_OF_BYTES IN USER PART ┆
0x66380…663a0 20 20 20 20 20 20 53 41 4d 45 0d 0a 2a 20 41 30 20 4d 45 4d 5f 52 45 43 20 54 4f 20 48 4f 4c 44 ┆ SAME * A0 MEM_REC TO HOLD┆
0x663a0…663c0 20 4e 45 57 20 55 53 45 52 20 50 41 52 54 20 20 20 20 55 53 45 52 20 50 41 52 54 20 41 44 44 52 ┆ NEW USER PART USER PART ADDR┆
0x663c0…663e0 45 53 53 0d 0a 2a 0d 0a 20 0d 0a 20 20 20 20 45 4e 54 52 59 53 41 56 20 44 37 2f 41 31 2c 2e 43 ┆ESS * ENTRYSAV D7/A1,.C┆
0x663e0…66400 52 45 41 54 45 55 20 20 20 20 20 20 20 20 20 20 20 53 41 56 45 20 52 45 47 53 3b 0d 0a 20 0d 0a ┆REATEU SAVE REGS; ┆
0x66400…9b600 (81, 1, 9) […elided…]
0x9b600…9b620 (124, 0, 4) 28 41 35 29 20 3c 4e 45 3e 20 41 35 20 44 4f 2e 53 20 20 20 20 20 20 20 20 20 57 48 49 4c 45 20 ┆(A5) <NE> A5 DO.S WHILE ┆
0x9b620…9b640 50 52 4f 43 53 20 49 4e 20 57 41 49 54 49 4e 47 20 51 55 45 55 45 20 44 4f 0d 0a 20 20 20 20 4d ┆PROCS IN WAITING QUEUE DO M┆
0x9b640…9b660 4f 56 45 2e 4c 20 28 41 35 29 2c 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆OVE.L (A5),A1 ┆
0x9b660…9b680 20 41 31 3a 3d 50 52 4f 43 2e 41 55 58 20 4f 46 20 57 41 49 54 49 4e 47 20 50 52 4f 43 3b 0d 0a ┆ A1:=PROC.AUX OF WAITING PROC; ┆
0x9b680…9b6a0 20 20 20 20 4c 45 41 20 20 20 20 2d 50 52 5f 41 55 58 28 41 31 29 2c 41 31 20 20 20 20 20 20 20 ┆ LEA -PR_AUX(A1),A1 ┆
0x9b6a0…9b6c0 20 20 20 20 20 20 41 31 3a 3d 50 52 4f 43 45 53 53 3b 0d 0a 20 20 49 46 2e 42 20 50 52 5f 53 54 ┆ A1:=PROCESS; IF.B PR_ST┆
0x9b6c0…9b6e0 41 28 41 31 29 20 3c 45 51 3e 20 23 34 20 54 48 45 4e 2e 53 20 20 20 20 49 46 20 50 52 4f 43 45 ┆A(A1) <EQ> #4 THEN.S IF PROCE┆
0x9b6e0…9b700 53 20 57 41 49 54 49 4e 47 20 49 4e 20 44 45 56 49 2e 57 41 49 54 20 54 48 45 4e 0d 0a 20 20 20 ┆S WAITING IN DEVI.WAIT THEN ┆
0x9b700…9b720 20 4d 4f 56 45 2e 57 20 20 20 20 20 20 20 20 23 45 43 52 44 55 4d 4d 59 2c 44 30 20 20 20 20 20 ┆ MOVE.W #ECRDUMMY,D0 ┆
0x9b720…9b740 20 20 20 44 30 3a 3d 52 45 53 55 4c 54 3a 3d 52 45 4a 45 43 54 2c 44 55 4d 4d 59 46 49 45 44 3b ┆ D0:=RESULT:=REJECT,DUMMYFIED;┆
0x9b740…9b760 0d 0a 20 20 20 20 42 53 52 2e 4c 20 20 53 50 45 44 44 45 56 49 20 20 20 20 20 20 20 20 20 20 20 ┆ BSR.L SPEDDEVI ┆
0x9b760…9b780 20 20 20 20 20 20 20 20 53 50 45 44 44 45 56 49 28 41 31 3d 50 52 4f 43 2c 44 30 3d 52 45 53 2c ┆ SPEDDEVI(A1=PROC,D0=RES,┆
0x9b780…9b7a0 44 37 2f 41 33 2f 41 36 3a 3d 3f 29 3b 0d 0a 20 20 20 20 52 45 4d 5f 45 4c 45 4d 20 50 52 5f 41 ┆D7/A3/A6:=?); REM_ELEM PR_A┆
0x9b7a0…9b7c0 55 58 28 41 31 29 2c 41 33 2c 41 36 2c 41 33 2f 41 36 20 20 20 52 45 4d 4f 56 45 20 50 52 4f 43 ┆UX(A1),A3,A6,A3/A6 REMOVE PROC┆
0x9b7c0…9b7e0 20 46 52 4f 4d 20 43 4f 4e 44 49 54 49 4f 4e 20 51 55 45 55 45 3b 0d 0a 20 20 20 20 49 4e 49 54 ┆ FROM CONDITION QUEUE; INIT┆
0x9b7e0…9b800 5f 48 45 41 44 20 50 52 5f 41 55 58 28 41 31 29 2c 41 36 20 20 20 20 20 20 20 20 20 20 20 54 48 ┆_HEAD PR_AUX(A1),A6 TH┆
0x9b800…9b820 (124, 0, 5) 0d 0a 2a 20 41 31 3d 50 52 4f 43 2c 20 41 33 3d 51 55 45 55 45 2c 20 44 30 3d 51 55 45 55 45 20 ┆ * A1=PROC, A3=QUEUE, D0=QUEUE ┆
0x9b820…9b840 45 4c 45 4d 45 4e 54 20 4f 46 46 53 45 54 0d 0a 20 20 20 20 41 44 44 2e 57 20 20 44 30 2c 41 31 ┆ELEMENT OFFSET ADD.W D0,A1┆
0x9b840…9b860 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 31 3a 3d 20 50 52 4f 43 2e ┆ A1:= PROC.┆
0x9b860…9b880 4f 46 46 53 45 54 5f 51 55 45 55 45 0d 0a 20 20 20 20 49 4e 53 5f 45 4c 45 4d 20 41 33 2c 41 31 ┆OFFSET_QUEUE INS_ELEM A3,A1┆
0x9b880…9b8a0 2c 41 36 2c 41 33 2f 41 36 20 20 20 20 20 20 20 20 20 20 20 49 4e 53 45 52 54 20 50 52 4f 43 2e ┆,A6,A3/A6 INSERT PROC.┆
0x9b8a0…9b8c0 4f 46 46 53 45 54 20 49 4e 20 53 45 4c 45 43 54 45 44 20 51 55 45 55 45 3b 0d 0a 20 20 20 20 53 ┆OFFSET IN SELECTED QUEUE; S┆
0x9b8c0…9b8e0 55 42 2e 57 20 20 44 30 2c 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆UB.W D0,A1 ┆
0x9b8e0…9b900 20 52 45 53 54 4f 52 45 20 41 31 20 41 53 20 50 52 4f 43 45 53 53 20 41 44 44 52 45 53 53 3b 0d ┆ RESTORE A1 AS PROCESS ADDRESS; ┆
0x9b900…9b920 0a 20 20 20 20 50 52 54 5f 4d 45 4d 20 53 50 45 44 57 41 49 54 2c 28 41 31 29 2c 50 52 5f 53 49 ┆ PRT_MEM SPEDWAIT,(A1),PR_SI┆
0x9b920…9b940 5a 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 20 20 20 52 54 53 20 20 20 20 20 20 20 20 ┆Z ******** RTS ┆
0x9b940…9b960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 0d 0a 20 ┆ RETURN ┆
0x9b960…9b980 0d 0a 20 20 20 20 50 41 47 45 0d 0a 53 50 45 44 44 45 56 49 20 20 20 45 51 55 20 2a 20 20 53 50 ┆ PAGE SPEDDEVI EQU * SP┆
0x9b980…9b9a0 45 45 44 20 55 50 20 50 52 4f 43 45 53 53 20 57 41 49 54 49 4e 47 20 4f 4e 20 44 45 56 49 43 45 ┆EED UP PROCESS WAITING ON DEVICE┆
0x9b9a0…9b9c0 20 43 4f 4e 44 49 54 49 4f 4e 3b 44 37 2f 41 33 2f 41 36 3a 3d 3f 0d 0a 20 20 20 20 4d 4f 56 45 ┆ CONDITION;D7/A3/A6:=? MOVE┆
0x9b9c0…9b9e0 2e 57 20 44 30 2c 50 52 5f 53 59 4e 28 41 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 ┆.W D0,PR_SYN(A1) PR┆
0x9b9e0…9ba00 4f 43 2e 53 59 4e 43 5f 52 45 53 55 4c 54 3a 3d 52 45 53 55 4c 54 3b 0d 0a 20 20 20 20 4d 4f 56 ┆OC.SYNC_RESULT:=RESULT; MOV┆
0x9ba00…9ba20 (124, 0, 6) 20 20 20 20 45 4e 44 49 3b 0d 0a 2a 20 4f 50 45 52 41 54 49 4f 4e 20 52 45 54 55 52 4e 53 20 52 ┆ ENDI; * OPERATION RETURNS R┆
0x9ba20…9ba40 45 4a 45 43 54 2c 53 50 45 45 44 55 50 2e 0d 0a 20 20 20 20 4d 4f 56 45 2e 57 20 20 20 20 20 20 ┆EJECT,SPEEDUP. MOVE.W ┆
0x9ba40…9ba60 20 20 23 45 43 52 53 50 45 45 44 55 50 2c 44 30 20 20 20 20 20 20 44 30 3a 3d 52 45 53 55 4c 54 ┆ #ECRSPEEDUP,D0 D0:=RESULT┆
0x9ba60…9ba80 3a 3d 52 45 4a 45 43 54 2c 53 50 45 45 44 55 50 3b 0d 0a 20 20 20 20 43 41 53 45 4a 4d 50 20 44 ┆:=REJECT,SPEEDUP; CASEJMP D┆
0x9ba80…9baa0 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 54 4f 20 43 41 ┆7 GOTO CA┆
0x9baa0…9bac0 53 45 20 44 37 20 3d 20 53 54 41 54 45 20 4f 46 0d 0a 20 20 20 20 43 41 53 45 4c 41 42 20 43 41 ┆SE D7 = STATE OF CASELAB CA┆
0x9bac0…9bae0 53 45 5f 45 52 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 3a 20 4e 4f 54 20 50 ┆SE_ERR 0: NOT P┆
0x9bae0…9bb00 4f 53 53 49 42 4c 45 0d 0a 20 20 20 20 43 41 53 45 4c 41 42 20 53 50 45 44 57 41 49 54 20 20 20 ┆OSSIBLE CASELAB SPEDWAIT ┆
0x9bb00…9bb20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 32 3a 20 53 50 45 44 57 41 49 54 0d 0a 20 20 20 20 ┆ 2: SPEDWAIT ┆
0x9bb20…9bb40 43 41 53 45 4c 41 42 20 53 50 45 44 44 45 56 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CASELAB SPEDDEVI ┆
0x9bb40…9bb60 20 20 34 3a 20 53 50 45 44 44 45 56 49 0d 0a 20 20 20 20 43 41 53 45 4c 41 42 20 53 50 45 44 5f ┆ 4: SPEDDEVI CASELAB SPED_┆
0x9bb60…9bb80 52 55 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 36 3a 20 53 50 45 44 5f 52 55 4e ┆RUN 6: SPED_RUN┆
0x9bb80…9bba0 20 22 3d 53 50 45 44 4c 4f 43 4b 22 0d 0a 20 20 20 20 43 41 53 45 4c 41 42 20 53 50 45 44 53 49 ┆ "=SPEDLOCK" CASELAB SPEDSI┆
0x9bba0…9bbc0 47 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 3a 20 53 50 45 44 53 49 47 4e 0d ┆GN 8: SPEDSIGN ┆
0x9bbc0…9bbe0 0a 20 0d 0a 53 50 45 44 53 49 47 4e 20 20 20 45 51 55 20 2a 20 20 53 50 45 45 44 55 50 20 53 49 ┆ SPEDSIGN EQU * SPEEDUP SI┆
0x9bbe0…9bc00 47 4e 41 4c 45 44 20 50 52 4f 43 45 53 53 0d 0a 20 20 20 20 52 54 53 20 20 20 20 20 20 20 20 20 ┆GNALED PROCESS RTS ┆
0x9bc00…9bc20 (124, 0, 7) 45 20 43 4f 4e 44 49 54 49 4f 4e 20 43 41 4e 4e 4f 54 20 42 45 20 53 49 47 4e 41 4c 45 44 20 41 ┆E CONDITION CANNOT BE SIGNALED A┆
0x9bc20…9bc40 4e 59 4d 4f 52 45 2e 0d 0a 20 20 20 20 43 4c 52 2e 42 20 50 52 5f 53 54 41 28 41 31 29 20 20 20 ┆NYMORE. CLR.B PR_STA(A1) ┆
0x9bc40…9bc60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 4f 43 2e 53 54 41 54 45 3a 3d 20 52 55 4e 3b ┆ PROC.STATE:= RUN;┆
0x9bc60…9bc80 20 22 53 49 47 4e 41 4c 20 4e 4f 54 20 50 4f 53 53 49 42 4c 45 22 0d 0a 20 20 45 4c 53 45 2e 53 ┆ "SIGNAL NOT POSSIBLE" ELSE.S┆
0x9bc80…9bca0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4c 53 45 ┆ ELSE┆
0x9bca0…9bcc0 20 50 52 4f 43 45 53 53 20 57 41 49 54 49 4e 47 20 49 4e 20 4e 4f 52 4d 41 4c 20 57 41 49 54 0d ┆ PROCESS WAITING IN NORMAL WAIT ┆
0x9bcc0…9bce0 0a 20 20 20 20 4d 4f 56 45 2e 57 20 20 20 20 20 20 20 20 20 23 45 43 53 44 55 4d 4d 59 2c 44 30 ┆ MOVE.W #ECSDUMMY,D0┆
0x9bce0…9bd00 20 20 20 20 20 20 20 20 44 30 3a 3d 52 45 53 55 4c 54 3a 3d 53 54 41 54 55 53 2c 44 55 4d 4d 59 ┆ D0:=RESULT:=STATUS,DUMMY┆
0x9bd00…9bd20 46 49 45 44 3b 0d 0a 20 20 20 20 42 53 52 2e 4c 20 20 53 50 45 44 5f 52 55 4e 20 20 20 20 20 20 ┆FIED; BSR.L SPED_RUN ┆
0x9bd20…9bd40 20 20 20 20 20 20 20 20 20 20 20 20 20 53 50 45 44 5f 52 55 4e 28 41 31 3d 50 52 4f 43 2c 44 30 ┆ SPED_RUN(A1=PROC,D0┆
0x9bd40…9bd60 3d 52 45 53 55 4c 54 2c 41 33 2f 41 36 3a 3d 55 4e 44 45 46 29 3b 0d 0a 2a 20 20 20 50 52 4f 43 ┆=RESULT,A3/A6:=UNDEF); * PROC┆
0x9bd60…9bd80 20 48 41 53 20 42 45 45 4e 20 52 45 4d 4f 56 45 44 20 46 52 4f 4d 20 54 48 45 20 43 4f 4e 44 49 ┆ HAS BEEN REMOVED FROM THE CONDI┆
0x9bd80…9bda0 54 49 4f 4e 20 51 55 45 55 45 20 42 59 20 53 50 45 44 5f 52 55 4e 2e 0d 0a 20 20 45 4e 44 49 20 ┆TION QUEUE BY SPED_RUN. ENDI ┆
0x9bda0…9bdc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 ┆ END┆
0x9bdc0…9bde0 49 3b 0d 0a 20 20 45 4e 44 57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆I; ENDW ┆
0x9bde0…9be00 20 20 20 20 20 20 20 20 45 4e 44 57 3b 0d 0a 20 20 20 20 52 45 54 55 52 4e 20 2e 54 45 52 4d 43 ┆ ENDW; RETURN .TERMC┆
0x9be00…9be20 (124, 0, 8) 45 2e 42 20 50 52 5f 50 52 49 28 41 31 29 2c 44 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 ┆E.B PR_PRI(A1),D7 D┆
0x9be20…9be40 37 3a 3d 4c 45 56 45 4c 20 3c 3c 20 34 20 2b 20 58 0d 0a 20 20 20 20 42 43 4c 52 2e 4c 20 20 23 ┆7:=LEVEL << 4 + X BCLR.L #┆
0x9be40…9be60 30 2c 44 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 44 37 3a 3d 4c 45 56 ┆0,D7 D7:=LEV┆
0x9be60…9be80 45 4c 20 3c 3c 20 34 20 2b 20 30 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 50 52 5f 4d 41 49 4e 28 ┆EL << 4 + 0 LEA PR_MAIN(┆
0x9be80…9bea0 41 31 29 2c 41 31 20 20 20 20 20 20 20 20 20 20 20 20 20 41 31 3a 3d 50 52 4f 43 2e 4d 41 49 4e ┆A1),A1 A1:=PROC.MAIN┆
0x9bea0…9bec0 3b 0d 0a 20 20 20 20 52 45 4d 5f 45 4c 45 4d 20 28 41 31 29 2c 41 33 2c 41 36 2c 41 33 2f 41 36 ┆; REM_ELEM (A1),A3,A6,A3/A6┆
0x9bec0…9bee0 20 20 20 20 20 20 20 20 20 52 45 4d 4f 56 45 20 50 52 4f 43 2e 4d 41 49 4e 20 46 52 4f 4d 20 22 ┆ REMOVE PROC.MAIN FROM "┆
0x9bee0…9bf00 53 4f 4d 45 22 20 51 55 45 55 45 3b 0d 0a 20 20 20 20 42 53 52 2e 4c 20 20 51 44 52 49 56 20 20 ┆SOME" QUEUE; BSR.L QDRIV ┆
0x9bf00…9bf20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 51 44 52 49 56 28 41 31 3d 50 52 4f ┆ QDRIV(A1=PRO┆
0x9bf20…9bf40 43 2c 44 37 3d 50 52 49 4f 2c 41 33 2f 41 36 3a 3d 55 4e 44 45 46 29 3b 0d 0a 2a 20 50 52 4f 43 ┆C,D7=PRIO,A3/A6:=UNDEF); * PROC┆
0x9bf40…9bf60 2e 53 54 41 54 45 20 52 45 4d 41 49 4e 53 20 55 4e 43 48 41 4e 47 45 44 20 28 3d 44 5f 57 41 49 ┆.STATE REMAINS UNCHANGED (=D_WAI┆
0x9bf60…9bf80 54 3d 34 29 2e 20 50 52 4f 43 2e 41 55 58 20 49 53 20 51 55 45 55 45 44 20 54 4f 20 43 4f 4e 44 ┆T=4). PROC.AUX IS QUEUED TO COND┆
0x9bf80…9bfa0 2e 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 2d 50 52 5f 4d 41 49 4e 28 41 31 29 2c 41 31 20 20 20 ┆. LEA -PR_MAIN(A1),A1 ┆
0x9bfa0…9bfc0 20 20 20 20 20 20 20 20 20 41 31 3a 3d 20 50 52 4f 43 45 53 53 3b 0d 0a 20 20 20 20 50 52 54 5f ┆ A1:= PROCESS; PRT_┆
0x9bfc0…9bfe0 4d 45 4d 20 53 50 45 44 44 45 56 49 2c 28 41 31 29 2c 50 52 5f 53 49 5a 20 20 20 20 20 20 2a 2a ┆MEM SPEDDEVI,(A1),PR_SIZ **┆
0x9bfe0…9c000 2a 2a 2a 2a 2a 2a 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 34 2c 41 33 20 20 20 20 20 20 20 20 ┆****** MOVE.L A4,A3 ┆
0x9c000…9c020 (124, 0, 9) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 20 20 22 ┆ RETURN; "┆
0x9c020…9c040 44 4f 20 4e 4f 54 48 49 4e 47 22 0d 0a 20 0d 0a 53 50 45 44 57 41 49 54 20 20 20 45 51 55 20 2a ┆DO NOTHING" SPEDWAIT EQU *┆
0x9c040…9c060 20 20 53 50 45 45 44 20 55 50 20 50 52 4f 43 45 53 53 20 57 41 49 54 49 4e 47 20 4f 4e 20 4e 4f ┆ SPEED UP PROCESS WAITING ON NO┆
0x9c060…9c080 52 4d 41 4c 20 43 4f 4e 44 49 54 49 4f 4e 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 57 20 44 30 2c 50 ┆RMAL CONDITION; MOVE.W D0,P┆
0x9c080…9c0a0 52 5f 53 59 4e 28 41 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 4f 43 2e 53 59 4e 43 ┆R_SYN(A1) PROC.SYNC┆
0x9c0a0…9c0c0 5f 52 45 53 55 4c 54 3a 3d 52 45 53 55 4c 54 3b 0d 0a 20 20 20 20 52 45 4d 5f 45 4c 45 4d 20 50 ┆_RESULT:=RESULT; REM_ELEM P┆
0x9c0c0…9c0e0 52 5f 4d 41 49 4e 28 41 31 29 2c 41 33 2c 41 36 2c 41 33 2f 41 36 20 20 52 45 4d 4f 56 45 20 50 ┆R_MAIN(A1),A3,A6,A3/A6 REMOVE P┆
0x9c0e0…9c100 52 4f 43 2e 4d 41 49 4e 20 46 52 4f 4d 20 22 53 4f 4d 45 22 20 51 55 45 55 45 0d 0a 20 20 20 20 ┆ROC.MAIN FROM "SOME" QUEUE ┆
0x9c100…9c120 4d 4f 56 45 2e 4c 20 50 52 5f 43 4f 4e 28 41 31 29 2c 41 33 20 20 20 20 20 20 20 20 20 20 20 20 ┆MOVE.L PR_CON(A1),A3 ┆
0x9c120…9c140 20 20 41 33 3a 3d 43 4f 4e 44 49 54 49 4f 4e 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 43 4f 5f ┆ A3:=CONDITION; MOVE.L CO_┆
0x9c140…9c160 47 41 28 41 33 29 2c 41 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 36 3a 3d 47 41 54 45 ┆GA(A3),A6 A6:=GATE┆
0x9c160…9c180 20 4d 41 4e 41 47 49 4e 47 20 43 4f 4e 44 49 54 49 4f 4e 3b 0d 0a 2a 20 41 33 2f 41 36 20 43 41 ┆ MANAGING CONDITION; * A3/A6 CA┆
0x9c180…9c1a0 4e 4e 4f 54 20 42 45 20 5a 45 52 4f 0d 0a 20 20 20 20 54 41 53 2e 42 20 20 47 41 5f 53 54 41 28 ┆NNOT BE ZERO TAS.B GA_STA(┆
0x9c1a0…9c1c0 41 36 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 4f 43 4b 20 54 48 45 20 47 41 54 ┆A6) LOCK THE GAT┆
0x9c1c0…9c1e0 45 0d 0a 20 20 49 46 20 3c 45 51 3e 20 54 48 45 4e 2e 53 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆E IF <EQ> THEN.S ┆
0x9c1e0…9c200 20 20 20 20 20 20 20 49 46 20 47 41 54 45 20 57 41 53 20 4f 50 45 4e 20 54 48 45 4e 0d 0a 20 20 ┆ IF GATE WAS OPEN THEN ┆
0x9c200…9c220 (124, 0, 10) 4f 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 0d 0a 20 ┆ON RETURN; ┆
0x9c220…9c240 0d 0a 20 20 20 20 50 41 47 45 0d 0a 50 52 4f 50 53 50 45 44 20 20 20 45 51 55 20 2a 20 20 50 52 ┆ PAGE PROPSPED EQU * PR┆
0x9c240…9c260 4f 50 4f 47 41 54 45 20 53 50 45 45 44 55 50 20 49 4e 54 4f 20 47 41 54 45 20 4f 52 20 43 4f 4e ┆OPOGATE SPEEDUP INTO GATE OR CON┆
0x9c260…9c280 44 49 54 49 4f 4e 20 4f 42 4a 45 43 54 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 43 41 4c 4c 20 20 ┆DITION OBJECT * CALL ┆
0x9c280…9c2a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 0d 0a 2a 20 44 ┆ RETURN * D┆
0x9c2a0…9c2c0 30 2e 42 20 20 20 20 20 31 3d 52 45 4a 45 43 54 2c 33 3d 55 4e 44 45 46 20 20 20 20 20 20 20 20 ┆0.B 1=REJECT,3=UNDEF ┆
0x9c2c0…9c2e0 20 20 20 55 4e 44 45 46 49 4e 45 44 0d 0a 2a 20 41 31 20 20 20 20 20 20 20 50 52 4f 43 45 53 53 ┆ UNDEFINED * A1 PROCESS┆
0x9c2e0…9c300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 4d 45 0d 0a 2a 20 44 37 2f 41 ┆ SAME * D7/A┆
0x9c300…9c320 33 2f 41 36 20 41 4e 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3/A6 ANY ┆
0x9c320…9c340 55 4e 44 45 46 49 4e 45 44 0d 0a 2a 0d 0a 20 20 20 20 4d 4f 56 45 51 2e 4c 20 23 30 2c 44 37 0d ┆UNDEFINED * MOVEQ.L #0,D7 ┆
0x9c340…9c360 0a 20 20 20 20 4d 4f 56 45 2e 42 20 50 52 5f 53 54 41 28 41 31 29 2c 44 37 20 20 20 20 20 20 20 ┆ MOVE.B PR_STA(A1),D7 ┆
0x9c360…9c380 20 20 20 20 20 20 20 44 37 2e 57 3a 3d 50 52 4f 43 2e 53 54 41 54 45 3b 0d 0a 20 20 49 46 20 3c ┆ D7.W:=PROC.STATE; IF <┆
0x9c380…9c3a0 45 51 3e 20 54 48 45 4e 2e 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 ┆EQ> THEN.S IF┆
0x9c3a0…9c3c0 20 50 52 4f 43 2e 53 54 41 54 45 20 3d 20 52 55 4e 20 54 48 45 4e 0d 0a 20 20 20 20 52 54 53 20 ┆ PROC.STATE = RUN THEN RTS ┆
0x9c3c0…9c3e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 ┆ RE┆
0x9c3e0…9c400 54 55 52 4e 3b 0d 0a 20 20 45 4e 44 49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆TURN; ENDI ┆
0x9c400…9c420 (125, 1, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 56 45 20 41 34 20 49 4e 20 41 33 0d 0a 20 20 20 ┆ SAVE A4 IN A3 ┆
0x9c420…9c440 20 42 53 52 2e 4c 20 20 45 4e 5f 53 54 4f 50 52 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ BSR.L EN_STOPR ┆
0x9c440…9c460 20 20 20 45 4e 53 55 52 45 20 53 54 4f 50 20 52 55 4e 4e 49 4e 47 20 50 52 4f 43 45 53 53 28 44 ┆ ENSURE STOP RUNNING PROCESS(D┆
0x9c460…9c480 37 2f 41 34 3a 3d 3f 29 3b 0d 0a 20 20 20 20 4d 4f 56 45 2e 4c 20 41 33 2c 41 34 20 20 20 20 20 ┆7/A4:=?); MOVE.L A3,A4 ┆
0x9c480…9c4a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 53 54 4f 52 45 20 41 34 20 46 52 4f 4d ┆ RESTORE A4 FROM┆
0x9c4a0…9c4c0 20 41 33 0d 0a 20 20 20 20 52 54 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A3 RTS ┆
0x9c4c0…9c4e0 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 0d 0a 2a 20 57 48 45 4e 20 54 48 45 20 4b ┆ RETURN; * WHEN THE K┆
0x9c4e0…9c500 45 52 4e 45 4c 20 4f 50 45 52 41 54 49 4f 4e 20 54 48 41 54 20 43 41 4c 4c 45 44 20 53 50 45 44 ┆ERNEL OPERATION THAT CALLED SPED┆
0x9c500…9c520 44 45 56 49 20 52 45 54 55 52 4e 53 20 54 4f 20 54 48 45 0d 0a 2a 20 55 53 45 52 20 43 4f 4e 54 ┆DEVI RETURNS TO THE * USER CONT┆
0x9c520…9c540 45 58 54 2c 20 54 48 45 20 53 43 48 45 44 55 4c 45 52 20 57 49 4c 4c 20 47 45 54 20 43 4f 4e 54 ┆EXT, THE SCHEDULER WILL GET CONT┆
0x9c540…9c560 52 4f 4c 2c 20 41 4e 44 20 41 43 54 49 56 41 54 45 0d 0a 2a 20 54 48 45 20 44 52 49 56 45 52 20 ┆ROL, AND ACTIVATE * THE DRIVER ┆
0x9c560…9c580 4a 55 53 54 20 53 50 45 45 44 45 44 20 55 50 2e 0d 0a 20 0d 0a 20 0d 0a 53 50 45 44 5f 52 55 4e ┆JUST SPEEDED UP. SPED_RUN┆
0x9c580…9c5a0 20 20 20 45 51 55 20 2a 20 20 50 55 54 20 54 48 45 20 50 52 4f 43 45 53 53 20 42 41 43 4b 20 49 ┆ EQU * PUT THE PROCESS BACK I┆
0x9c5a0…9c5c0 4e 54 4f 20 52 55 4e 4e 49 4e 47 20 51 55 45 55 45 3b 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 43 ┆NTO RUNNING QUEUE; * C┆
0x9c5c0…9c5e0 41 4c 4c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e ┆ALL RETURN┆
0x9c5e0…9c600 0d 0a 2a 20 44 30 20 20 20 20 20 20 20 53 59 4e 43 5f 52 45 53 55 4c 54 20 20 20 20 20 20 20 20 ┆ * D0 SYNC_RESULT ┆
0x9c600…9c800 (125, 1, 2) DataBlock {»ENTER.S«}
0x9c800…9ca00 (125, 1, 3) 0xe5[0x200]
0x9ca00…9ca20 (125, 1, 4) 20 20 20 20 20 20 20 20 53 41 4d 45 0d 0a 2a 20 41 31 20 20 20 20 20 20 20 50 52 4f 43 45 53 53 ┆ SAME * A1 PROCESS┆
0x9ca20…9ca40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 41 4d 45 0d 0a 2a 20 41 33 2f 41 ┆ SAME * A3/A┆
0x9ca40…9ca60 36 20 20 20 20 41 4e 59 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆6 ANY ┆
0x9ca60…9ca80 55 4e 44 45 46 0d 0a 20 20 20 20 4d 4f 56 45 2e 57 20 44 30 2c 50 52 5f 53 59 4e 28 41 31 29 20 ┆UNDEF MOVE.W D0,PR_SYN(A1) ┆
0x9ca80…9caa0 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 4f 43 2e 53 59 4e 43 5f 52 45 53 55 4c 54 3a 3d 52 ┆ PROC.SYNC_RESULT:=R┆
0x9caa0…9cac0 45 53 55 4c 54 3b 0d 0a 20 20 20 20 52 45 4d 5f 45 4c 45 4d 20 50 52 5f 4d 41 49 4e 28 41 31 29 ┆ESULT; REM_ELEM PR_MAIN(A1)┆
0x9cac0…9cae0 2c 41 33 2c 41 36 2c 41 33 2f 41 36 20 20 52 45 4d 4f 56 45 20 50 52 4f 43 2e 4d 41 49 4e 20 46 ┆,A3,A6,A3/A6 REMOVE PROC.MAIN F┆
0x9cae0…9cb00 52 4f 4d 0d 0a 20 20 20 20 49 4e 49 54 5f 48 45 41 44 20 50 52 5f 4d 41 49 4e 28 41 31 29 2c 41 ┆ROM INIT_HEAD PR_MAIN(A1),A┆
0x9cb00…9cb20 33 20 20 20 20 20 20 20 20 20 20 22 53 4f 4d 45 22 20 51 55 45 55 45 0d 0a 20 20 20 20 43 4c 52 ┆3 "SOME" QUEUE CLR┆
0x9cb20…9cb40 2e 42 20 20 50 52 5f 53 54 41 28 41 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 ┆.B PR_STA(A1) P┆
0x9cb40…9cb60 52 4f 43 2e 53 54 41 54 45 3a 3d 52 55 4e 3a 3d 30 3b 0d 0a 20 20 20 20 43 4c 52 2e 42 20 20 50 ┆ROC.STATE:=RUN:=0; CLR.B P┆
0x9cb60…9cb80 52 5f 50 52 49 28 41 31 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 52 4f 43 2e 50 ┆R_PRI(A1) PROC.P┆
0x9cb80…9cba0 52 49 4f 3a 3d 30 3b 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 50 52 5f 41 55 58 28 41 31 29 2c 41 ┆RIO:=0; LEA PR_AUX(A1),A┆
0x9cba0…9cbc0 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 31 3a 3d 50 52 4f 43 2e 41 55 58 0d 0a 20 20 20 ┆1 A1:=PROC.AUX ┆
0x9cbc0…9cbe0 20 52 45 4d 5f 45 4c 45 4d 20 28 41 31 29 2c 41 33 2c 41 36 2c 41 33 2f 41 36 20 20 20 20 20 20 ┆ REM_ELEM (A1),A3,A6,A3/A6 ┆
0x9cbe0…9cc00 20 20 20 52 45 4d 4f 56 45 20 50 52 4f 43 2e 41 55 58 20 46 52 4f 4d 20 22 53 4f 4d 45 22 20 51 ┆ REMOVE PROC.AUX FROM "SOME" Q┆
0x9cc00…9ce00 (125, 1, 5) DataBlock {»ENTER.S«}
0x9ce00…9d000 (125, 1, 6) 0xe5[0x200]
0x9d000…9d020 (125, 1, 7) 55 45 55 45 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 52 55 4e 4e 49 4e 47 2c 41 33 20 20 20 20 20 ┆UEUE LEA RUNNING,A3 ┆
0x9d020…9d040 20 20 20 20 20 20 20 20 20 20 20 20 41 33 3a 3d 52 55 4e 4e 49 4e 47 3b 0d 0a 20 20 20 20 49 4e ┆ A3:=RUNNING; IN┆
0x9d040…9d060 53 5f 45 4c 45 4d 20 41 33 2c 41 31 2c 41 36 2c 41 33 2f 41 36 20 20 20 20 20 20 20 20 20 20 20 ┆S_ELEM A3,A1,A6,A3/A6 ┆
0x9d060…9d080 49 4e 53 45 52 54 20 50 52 4f 43 2e 41 55 58 20 49 4e 20 52 55 4e 4e 49 4e 47 20 51 55 45 55 45 ┆INSERT PROC.AUX IN RUNNING QUEUE┆
0x9d080…9d0a0 3b 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 2d 50 52 5f 41 55 58 28 41 31 29 2c 41 31 20 20 20 20 ┆; LEA -PR_AUX(A1),A1 ┆
0x9d0a0…9d0c0 20 20 20 20 20 20 20 20 20 52 45 53 54 4f 52 45 20 41 31 20 3d 20 50 52 4f 43 45 53 53 0d 0a 20 ┆ RESTORE A1 = PROCESS ┆
0x9d0c0…9d0e0 20 20 20 50 52 54 5f 4d 45 4d 20 53 50 45 44 5f 52 55 4e 2c 28 41 31 29 2c 50 52 5f 53 49 5a 20 ┆ PRT_MEM SPED_RUN,(A1),PR_SIZ ┆
0x9d0e0…9d100 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 20 20 20 52 54 53 20 20 20 20 20 20 20 20 20 20 ┆ ******** RTS ┆
0x9d100…9d120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 0d 0a 20 0d ┆ RETURN; ┆
0x9d120…9d140 0a 20 0d 0a 43 41 53 45 5f 45 52 52 20 20 20 45 51 55 20 2a 20 20 43 41 53 45 20 45 52 52 4f 52 ┆ CASE_ERR EQU * CASE ERROR┆
0x9d140…9d160 0d 0a 20 20 20 45 52 52 4f 52 20 20 38 38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ERROR 88 ┆
0x9d160…9d180 20 20 20 20 20 20 20 20 45 52 52 4f 52 28 38 38 29 3b 0d 0a 20 0d 0a 2a 20 45 4e 44 20 4f 46 20 ┆ ERROR(88); * END OF ┆
0x9d180…9d1a0 53 43 48 45 44 55 4c 45 52 20 52 55 4e 54 49 4d 45 20 53 45 43 54 49 4f 4e 0d 0a 53 43 48 5f 54 ┆SCHEDULER RUNTIME SECTION SCH_T┆
0x9d1a0…9d1c0 52 55 4e 20 20 20 45 51 55 20 2a 20 20 54 4f 50 20 41 44 44 52 45 53 53 20 4f 46 20 53 43 48 45 ┆RUN EQU * TOP ADDRESS OF SCHE┆
0x9d1c0…9d1e0 44 55 4c 45 52 20 52 55 4e 54 49 4d 45 20 53 45 43 54 49 4f 4e 0d 0a 20 20 20 20 45 4e 44 20 21 ┆DULER RUNTIME SECTION END !┆
0x9d1e0…9d200 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 20 4f 46 20 ┆ END OF ┆
0x9d200…9d400 (125, 1, 8) DataBlock {»ENTER.S«}
[…0x1…]
0x9d600…9d620 (125, 1, 10) 53 43 48 45 44 55 4c 45 52 20 53 4f 55 52 43 45 0d 0a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆SCHEDULER SOURCE ┆
0x9d620…9d640 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆ ┆
[…0x2…]
0x9d680…9d6a0 3b 0d 0a 20 20 20 20 4c 45 41 20 20 20 20 2d 50 52 5f 41 55 58 28 41 31 29 2c 41 31 20 20 20 20 ┆; LEA -PR_AUX(A1),A1 ┆
0x9d6a0…9d6c0 20 20 20 20 20 20 20 20 20 52 45 53 54 4f 52 45 20 41 31 20 3d 20 50 52 4f 43 45 53 53 0d 0a 20 ┆ RESTORE A1 = PROCESS ┆
0x9d6c0…9d6e0 20 20 20 50 52 54 5f 4d 45 4d 20 53 50 45 44 5f 52 55 4e 2c 28 41 31 29 2c 50 52 5f 53 49 5a 20 ┆ PRT_MEM SPED_RUN,(A1),PR_SIZ ┆
0x9d6e0…9d700 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 0d 0a 20 20 20 20 52 54 53 20 20 20 20 20 20 20 20 20 20 ┆ ******** RTS ┆
0x9d700…9d720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 4e 3b 0d 0a 20 0d ┆ RETURN; ┆
0x9d720…9d740 0a 20 0d 0a 43 41 53 45 5f 45 52 52 20 20 20 45 51 55 20 2a 20 20 43 41 53 45 20 45 52 52 4f 52 ┆ CASE_ERR EQU * CASE ERROR┆
0x9d740…9d760 0d 0a 20 20 20 45 52 52 4f 52 20 20 38 38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ERROR 88 ┆
0x9d760…9d780 20 20 20 20 20 20 20 20 45 52 52 4f 52 28 38 38 29 3b 0d 0a 20 0d 0a 2a 20 45 4e 44 20 4f 46 20 ┆ ERROR(88); * END OF ┆
0x9d780…9d7a0 53 43 48 45 44 55 4c 45 52 20 52 55 4e 54 49 4d 45 20 53 45 43 54 49 4f 4e 0d 0a 53 43 48 5f 54 ┆SCHEDULER RUNTIME SECTION SCH_T┆
0x9d7a0…9d7c0 52 55 4e 20 20 20 45 51 55 20 2a 20 20 54 4f 50 20 41 44 44 52 45 53 53 20 4f 46 20 53 43 48 45 ┆RUN EQU * TOP ADDRESS OF SCHE┆
0x9d7c0…9d7e0 44 55 4c 45 52 20 52 55 4e 54 49 4d 45 20 53 45 43 54 49 4f 4e 0d 0a 20 20 20 20 45 4e 44 20 21 ┆DULER RUNTIME SECTION END !┆
0x9d7e0…9d800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 20 4f 46 20 ┆ END OF ┆
0x9d800…9da00 (126, 0, 1) DataBlock {»ENTER.S«}
[…0x14…]
0xa0200…a0400 (128, 0, 2) 0xe5[0x200]
[…0x1…]
0xa0600…a0780 (128, 0, 4) DataBlock {»ENTER.S«}
0xa0780…a07a0 20 54 48 45 20 4e 45 45 44 20 46 4f 52 20 4d 45 4d 4f 52 59 20 43 4f 4d 50 52 45 53 53 49 4f 4e ┆ THE NEED FOR MEMORY COMPRESSION┆
0xa07a0…a07c0 0d 0a 46 49 52 53 54 5f 4f 53 20 20 20 45 51 55 20 2a 20 20 20 20 20 20 4f 53 5f 4d 4f 44 55 4c ┆ FIRST_OS EQU * OS_MODUL┆
0xa07c0…a07e0 45 53 20 57 49 4c 4c 20 42 45 20 42 4f 4f 54 45 44 20 41 54 20 54 48 45 20 4e 45 58 54 20 50 41 ┆ES WILL BE BOOTED AT THE NEXT PA┆
0xa07e0…a0800 47 45 20 42 4f 55 4e 44 41 52 59 2e 0d 0a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GE BOUNDARY. * ┆
0xa0800…a0a00 (128, 0, 5) 0xe5[0x200]
[…0x13b…]