|
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: 64512 (0xfc00)
Names: »copy «
└─⟦01e83a425⟧ Bits:30008166 Bånd med SW8010 og SW8500 source code
└─⟦75ff9bef3⟧
└─⟦this⟧ »copy «
0x0000…0030 00 00 00 00 00 00 00 00 00 00 00 00 00 10 00 00 00 00 00 00 00 00 03 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 04 00 00 00 ┆ ┆
0x0030…0060 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 00 63 75 72 2e 69 6e 70 75 74 00 00 00 00 00 00 00 00 00 ┆ cur.input ┆
0x0060…0090 00 00 00 51 8f d6 37 81 96 34 80 3c 34 80 14 2e 10 02 de 8f d0 37 81 8a 34 81 3c 34 80 c4 37 81 84 34 81 4a 34 80 be 34 80 bc 2e 10 02 de 8f be ┆ Q 7 4 <4 . 7 4 <4 7 4 J4 4 . ┆
0x0090…00c0 37 81 78 34 80 e6 34 80 10 37 81 72 34 81 08 34 80 ac 37 81 6c 34 81 06 34 80 a6 34 80 a4 37 81 64 34 81 32 34 80 9e 37 81 5e 34 81 02 34 80 98 ┆7 x4 4 7 r4 4 7 l4 4 4 7 d4 24 7 ^4 4 ┆
0x00c0…00f0 34 80 96 2d 00 00 5d 8f b8 51 8f ba 5d 8f b6 51 8f 9a ad cf 84 34 80 12 5d 8f 80 51 8f 90 5d 8f 78 d9 8f 92 dd 8f 7c 52 8f 7c aa 00 00 37 81 c0 ┆4 - Å Q Å Q 4 Å Q Å x øR ø 7 ┆
0x00f0…0120 51 8f 76 ad 00 00 34 80 1e 51 8f 5c 37 89 d4 37 8f 1c 4d 8a 59 a9 00 04 34 80 12 2d 8f 64 2f 8a 52 38 08 2a a8 00 00 34 80 08 50 8a 58 5c 8f 58 ┆Q v 4 Q Ø7 7 M Y 4 - d/ R8 * 4 P XØ X┆
0x0120…0150 38 08 2c 4e 8f 3e 37 89 6c 2e 00 03 37 89 68 dc 8f 66 37 83 34 50 8f 4e 37 8d 24 52 8f 5e 2c 80 16 ae 00 01 2c 80 18 ae 00 03 2c 80 1e ae 00 04 ┆8 ,N >7 l. 7 h f7 4P N7 $R ^, , , ┆
0x0150…0180 2c 80 28 ae 00 05 2c 80 1e 37 8d 0e 34 cf 46 20 65 72 72 6f 72 0a 00 00 20 6e 6f 20 72 65 73 6f 75 72 63 65 73 0a 00 20 6e 6f 74 20 66 6f 75 6e ┆, ( , 7 4 F error no resources not foun┆
0x0180…01b0 64 0a 00 20 69 6e 20 75 73 65 0a 00 20 63 6f 6e 76 65 6e 74 69 6f 6e 20 65 72 72 6f 72 0a 00 00 00 37 82 e8 52 8f 02 4d 20 01 a9 00 04 34 80 0a ┆d in use convention error 7 R M 4 ┆
0x01b0…01e0 50 20 02 37 8c f4 00 00 01 34 80 06 2c 20 02 37 8c ca 5e 8e ec 4a 20 01 4d 20 00 a9 00 08 34 80 0a 5e 8e e4 2e 00 2e 37 8c 40 34 8f dc 2e 00 0a ┆P 7 4 , 7 ^ J M 4 ^ . .7 @4 . ┆
0x01e0…0210 37 8c 3a 34 8f 00 37 82 b6 34 8f 80 37 82 d0 34 80 1c 37 80 a4 2c 00 19 2d 00 01 dd 8e b4 51 8e c2 ad 00 00 5d 8e aa 37 81 ac 51 8e ba 2f 8a 3c ┆7 :4 7 4 7 4 7 , - Q Å 7 Q / <┆
0x0210…0240 ad 00 00 5f 8e a0 34 80 22 37 81 94 2d 00 01 dd 8e 9c 37 81 9a 34 8e d4 37 80 a2 34 80 30 37 82 a4 34 8f a0 37 80 78 37 80 a6 34 80 0a 37 82 9a ┆ _ 4 "7 - 7 4 7 4 07 4 7 x7 4 7 ┆
0x0240…0270 34 8f 96 37 80 6e 37 80 8e 37 80 d4 37 80 82 34 8e b8 2c 00 0a 51 ce 8e dd 8e 76 2c 00 00 5c 8e 74 37 81 70 51 8e 7e 2c 0f ff 5c 8e 6c 34 80 04 ┆4 7 n7 7 7 4 , Q v, Ø t7 pQ ü, Ø l4 ┆
0x0270…02a0 37 80 80 2e 8e 92 37 80 ba 34 8e 9c 37 82 70 34 8f 6c 53 ce 70 ab c0 22 af c0 26 34 80 04 34 80 0a 53 1f f8 af c0 1a 34 80 08 ab c0 18 34 8f 58 ┆7 . 7 4 7 p4 lS p " &4 4 S 4 4 X┆
0x02a0…02d0 24 00 01 2d 00 00 53 ce 58 af c0 0a 69 8e 39 af c0 0c 5d 8e 5e 34 8e 74 6d 65 73 79 65 73 6e 6f 00 6c 69 73 24 00 04 2e 00 04 49 10 01 4c 10 00 ┆$ - S X i 9 Å ^4 tmesyesno lis$ . I L ┆
0x02d0…0300 a8 20 00 34 80 0c 2f 30 02 4c 10 01 5d 8e 30 a8 00 0a 2f 30 02 34 30 00 5f 8e 3c 37 8d 88 52 8e 28 37 8d c0 ac 00 00 34 80 08 37 8d 92 37 8e cc ┆ 4 /0 L Å 0 /0 40 _ <7 R (7 4 7 7 ┆
0x0300…0330 34 8e 42 53 8e 1a 2f 30 0a 5f 8e 16 34 ce 24 5f 8e 22 37 8d b6 37 8d 80 34 ce 1c 5f 8e 1a 37 80 e6 52 8e 06 2e 20 06 5e 8e 02 37 80 06 34 ce 0e ┆4 BS /0 _ 4 $_ "7 7 4 _ 7 R . ^ 7 4 ┆
0x0330…0360 50 cd fc 5f 8e 0c a4 00 00 a4 00 7f 34 8e ee 51 8d f2 51 10 04 dd 8d d8 37 80 d6 34 cd fc 0f 42 40 20 20 20 00 00 00 00 00 00 00 00 00 00 00 00 ┆P _ 4 Q Q 7 4 B@ ┆
0x0360…0390 00 00 00 73 65 67 6d 2e 00 20 20 3e 31 32 37 3a 20 00 20 20 73 75 62 3a 20 00 00 20 20 62 6c 69 6e 64 3a 20 00 00 0a 52 8d c0 2e 20 02 5f 8d d2 ┆ segm. >127: sub: blind: R . _ ┆
0x0390…03c0 d9 20 02 14 8f d4 15 8f d2 dd 8f d6 d9 20 06 14 8f cc 15 8f ca dd 8f d2 2c 8f ca 4e 8d 8f aa 00 00 34 80 82 37 8b 7c 2c 02 ff 2f 00 00 1c 8d 92 ┆ , N 4 7 ø, / ┆
0x03c0…03f0 60 8d 8e 37 8b 94 02 00 04 50 8d 8a 37 8b 8e 02 00 08 2e 00 2f 37 8a ec d8 8d 84 60 8f a2 5f 8d 80 ac 00 00 34 80 0e 37 8b 7c 00 00 01 50 8d 76 ┆` 7 P 7 . /7 ` _ 4 7 ø P v┆
0x03f0…0420 37 8b 76 03 00 06 34 80 20 50 8d 6e 37 8b 6e 00 00 01 50 8d 68 ac 00 00 48 80 01 2f 00 00 28 8f a4 a0 00 00 34 80 0c a4 cf 7a 34 80 08 2e 00 20 ┆7 v 4 P n7 n P h H / ( 4 z4 . ┆
0x0420…0450 37 8a ba 34 8f f0 50 8d 48 ac 00 00 34 80 0c 2c 8f 7c 37 8b 28 50 8d 3e 37 8b 46 00 00 01 50 8d 6a ac 00 00 34 80 0c 2c 8f 72 37 8b 18 50 8d 60 ┆7 4 P H 4 , ø7 (P >7 F P j 4 , r7 P `┆
0x0450…0480 37 8b 36 00 00 01 50 8d 58 ac 00 00 34 80 0c 2c 8f 68 37 8b 08 50 8d 4e 37 8b 26 00 00 01 2e 00 0a 37 8a 84 34 cd 38 51 8d 22 d9 10 02 9d 0f f0 ┆7 6 P X 4 , h7 P N7 & . 7 4 8Q " ┆
0x0480…04b0 ad 00 00 34 30 00 34 8e 12 5f 8d 2a 2c 00 00 2d 00 00 dd 8d 00 dd 8d 06 dd 8d 2e 34 80 08 53 8d 28 2f 30 01 5f 8d 24 53 8c ec 5c 8c f4 af 00 00 ┆ 40 4 _ *, - .4 S (/0 _ $S Ø ┆
0x04b0…04e0 34 80 80 37 8a 2c 5e 8c ec ae cc de 34 80 5e aa 00 00 ae 00 7f 34 8f e6 ae 00 19 34 80 4a aa 00 1a 34 80 08 53 8d 06 2f 30 01 5f 8d 02 a2 00 7e ┆4 7 ,^ 4 ^ 4 4 J 4 S /0 _ ü┆
0x04e0…0510 a2 00 21 34 80 04 6a 8c c5 2f 20 00 1f 8c c2 a7 c0 80 34 80 24 5f 8c bc a6 00 80 34 80 16 1c 80 78 51 8c ac a9 00 00 37 8a 22 51 8c ce a9 00 00 ┆ !4 j / 4 $_ 4 xQ 7 "Q ┆
0x0510…0540 34 8f ba 52 8c ae 37 8a 16 34 8f b4 53 8c a4 2f 30 01 5f 8c a0 34 8f e8 2e 00 00 e3 8c a2 df 8c a0 2f 00 00 52 8c 98 34 8f d4 5c 8c 94 37 80 7e ┆4 R 7 4 S /0 _ 4 . / R 4 Ø 7 ü┆
0x0540…0570 50 8c 90 2f 00 00 34 80 1c 53 8c 82 af 00 00 34 8f bc 2f 00 00 6b 8c 7b 53 8c 76 2f 3f ff 5f 8c 72 a7 00 01 34 8f ae ae 00 0a 34 8f aa 5c 8c 72 ┆P / 4 S 4 / k æS v/? _ r 4 4 Ø r┆
0x0570…05a0 1c 8c 84 5c 8c 82 d9 8c 68 e0 8c 6e dc 8c 6c e0 8c 7e dc 8c 7c 1d 8c 74 5d 8c 72 50 8c 8c 1c 8c 8c 5c 8c 8a 4c 8c 49 51 8c 48 24 0c 18 ad 8b c4 ┆ Ø h n l ü ø tÅ rP Ø L IQ H$ ┆
0x05a0…05d0 a8 00 00 34 80 06 2e 00 0a 37 89 b4 34 cc 68 7f fd a0 00 00 01 2a 2a 2a 00 00 00 20 63 6f 6e 6e 65 63 74 20 00 00 00 20 70 61 72 61 6d 20 00 00 ┆ 4 . 7 4 h *** connect param ┆
0x05d0…0600 20 65 6e 64 20 6d 65 64 69 75 6d 0a 00 00 00 20 6e 6f 20 63 6f 72 65 0a 00 00 00 20 63 61 6c 6c 0a 00 00 00 24 00 08 24 00 0a 24 00 06 24 00 08 ┆ end medium no core call $ $ $ $ ┆
0x0600…0630 2e 8f d2 2c 00 02 68 8b fc 2c 8f c8 5f 8c 2a 37 89 ea 53 8c 12 2c 30 02 37 89 e4 2c 20 00 37 89 e0 34 cc 1c 2c 00 00 a8 cc 06 34 30 00 34 30 02 ┆. , h , _ *7 S ,0 7 , 7 4 , 40 40 ┆
0x0630…0660 5f 8b f8 5f 8b fc af 20 00 34 8c 1c 2e 20 02 5e 8b ec 2d 8b f0 1d 8b ee 5d 8b ec 2c 12 00 a4 30 00 34 8d 0e 24 08 00 2d 8e e4 5d 8b c6 37 8b 88 ┆_ _ 4 . ^ - Å , 0 4 $ - Å 7 ┆
0x0660…0690 53 8b dc 24 08 00 5f 8e ea 2c 00 04 37 8b 76 ac 00 00 34 80 0a 53 8b c8 5f 8b cc 37 8c 78 34 8c 72 08 1f e7 ac 00 04 34 80 06 a8 00 12 34 8b e4 ┆S $ _ , 7 v 4 S _ 7 x4 r 4 4 ┆
0x0690…06c0 24 0c 18 2d 8b 72 52 8b b2 37 80 14 34 8b da 2c 00 01 5c 8b 94 dc 8b b2 5f 8b a8 ae 30 00 34 8b ce 37 8f 82 34 8c 4e dd 80 2c df 80 2e 2f 20 00 ┆$ - rR 7 4 , Ø _ 0 4 7 4 N , ./ ┆
0x06c0…06f0 38 08 2a 4e 10 10 a2 00 20 ae 00 04 34 80 04 34 80 06 5c 10 0c 5c 10 0e 5c 10 10 5c 10 12 d9 00 6e 9d 00 05 51 80 0e 5c 10 0a 38 08 2c d9 80 08 ┆8 *N 4 4 Ø Ø Ø Ø n Q Ø 8 , ┆
0x06f0…0720 db 80 0a 34 30 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 03 00 00 00 00 00 00 00 00 00 00 00 00 c8 60 47 00 00 00 00 00 00 00 24 20 00 04 ac ┆ 40 `G $ ┆
0x0720…0750 80 00 04 63 6f 70 79 00 00 00 00 00 00 00 00 c8 60 47 00 00 00 00 00 00 00 24 6a 00 04 ac 02 a9 34 02 bc a8 02 c1 76 00 00 00 00 00 00 00 40 0a ┆ copy `G $j 4 v @ ┆
0x0750…0780 00 20 0a 00 20 02 00 30 00 80 00 04 5d 8f ec 2f 3f fa df 8f ec 52 10 5c 4a 20 01 50 20 00 a8 cf ee a4 cf ee 34 8f f8 a8 cf e6 34 81 16 24 cf d8 ┆ 0 Å /? R ØJ P 4 4 $ ┆
0x0780…07b0 53 00 08 af 0f ff 34 81 0e d9 30 02 ac 60 02 a9 60 04 34 81 02 d9 30 06 ac 60 06 a9 60 08 34 80 fa 2d 8f 96 50 10 00 a0 0f ff 34 80 f4 2d 10 14 ┆S 4 0 ` ` 4 0 ` ` 4 - P 4 - ┆
0x07b0…07e0 a5 8f b4 34 80 0c d8 20 04 dc 10 04 d8 20 08 dc 10 08 34 8f f2 2d 8f 6a 34 80 0e 08 20 00 a0 00 03 34 80 dc 50 20 00 a8 cf a4 34 80 d0 2f 20 02 ┆ 4 4 - j4 4 P 4 / ┆
0x07e0…0810 2d 10 14 38 08 2c ac 00 00 34 80 0c ad 8f 64 34 80 ca 38 08 28 a8 00 00 34 80 b6 2e 20 0a a1 8f 6b 34 8f dc 08 20 00 a4 00 04 34 80 b0 2e 2f f6 ┆- 8 , 4 d4 8 ( 4 . k4 4 ./ ┆
0x0810…0840 24 cf 74 5e 00 5c 2c 00 00 2e 00 00 34 cf 70 0a 69 6e 73 65 72 74 70 72 6f 63 3a 20 00 00 20 6e 61 6d 65 20 6d 69 73 73 69 6e 67 0a 00 20 63 61 ┆$ t^ Ø, . 4 p insertproc: name missing ca┆
0x0840…0870 74 20 66 75 6e 63 74 69 6f 6e 20 66 6f 72 62 69 64 64 65 6e 0a 00 00 00 20 64 65 76 69 63 65 20 6e 6f 74 20 72 65 61 64 79 0a 00 00 00 20 75 6e ┆t function forbidden device not ready un┆
0x0870…08a0 6b 6e 6f 77 6e 0a 00 00 00 20 70 72 6f 74 65 63 74 65 64 0a 00 20 61 72 65 61 20 70 72 6f 63 65 73 73 20 69 6e 20 75 73 65 0a 00 00 00 20 6e 6f ┆known protected area process in use no┆
0x08a0…08d0 20 72 65 73 6f 75 72 63 65 73 0a 00 20 63 61 74 61 6c 6f 67 20 69 6e 63 6f 6e 73 69 73 74 65 6e 74 0a 00 00 20 63 61 74 61 6c 6f 67 20 62 61 73 ┆ resources catalog inconsistent catalog bas┆
0x08d0…0900 65 20 65 72 72 6f 72 0a 00 20 6e 61 6d 65 20 66 6f 72 6d 61 74 0a 00 00 20 6b 69 6e 64 20 65 72 72 6f 72 0a 00 00 00 20 6e 61 6d 65 20 74 72 6f ┆e error name format kind error name tro┆
0x0900…0930 75 62 6c 65 0a 00 00 00 04 a4 00 04 1c 8f fc 34 80 0a 2f 20 02 24 00 01 24 00 0b 2c 00 00 dc 8e c8 51 8e be 5e 10 5c 2c 8f 50 37 13 f4 52 8e be ┆uble 4 / $ $ , Q ^ Ø, P7 R ┆
0x0930…0960 ae 00 00 34 80 08 50 8e b6 24 ce ae 37 03 f4 0a a0 08 2c a0 00 2e 00 01 34 ce a8 f4 8f 52 f6 4f 72 f7 af 82 f9 2f 9c f9 2f ac fb af c4 fc e0 00 ┆ 4 P $ 7 , . 4 R Or / / ┆
0x0960…0990 34 8e a8 fc e0 00 34 8e a8 80 11 68 05 a2 00 00 00 00 00 40 10 01 00 24 10 b7 b3 00 00 50 00 00 59 74 72 63 6c 74 73 74 34 74 78 00 00 00 00 01 ┆4 4 h @ $ P Ytrcltst4tx ┆
0x0990…09c0 64 69 73 63 36 00 00 00 00 00 00 00 be e6 e1 00 00 00 00 00 00 00 00 00 00 00 00 0c 27 b3 06 22 50 06 26 37 74 66 74 73 73 38 39 30 38 30 39 00 ┆disc6 ' "P &7tftss890809 ┆
0x09c0…09f0 00 00 b4 64 69 73 63 38 00 00 00 00 00 00 00 c5 60 b2 00 00 00 00 00 00 00 00 00 00 00 00 16 97 b3 00 00 50 00 00 59 65 64 69 74 33 31 74 78 00 ┆ disc8 ` P Yedit31tx ┆
0x09f0…0a20 00 00 00 00 00 23 64 69 73 63 31 00 00 00 00 00 00 00 be 03 7d 00 00 00 00 00 00 00 00 00 00 00 00 3f 17 b3 0a d5 c0 0a d5 c9 6f 75 74 70 75 74 ┆ #disc1 å ? output┆
0x0a20…0a50 00 00 00 00 00 00 00 00 71 64 69 73 63 34 00 00 00 00 00 00 00 8a 64 11 00 00 00 00 00 00 00 00 00 00 00 00 10 c7 b3 00 01 c2 00 01 cb 64 65 76 ┆ qdisc4 d dev┆
0x0a50…0a80 69 6f 33 31 00 00 00 00 00 00 00 63 64 69 73 63 35 00 00 00 00 00 00 00 aa 25 e5 00 00 00 00 00 00 00 00 00 00 00 00 81 07 b3 00 01 c2 00 01 cb ┆io31 cdisc5 % ┆
0x0a80…0ab0 69 73 68 69 66 74 72 00 00 00 00 00 80 00 04 68 65 6c 70 67 6b 73 6c 69 62 00 00 80 01 d2 8d 34 c0 00 00 00 02 a1 bc 00 10 00 ff ff ff ff ff ff ┆ishiftr helpgkslib 4 ┆
0x0ab0…0ae0 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆
[…0x6…]
0x0c00…0c30 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 45 4e 44 3b 0a 20 32 34 33 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 ┆! ! ! ! ! END; 2431 ! ! ! ! ! ! ┆
0x0c30…0c60 20 45 4e 44 3b 20 28 2a 20 65 6e 64 20 20 77 69 74 68 20 74 73 69 5f 74 73 61 5f 74 61 62 20 2a 29 0a 20 32 34 33 32 20 21 20 21 20 20 20 21 20 ┆ END; (* end with tsi_tsa_tab *) 2432 ! ! ! ┆
0x0c60…0c90 21 20 20 20 21 20 20 20 45 4e 44 20 20 20 20 28 2a 66 72 6f 6d 20 73 63 2a 29 0a 20 32 34 33 33 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 ┆! ! END (*from sc*) 2433 ! ! ! ! ! ┆
0x0c90…0cc0 20 0a 20 32 34 33 34 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 45 4c 53 45 0a 20 32 34 33 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 ┆ 2434 ! ! ! ! ! ELSE 2435 ! ! ! ! ! ┆
0x0cc0…0cf0 20 0a 20 32 34 33 36 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2436 ! ! ! ! ! BEGIN ┆
0x0cf0…0d20 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 20 28 2a 66 72 6f 6d 20 74 73 2a 29 0a 20 32 34 33 37 ┆ (*from ts*) 2437┆
0x0d20…0d50 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 73 69 67 6e 61 6c 28 74 73 69 5f 72 65 66 2c 63 6f 6e 5f 74 73 5f 67 69 6e 5f 73 65 6d ┆ ! ! ! ! ! ! signal(tsi_ref,con_ts_gin_sem┆
0x0d50…0d80 29 3b 0a 20 32 34 33 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 0a 20 32 34 33 39 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 ┆); 2438 ! ! ! ! ! ! 2439 ! ! ! ! ! ┆
0x0d80…0db0 20 20 21 20 49 46 20 6f 70 65 6e 28 63 6f 6e 5f 73 63 5f 67 6f 75 5f 73 65 6d 29 20 54 48 45 4e 0a 20 32 34 34 30 20 21 20 21 20 20 20 21 20 21 ┆ ! IF open(con_sc_gou_sem) THEN 2440 ! ! ! !┆
0x0db0…0de0 20 20 20 21 20 20 20 21 20 20 20 77 61 69 74 28 74 73 69 5f 72 65 66 2c 63 6f 6e 5f 73 63 5f 67 6f 75 5f 73 65 6d 29 3b 0a 20 32 34 34 31 20 21 ┆ ! ! wait(tsi_ref,con_sc_gou_sem); 2441 !┆
0x0de0…0e10 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 0a 20 32 34 34 32 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 45 4e 44 3b 20 20 20 28 ┆ ! ! ! ! ! 2442 ! ! ! ! ! END; (┆
0x0e10…0e40 2a 66 72 6f 6d 20 74 73 2a 29 0a 20 32 34 34 33 20 21 20 21 20 20 20 21 20 21 20 20 20 45 4e 44 3b 20 20 20 28 2a 72 65 63 65 69 76 65 20 63 6f ┆*from ts*) 2443 ! ! ! ! END; (*receive co┆
0x0e40…0e70 6e 74 72 6f 6c 2a 29 0a 20 32 34 34 34 20 21 20 21 20 20 20 21 20 21 20 0a 0c 74 73 69 20 20 20 20 20 20 20 20 20 38 39 2e 31 30 2e 32 35 2e 20 ┆ntrol*) 2444 ! ! ! ! tsi 89.10.25. ┆
0x0e70…0ea0 20 20 31 35 2e 30 39 2e 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 20 20 20 20 20 20 20 20 20 20 ┆ 15.09. ┆
0x0ea0…0ed0 20 20 20 20 20 20 20 20 20 20 20 20 70 61 67 65 20 20 20 20 37 34 0a 0a 20 32 34 34 35 20 21 20 21 20 20 20 21 20 21 20 6d 6f 64 5f 74 72 61 6e ┆ page 74 2445 ! ! ! ! mod_tran┆
0x0ed0…0f00 73 5f 63 6f 6e 74 72 6f 6c 3a 0a 20 32 34 34 36 20 21 20 21 20 20 20 21 20 21 20 20 20 42 45 47 49 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆s_control: 2446 ! ! ! ! BEGIN ┆
0x0f00…0f30 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 28 2a 2a 2a 2a 2a 20 43 4f 4e 54 52 4f 4c 20 4f 55 54 50 55 54 ┆ (***** CONTROL OUTPUT┆
0x0f30…0f60 20 52 45 43 45 49 56 45 44 20 2a 2a 2a 2a 2a 29 0a 20 32 34 34 37 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 67 65 74 5f 74 63 5f 69 64 3b 0a ┆ RECEIVED *****) 2447 ! ! ! ! ! get_tc_id; ┆
0x0f60…0f90 20 32 34 34 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 57 49 54 48 20 20 20 74 73 69 5f 74 73 61 5f 74 61 62 28 74 73 61 29 20 20 20 44 4f ┆ 2448 ! ! ! ! ! WITH tsi_tsa_tab(tsa) DO┆
0x0f90…0fc0 0a 20 32 34 34 39 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 35 30 20 21 20 21 20 20 20 21 20 21 20 20 20 21 ┆ 2449 ! ! ! ! ! BEGIN 2450 ! ! ! ! !┆
0x0fc0…0ff0 20 20 20 21 20 49 46 20 74 73 61 5f 74 61 62 28 74 73 61 29 2e 74 73 61 5f 73 74 61 74 65 20 3c 3e 20 61 63 74 69 76 65 20 54 48 45 4e 0a 20 32 ┆ ! IF tsa_tab(tsa).tsa_state <> active THEN 2┆
0x0ff0…1020 34 35 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 35 32 20 21 20 21 20 20 20 21 20 21 20 20 20 ┆451 ! ! ! ! ! ! BEGIN 2452 ! ! ! ! ┆
0x1020…1050 21 20 20 20 21 20 20 20 21 20 74 73 69 5f 72 65 66 5e 2e 75 32 20 3a 3d 20 74 61 5f 64 65 61 63 74 69 76 61 74 65 64 3b 0a 20 32 34 35 33 20 21 ┆! ! ! tsi_ref^.u2 := ta_deactivated; 2453 !┆
0x1050…1080 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 72 65 74 75 72 6e 28 74 73 69 5f 72 65 66 29 3b 0a 20 32 34 35 34 20 21 20 21 20 ┆ ! ! ! ! ! ! return(tsi_ref); 2454 ! ! ┆
0x1080…10b0 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 45 4e 44 0a 20 32 34 35 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 45 4c 53 45 ┆ ! ! ! ! END 2455 ! ! ! ! ! ! ELSE┆
0x10b0…10e0 0a 20 32 34 35 36 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 35 37 20 21 20 21 20 20 20 21 20 21 ┆ 2456 ! ! ! ! ! ! BEGIN 2457 ! ! ! !┆
0x10e0…1110 20 20 20 21 20 20 20 21 20 20 20 21 20 49 46 20 20 20 74 73 69 5f 72 65 66 5e 2e 75 31 20 41 4e 44 20 74 73 70 5f 62 69 74 20 3d 20 30 20 20 20 ┆ ! ! ! IF tsi_ref^.u1 AND tsp_bit = 0 ┆
0x1110…1140 54 48 45 4e 0a 20 32 34 35 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 20 20 20 20 20 20 20 20 ┆THEN 2458 ! ! ! ! ! ! ! BEGIN ┆
0x1140…1170 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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 66 72 ┆ (*fr┆
0x1170…11a0 6f 6d 20 73 63 2a 29 0a 20 32 34 35 39 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 49 46 20 6f 70 65 6e 28 ┆om sc*) 2459 ! ! ! ! ! ! ! ! IF open(┆
0x11a0…11d0 63 6f 6e 5f 74 73 5f 67 69 6e 5f 73 65 6d 29 20 54 48 45 4e 0a 20 32 34 36 30 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆con_ts_gin_sem) THEN 2460 ! ! ! ! ! ! !┆
0x11d0…1200 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 36 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆ ! BEGIN 2461 ! ! ! ! ! ! ! ! !┆
0x1200…1230 20 43 41 53 45 20 20 20 63 6f 6d 6d 61 6e 64 20 20 20 4f 46 0a 20 32 34 36 32 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆ CASE command OF 2462 ! ! ! ! ! ! !┆
0x1230…1260 20 20 20 21 20 20 20 21 20 21 20 0a 20 32 34 36 33 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 ┆ ! ! ! 2463 ! ! ! ! ! ! ! ! ! ┆
0x1260…1290 21 20 6f 70 65 6e 5f 61 63 63 5f 74 63 3a 0a 20 32 34 36 34 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 ┆! open_acc_tc: 2464 ! ! ! ! ! ! ! ! ┆
0x1290…12c0 20 21 20 21 20 20 20 42 45 47 49 4e 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 20 20 20 20 20 20 ┆ ! ! BEGIN ┆
0x12c0…12f0 20 20 20 20 20 20 20 20 20 20 20 28 2a 6f 70 65 6e 5f 61 63 63 5f 74 63 2a 29 0a 20 32 34 36 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 ┆ (*open_acc_tc*) 2465 ! ! ! ! ! ┆
0x12f0…1320 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 49 46 20 20 20 74 63 20 3c 3e 20 30 20 20 20 54 48 45 4e 0a 20 32 34 36 36 20 21 ┆ ! ! ! ! ! ! IF tc <> 0 THEN 2466 !┆
0x1320…1350 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 36 37 ┆ ! ! ! ! ! ! ! ! ! ! BEGIN 2467┆
0x1350…1380 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 57 49 54 48 20 20 20 ┆ ! ! ! ! ! ! ! ! ! ! ! ! WITH ┆
0x1380…13b0 74 63 5f 74 61 62 28 74 63 29 20 20 20 44 4f 0a 20 32 34 36 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 ┆tc_tab(tc) DO 2468 ! ! ! ! ! ! ! ! ┆
0x13b0…13e0 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 36 39 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 ┆ ! ! ! ! BEGIN 2469 ! ! ! ! ! ! ┆
0x13e0…1410 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 73 74 61 74 65 3a 3d 20 63 68 5f 74 63 5f 73 74 61 74 65 28 73 63 5f 6f ┆! ! ! ! ! ! ! state:= ch_tc_state(sc_o┆
0x1410…1440 70 65 6e 5f 61 63 63 29 3b 0a 20 32 34 37 30 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 ┆pen_acc); 2470 ! ! ! ! ! ! ! ! ! ! ┆
0x1440…1470 20 20 21 20 20 20 21 20 20 20 21 20 49 46 20 20 20 73 74 61 74 65 20 3d 20 61 73 73 69 67 6e 65 64 20 20 20 54 48 45 4e 0a 20 32 34 37 31 20 21 ┆ ! ! ! IF state = assigned THEN 2471 !┆
0x1470…14a0 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 42 45 47 ┆ ! ! ! ! ! ! ! ! ! ! ! ! BEG┆
0x14a0…14d0 49 4e 0a 20 32 34 37 32 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 ┆IN 2472 ! ! ! ! ! ! ! ! ! ! ! !┆
0x14d0…1500 20 20 20 21 20 20 20 21 20 4c 4f 43 4b 20 20 20 74 73 69 5f 72 65 66 20 41 53 20 64 61 74 61 6d 3a 20 6f 70 65 6e 5f 61 63 63 5f 74 63 5f 74 79 ┆ ! ! LOCK tsi_ref AS datam: open_acc_tc_ty┆
0x1500…1530 70 65 20 20 20 44 4f 0a 20 32 34 37 33 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 ┆pe DO 2473 ! ! ! ! ! ! ! ! ! ! ┆
0x1530…1560 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 70 6f 6f 6c 5f 6e 6f 3a 3d 20 64 61 74 61 6d 2e 70 6f 6f 6c 5f 6e 6f 3b 0a 20 32 34 37 34 20 21 ┆! ! ! ! pool_no:= datam.pool_no; 2474 !┆
0x1560…1590 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 64 ┆ ! ! ! ! ! ! ! ! ! ! ! ! ! d┆
0x1590…15c0 74 5f 74 73 5f 6f 75 5f 70 6f 69 6e 74 3a 3d 20 72 65 66 28 70 6f 6f 6c 5f 74 61 62 28 70 6f 6f 6c 5f 6e 6f 29 2e 64 74 5f 74 73 5f 6f 75 5f 73 ┆t_ts_ou_point:= ref(pool_tab(pool_no).dt_ts_ou_s┆
0x15c0…15f0 65 6d 29 3b 0a 20 32 34 37 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 ┆em); 2475 ! ! ! ! ! ! ! ! ! ! ! ┆
0x15f0…1620 20 21 20 20 20 21 20 20 20 21 20 64 74 5f 73 63 5f 69 6e 5f 70 6f 69 6e 74 3a 3d 20 72 65 66 28 70 6f 6f 6c 5f 74 61 62 28 70 6f 6f 6c 5f 6e 6f ┆ ! ! ! dt_sc_in_point:= ref(pool_tab(pool_no┆
0x1620…1650 29 2e 64 74 5f 73 63 5f 69 6e 5f 73 65 6d 29 3b 0a 20 32 34 37 36 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆).dt_sc_in_sem); 2476 ! ! ! ! ! ! ! !┆
0x1650…1680 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 70 6f 6f 6c 5f 61 73 73 69 67 6e 65 64 28 70 6f 6f 6c 5f 6e 6f 29 3a 3d 20 ┆ ! ! ! ! ! ! pool_assigned(pool_no):= ┆
0x1680…16b0 70 6f 6f 6c 5f 61 73 73 69 67 6e 65 64 28 70 6f 6f 6c 5f 6e 6f 29 20 2b 20 31 3b 0a 20 32 34 37 37 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 ┆pool_assigned(pool_no) + 1; 2477 ! ! ! ! ! ┆
0x16b0…16e0 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 45 4e 44 3b 0a 20 32 34 37 38 20 21 20 21 20 20 ┆ ! ! ! ! ! ! ! ! END; 2478 ! ! ┆
0x16e0…1710 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 45 4e 44 3b 0a 20 32 34 37 39 20 ┆ ! ! ! ! ! ! ! ! ! ! END; 2479 ┆
0x1710…1740 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 45 4e 44 0a 20 32 34 38 30 20 ┆! ! ! ! ! ! ! ! ! ! ! END 2480 ┆
0x1740…1770 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 45 4c 53 45 0a 20 32 34 38 31 20 21 ┆! ! ! ! ! ! ! ! ! ! ! ELSE 2481 !┆
0x1770…17a0 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 38 32 ┆ ! ! ! ! ! ! ! ! ! ! BEGIN 2482┆
0x17a0…17d0 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 74 73 69 5f 72 65 66 ┆ ! ! ! ! ! ! ! ! ! ! ! ! tsi_ref┆
0x17d0…1800 5e 2e 75 32 3a 3d 20 62 75 73 79 3b 0a 20 32 34 38 33 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆^.u2:= busy; 2483 ! ! ! ! ! ! ! ! !┆
0x1800…1830 20 21 20 20 20 21 20 20 20 21 20 72 65 74 75 72 6e 28 74 73 69 5f 72 65 66 29 3b 0a 20 32 34 38 34 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 ┆ ! ! ! return(tsi_ref); 2484 ! ! ! ! ! ┆
0x1830…1860 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 47 4f 54 4f 20 20 65 6e 64 5f 73 63 5f 63 6e 74 6c 3b 20 20 20 20 ┆ ! ! ! ! ! ! ! GOTO end_sc_cntl; ┆
0x1860…1890 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 20 20 20 20 20 20 20 20 20 0a 20 32 34 38 35 20 21 20 ┆ 2485 ! ┆
0x1890…18c0 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 45 4e 44 3b 0a 20 32 34 38 36 20 21 ┆! ! ! ! ! ! ! ! ! ! END; 2486 !┆
0x18c0…18f0 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 45 4e 44 3b 20 20 20 28 2a 6f 70 65 6e 5f 61 ┆ ! ! ! ! ! ! ! ! ! END; (*open_a┆
0x18f0…1920 63 63 5f 74 63 2a 29 0a 20 32 34 38 37 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 0a 20 ┆cc_tc*) 2487 ! ! ! ! ! ! ! ! ! ! ┆
0x1920…1950 32 34 38 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 6f 70 65 6e 5f 74 63 3a 0a 20 32 ┆2488 ! ! ! ! ! ! ! ! ! ! open_tc: 2┆
0x1950…1980 34 38 39 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 39 ┆489 ! ! ! ! ! ! ! ! ! ! BEGIN 249┆
0x1980…19b0 30 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 66 69 6e 64 5f 66 72 65 65 5f ┆0 ! ! ! ! ! ! ! ! ! ! ! find_free_┆
0x19b0…19e0 74 63 3b 0a 0c 74 73 69 20 20 20 20 20 20 20 20 20 38 39 2e 31 30 2e 32 35 2e 20 20 20 31 35 2e 30 39 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆tc; tsi 89.10.25. 15.09. ┆
0x19e0…1a10 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 20 20 20 20 20 20 20 20 20 70 61 67 65 20 20 20 20 37 ┆ page 7┆
0x1a10…1a40 35 0a 0a 20 32 34 39 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 49 46 20 ┆5 2491 ! ! ! ! ! ! ! ! ! ! ! IF ┆
0x1a40…1a70 20 20 74 63 20 3c 3e 20 30 20 20 20 54 48 45 4e 0a 20 32 34 39 32 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆ tc <> 0 THEN 2492 ! ! ! ! ! ! ! !┆
0x1a70…1aa0 20 20 20 21 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 34 39 33 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 ┆ ! ! ! BEGIN 2493 ! ! ! ! ! ! ! ┆
0x1aa0…1ad0 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 57 49 54 48 20 20 20 74 63 5f 74 61 62 28 74 63 29 20 20 20 44 4f 0a 20 32 34 39 34 20 21 20 ┆ ! ! ! ! ! WITH tc_tab(tc) DO 2494 ! ┆
0x1ad0…1b00 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 ┆! ! ! ! ! ! ! ! ! ! ! BEGIN 2┆
0x1b00…1b30 34 39 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 ┆495 ! ! ! ! ! ! ! ! ! ! ! ! ! ┆
0x1b30…1b60 4c 4f 43 4b 20 20 20 74 73 69 5f 72 65 66 20 41 53 20 64 61 74 61 6d 3a 20 6f 70 65 6e 5f 74 63 5f 74 79 70 65 20 20 20 44 4f 0a 20 32 34 39 36 ┆LOCK tsi_ref AS datam: open_tc_type DO 2496┆
0x1b60…1b90 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 42 ┆ ! ! ! ! ! ! ! ! ! ! ! ! ! B┆
0x1b90…1bc0 45 47 49 4e 0a 20 32 34 39 37 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 ┆EGIN 2497 ! ! ! ! ! ! ! ! ! ! ! ┆
0x1bc0…1bf0 20 21 20 20 20 21 20 20 20 21 20 6f 70 65 6e 5f 69 64 5f 70 6f 69 6e 74 65 72 28 74 63 29 3a 3d 20 64 61 74 61 6d 2e 6f 70 65 6e 5f 69 64 3b 0a ┆ ! ! ! open_id_pointer(tc):= datam.open_id; ┆
0x1bf0…1c20 20 32 34 39 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 ┆ 2498 ! ! ! ! ! ! ! ! ! ! ! ! ┆
0x1c20…1c50 21 20 20 20 21 20 70 6f 6f 6c 5f 6e 6f 3a 3d 20 64 61 74 61 6d 2e 70 6f 6f 6c 5f 6e 6f 3b 0a 20 32 34 39 39 20 21 20 21 20 20 20 21 20 21 20 20 ┆! ! pool_no:= datam.pool_no; 2499 ! ! ! ! ┆
0x1c50…1c80 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 64 74 5f 74 73 5f 6f 75 5f 70 6f ┆ ! ! ! ! ! ! ! ! ! ! dt_ts_ou_po┆
0x1c80…1cb0 69 6e 74 3a 3d 20 72 65 66 28 70 6f 6f 6c 5f 74 61 62 28 70 6f 6f 6c 5f 6e 6f 29 2e 64 74 5f 74 73 5f 6f 75 5f 73 65 6d 29 3b 0a 20 32 35 30 30 ┆int:= ref(pool_tab(pool_no).dt_ts_ou_sem); 2500┆
0x1cb0…1ce0 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆ ! ! ! ! ! ! ! ! ! ! ! ! ! !┆
0x1ce0…1d10 20 64 74 5f 73 63 5f 69 6e 5f 70 6f 69 6e 74 3a 3d 20 72 65 66 28 70 6f 6f 6c 5f 74 61 62 28 70 6f 6f 6c 5f 6e 6f 29 2e 64 74 5f 73 63 5f 69 6e ┆ dt_sc_in_point:= ref(pool_tab(pool_no).dt_sc_in┆
0x1d10…1d40 5f 73 65 6d 29 3b 0a 20 32 35 30 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 ┆_sem); 2501 ! ! ! ! ! ! ! ! ! ! !┆
0x1d40…1d70 20 20 20 21 20 20 20 21 20 20 20 21 20 73 74 61 74 65 3a 3d 20 63 68 5f 74 63 5f 73 74 61 74 65 28 73 63 5f 6f 70 65 6e 29 3b 0a 20 32 35 30 32 ┆ ! ! ! state:= ch_tc_state(sc_open); 2502┆
0x1d70…1da0 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 45 ┆ ! ! ! ! ! ! ! ! ! ! ! ! ! E┆
0x1da0…1dd0 4e 44 3b 0a 20 32 35 30 33 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 ┆ND; 2503 ! ! ! ! ! ! ! ! ! ! ! ┆
0x1dd0…1e00 21 20 20 20 21 20 70 6f 6f 6c 5f 61 73 73 69 67 6e 65 64 28 70 6f 6f 6c 5f 6e 6f 29 3a 3d 20 70 6f 6f 6c 5f 61 73 73 69 67 6e 65 64 28 70 6f 6f ┆! ! pool_assigned(pool_no):= pool_assigned(poo┆
0x1e00…1e30 6c 5f 6e 6f 29 20 2b 20 31 3b 0a 20 32 35 30 34 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 ┆l_no) + 1; 2504 ! ! ! ! ! ! ! ! ! !┆
0x1e30…1e60 20 20 20 21 20 20 20 21 20 20 20 45 4e 44 3b 0a 20 32 35 30 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 ┆ ! ! END; 2505 ! ! ! ! ! ! ! ! ┆
0x1e60…1e90 20 20 21 20 21 20 20 20 21 20 20 20 45 4e 44 0a 20 32 35 30 36 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 ┆ ! ! ! END 2506 ! ! ! ! ! ! ! ! ┆
0x1e90…1ec0 20 20 21 20 21 20 20 20 21 20 45 4c 53 45 0a 20 32 35 30 37 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 ┆ ! ! ! ELSE 2507 ! ! ! ! ! ! ! ! ┆
0x1ec0…1ef0 20 21 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 35 30 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆ ! ! ! BEGIN 2508 ! ! ! ! ! ! ! !┆
0x1ef0…1f20 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 72 65 74 75 72 6e 28 74 73 69 5f 72 65 66 29 3b 0a 20 32 35 30 39 20 21 20 21 20 20 20 21 20 21 20 ┆ ! ! ! ! return(tsi_ref); 2509 ! ! ! ! ┆
0x1f20…1f50 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 47 4f 54 4f 20 20 65 6e 64 5f 73 63 5f 63 6e 74 6c 3b ┆ ! ! ! ! ! ! ! ! GOTO end_sc_cntl;┆
0x1f50…1f80 0a 20 32 35 31 30 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 45 4e 44 ┆ 2510 ! ! ! ! ! ! ! ! ! ! ! END┆
0x1f80…1fb0 3b 0a 20 32 35 31 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 45 4e 44 3b 20 20 ┆; 2511 ! ! ! ! ! ! ! ! ! ! END; ┆
0x1fb0…1fe0 20 28 2a 6f 70 65 6e 5f 74 63 2a 29 0a 20 32 35 31 32 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆ (*open_tc*) 2512 ! ! ! ! ! ! ! ! !┆
0x1fe0…2010 20 21 20 0a 20 32 35 31 33 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 64 69 73 63 5f 74 ┆ ! 2513 ! ! ! ! ! ! ! ! ! ! disc_t┆
0x2010…2040 63 3a 0a 20 32 35 31 34 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 42 45 47 49 4e ┆c: 2514 ! ! ! ! ! ! ! ! ! ! BEGIN┆
0x2040…2070 0a 20 32 35 31 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 49 46 20 20 20 ┆ 2515 ! ! ! ! ! ! ! ! ! ! ! IF ┆
0x2070…20a0 74 63 65 70 5f 69 64 20 3d 20 30 20 20 20 54 48 45 4e 0a 20 32 35 31 36 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 ┆tcep_id = 0 THEN 2516 ! ! ! ! ! ! ! ┆
0x20a0…20d0 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 73 65 61 72 63 68 5f 74 63 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ┆ ! ! ! ! search_tc; (┆
0x20d0…2100 2a 6f 70 65 6e 20 66 6f 6c 6c 6f 77 65 64 20 62 79 20 64 69 73 63 2a 29 0a 20 32 35 31 37 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 ┆*open followed by disc*) 2517 ! ! ! ! ! !┆
0x2100…2130 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 0a 20 32 35 31 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 ┆ ! ! ! ! ! 2518 ! ! ! ! ! ! ! ┆
0x2130…2160 20 20 21 20 20 20 21 20 21 20 20 20 21 20 49 46 20 20 20 74 63 20 3c 3e 20 30 20 20 20 54 48 45 4e 0a 20 32 35 31 39 20 21 20 21 20 20 20 21 20 ┆ ! ! ! ! IF tc <> 0 THEN 2519 ! ! ! ┆
0x2160…2190 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 74 63 5f 74 61 62 28 74 63 29 2e 73 74 61 74 65 3a 3d ┆! ! ! ! ! ! ! ! tc_tab(tc).state:=┆
0x2190…21c0 20 63 68 5f 74 63 5f 73 74 61 74 65 28 73 63 5f 64 69 73 63 29 0a 20 32 35 32 30 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 ┆ ch_tc_state(sc_disc) 2520 ! ! ! ! ! ! ┆
0x21c0…21f0 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 45 4c 53 45 0a 20 32 35 32 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 ┆! ! ! ! ! ELSE 2521 ! ! ! ! ! ! !┆
0x21f0…2220 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 42 45 47 49 4e 0a 20 32 35 32 32 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 ┆ ! ! ! ! BEGIN 2522 ! ! ! ! ! ! ┆
0x2220…2250 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 74 73 69 5f 72 65 66 5e 2e 75 32 3a 3d 20 6f 6b 3b 0a 20 32 35 32 33 20 21 20 21 ┆ ! ! ! ! ! ! tsi_ref^.u2:= ok; 2523 ! !┆
0x2250…2280 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 72 65 74 75 72 6e 28 74 73 69 5f ┆ ! ! ! ! ! ! ! ! ! ! return(tsi_┆
0x2280…22b0 72 65 66 29 3b 0a 20 32 35 32 34 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 ┆ref); 2524 ! ! ! ! ! ! ! ! ! ! ! ┆
0x22b0…22e0 20 20 21 20 47 4f 54 4f 20 20 65 6e 64 5f 73 63 5f 63 6e 74 6c 3b 0a 20 32 35 32 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 ┆ ! GOTO end_sc_cntl; 2525 ! ! ! ! ! ! ┆
0x22e0…2310 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 45 4e 44 3b 0a 20 32 35 32 36 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 ┆ ! ! ! ! ! END; 2526 ! ! ! ! ! ! ┆
0x2310…2340 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 45 4e 44 3b 20 20 20 28 2a 64 69 73 63 5f 74 63 2a 29 0a 20 32 35 32 37 20 21 20 21 20 20 20 21 ┆ ! ! ! ! END; (*disc_tc*) 2527 ! ! !┆
0x2340…2370 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 0a 20 32 35 32 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 ┆ ! ! ! ! ! ! ! 2528 ! ! ! ! ! ┆
0x2370…23a0 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 64 69 73 63 5f 61 63 63 5f 74 63 3a 0a 20 32 35 32 39 20 21 20 21 20 20 20 21 20 21 20 20 20 21 ┆! ! ! ! ! disc_acc_tc: 2529 ! ! ! ! !┆
0x23a0…23d0 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 42 45 47 49 4e 0a 20 32 35 33 30 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 ┆ ! ! ! ! ! BEGIN 2530 ! ! ! ! ! ┆
0x23d0…2400 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 21 20 74 63 5f 74 61 62 28 74 63 29 2e 73 74 61 74 65 3a 3d 20 63 68 5f 74 63 5f 73 74 ┆ ! ! ! ! ! ! tc_tab(tc).state:= ch_tc_st┆
0x2400…2430 61 74 65 28 73 63 5f 64 69 73 63 5f 61 63 63 29 3b 0a 20 32 35 33 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 ┆ate(sc_disc_acc); 2531 ! ! ! ! ! ! ! ┆
0x2430…2460 21 20 20 20 21 20 21 20 20 20 45 4e 44 3b 0a 20 32 35 33 32 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 ┆! ! ! END; 2532 ! ! ! ! ! ! ! ! ┆
0x2460…2490 20 21 20 21 20 0a 20 32 35 33 33 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 4f 54 48 45 ┆ ! ! 2533 ! ! ! ! ! ! ! ! ! ! OTHE┆
0x2490…24c0 52 57 49 53 45 0a 20 32 35 33 34 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 42 45 ┆RWISE 2534 ! ! ! ! ! ! ! ! ! ! BE┆
0x24c0…24f0 47 49 4e 0a 20 32 35 33 35 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 45 4e 44 3b ┆GIN 2535 ! ! ! ! ! ! ! ! ! ! END;┆
0x24f0…2520 0a 20 32 35 33 36 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 21 20 20 20 0a 0c 74 73 69 20 20 ┆ 2536 ! ! ! ! ! ! ! ! ! ! tsi ┆
0x2520…2550 20 20 20 20 20 20 20 38 39 2e 31 30 2e 32 35 2e 20 20 20 31 35 2e 30 39 2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 89.10.25. 15.09. ┆
0x2550…2580 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 70 61 67 65 20 20 20 20 37 36 0a 0a 20 32 35 33 37 20 21 ┆ page 76 2537 !┆
0x2580…25b0 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 45 4e 44 3b 20 20 20 28 2a 63 61 73 65 20 63 6f 6d 6d 61 ┆ ! ! ! ! ! ! ! ! END; (*case comma┆
0x25b0…25e0 6e 64 2a 29 0a 20 32 35 33 38 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 0a 20 32 35 33 39 20 ┆nd*) 2538 ! ! ! ! ! ! ! ! ! 2539 ┆
0x25e0…2610 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 63 68 5f 73 63 5f 73 74 61 74 65 28 63 6f 6d 6d 61 6e ┆! ! ! ! ! ! ! ! ! ch_sc_state(comman┆
0x2610…2640 64 2c 74 72 75 65 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2a 75 70 64 61 74 65 20 73 63 20 69 6e 74 65 72 66 61 63 65 20 73 ┆d,true); (*update sc interface s┆
0x2640…2670 74 61 74 65 2a 29 0a 20 32 35 34 30 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 20 20 21 20 77 61 69 74 28 ┆tate*) 2540 ! ! ! ! ! ! ! ! ! wait(┆
0x2670…26a0 74 6f 5f 72 65 66 2c 63 6f 6e 5f 74 73 5f 67 69 6e 5f 73 65 6d 29 3b 0a 20 32 35 34 31 20 21 20 21 20 20 20 21 20 21 20 20 20 21 20 20 20 21 20 ┆to_ref,con_ts_gin_sem); 2541 ! ! ! ! ! ! ┆
[…truncated at 200 lines…]