|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 21504 (0x5400)
Types: Rc489kSubCat
Names: »cgutil«
└─⟦621cfb9a2⟧ Bits:30002817 RC8000 Dump tape fra HCØ. Detaljer om "HC8000" projekt.
└─⟦0364f57e3⟧
└─⟦this⟧ »cgutil«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »cgutil«
0x0000…0033 (0,) Rc489kSubCatEnt {f00=0x00161b, f01=0x00003c, f02=0x000045, filename=»townbs «, entry_tail=0-4-0-2-1981-07-09T14:26-disc1-0x0-0x0-0x0-0x0}
0x0033…0066 Rc489kSubCatEnt {f00=0x003013, f01=0x000276, f02=0x00027f, filename=»tremovespf «, entry_tail=0-4-0-1-1981-07-14T16:03-disc1-0x0-0x0-0x0-0x0}
0x0066…0099 Rc489kSubCatEnt {f00=0x004ae3, f01=0x000276, f02=0x00027f, filename=»tremovenld «, entry_tail=0-4-0-1-1981-07-14T16:16-disc1-0x0-0x0-0x0-0x0}
0x0099…00cc Rc489kSubCatEnt {f00=0x00520b, f01=0x000000, f02=0x0007cf, filename=»tcgproclib «, entry_tail=0-4-0-19-1980-09-29T17:31-disc3-0x0-0x0-0x0-0x0}
0x00cc…00e0 06 43 e8 01 00 02 02 60 26 00 00 00 00 00 00 00 00 00 77 72 ┆ C `& wr┆
0x00e0…0100 69 74 65 00 00 00 00 00 00 00 01 59 84 01 59 86 01 50 36 01 4b 92 01 56 04 01 59 8c 01 59 74 01 ┆ite Y Y P6 K V Y Yt ┆
0x0100…0120 58 1e 01 59 d0 01 59 ca 01 41 9a 01 40 29 00 40 13 ff ff f4 00 60 17 02 00 6c 34 31 b6 75 6e 64 ┆X Y Y A @) @ ` l41 und┆
0x0120…0140 00 00 00 6e 6f 74 20 66 6f 00 00 02 01 81 a6 00 00 08 00 00 22 00 c1 42 00 c0 ac 01 40 8a 34 30 ┆ not fo " B @ 40┆
0x0140…0160 4e 5d 2f eb 34 80 06 2d 00 01 5d 2f eb 50 8f be 51 8f f5 dd 2f 57 2d 00 01 5d 2f d3 34 80 12 53 ┆NÅ/ 4 - Å/ P Q /W- Å/ 4 S┆
0x0160…0180 cf bc 2d 00 01 1d 2f d3 5d 2f d3 51 2f d5 21 2f d3 a1 0f ff 34 30 7e 2d 0f e6 37 cf a8 5e 10 00 ┆ - / Å/ Q/ !/ 40ü- 7 ^ ┆
0x0180…01a0 50 8f d3 53 8f 9a dc 10 05 2c 2f 7e 53 8f b1 dc 10 09 d8 8f b5 dc 10 15 2c 10 15 2f 00 1a dc 10 ┆P S ,/üS , / ┆
0x01a0…01c0 0d d8 8f ab dc 10 19 2c 10 19 2f 00 1a dc 10 11 53 cf 8e 52 2f fc 34 30 14 2d 0f ee 37 cf 7c 5e ┆ , / S R/ 40 - 7 ø^┆
0x01c0…01e0 10 00 50 8f a5 53 8f 6e dc 10 05 2c 2f 7e 53 8f 85 dc 10 09 d8 8f 95 dc 10 11 2c 10 11 2f 00 1a ┆ P S n ,/üS , / ┆
0x01e0…0200 dc 10 0d 53 cf 6a 52 2f fc 34 30 34 51 2f d5 a9 00 00 34 80 08 2d 03 e8 5d 2f cb 34 80 90 2d 00 ┆ S jR/ 404Q/ 4 - Å/ 4 - ┆
0x0200…0220 01 5d 2f cb 34 80 08 2d 00 01 1d 2f cb 5d 2f cb 21 2f e7 a5 00 01 34 80 7e 51 2f 93 29 2f d3 2d ┆ Å/ 4 - / Å/ !/ 4 üQ/ )/ -┆
0x0220…0240 10 01 91 00 02 1d 2f 8d d9 10 00 dd 2f 4d 2d 00 04 1d 2f b3 1d 2f 7e d9 10 00 2f 2f 4d 18 3f fe ┆ / /M- / /ü //M ? ┆
0x0240…0260 19 30 00 14 00 02 a8 00 00 24 00 01 2d 0f ff 5d 2f 4d 51 2f 93 29 2f d3 2d 10 02 91 00 02 1d 2f ┆ 0 $ - Å/MQ/ )/ - /┆
0x0260…0280 8d d9 10 00 dd 2f 4b 2d 00 08 1d 2f b3 1d 2f 7e d9 10 00 2f 2f 4b 18 3f fe 19 30 00 14 00 02 a8 ┆ /K- / /ü //K ? 0 ┆
0x0280…02a0 00 00 24 00 01 2d 0f ff 11 2f 4d b1 00 01 34 80 08 2d 03 e8 5d 2f cb 34 80 24 2d 0f ee 37 ce e6 ┆ $ - /M 4 - Å/ 4 $- 7 ┆
0x02a0…02c0 5e 10 00 50 8f 0d 53 8e d8 dc 10 05 2c 2f 7e 53 8e ef dc 10 09 d8 8e ff dc 10 11 2c 10 11 2f 00 ┆^ P S ,/üS , / ┆
0x02c0…02e0 1a dc 10 0d 53 ce d4 52 2f fc 34 30 34 34 8f 7c 34 2f 51 51 2f cb a5 03 e8 34 80 60 51 2f d3 29 ┆ S R/ 4044 ø4/QQ/ 4 `Q/ )┆
0x02e0…02fd 8e e1 5d 2f b5 2d 0f e2 37 ce b4 5e 10 00 50 8e d5 53 8e a6 dc 10 05 d8 8e cd dc 10 15 ┆ Å/ - 7 ^ P S ┆
0x02fd…0300 0x000004
0x0300…0900 Data for townbs
0x0900…0c00 (1,) Data for tremovespf
0x0c00…0f00 Data for tremovenld
0x0f00…4800 Data for tcgproclib
0x4800…4820 (8,) 65 63 6f 6e 64 3b 20 77 33 3a 3d 6e 61 6d 65 20 61 64 64 72 65 73 73 3b 0a 20 20 20 20 20 20 6a ┆econd; w3:=name address; j┆
0x4820…4840 6c 2e 20 20 20 20 20 61 33 32 2e 20 20 20 20 20 20 20 3b 20 20 20 67 6f 74 6f 20 72 65 70 31 3b ┆l. a32. ; goto rep1;┆
0x4840…4860 0a 0a 61 33 33 3a 20 20 72 73 2e 20 77 33 20 20 62 33 2e 20 20 20 20 20 20 20 20 3b 20 77 61 69 ┆ a33: rs. w3 b3. ; wai┆
0x4860…4880 74 20 61 20 73 65 63 6f 6e 64 3a 20 20 73 61 76 65 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 ┆t a second: save return; ┆
0x4880…48a0 61 6c 2e 20 77 31 20 20 62 34 2e 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 61 6c 2e 20 77 ┆al. w1 b4. ; al. w┆
0x48a0…48c0 33 20 20 62 35 2e 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 6a 64 20 20 20 20 20 20 31 3c ┆3 b5. ; jd 1<┆
0x48c0…48e0 31 31 2b 31 36 20 20 20 20 3b 20 20 20 73 65 6e 64 20 6d 65 73 73 61 67 65 28 63 6c 6f 63 6b 29 ┆11+16 ; send message(clock)┆
0x48e0…4900 3b 0a 20 20 20 20 20 20 61 6c 2e 20 77 31 20 20 62 34 2e 2b 34 20 20 20 20 20 20 3b 0a 20 20 20 ┆; al. w1 b4.+4 ; ┆
0x4900…4920 20 20 20 6a 64 20 20 20 20 20 20 31 3c 31 31 2b 31 38 20 20 20 20 3b 20 20 20 77 61 69 74 20 61 ┆ jd 1<11+18 ; wait a┆
0x4920…4940 6e 73 77 65 72 3b 0a 20 20 20 20 20 20 72 6c 2e 20 77 33 20 20 63 39 2e 20 20 20 20 20 20 20 20 ┆nswer; rl. w3 c9. ┆
0x4940…4960 3b 0a 20 20 20 20 20 20 61 6c 20 20 77 33 20 20 78 33 2b 32 20 20 20 20 20 20 20 3b 20 20 20 77 ┆; al w3 x3+2 ; w┆
0x4960…4980 33 20 3a 3d 20 64 6f 63 20 6e 61 6d 65 20 61 64 64 72 3b 0a 20 20 20 20 20 20 6a 6c 2e 20 20 20 ┆3 := doc name addr; jl. ┆
0x4980…49a0 20 28 62 33 2e 29 20 20 20 20 20 20 20 3b 20 20 20 72 65 74 75 72 6e 3b 0a 0a 61 33 34 3a 20 20 ┆ (b3.) ; return; a34: ┆
0x49a0…49c0 72 73 2e 20 77 32 20 20 62 33 2e 20 20 20 20 20 20 20 20 3b 20 72 65 61 64 20 61 20 62 6c 6f 63 ┆rs. w2 b3. ; read a bloc┆
0x49c0…49e0 6b 3a 20 20 73 61 76 65 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 72 6c 2e 20 77 31 20 20 63 ┆k: save return; rl. w1 c┆
0x49e0…4a00 37 2e 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 72 6c 20 20 77 31 20 20 78 31 2b 68 30 2b ┆7. ; rl w1 x1+h0+┆
0x4a00…4a20 36 20 20 20 20 3b 20 20 20 77 31 20 3a 3d 20 66 69 72 73 74 20 73 68 61 72 65 3b 0a 20 20 20 20 ┆6 ; w1 := first share; ┆
0x4a20…4a40 20 20 61 6c 20 20 77 31 20 20 78 31 2b 36 20 20 20 20 20 20 20 3b 20 20 20 77 31 20 3a 3d 20 6d ┆ al w1 x1+6 ; w1 := m┆
0x4a40…4a60 65 73 73 61 67 65 20 61 64 64 72 3b 0a 20 20 20 20 20 20 6a 64 20 20 20 20 20 20 31 3c 31 31 2b ┆essage addr; jd 1<11+┆
0x4a60…4a80 31 36 20 20 20 20 3b 20 20 20 73 65 6e 64 20 6d 65 73 73 61 67 65 3b 0a 20 20 20 20 20 20 72 73 ┆16 ; send message; rs┆
0x4a80…4aa0 20 20 77 32 20 20 78 31 2d 36 20 20 20 20 20 20 20 3b 20 20 20 73 68 61 72 65 20 73 74 61 74 65 ┆ w2 x1-6 ; share state┆
0x4aa0…4ac0 20 3a 3d 20 62 75 66 20 61 64 64 72 3b 0a 20 20 20 20 20 20 61 6c 20 20 77 32 20 20 30 20 20 20 ┆ := buf addr; al w2 0 ┆
0x4ac0…4ae0 20 20 20 20 20 20 20 3b 20 20 20 77 32 20 3a 3d 20 73 74 61 72 74 20 65 76 65 6e 74 20 71 75 65 ┆ ; w2 := start event que┆
0x4ae0…4b00 75 65 3b 0a 61 33 35 3a 20 20 72 6c 20 20 77 30 20 20 78 32 2b 38 20 20 20 20 20 20 20 3b 20 72 ┆ue; a35: rl w0 x2+8 ; r┆
0x4b00…4b20 65 70 32 3a 20 20 28 77 30 2c 77 31 29 20 3a 3d 20 28 73 74 61 74 75 73 2c 62 79 74 65 73 20 74 ┆ep2: (w0,w1) := (status,bytes t┆
0x4b20…4b40 72 61 6e 73 66 65 72 72 65 64 29 3b 0a 20 20 20 20 20 20 73 6e 20 20 77 32 20 28 78 31 2d 36 29 ┆ransferred); sn w2 (x1-6)┆
0x4b40…4b60 20 20 20 20 20 20 3b 20 20 20 69 66 20 65 76 65 6e 74 20 3d 20 73 68 61 72 65 20 73 74 61 74 65 ┆ ; if event = share state┆
0x4b60…4b80 20 74 68 65 6e 0a 20 20 20 20 20 20 6a 6c 2e 20 20 20 20 28 62 33 2e 29 20 20 20 20 20 20 20 3b ┆ then jl. (b3.) ;┆
0x4b80…4ba0 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 6a 64 20 20 20 20 20 20 31 3c 31 31 2b 32 34 ┆ return; jd 1<11+24┆
0x4ba0…4bc0 20 20 20 20 3b 20 20 20 77 61 69 74 20 65 76 65 6e 74 3b 0a 20 20 20 20 20 20 6a 6c 2e 20 20 20 ┆ ; wait event; jl. ┆
0x4bc0…4be0 20 20 61 33 35 2e 20 20 20 20 20 20 20 3b 20 20 20 67 6f 74 6f 20 72 65 70 32 3b 0a 61 33 37 3a ┆ a35. ; goto rep2; a37:┆
0x4be0…4c00 20 20 72 6c 2e 20 77 31 20 20 63 37 2e 20 20 20 20 20 20 20 20 3b 20 63 6c 65 61 72 20 63 68 61 ┆ rl. w1 c7. ; clear cha┆
0x4c00…4c20 72 65 3a 0a 20 20 20 20 20 20 72 6c 20 20 77 31 20 20 78 31 2b 68 30 2b 36 20 20 20 20 3b 20 20 ┆re: rl w1 x1+h0+6 ; ┆
0x4c20…4c40 20 73 68 61 72 65 20 73 74 61 74 65 0a 20 20 20 20 20 20 61 6c 20 20 77 30 20 20 30 20 20 20 20 ┆ share state al w0 0 ┆
0x4c40…4c60 20 20 20 20 20 20 3b 20 20 20 28 66 69 72 73 74 20 73 68 61 72 65 0a 20 20 20 20 20 20 72 73 20 ┆ ; (first share rs ┆
0x4c60…4c80 20 77 30 20 20 78 31 20 20 20 20 20 20 20 20 20 3b 20 20 20 28 7a 6f 6e 65 29 29 3a 3d 30 3b 0a ┆ w0 x1 ; (zone)):=0; ┆
0x4c80…4ca0 20 20 20 20 20 20 6a 6c 2e 20 20 20 20 20 65 33 31 2e 20 20 20 20 20 20 20 3b 20 20 20 67 6f 74 ┆ jl. e31. ; got┆
0x4ca0…4cc0 6f 20 6e 6f 20 72 65 73 6f 75 72 63 65 73 0a 0a 62 2e 20 67 31 0a 77 2e 0a 20 67 31 20 3d 20 28 ┆o no resources b. g1 w. g1 = (┆
0x4cc0…4ce0 3a 68 31 33 2b 35 31 32 2d 6b 3a 29 2f 32 0a 63 2e 20 2d 67 31 2c 20 6d 2e 20 6c 65 6e 67 74 68 ┆:h13+512-k:)/2 c. -g1, m. length┆
0x4ce0…4d00 20 65 72 72 6f 72 2c 20 63 6f 6e 6e 65 63 74 20 69 6e 0a 7a 2e 0a 77 2e 20 30 2c 20 72 2e 20 67 ┆ error, connect in z. w. 0, r. g┆
0x4d00…4d20 31 20 3b 20 66 69 6c 6c 20 73 65 67 6d 65 6e 74 0a 65 2e 20 20 20 20 20 20 20 20 20 20 3b 20 65 ┆1 ; fill segment e. ; e┆
0x4d20…4d40 6e 64 20 66 69 6c 6c 0a 6d 2e 66 70 20 63 6f 6e 6e 65 63 74 20 69 6e 70 75 74 20 20 37 36 2e 30 ┆nd fill m.fp connect input 76.0┆
0x4d40…4d60 32 2e 30 32 0a 69 2e 20 20 20 20 20 20 20 20 20 20 3b 20 6c 69 73 74 20 6e 61 6d 65 73 0a 65 2e ┆2.02 i. ; list names e.┆
0x4d60…4d80 20 20 20 20 20 20 20 20 20 20 3b 20 65 6e 64 20 63 6f 6e 6e 65 63 74 20 69 6e 0a 0c 0a 0a 0a 3b ┆ ; end connect in ;┆
0x4d80…4da0 20 72 63 20 30 32 2e 30 32 2e 37 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 70 72 ┆ rc 02.02.74 filepr┆
0x4da0…4dc0 6f 63 65 73 73 6f 72 20 20 20 20 20 20 20 20 20 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 2c 20 ┆ocessor connect output, ┆
0x4dc0…4de0 70 61 67 65 20 2e 2e 2e 31 2e 2e 2e 0a 3b 20 73 65 67 6d 65 6e 74 20 31 0a 0a 0a 0a 3b 20 63 6f ┆page ...1... ; segment 1 ; co┆
0x4de0…4e00 6e 6e 65 63 74 20 6f 75 74 70 75 74 20 63 6f 6e 73 69 73 74 73 20 6f 66 20 74 77 6f 20 62 61 63 ┆nnect output consists of two bac┆
0x4e00…4e20 6b 69 6e 67 20 73 74 6f 72 61 67 65 20 73 65 67 6d 65 6e 74 73 2e 20 74 68 65 20 66 69 72 73 74 ┆king storage segments. the first┆
0x4e20…4e40 0a 3b 20 73 65 67 6d 65 6e 74 20 69 73 20 6c 6f 61 64 65 64 20 62 79 20 74 68 65 20 63 61 6c 6c ┆ ; segment is loaded by the call┆
0x4e40…4e60 2e 20 74 68 65 20 73 65 63 6f 6e 64 20 73 65 67 6d 65 6e 74 20 69 73 20 6c 6f 61 64 65 64 20 62 ┆. the second segment is loaded b┆
0x4e60…4e80 79 20 63 6f 6e 2d 0a 3b 20 6e 65 63 74 20 6f 75 74 70 75 74 20 69 74 73 65 6c 66 2e 0a 0a 3b 20 ┆y con- ; nect output itself. ; ┆
0x4e80…4ea0 65 6e 74 72 79 3a 20 20 63 34 3a 20 20 77 30 3a 20 20 73 65 67 6d 65 6e 74 73 3c 31 20 2b 20 3c ┆entry: c4: w0: segments<1 + <┆
0x4ea0…4ec0 64 72 75 6d 20 6f 72 20 64 69 73 63 3e 0a 3b 20 20 20 20 20 20 20 20 20 63 37 3a 20 20 77 31 3a ┆drum or disc> ; c7: w1:┆
0x4ec0…4ee0 20 20 7a 6f 6e 65 20 64 65 73 63 72 69 70 74 6f 72 20 61 64 64 72 65 73 73 20 6f 72 20 30 0a 3b ┆ zone descriptor address or 0 ;┆
0x4ee0…4f00 20 20 20 20 20 20 20 20 20 63 39 3a 20 20 77 32 3a 20 20 61 64 64 72 65 73 73 20 6f 66 20 66 69 ┆ c9: w2: address of fi┆
0x4f00…4f20 6c 65 64 65 73 63 72 69 70 74 6f 72 20 6f 72 20 6f 66 20 6e 61 6d 65 0a 3b 20 20 20 20 20 20 20 ┆ledescriptor or of name ; ┆
0x4f20…4f40 20 20 63 31 31 3a 20 77 33 3a 20 20 6c 69 6e 6b 0a 0a 3b 20 65 78 69 74 3a 20 20 20 20 20 20 20 ┆ c11: w3: link ; exit: ┆
0x4f40…4f60 20 77 30 3a 20 20 72 65 73 75 6c 74 0a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 31 3a 20 ┆ w0: result ; w1: ┆
0x4f60…4f80 20 75 6e 63 68 61 6e 67 65 64 0a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 32 3a 20 20 61 ┆ unchanged ; w2: a┆
0x4f80…4fa0 64 64 72 65 73 73 20 6f 66 20 66 69 6c 65 64 65 73 63 72 69 70 74 6f 72 0a 3b 20 20 20 20 20 20 ┆ddress of filedescriptor ; ┆
0x4fa0…4fc0 20 20 20 20 20 20 20 20 77 33 3a 20 20 75 6e 64 65 66 69 6e 65 64 0a 0a 3b 20 74 68 65 20 63 6f ┆ w3: undefined ; the co┆
0x4fc0…4fe0 6e 74 65 6e 74 73 20 6f 66 20 77 30 20 61 72 65 20 6f 6e 6c 79 20 75 73 65 64 2c 20 69 66 20 63 ┆ntents of w0 are only used, if c┆
0x4fe0…5000 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 20 63 72 65 61 74 65 73 20 28 6f 72 20 63 68 61 6e 67 65 ┆onnect output creates (or change┆
0x5000…5020 73 29 0a 3b 20 61 6e 20 61 72 65 61 20 6f 6e 20 62 61 63 6b 69 6e 67 20 73 74 6f 72 61 67 65 3a ┆s) ; an area on backing storage:┆
0x5020…5040 0a 3b 20 69 66 20 77 30 20 69 73 20 7a 65 72 6f 20 6e 6f 20 6e 65 77 20 62 73 20 61 72 65 61 20 ┆ ; if w0 is zero no new bs area ┆
0x5040…5060 69 73 20 63 72 65 61 74 65 64 2e 0a 3b 20 69 66 20 77 30 20 69 73 20 6e 6f 6e 2d 7a 65 72 6f 20 ┆is created. ; if w0 is non-zero ┆
0x5060…5080 61 6e 64 20 69 66 20 77 32 20 64 65 66 69 6e 65 73 20 61 20 6e 61 6d 65 2c 20 77 68 69 63 68 20 ┆and if w2 defines a name, which ┆
0x5080…50a0 69 73 20 6e 6f 74 20 66 6f 75 6e 64 20 69 6e 0a 3b 20 74 68 65 20 63 61 74 61 6c 6f 67 20 28 62 ┆is not found in ; the catalog (b┆
0x50a0…50c0 79 20 61 20 63 61 6c 6c 20 6f 66 20 6c 6f 6f 6b 75 70 5f 65 6e 74 72 79 29 2c 20 6f 72 20 69 66 ┆y a call of lookup_entry), or if┆
0x50c0…50e0 20 74 68 65 20 65 6e 74 72 79 20 65 78 69 73 74 73 20 61 6e 64 20 69 74 0a 3b 20 64 65 73 63 72 ┆ the entry exists and it ; descr┆
0x50e0…5100 69 62 65 73 20 61 20 62 61 63 6b 69 6e 67 20 73 74 6f 72 61 67 65 20 61 72 65 61 2c 20 77 68 69 ┆ibes a backing storage area, whi┆
0x5100…5120 (9,) 63 68 20 69 73 20 70 72 6f 74 65 63 74 65 64 20 61 67 61 69 6e 73 74 20 77 72 69 74 69 6e 67 2c ┆ch is protected against writing,┆
0x5120…5140 20 74 68 65 6e 0a 3b 20 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 20 77 69 6c 6c 20 63 72 65 61 ┆ then ; connect output will crea┆
0x5140…5160 74 65 20 61 6e 20 61 72 65 61 20 6f 6e 20 64 72 75 6d 20 28 69 66 20 77 30 20 69 73 20 65 76 65 ┆te an area on drum (if w0 is eve┆
0x5160…5180 6e 29 20 6f 72 20 6f 6e 20 64 69 73 63 20 28 69 66 0a 3b 20 77 30 20 69 73 20 6f 64 64 29 2e 20 ┆n) or on disc (if ; w0 is odd). ┆
0x5180…51a0 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 61 72 65 61 20 69 73 20 64 65 66 69 6e 65 64 20 ┆the name of the area is defined ┆
0x51a0…51c0 62 79 20 77 32 2e 20 74 68 65 20 73 69 7a 65 20 6f 66 20 74 68 65 20 61 72 65 61 20 69 73 0a 3b ┆by w2. the size of the area is ;┆
0x51c0…51e0 20 67 69 76 65 6e 20 61 73 20 74 68 65 20 73 65 63 6f 6e 64 20 70 61 72 61 6d 65 74 65 72 20 69 ┆ given as the second parameter i┆
0x51e0…5200 6e 20 77 30 20 28 73 65 67 6d 65 6e 74 73 29 2e 20 69 66 20 74 68 69 73 20 70 61 72 61 6d 65 74 ┆n w0 (segments). if this paramet┆
0x5200…5220 65 72 20 69 73 20 6e 65 67 61 2d 0a 3b 20 74 69 76 65 2c 20 74 68 65 20 73 69 7a 65 20 77 69 6c ┆er is nega- ; tive, the size wil┆
0x5220…5240 6c 20 62 65 20 6d 61 78 2e 20 63 6c 61 69 6d 20 28 66 6f 72 20 74 68 65 20 64 65 76 69 63 65 20 ┆l be max. claim (for the device ┆
0x5240…5260 64 65 66 69 6e 65 64 20 61 6e 64 20 6b 65 79 3d 30 29 20 64 65 2d 0a 3b 20 63 72 65 61 73 65 64 ┆defined and key=0) de- ; creased┆
0x5260…5280 20 62 79 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20 76 61 6c 75 65 20 6f 66 20 3c 73 65 67 6d 65 ┆ by the absolute value of <segme┆
0x5280…52a0 6e 74 73 3e 2e 20 69 66 20 73 65 67 6d 65 6e 74 73 20 69 73 20 70 6f 73 69 74 69 76 65 2c 0a 3b ┆nts>. if segments is positive, ;┆
0x52a0…52c0 20 74 68 65 20 61 72 65 61 73 69 7a 65 20 77 69 6c 6c 20 62 65 20 6d 69 6e 69 6d 75 6d 20 6f 66 ┆ the areasize will be minimum of┆
0x52c0…52e0 20 3c 73 65 67 6d 65 6e 74 73 3e 20 61 6e 64 20 6d 61 78 2e 20 63 6c 61 69 6d 2e 20 69 66 20 74 ┆ <segments> and max. claim. if t┆
0x52e0…5300 68 65 20 61 72 65 61 20 61 6c 2d 0a 3b 20 72 65 61 64 79 20 65 78 69 73 74 73 20 74 68 65 20 61 ┆he area al- ; ready exists the a┆
0x5300…5320 72 65 61 73 69 7a 65 20 69 73 20 69 6e 63 72 65 61 73 65 64 20 69 66 20 64 65 6d 61 6e 64 65 64 ┆reasize is increased if demanded┆
0x5320…5340 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 0a 3b 20 74 68 65 20 72 75 6c 65 73 20 61 62 6f 76 65 2e ┆ according to ; the rules above.┆
0x5340…5360 20 20 69 66 20 74 68 65 20 61 72 65 61 20 65 78 69 73 74 73 20 69 6e 20 61 64 76 61 6e 63 65 20 ┆ if the area exists in advance ┆
0x5360…5380 74 68 65 20 61 72 65 61 73 69 7a 65 20 69 73 0a 3b 20 6e 65 76 65 72 20 64 65 63 72 65 61 73 65 ┆the areasize is ; never decrease┆
0x5380…53a0 64 20 62 79 20 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 2e 0a 0a 0a 73 2e 20 6b 3d 68 31 33 2c ┆d by connect output. s. k=h13,┆
0x53a0…53c0 20 61 34 32 2c 20 62 39 2c 20 65 34 39 20 20 3b 20 62 65 67 69 6e 20 73 65 67 6d 65 6e 74 3a 20 ┆ a42, b9, e49 ; begin segment: ┆
0x53c0…53e0 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 0a 77 2e 20 20 20 20 31 30 32 34 20 20 20 20 20 20 20 ┆connect output w. 1024 ┆
0x53e0…5400 20 20 20 20 20 20 20 3b 20 20 73 69 7a 65 20 6f 66 20 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 ┆ ; size of connect output┆
0x0000…0033 (0,) Rc489kSubCatEnt {f00=0x00161b, f01=0x00003c, f02=0x000045, filename=»townbs «, entry_tail=0-4-0-2-1981-07-09T14:26-disc1-0x0-0x0-0x0-0x0}
0x0033…0066 Rc489kSubCatEnt {f00=0x003013, f01=0x000276, f02=0x00027f, filename=»tremovespf «, entry_tail=0-4-0-1-1981-07-14T16:03-disc1-0x0-0x0-0x0-0x0}
0x0066…0099 Rc489kSubCatEnt {f00=0x004ae3, f01=0x000276, f02=0x00027f, filename=»tremovenld «, entry_tail=0-4-0-1-1981-07-14T16:16-disc1-0x0-0x0-0x0-0x0}
0x0099…00cc Rc489kSubCatEnt {f00=0x00520b, f01=0x000000, f02=0x0007cf, filename=»tcgproclib «, entry_tail=0-4-0-19-1980-09-29T17:31-disc3-0x0-0x0-0x0-0x0}
0x00cc…00e0 06 43 e8 01 00 02 02 60 26 00 00 00 00 00 00 00 00 00 77 72 ┆ C `& wr┆
0x00e0…0100 69 74 65 00 00 00 00 00 00 00 01 59 84 01 59 86 01 50 36 01 4b 92 01 56 04 01 59 8c 01 59 74 01 ┆ite Y Y P6 K V Y Yt ┆
0x0100…0120 58 1e 01 59 d0 01 59 ca 01 41 9a 01 40 29 00 40 13 ff ff f4 00 60 17 02 00 6c 34 31 b6 75 6e 64 ┆X Y Y A @) @ ` l41 und┆
0x0120…0140 00 00 00 6e 6f 74 20 66 6f 00 00 02 01 81 a6 00 00 08 00 00 22 00 c1 42 00 c0 ac 01 40 8a 34 30 ┆ not fo " B @ 40┆
0x0140…0160 4e 5d 2f eb 34 80 06 2d 00 01 5d 2f eb 50 8f be 51 8f f5 dd 2f 57 2d 00 01 5d 2f d3 34 80 12 53 ┆NÅ/ 4 - Å/ P Q /W- Å/ 4 S┆
0x0160…0180 cf bc 2d 00 01 1d 2f d3 5d 2f d3 51 2f d5 21 2f d3 a1 0f ff 34 30 7e 2d 0f e6 37 cf a8 5e 10 00 ┆ - / Å/ Q/ !/ 40ü- 7 ^ ┆
0x0180…01a0 50 8f d3 53 8f 9a dc 10 05 2c 2f 7e 53 8f b1 dc 10 09 d8 8f b5 dc 10 15 2c 10 15 2f 00 1a dc 10 ┆P S ,/üS , / ┆
0x01a0…01c0 0d d8 8f ab dc 10 19 2c 10 19 2f 00 1a dc 10 11 53 cf 8e 52 2f fc 34 30 14 2d 0f ee 37 cf 7c 5e ┆ , / S R/ 40 - 7 ø^┆
0x01c0…01e0 10 00 50 8f a5 53 8f 6e dc 10 05 2c 2f 7e 53 8f 85 dc 10 09 d8 8f 95 dc 10 11 2c 10 11 2f 00 1a ┆ P S n ,/üS , / ┆
0x01e0…0200 dc 10 0d 53 cf 6a 52 2f fc 34 30 34 51 2f d5 a9 00 00 34 80 08 2d 03 e8 5d 2f cb 34 80 90 2d 00 ┆ S jR/ 404Q/ 4 - Å/ 4 - ┆
0x0200…0220 01 5d 2f cb 34 80 08 2d 00 01 1d 2f cb 5d 2f cb 21 2f e7 a5 00 01 34 80 7e 51 2f 93 29 2f d3 2d ┆ Å/ 4 - / Å/ !/ 4 üQ/ )/ -┆
0x0220…0240 10 01 91 00 02 1d 2f 8d d9 10 00 dd 2f 4d 2d 00 04 1d 2f b3 1d 2f 7e d9 10 00 2f 2f 4d 18 3f fe ┆ / /M- / /ü //M ? ┆
0x0240…0260 19 30 00 14 00 02 a8 00 00 24 00 01 2d 0f ff 5d 2f 4d 51 2f 93 29 2f d3 2d 10 02 91 00 02 1d 2f ┆ 0 $ - Å/MQ/ )/ - /┆
0x0260…0280 8d d9 10 00 dd 2f 4b 2d 00 08 1d 2f b3 1d 2f 7e d9 10 00 2f 2f 4b 18 3f fe 19 30 00 14 00 02 a8 ┆ /K- / /ü //K ? 0 ┆
0x0280…02a0 00 00 24 00 01 2d 0f ff 11 2f 4d b1 00 01 34 80 08 2d 03 e8 5d 2f cb 34 80 24 2d 0f ee 37 ce e6 ┆ $ - /M 4 - Å/ 4 $- 7 ┆
0x02a0…02c0 5e 10 00 50 8f 0d 53 8e d8 dc 10 05 2c 2f 7e 53 8e ef dc 10 09 d8 8e ff dc 10 11 2c 10 11 2f 00 ┆^ P S ,/üS , / ┆
0x02c0…02e0 1a dc 10 0d 53 ce d4 52 2f fc 34 30 34 34 8f 7c 34 2f 51 51 2f cb a5 03 e8 34 80 60 51 2f d3 29 ┆ S R/ 4044 ø4/QQ/ 4 `Q/ )┆
0x02e0…02fd 8e e1 5d 2f b5 2d 0f e2 37 ce b4 5e 10 00 50 8e d5 53 8e a6 dc 10 05 d8 8e cd dc 10 15 ┆ Å/ - 7 ^ P S ┆
0x02fd…0300 0x000004
0x0300…0900 Data for townbs
0x0900…0c00 (1,) Data for tremovespf
0x0c00…0f00 Data for tremovenld
0x0f00…4800 Data for tcgproclib
0x4800…4820 (8,) 65 63 6f 6e 64 3b 20 77 33 3a 3d 6e 61 6d 65 20 61 64 64 72 65 73 73 3b 0a 20 20 20 20 20 20 6a ┆econd; w3:=name address; j┆
0x4820…4840 6c 2e 20 20 20 20 20 61 33 32 2e 20 20 20 20 20 20 20 3b 20 20 20 67 6f 74 6f 20 72 65 70 31 3b ┆l. a32. ; goto rep1;┆
0x4840…4860 0a 0a 61 33 33 3a 20 20 72 73 2e 20 77 33 20 20 62 33 2e 20 20 20 20 20 20 20 20 3b 20 77 61 69 ┆ a33: rs. w3 b3. ; wai┆
0x4860…4880 74 20 61 20 73 65 63 6f 6e 64 3a 20 20 73 61 76 65 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 ┆t a second: save return; ┆
0x4880…48a0 61 6c 2e 20 77 31 20 20 62 34 2e 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 61 6c 2e 20 77 ┆al. w1 b4. ; al. w┆
0x48a0…48c0 33 20 20 62 35 2e 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 6a 64 20 20 20 20 20 20 31 3c ┆3 b5. ; jd 1<┆
0x48c0…48e0 31 31 2b 31 36 20 20 20 20 3b 20 20 20 73 65 6e 64 20 6d 65 73 73 61 67 65 28 63 6c 6f 63 6b 29 ┆11+16 ; send message(clock)┆
0x48e0…4900 3b 0a 20 20 20 20 20 20 61 6c 2e 20 77 31 20 20 62 34 2e 2b 34 20 20 20 20 20 20 3b 0a 20 20 20 ┆; al. w1 b4.+4 ; ┆
0x4900…4920 20 20 20 6a 64 20 20 20 20 20 20 31 3c 31 31 2b 31 38 20 20 20 20 3b 20 20 20 77 61 69 74 20 61 ┆ jd 1<11+18 ; wait a┆
0x4920…4940 6e 73 77 65 72 3b 0a 20 20 20 20 20 20 72 6c 2e 20 77 33 20 20 63 39 2e 20 20 20 20 20 20 20 20 ┆nswer; rl. w3 c9. ┆
0x4940…4960 3b 0a 20 20 20 20 20 20 61 6c 20 20 77 33 20 20 78 33 2b 32 20 20 20 20 20 20 20 3b 20 20 20 77 ┆; al w3 x3+2 ; w┆
0x4960…4980 33 20 3a 3d 20 64 6f 63 20 6e 61 6d 65 20 61 64 64 72 3b 0a 20 20 20 20 20 20 6a 6c 2e 20 20 20 ┆3 := doc name addr; jl. ┆
0x4980…49a0 20 28 62 33 2e 29 20 20 20 20 20 20 20 3b 20 20 20 72 65 74 75 72 6e 3b 0a 0a 61 33 34 3a 20 20 ┆ (b3.) ; return; a34: ┆
0x49a0…49c0 72 73 2e 20 77 32 20 20 62 33 2e 20 20 20 20 20 20 20 20 3b 20 72 65 61 64 20 61 20 62 6c 6f 63 ┆rs. w2 b3. ; read a bloc┆
0x49c0…49e0 6b 3a 20 20 73 61 76 65 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 72 6c 2e 20 77 31 20 20 63 ┆k: save return; rl. w1 c┆
0x49e0…4a00 37 2e 20 20 20 20 20 20 20 20 3b 0a 20 20 20 20 20 20 72 6c 20 20 77 31 20 20 78 31 2b 68 30 2b ┆7. ; rl w1 x1+h0+┆
0x4a00…4a20 36 20 20 20 20 3b 20 20 20 77 31 20 3a 3d 20 66 69 72 73 74 20 73 68 61 72 65 3b 0a 20 20 20 20 ┆6 ; w1 := first share; ┆
0x4a20…4a40 20 20 61 6c 20 20 77 31 20 20 78 31 2b 36 20 20 20 20 20 20 20 3b 20 20 20 77 31 20 3a 3d 20 6d ┆ al w1 x1+6 ; w1 := m┆
0x4a40…4a60 65 73 73 61 67 65 20 61 64 64 72 3b 0a 20 20 20 20 20 20 6a 64 20 20 20 20 20 20 31 3c 31 31 2b ┆essage addr; jd 1<11+┆
0x4a60…4a80 31 36 20 20 20 20 3b 20 20 20 73 65 6e 64 20 6d 65 73 73 61 67 65 3b 0a 20 20 20 20 20 20 72 73 ┆16 ; send message; rs┆
0x4a80…4aa0 20 20 77 32 20 20 78 31 2d 36 20 20 20 20 20 20 20 3b 20 20 20 73 68 61 72 65 20 73 74 61 74 65 ┆ w2 x1-6 ; share state┆
0x4aa0…4ac0 20 3a 3d 20 62 75 66 20 61 64 64 72 3b 0a 20 20 20 20 20 20 61 6c 20 20 77 32 20 20 30 20 20 20 ┆ := buf addr; al w2 0 ┆
0x4ac0…4ae0 20 20 20 20 20 20 20 3b 20 20 20 77 32 20 3a 3d 20 73 74 61 72 74 20 65 76 65 6e 74 20 71 75 65 ┆ ; w2 := start event que┆
0x4ae0…4b00 75 65 3b 0a 61 33 35 3a 20 20 72 6c 20 20 77 30 20 20 78 32 2b 38 20 20 20 20 20 20 20 3b 20 72 ┆ue; a35: rl w0 x2+8 ; r┆
0x4b00…4b20 65 70 32 3a 20 20 28 77 30 2c 77 31 29 20 3a 3d 20 28 73 74 61 74 75 73 2c 62 79 74 65 73 20 74 ┆ep2: (w0,w1) := (status,bytes t┆
0x4b20…4b40 72 61 6e 73 66 65 72 72 65 64 29 3b 0a 20 20 20 20 20 20 73 6e 20 20 77 32 20 28 78 31 2d 36 29 ┆ransferred); sn w2 (x1-6)┆
0x4b40…4b60 20 20 20 20 20 20 3b 20 20 20 69 66 20 65 76 65 6e 74 20 3d 20 73 68 61 72 65 20 73 74 61 74 65 ┆ ; if event = share state┆
0x4b60…4b80 20 74 68 65 6e 0a 20 20 20 20 20 20 6a 6c 2e 20 20 20 20 28 62 33 2e 29 20 20 20 20 20 20 20 3b ┆ then jl. (b3.) ;┆
0x4b80…4ba0 20 20 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 20 20 6a 64 20 20 20 20 20 20 31 3c 31 31 2b 32 34 ┆ return; jd 1<11+24┆
0x4ba0…4bc0 20 20 20 20 3b 20 20 20 77 61 69 74 20 65 76 65 6e 74 3b 0a 20 20 20 20 20 20 6a 6c 2e 20 20 20 ┆ ; wait event; jl. ┆
0x4bc0…4be0 20 20 61 33 35 2e 20 20 20 20 20 20 20 3b 20 20 20 67 6f 74 6f 20 72 65 70 32 3b 0a 61 33 37 3a ┆ a35. ; goto rep2; a37:┆
0x4be0…4c00 20 20 72 6c 2e 20 77 31 20 20 63 37 2e 20 20 20 20 20 20 20 20 3b 20 63 6c 65 61 72 20 63 68 61 ┆ rl. w1 c7. ; clear cha┆
0x4c00…4c20 72 65 3a 0a 20 20 20 20 20 20 72 6c 20 20 77 31 20 20 78 31 2b 68 30 2b 36 20 20 20 20 3b 20 20 ┆re: rl w1 x1+h0+6 ; ┆
0x4c20…4c40 20 73 68 61 72 65 20 73 74 61 74 65 0a 20 20 20 20 20 20 61 6c 20 20 77 30 20 20 30 20 20 20 20 ┆ share state al w0 0 ┆
0x4c40…4c60 20 20 20 20 20 20 3b 20 20 20 28 66 69 72 73 74 20 73 68 61 72 65 0a 20 20 20 20 20 20 72 73 20 ┆ ; (first share rs ┆
0x4c60…4c80 20 77 30 20 20 78 31 20 20 20 20 20 20 20 20 20 3b 20 20 20 28 7a 6f 6e 65 29 29 3a 3d 30 3b 0a ┆ w0 x1 ; (zone)):=0; ┆
0x4c80…4ca0 20 20 20 20 20 20 6a 6c 2e 20 20 20 20 20 65 33 31 2e 20 20 20 20 20 20 20 3b 20 20 20 67 6f 74 ┆ jl. e31. ; got┆
0x4ca0…4cc0 6f 20 6e 6f 20 72 65 73 6f 75 72 63 65 73 0a 0a 62 2e 20 67 31 0a 77 2e 0a 20 67 31 20 3d 20 28 ┆o no resources b. g1 w. g1 = (┆
0x4cc0…4ce0 3a 68 31 33 2b 35 31 32 2d 6b 3a 29 2f 32 0a 63 2e 20 2d 67 31 2c 20 6d 2e 20 6c 65 6e 67 74 68 ┆:h13+512-k:)/2 c. -g1, m. length┆
0x4ce0…4d00 20 65 72 72 6f 72 2c 20 63 6f 6e 6e 65 63 74 20 69 6e 0a 7a 2e 0a 77 2e 20 30 2c 20 72 2e 20 67 ┆ error, connect in z. w. 0, r. g┆
0x4d00…4d20 31 20 3b 20 66 69 6c 6c 20 73 65 67 6d 65 6e 74 0a 65 2e 20 20 20 20 20 20 20 20 20 20 3b 20 65 ┆1 ; fill segment e. ; e┆
0x4d20…4d40 6e 64 20 66 69 6c 6c 0a 6d 2e 66 70 20 63 6f 6e 6e 65 63 74 20 69 6e 70 75 74 20 20 37 36 2e 30 ┆nd fill m.fp connect input 76.0┆
0x4d40…4d60 32 2e 30 32 0a 69 2e 20 20 20 20 20 20 20 20 20 20 3b 20 6c 69 73 74 20 6e 61 6d 65 73 0a 65 2e ┆2.02 i. ; list names e.┆
0x4d60…4d80 20 20 20 20 20 20 20 20 20 20 3b 20 65 6e 64 20 63 6f 6e 6e 65 63 74 20 69 6e 0a 0c 0a 0a 0a 3b ┆ ; end connect in ;┆
0x4d80…4da0 20 72 63 20 30 32 2e 30 32 2e 37 34 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6c 65 70 72 ┆ rc 02.02.74 filepr┆
0x4da0…4dc0 6f 63 65 73 73 6f 72 20 20 20 20 20 20 20 20 20 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 2c 20 ┆ocessor connect output, ┆
0x4dc0…4de0 70 61 67 65 20 2e 2e 2e 31 2e 2e 2e 0a 3b 20 73 65 67 6d 65 6e 74 20 31 0a 0a 0a 0a 3b 20 63 6f ┆page ...1... ; segment 1 ; co┆
0x4de0…4e00 6e 6e 65 63 74 20 6f 75 74 70 75 74 20 63 6f 6e 73 69 73 74 73 20 6f 66 20 74 77 6f 20 62 61 63 ┆nnect output consists of two bac┆
0x4e00…4e20 6b 69 6e 67 20 73 74 6f 72 61 67 65 20 73 65 67 6d 65 6e 74 73 2e 20 74 68 65 20 66 69 72 73 74 ┆king storage segments. the first┆
0x4e20…4e40 0a 3b 20 73 65 67 6d 65 6e 74 20 69 73 20 6c 6f 61 64 65 64 20 62 79 20 74 68 65 20 63 61 6c 6c ┆ ; segment is loaded by the call┆
0x4e40…4e60 2e 20 74 68 65 20 73 65 63 6f 6e 64 20 73 65 67 6d 65 6e 74 20 69 73 20 6c 6f 61 64 65 64 20 62 ┆. the second segment is loaded b┆
0x4e60…4e80 79 20 63 6f 6e 2d 0a 3b 20 6e 65 63 74 20 6f 75 74 70 75 74 20 69 74 73 65 6c 66 2e 0a 0a 3b 20 ┆y con- ; nect output itself. ; ┆
0x4e80…4ea0 65 6e 74 72 79 3a 20 20 63 34 3a 20 20 77 30 3a 20 20 73 65 67 6d 65 6e 74 73 3c 31 20 2b 20 3c ┆entry: c4: w0: segments<1 + <┆
0x4ea0…4ec0 64 72 75 6d 20 6f 72 20 64 69 73 63 3e 0a 3b 20 20 20 20 20 20 20 20 20 63 37 3a 20 20 77 31 3a ┆drum or disc> ; c7: w1:┆
0x4ec0…4ee0 20 20 7a 6f 6e 65 20 64 65 73 63 72 69 70 74 6f 72 20 61 64 64 72 65 73 73 20 6f 72 20 30 0a 3b ┆ zone descriptor address or 0 ;┆
0x4ee0…4f00 20 20 20 20 20 20 20 20 20 63 39 3a 20 20 77 32 3a 20 20 61 64 64 72 65 73 73 20 6f 66 20 66 69 ┆ c9: w2: address of fi┆
0x4f00…4f20 6c 65 64 65 73 63 72 69 70 74 6f 72 20 6f 72 20 6f 66 20 6e 61 6d 65 0a 3b 20 20 20 20 20 20 20 ┆ledescriptor or of name ; ┆
0x4f20…4f40 20 20 63 31 31 3a 20 77 33 3a 20 20 6c 69 6e 6b 0a 0a 3b 20 65 78 69 74 3a 20 20 20 20 20 20 20 ┆ c11: w3: link ; exit: ┆
0x4f40…4f60 20 77 30 3a 20 20 72 65 73 75 6c 74 0a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 31 3a 20 ┆ w0: result ; w1: ┆
0x4f60…4f80 20 75 6e 63 68 61 6e 67 65 64 0a 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 77 32 3a 20 20 61 ┆ unchanged ; w2: a┆
0x4f80…4fa0 64 64 72 65 73 73 20 6f 66 20 66 69 6c 65 64 65 73 63 72 69 70 74 6f 72 0a 3b 20 20 20 20 20 20 ┆ddress of filedescriptor ; ┆
0x4fa0…4fc0 20 20 20 20 20 20 20 20 77 33 3a 20 20 75 6e 64 65 66 69 6e 65 64 0a 0a 3b 20 74 68 65 20 63 6f ┆ w3: undefined ; the co┆
0x4fc0…4fe0 6e 74 65 6e 74 73 20 6f 66 20 77 30 20 61 72 65 20 6f 6e 6c 79 20 75 73 65 64 2c 20 69 66 20 63 ┆ntents of w0 are only used, if c┆
0x4fe0…5000 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 20 63 72 65 61 74 65 73 20 28 6f 72 20 63 68 61 6e 67 65 ┆onnect output creates (or change┆
0x5000…5020 73 29 0a 3b 20 61 6e 20 61 72 65 61 20 6f 6e 20 62 61 63 6b 69 6e 67 20 73 74 6f 72 61 67 65 3a ┆s) ; an area on backing storage:┆
0x5020…5040 0a 3b 20 69 66 20 77 30 20 69 73 20 7a 65 72 6f 20 6e 6f 20 6e 65 77 20 62 73 20 61 72 65 61 20 ┆ ; if w0 is zero no new bs area ┆
0x5040…5060 69 73 20 63 72 65 61 74 65 64 2e 0a 3b 20 69 66 20 77 30 20 69 73 20 6e 6f 6e 2d 7a 65 72 6f 20 ┆is created. ; if w0 is non-zero ┆
0x5060…5080 61 6e 64 20 69 66 20 77 32 20 64 65 66 69 6e 65 73 20 61 20 6e 61 6d 65 2c 20 77 68 69 63 68 20 ┆and if w2 defines a name, which ┆
0x5080…50a0 69 73 20 6e 6f 74 20 66 6f 75 6e 64 20 69 6e 0a 3b 20 74 68 65 20 63 61 74 61 6c 6f 67 20 28 62 ┆is not found in ; the catalog (b┆
0x50a0…50c0 79 20 61 20 63 61 6c 6c 20 6f 66 20 6c 6f 6f 6b 75 70 5f 65 6e 74 72 79 29 2c 20 6f 72 20 69 66 ┆y a call of lookup_entry), or if┆
0x50c0…50e0 20 74 68 65 20 65 6e 74 72 79 20 65 78 69 73 74 73 20 61 6e 64 20 69 74 0a 3b 20 64 65 73 63 72 ┆ the entry exists and it ; descr┆
0x50e0…5100 69 62 65 73 20 61 20 62 61 63 6b 69 6e 67 20 73 74 6f 72 61 67 65 20 61 72 65 61 2c 20 77 68 69 ┆ibes a backing storage area, whi┆
0x5100…5120 (9,) 63 68 20 69 73 20 70 72 6f 74 65 63 74 65 64 20 61 67 61 69 6e 73 74 20 77 72 69 74 69 6e 67 2c ┆ch is protected against writing,┆
0x5120…5140 20 74 68 65 6e 0a 3b 20 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 20 77 69 6c 6c 20 63 72 65 61 ┆ then ; connect output will crea┆
0x5140…5160 74 65 20 61 6e 20 61 72 65 61 20 6f 6e 20 64 72 75 6d 20 28 69 66 20 77 30 20 69 73 20 65 76 65 ┆te an area on drum (if w0 is eve┆
0x5160…5180 6e 29 20 6f 72 20 6f 6e 20 64 69 73 63 20 28 69 66 0a 3b 20 77 30 20 69 73 20 6f 64 64 29 2e 20 ┆n) or on disc (if ; w0 is odd). ┆
0x5180…51a0 74 68 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 61 72 65 61 20 69 73 20 64 65 66 69 6e 65 64 20 ┆the name of the area is defined ┆
0x51a0…51c0 62 79 20 77 32 2e 20 74 68 65 20 73 69 7a 65 20 6f 66 20 74 68 65 20 61 72 65 61 20 69 73 0a 3b ┆by w2. the size of the area is ;┆
0x51c0…51e0 20 67 69 76 65 6e 20 61 73 20 74 68 65 20 73 65 63 6f 6e 64 20 70 61 72 61 6d 65 74 65 72 20 69 ┆ given as the second parameter i┆
0x51e0…5200 6e 20 77 30 20 28 73 65 67 6d 65 6e 74 73 29 2e 20 69 66 20 74 68 69 73 20 70 61 72 61 6d 65 74 ┆n w0 (segments). if this paramet┆
0x5200…5220 65 72 20 69 73 20 6e 65 67 61 2d 0a 3b 20 74 69 76 65 2c 20 74 68 65 20 73 69 7a 65 20 77 69 6c ┆er is nega- ; tive, the size wil┆
0x5220…5240 6c 20 62 65 20 6d 61 78 2e 20 63 6c 61 69 6d 20 28 66 6f 72 20 74 68 65 20 64 65 76 69 63 65 20 ┆l be max. claim (for the device ┆
0x5240…5260 64 65 66 69 6e 65 64 20 61 6e 64 20 6b 65 79 3d 30 29 20 64 65 2d 0a 3b 20 63 72 65 61 73 65 64 ┆defined and key=0) de- ; creased┆
0x5260…5280 20 62 79 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20 76 61 6c 75 65 20 6f 66 20 3c 73 65 67 6d 65 ┆ by the absolute value of <segme┆
0x5280…52a0 6e 74 73 3e 2e 20 69 66 20 73 65 67 6d 65 6e 74 73 20 69 73 20 70 6f 73 69 74 69 76 65 2c 0a 3b ┆nts>. if segments is positive, ;┆
0x52a0…52c0 20 74 68 65 20 61 72 65 61 73 69 7a 65 20 77 69 6c 6c 20 62 65 20 6d 69 6e 69 6d 75 6d 20 6f 66 ┆ the areasize will be minimum of┆
0x52c0…52e0 20 3c 73 65 67 6d 65 6e 74 73 3e 20 61 6e 64 20 6d 61 78 2e 20 63 6c 61 69 6d 2e 20 69 66 20 74 ┆ <segments> and max. claim. if t┆
0x52e0…5300 68 65 20 61 72 65 61 20 61 6c 2d 0a 3b 20 72 65 61 64 79 20 65 78 69 73 74 73 20 74 68 65 20 61 ┆he area al- ; ready exists the a┆
0x5300…5320 72 65 61 73 69 7a 65 20 69 73 20 69 6e 63 72 65 61 73 65 64 20 69 66 20 64 65 6d 61 6e 64 65 64 ┆reasize is increased if demanded┆
0x5320…5340 20 61 63 63 6f 72 64 69 6e 67 20 74 6f 0a 3b 20 74 68 65 20 72 75 6c 65 73 20 61 62 6f 76 65 2e ┆ according to ; the rules above.┆
0x5340…5360 20 20 69 66 20 74 68 65 20 61 72 65 61 20 65 78 69 73 74 73 20 69 6e 20 61 64 76 61 6e 63 65 20 ┆ if the area exists in advance ┆
0x5360…5380 74 68 65 20 61 72 65 61 73 69 7a 65 20 69 73 0a 3b 20 6e 65 76 65 72 20 64 65 63 72 65 61 73 65 ┆the areasize is ; never decrease┆
0x5380…53a0 64 20 62 79 20 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 2e 0a 0a 0a 73 2e 20 6b 3d 68 31 33 2c ┆d by connect output. s. k=h13,┆
0x53a0…53c0 20 61 34 32 2c 20 62 39 2c 20 65 34 39 20 20 3b 20 62 65 67 69 6e 20 73 65 67 6d 65 6e 74 3a 20 ┆ a42, b9, e49 ; begin segment: ┆
0x53c0…53e0 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 0a 77 2e 20 20 20 20 31 30 32 34 20 20 20 20 20 20 20 ┆connect output w. 1024 ┆
0x53e0…5400 20 20 20 20 20 20 20 3b 20 20 73 69 7a 65 20 6f 66 20 63 6f 6e 6e 65 63 74 20 6f 75 74 70 75 74 ┆ ; size of connect output┆