home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / ada next >
ArcFS Archive  |  1994-10-16  |  1.1 MB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: ArcFS Archive (archive/arcFS).

You can browse this item here: ada

ConfidenceProgramDetectionMatch TypeSupport
100% dexvert ArcFS Archive (archive/arcFS) magic Supported
100% file RISC OS archive (ArcFS format) default
99% file data default
100% TrID Acorn ArcFS Archive default
100% gt2 Kopftext: 'Archive' default (weak)
100% detectItEasy Archive: ArcFS default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 72 63 68 69 76 65 00 | d0 14 00 00 04 17 00 00 |Archive.|........|
|00000010| 28 00 00 00 64 00 00 00 | 00 00 00 00 00 00 00 00 |(...d...|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 82 21 41 64 61 00 00 00 | 00 00 00 00 ff ff ff ff |.!Ada...|........|
|00000070| 45 ff ff ff 3b 44 c0 a5 | 30 00 00 00 ff ff ff ff |E...;D..|0.......|
|00000080| 34 05 00 80 82 21 42 6f | 6f 74 00 00 42 00 00 00 |4....!Bo|ot..B...|
|00000090| 1b 01 00 00 45 eb ff ff | 2e d9 ea 8b 33 00 a9 49 |....E...|....3..I|
|000000a0| 1b 01 00 00 24 00 00 00 | 82 21 68 65 6c 70 00 00 |....$...|.!help..|
|000000b0| 42 00 00 00 c0 05 00 00 | 45 ff ff ff cc dc ea 8b |B.......|E.......|
|000000c0| 33 00 2a 6d c0 05 00 00 | 63 01 00 00 82 21 52 65 |3.*m....|c....!Re|
|000000d0| 61 64 4d 65 00 00 00 00 | d4 03 00 00 45 ff ff ff |adMe....|....E...|
|000000e0| f8 a9 65 85 33 00 bd 2a | d4 03 00 00 47 07 00 00 |..e.3..*|....G...|
|000000f0| 82 21 52 65 61 64 4d 65 | 32 00 00 00 db 1b 00 00 |.!ReadMe|2.......|
|00000100| 45 ff ff ff 35 69 94 a5 | 33 00 e9 18 db 1b 00 00 |E...5i..|3.......|
|00000110| 3f 0b 00 00 82 21 52 75 | 6e 00 00 00 42 00 00 00 |?....!Ru|n...B...|
|00000120| 60 04 00 00 45 eb ff ff | 48 e7 ea 8b 33 00 0d 9d |`...E...|H...3...|
|00000130| 60 04 00 00 3e 27 00 00 | 82 21 53 70 72 69 74 65 |`...>'..|.!Sprite|
|00000140| 73 00 00 00 e4 03 00 00 | 45 f9 ff ff db e4 ea 8b |s.......|E.......|
|00000150| 33 00 fb 34 e4 03 00 00 | c2 2b 00 00 82 61 64 61 |3..4....|.+...ada|
|00000160| 00 00 00 00 42 00 00 00 | ff ff ff ff 45 ff ff ff |....B...|....E...|
|00000170| 29 46 c0 a5 30 00 00 00 | ff ff ff ff 68 01 00 80 |)F..0...|....h...|
|00000180| 82 70 72 65 64 65 66 00 | 00 00 00 00 36 62 00 00 |.predef.|....6b..|
|00000190| 45 ff ff ff 60 c4 ef 8b | 33 00 67 ec 36 62 00 00 |E...`...|3.g.6b..|
|000001a0| ca 2f 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |./......|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 82 62 69 6e 00 00 00 00 |........|.bin....|
|000001d0| 42 00 00 00 ff ff ff ff | 45 ff ff ff 15 47 c0 a5 |B.......|E....G..|
|000001e0| 30 00 00 00 ff ff ff ff | 40 02 00 80 82 61 64 61 |0.......|@....ada|
|000001f0| 62 69 6e 64 00 00 00 00 | ff 58 01 00 45 f8 ff ff |bind....|.X..E...|
|00000200| a7 64 26 a5 33 00 27 a5 | ff 58 01 00 24 92 00 00 |.d&.3.'.|.X..$...|
|00000210| 82 61 64 61 63 6f 6d 70 | 00 00 00 00 ef 2e 00 00 |.adacomp|........|
|00000220| 45 f8 ff ff 4d 44 1c a5 | 33 00 61 5d ef 2e 00 00 |E...MD..|3.a]....|
|00000230| 47 eb 01 00 82 61 64 61 | 65 78 65 63 00 00 00 00 |G....ada|exec....|
|00000240| ff 0d 01 00 45 f8 ff ff | 3c 82 8b a5 33 00 ac 5b |....E...|<...3..[|
|00000250| ff 0d 01 00 5a 1a 02 00 | 82 61 64 61 6c 69 62 00 |....Z...|.adalib.|
|00000260| 00 00 00 00 9f 23 00 00 | 45 f8 ff ff 75 b8 1c a5 |.....#..|E...u...|
|00000270| 33 00 51 ae 9f 23 00 00 | 7d 28 03 00 00 00 00 00 |3.Q..#..|}(......|
|00000280| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000290| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002a0| 82 44 65 73 63 00 00 00 | 42 00 00 00 ef 06 00 00 |.Desc...|B.......|
|000002b0| 45 ff ff ff b8 df ea 8b | 33 00 7d 84 ef 06 00 00 |E.......|3.}.....|
|000002c0| 40 4c 03 00 82 64 6f 63 | 00 00 00 00 42 00 00 00 |@L...doc|....B...|
|000002d0| ff ff ff ff 45 ff ff ff | 4a 49 c0 a5 30 00 00 00 |....E...|JI..0...|
|000002e0| ff ff ff ff 60 03 00 80 | 82 61 64 61 65 64 00 00 |....`...|.adaed..|
|000002f0| 00 00 00 00 a2 40 00 00 | 45 ff ff ff 49 13 5b 8c |.....@..|E...I.[.|
|00000300| 33 00 1f bf a2 40 00 00 | 53 53 03 00 82 61 70 70 |3....@..|SS...app|
|00000310| 65 6e 64 69 78 5f 66 00 | ed 15 00 00 45 ff ff ff |endix_f.|....E...|
|00000320| 50 15 5b 8c 33 00 c9 a5 | ed 15 00 00 19 94 03 00 |P.[.3...|........|
|00000330| 82 43 6f 70 79 69 6e 67 | 00 00 00 00 3e 46 00 00 |.Copying|....>F..|
|00000340| 43 ff ff ff 78 0e 20 b6 | 33 00 3e dc 3e 46 00 00 |C...x. .|3.>.>F..|
|00000350| 2a aa 03 00 82 52 45 41 | 44 4d 45 00 00 00 00 00 |*....REA|DME.....|
|00000360| 03 1a 00 00 44 ff ff ff | 30 f4 12 26 33 00 04 06 |....D...|0..&3...|
|00000370| 03 1a 00 00 8c f0 03 00 | 82 72 65 6c 65 61 73 65 |........|.release|
|00000380| 00 00 00 00 f0 0b 00 00 | 44 ff ff ff 30 f4 12 26 |........|D...0..&|
|00000390| 33 00 c8 03 f0 0b 00 00 | b3 0a 04 00 00 00 00 00 |3.......|........|
|000003a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000003c0| 82 6c 69 62 00 00 00 00 | 42 00 00 00 ff ff ff ff |.lib....|B.......|
|000003d0| 45 ff ff ff f1 4a c0 a5 | 30 00 00 00 ff ff ff ff |E....J..|0.......|
|000003e0| c8 04 00 80 82 61 64 61 | 66 72 6f 6e 74 00 00 00 |.....ada|front...|
|000003f0| ef c4 03 00 45 f8 ff ff | 18 8c 8b a5 33 00 ea 5c |....E...|....3..\|
|00000400| ef c4 03 00 c7 16 04 00 | 82 61 64 61 67 65 6e 00 |........|.adagen.|
|00000410| 00 00 00 00 df 16 02 00 | 45 f8 ff ff ea 87 1b a5 |........|E.......|
|00000420| 33 00 dd 3e df 16 02 00 | da db 07 00 82 61 64 61 |3..>....|.....ada|
|00000430| 69 6e 74 00 00 00 00 00 | 60 7a 02 00 45 fd ff ff |int.....|`z..E...|
|00000440| 0a 7d 8b a5 33 00 fa ed | 60 7a 02 00 dd f2 09 00 |.}..3...|`z......|
|00000450| 82 70 72 65 64 65 66 00 | 00 00 00 00 ff ff ff ff |.predef.|........|
|00000460| 45 ff ff ff 0f 50 c0 a5 | 30 00 00 00 ff ff ff ff |E....P..|0.......|
|00000470| a4 04 00 80 82 61 78 71 | 00 00 00 00 42 00 00 00 |.....axq|....B...|
|00000480| 8c 93 01 00 45 ff ff ff | 5f 0d 8c a5 33 00 1a 03 |....E...|_...3...|
|00000490| 8c 93 01 00 61 6d 0c 00 | 82 6c 69 62 00 00 00 00 |....am..|.lib....|
|000004a0| 42 00 00 00 51 07 00 00 | 45 ff ff ff 62 0d 8c a5 |B...Q...|E...b...|
|000004b0| 33 00 9c 0d 51 07 00 00 | 11 01 0e 00 82 74 72 63 |3...Q...|.....trc|
|000004c0| 00 00 00 00 42 00 00 00 | 33 62 00 00 45 ff ff ff |....B...|3b..E...|
|000004d0| 83 0d 8c a5 33 00 f8 fe | 33 62 00 00 86 08 0e 00 |....3...|3b......|
|000004e0| 00 00 00 01 04 00 00 00 | 42 00 00 00 00 80 a8 01 |........|B.......|
|000004f0| 00 00 00 00 41 00 00 00 | 00 00 a9 01 00 00 00 00 |....A...|........|
|00000500| ec fc ff ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000520| 00 00 00 00 00 00 00 00 | 82 4d 65 73 73 61 67 65 |........|.Message|
|00000530| 73 00 00 00 2b 0c 00 00 | 45 ff ff ff 6d eb ea 8b |s...+...|E...m...|
|00000540| 33 00 76 74 2b 0c 00 00 | dd 6a 0e 00 82 54 65 6d |3.vt+...|.j...Tem|
|00000550| 70 6c 61 74 65 73 00 00 | 93 0b 00 00 45 ec ff ff |plates..|....E...|
|00000560| a2 e2 ea 8b 33 00 4a 25 | 93 0b 00 00 2c 77 0e 00 |....3.J%|....,w..|
|00000570| 00 00 00 01 04 00 00 00 | 42 00 00 00 00 80 a8 01 |........|B.......|
|00000580| 00 00 00 00 41 00 00 00 | 00 00 a9 01 00 00 00 00 |....A...|........|
|00000590| ec fc ff ff 82 21 41 64 | 61 42 69 6e 64 00 00 00 |.....!Ad|aBind...|
|000005a0| ff ff ff ff 45 ff ff ff | 58 52 c0 a5 30 00 00 00 |....E...|XR..0...|
|000005b0| ff ff ff ff 54 06 00 80 | 82 21 68 65 6c 70 00 01 |....T...|.!help..|
|000005c0| 00 00 00 00 b1 02 00 00 | 45 ff ff ff 61 06 06 8c |........|E...a...|
|000005d0| 33 00 55 91 b1 02 00 00 | e3 82 0e 00 82 21 52 75 |3.U.....|.....!Ru|
|000005e0| 6e 00 a9 01 00 00 00 00 | 85 03 00 00 45 eb ff ff |n.......|....E...|
|000005f0| 63 06 06 8c 33 00 90 88 | 85 03 00 00 b8 85 0e 00 |c...3...|........|
|00000600| 82 21 53 70 72 69 74 65 | 73 00 00 00 e4 03 00 00 |.!Sprite|s.......|
|00000610| 45 f9 ff ff 65 06 06 8c | 33 00 d9 ec e4 03 00 00 |E...e...|3.......|
|00000620| 61 89 0e 00 82 44 65 73 | 63 00 a9 01 00 00 00 00 |a....Des|c.......|
|00000630| c1 03 00 00 45 ff ff ff | 66 06 06 8c 33 00 52 98 |....E...|f...3.R.|
|00000640| c1 03 00 00 69 8d 0e 00 | 82 4d 65 73 73 61 67 65 |....i...|.Message|
|00000650| 73 00 00 00 22 0b 00 00 | 45 ff ff ff 68 06 06 8c |s..."...|E...h...|
|00000660| 33 00 1a f4 22 0b 00 00 | 4e 91 0e 00 82 54 65 6d |3..."...|N....Tem|
|00000670| 70 6c 61 74 65 73 00 00 | d5 08 00 00 45 ec ff ff |plates..|....E...|
|00000680| a1 06 06 8c 33 00 ed b0 | d5 08 00 00 94 9c 0e 00 |....3...|........|
|00000690| 00 00 00 00 00 00 a9 01 | 00 00 00 00 40 00 00 00 |........|....@...|
|000006a0| 00 80 a9 01 00 00 00 00 | 3f 00 00 00 00 80 0e 00 |........|?.......|
|000006b0| de f9 ff ff 82 21 41 64 | 61 4c 69 62 00 00 00 00 |.....!Ad|aLib....|
|000006c0| ff ff ff ff 45 ff ff ff | e7 54 c0 a5 30 00 00 00 |....E...|.T..0...|
|000006d0| ff ff ff ff 74 07 00 80 | 82 21 68 65 6c 70 00 ff |....t...|.!help..|
|000006e0| 10 d3 b4 a5 51 01 00 00 | 45 ff ff ff 43 ba 01 8c |....Q...|E...C...|
|000006f0| 33 00 04 5a 51 01 00 00 | 8d a5 0e 00 82 21 52 75 |3..ZQ...|.....!Ru|
|00000700| 6e 00 f3 ff 10 d3 b4 a5 | 7d 03 00 00 45 eb ff ff |n.......|}...E...|
|00000710| 44 ba 01 8c 33 00 59 f0 | 7d 03 00 00 02 a7 0e 00 |D...3.Y.|}.......|
|00000720| 82 21 53 70 72 69 74 65 | 73 00 b4 a5 e4 03 00 00 |.!Sprite|s.......|
|00000730| 45 f9 ff ff 46 ba 01 8c | 33 00 43 5e e4 03 00 00 |E...F...|3.C^....|
|00000740| a3 aa 0e 00 82 44 65 73 | 63 00 f3 ff 10 d3 b4 a5 |.....Des|c.......|
|00000750| b6 02 00 00 45 ff ff ff | 48 ba 01 8c 33 00 35 24 |....E...|H...3.5$|
|00000760| b6 02 00 00 ab ae 0e 00 | 82 4d 65 73 73 61 67 65 |........|.Message|
|00000770| 73 00 b4 a5 dc 0a 00 00 | 45 ff ff ff 4a ba 01 8c |s.......|E...J...|
|00000780| 33 00 b2 53 dc 0a 00 00 | 85 b1 0e 00 82 54 65 6d |3..S....|.....Tem|
|00000790| 70 6c 61 74 65 73 00 a5 | 95 08 00 00 45 ec ff ff |plates..|....E...|
|000007a0| 6f ba 01 8c 33 00 ad 6f | 95 08 00 00 85 bc 0e 00 |o...3..o|........|
|000007b0| 00 00 2f 00 45 fb f3 ff | 10 d3 b4 a5 10 be 17 00 |../.E...|........|
|000007c0| 33 00 00 00 ff ff ff ff | 03 00 37 00 45 fb f3 ff |3.......|..7.E...|
|000007d0| 90 c0 23 a4 82 41 64 61 | 44 65 73 63 5f 74 78 00 |..#..Ada|Desc_tx.|
|000007e0| 64 07 00 00 45 ff ff ff | 06 ec 95 a5 33 00 da 96 |d...E...|....3...|
|000007f0| 64 07 00 00 3e c5 0e 00 | 82 45 78 61 6d 70 6c 65 |d...>...|.Example|
|00000800| 73 00 00 00 ff ff ff ff | 45 ff ff ff 6c 57 c0 a5 |s.......|E...lW..|
|00000810| 30 00 00 00 ff ff ff ff | ac 14 00 80 82 61 64 61 |0.......|.....ada|
|00000820| 00 00 00 00 ff ff ff ff | ff ff ff ff 45 ff ff ff |........|....E...|
|00000830| 95 57 c0 a5 30 00 00 00 | ff ff ff ff 20 0a 00 80 |.W..0...|.... ...|
|00000840| 82 61 6c 6c 6f 63 5f 74 | 65 73 74 00 d7 01 00 00 |.alloc_t|est.....|
|00000850| 45 ff ff ff 6c 81 b5 85 | 33 00 eb 55 d7 01 00 00 |E...l...|3..U....|
|00000860| c6 cc 0e 00 82 62 75 66 | 66 65 72 5f 67 5f 70 00 |.....buf|fer_g_p.|
|00000870| c5 04 00 00 45 ff ff ff | c6 a6 5b 85 33 00 92 f0 |....E...|..[.3...|
|00000880| c5 04 00 00 c1 ce 0e 00 | 82 64 65 61 6c 6c 6f 63 |........|.dealloc|
|00000890| 00 00 00 00 80 02 00 00 | 45 ff ff ff 74 c4 5b 85 |........|E...t.[.|
|000008a0| 33 00 e3 41 80 02 00 00 | aa d3 0e 00 82 64 65 6c |3..A....|.....del|
|000008b0| 61 79 5f 74 65 73 74 00 | 28 04 00 00 45 ff ff ff |ay_test.|(...E...|
|000008c0| 0f df 5b 85 33 00 94 99 | 28 04 00 00 4e d6 0e 00 |..[.3...|(...N...|
|000008d0| 82 68 65 6c 6c 6f 00 00 | 00 00 00 00 84 00 00 00 |.hello..|........|
|000008e0| 45 ff ff ff bd eb 5b 85 | 33 00 bf ed 84 00 00 00 |E.....[.|3.......|
|000008f0| 9a da 0e 00 82 69 6f 00 | 00 00 00 00 00 00 00 00 |.....io.|........|
|00000900| e4 00 00 00 45 ff ff ff | b1 01 5c 85 33 00 e0 40 |....E...|..\.3..@|
|00000910| e4 00 00 00 42 db 0e 00 | 82 72 61 6e 64 6f 6d 00 |....B...|.random.|
|00000920| 00 00 00 00 50 0a 00 00 | 45 ff ff ff 53 01 5b 85 |....P...|E...S.[.|
|00000930| 33 00 83 e1 50 0a 00 00 | 4a dc 0e 00 82 72 61 6e |3...P...|J....ran|
|00000940| 64 6f 6d 5f 00 00 00 00 | b6 01 00 00 45 ff ff ff |dom_....|....E...|
|00000950| 42 00 5b 85 33 00 43 74 | b6 01 00 00 be e6 0e 00 |B.[.3.Ct|........|
|00000960| 82 73 68 65 6c 6c 74 65 | 73 74 00 00 24 09 00 00 |.shellte|st..$...|
|00000970| 45 ff ff ff 89 26 c0 a4 | 33 00 aa 0d 24 09 00 00 |E....&..|3...$...|
|00000980| 98 e8 0e 00 82 53 48 45 | 4c 4c 5f 00 00 00 00 00 |.....SHE|LL_.....|
|00000990| 44 07 00 00 45 ff ff ff | d9 ae 5c 85 33 00 a4 99 |D...E...|..\.3...|
|000009a0| 44 07 00 00 e0 f1 0e 00 | 82 73 69 65 76 65 5f 70 |D.......|.sieve_p|
|000009b0| 75 6d 70 00 98 05 00 00 | 45 ff ff ff 27 7a c1 a4 |ump.....|E...'z..|
|000009c0| 33 00 61 18 98 05 00 00 | 48 f9 0e 00 82 73 6f 72 |3.a.....|H....sor|
|000009d0| 74 5f 70 75 6d 70 00 00 | c8 09 00 00 45 ff ff ff |t_pump..|....E...|
|000009e0| 57 65 5d 85 33 00 73 c6 | c8 09 00 00 04 ff 0e 00 |We].3.s.|........|
|000009f0| 82 73 74 61 63 6b 00 00 | 00 00 00 00 74 04 00 00 |.stack..|....t...|
|00000a00| 45 ff ff ff 18 88 5d 85 | 33 00 76 68 74 04 00 00 |E.....].|3.vht...|
|00000a10| f0 08 0f 00 82 73 74 61 | 63 6b 5f 00 00 00 00 00 |.....sta|ck_.....|
|00000a20| 1c 04 00 00 45 ff ff ff | ef 88 5d 85 33 00 3f 4f |....E...|..].3.?O|
|00000a30| 1c 04 00 00 88 0d 0f 00 | 82 74 65 73 74 5f 69 6e |........|.test_in|
|00000a40| 74 00 00 00 c5 02 00 00 | 45 ff ff ff 91 9e 5d 85 |t.......|E.....].|
|00000a50| 33 00 8c 80 c5 02 00 00 | c8 11 0f 00 00 00 00 00 |3.......|........|
|00000a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000a80| 82 63 00 00 33 00 00 00 | ff ff ff ff ff ff ff ff |.c..3...|........|
|00000a90| 45 ff ff ff de 5c c0 a5 | 30 00 00 00 ff ff ff ff |E....\..|0.......|
|00000aa0| 8c 0a 00 80 82 70 72 6f | 63 00 00 00 00 00 00 00 |.....pro|c.......|
|00000ab0| 51 01 00 00 45 ff ff ff | b8 bf 8d 6a 33 00 cc c2 |Q...E...|...j3...|
|00000ac0| 51 01 00 00 b1 14 0f 00 | 00 00 00 00 00 00 00 00 |Q.......|........|
|00000ad0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ae0| 00 00 00 00 00 00 00 00 | 00 00 00 00 82 64 61 74 |........|.....dat|
|00000af0| 00 00 00 00 ff ff ff ff | ff ff ff ff 45 ff ff ff |........|....E...|
|00000b00| 63 5d c0 a5 30 00 00 00 | ff ff ff ff f8 0a 00 80 |c]..0...|........|
|00000b10| 82 73 68 65 6c 6c 00 00 | 00 00 00 00 06 00 00 00 |.shell..|........|
|00000b20| 45 ff ff ff 3a 2c c0 a4 | 33 00 fc 70 06 00 00 00 |E...:,..|3..p....|
|00000b30| 26 16 0f 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |&.......|........|
|00000b40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000b50| 00 00 00 00 00 00 00 00 | 82 64 65 6d 6f 73 00 00 |........|.demos..|
|00000b60| ff ff ff ff ff ff ff ff | 45 ff ff ff 2c 5f c0 a5 |........|E...,_..|
|00000b70| 30 00 00 00 ff ff ff ff | f8 13 00 80 82 61 64 61 |0.......|.....ada|
|00000b80| 00 00 00 00 00 00 00 00 | ff ff ff ff 45 ff ff ff |........|....E...|
|00000b90| 80 5f c0 a5 30 00 00 00 | ff ff ff ff 54 0f 00 80 |._..0...|....T...|
|00000ba0| 82 63 6f 6e 63 6f 72 64 | 00 ff ff ff 18 12 00 00 |.concord|........|
|00000bb0| 44 ff ff ff 10 23 13 26 | 33 00 03 5c 18 12 00 00 |D....#.&|3..\....|
|00000bc0| 50 16 0f 00 82 64 61 74 | 65 73 33 00 ff ff ff ff |P....dat|es3.....|
|00000bd0| d6 0f 00 00 44 ff ff ff | 10 23 13 26 33 00 20 4d |....D...|.#.&3. M|
|00000be0| d6 0f 00 00 8c 28 0f 00 | 82 64 69 6e 65 72 73 31 |.....(..|.diners1|
|00000bf0| 00 ff ff ff 77 1d 00 00 | 44 ff ff ff 74 23 13 26 |....w...|D...t#.&|
|00000c00| 33 00 a6 19 77 1d 00 00 | 86 38 0f 00 82 64 69 6e |3...w...|.8...din|
|00000c10| 65 72 73 32 00 ff ff ff | 52 2f 00 00 45 ff ff ff |ers2....|R/..E...|
|00000c20| 38 a2 0f a5 33 00 5b 80 | 52 2f 00 00 21 56 0f 00 |8...3.[.|R/..!V..|
|00000c30| 82 64 72 61 77 00 00 00 | ff ff ff ff f1 06 00 00 |.draw...|........|
|00000c40| 44 ff ff ff 74 23 13 26 | 33 00 e0 ea f1 06 00 00 |D...t#.&|3.......|
|00000c50| 97 85 0f 00 82 65 6e 00 | 33 00 00 00 ff ff ff ff |.....en.|3.......|
|00000c60| a2 04 00 00 44 ff ff ff | d8 23 13 26 33 00 23 ed |....D...|.#.&3.#.|
|00000c70| a2 04 00 00 ac 8c 0f 00 | 82 66 61 63 74 72 00 00 |........|.factr..|
|00000c80| ff ff ff ff 12 05 00 00 | 44 ff ff ff d8 23 13 26 |........|D....#.&|
|00000c90| 33 00 5b 17 12 05 00 00 | 72 91 0f 00 82 66 6c 74 |3.[.....|r....flt|
|00000ca0| 69 6f 00 00 ff ff ff ff | 05 01 00 00 44 ff ff ff |io......|....D...|
|00000cb0| d8 23 13 26 33 00 34 13 | 05 01 00 00 a8 96 0f 00 |.#.&3.4.|........|
|00000cc0| 82 67 65 6e 71 73 6f 72 | 74 00 ff ff 10 0b 00 00 |.genqsor|t.......|
|00000cd0| 44 ff ff ff d8 23 13 26 | 33 00 b4 b9 10 0b 00 00 |D....#.&|3.......|
|00000ce0| d1 97 0f 00 82 68 69 6c | 62 65 72 74 00 ff ff ff |.....hil|bert....|
|00000cf0| 68 07 00 00 44 ff ff ff | 3c 24 13 26 33 00 20 64 |h...D...|<$.&3. d|
|00000d00| 68 07 00 00 05 a3 0f 00 | 82 69 6e 74 69 6f 00 00 |h.......|.intio..|
|00000d10| ff ff ff ff 4f 00 00 00 | 44 ff ff ff 3c 24 13 26 |....O...|D...<$.&|
|00000d20| 33 00 37 96 4f 00 00 00 | 91 aa 0f 00 82 6c 69 73 |3.7.O...|.....lis|
|00000d30| 74 00 00 00 ff ff ff ff | 14 0c 00 00 44 ff ff ff |t.......|....D...|
|00000d40| 3c 24 13 26 33 00 84 da | 14 0c 00 00 04 ab 0f 00 |<$.&3...|........|
|00000d50| 82 6d 61 7a 65 00 00 00 | ff ff ff ff fe 1d 00 00 |.maze...|........|
|00000d60| 44 ff ff ff 3c 24 13 26 | 33 00 77 93 fe 1d 00 00 |D...<$.&|3.w.....|
|00000d70| 3c b7 0f 00 82 6e 65 77 | 5f 6d 61 7a 65 00 ff ff |<....new|_maze...|
|00000d80| bf 0a 00 00 44 ff ff ff | 3c 24 13 26 33 00 da 2d |....D...|<$.&3..-|
|00000d90| bf 0a 00 00 5e d5 0f 00 | 82 70 61 67 65 72 32 00 |....^...|.pager2.|
|00000da0| ff ff ff ff 1a c8 00 00 | 44 ff ff ff a0 24 13 26 |........|D....$.&|
|00000db0| 33 00 d7 4f 1a c8 00 00 | 41 e0 0f 00 82 70 68 69 |3..O....|A....phi|
|00000dc0| 6c 00 00 00 ff ff ff ff | dc 11 00 00 44 ff ff ff |l.......|....D...|
|00000dd0| a0 24 13 26 33 00 da 08 | dc 11 00 00 7f a8 10 00 |.$.&3...|........|
|00000de0| 82 70 69 00 33 00 00 00 | ff ff ff ff 73 04 00 00 |.pi.3...|....s...|
|00000df0| 44 ff ff ff a0 24 13 26 | 33 00 80 ee 73 04 00 00 |D....$.&|3...s...|
|00000e00| 7f ba 10 00 82 70 72 65 | 64 65 66 00 ff ff ff ff |.....pre|def.....|
|00000e10| 8d a3 00 00 44 ff ff ff | 04 25 13 26 33 00 f1 83 |....D...|.%.&3...|
|00000e20| 8d a3 00 00 16 bf 10 00 | 82 70 72 69 6d 65 73 00 |........|.primes.|
|00000e30| ff ff ff ff d7 02 00 00 | 44 ff ff ff 04 25 13 26 |........|D....%.&|
|00000e40| 33 00 6f fa d7 02 00 00 | c7 62 11 00 82 70 72 69 |3.o.....|.b...pri|
|00000e50| 6d 65 73 33 00 ff ff ff | db 0a 00 00 44 ff ff ff |mes3....|....D...|
|00000e60| 04 25 13 26 33 00 b3 1b | db 0a 00 00 c2 65 11 00 |.%.&3...|.....e..|
|00000e70| 82 72 61 6e 64 6f 6d 00 | ff ff ff ff b7 05 00 00 |.random.|........|
|00000e80| 44 ff ff ff 04 25 13 26 | 33 00 13 b3 b7 05 00 00 |D....%.&|3.......|
|00000e90| 26 d8 11 00 82 72 6f 6f | 74 73 00 00 ff ff ff ff |&....roo|ts......|
|00000ea0| ec 02 00 00 44 ff ff ff | 04 25 13 26 33 00 05 0b |....D...|.%.&3...|
|00000eb0| ec 02 00 00 01 de 11 00 | 82 73 63 72 65 65 6e 69 |........|.screeni|
|00000ec0| 6f 00 ff ff c8 0d 00 00 | 45 ff ff ff d5 a6 0f a5 |o.......|E.......|
|00000ed0| 33 00 9e a4 c8 0d 00 00 | 11 e1 11 00 82 73 65 6d |3.......|.....sem|
|00000ee0| 61 70 68 6f 72 00 ff ff | 46 07 00 00 44 ff ff ff |aphor...|F...D...|
|00000ef0| 30 26 13 26 33 00 a1 95 | 46 07 00 00 fd ee 11 00 |0&.&3...|F.......|
|00000f00| 82 73 70 61 74 68 00 00 | ff ff ff ff a5 0e 00 00 |.spath..|........|
|00000f10| 44 ff ff ff 30 26 13 26 | 33 00 10 d4 a5 0e 00 00 |D...0&.&|3.......|
|00000f20| 67 f6 11 00 82 74 61 73 | 6b 00 00 00 ff ff ff ff |g....tas|k.......|
|00000f30| 4e 07 00 00 44 ff ff ff | 30 26 13 26 33 00 f8 67 |N...D...|0&.&3..g|
|00000f40| 4e 07 00 00 30 05 12 00 | 82 74 65 73 74 00 00 00 |N...0...|.test...|
|00000f50| ff ff ff ff 56 00 00 00 | 44 ff ff ff 30 26 13 26 |....V...|D...0&.&|
|00000f60| 33 00 c7 ab 56 00 00 00 | a2 0c 12 00 82 74 6f 70 |3...V...|.....top|
|00000f70| 73 6f 72 74 00 ff ff ff | 7c 05 00 00 44 ff ff ff |sort....||...D...|
|00000f80| 30 26 13 26 33 00 bb f0 | 7c 05 00 00 1c 0d 12 00 |0&.&3...||.......|
|00000f90| 00 f0 09 00 33 00 00 00 | ff ff ff ff 03 00 9d 00 |....3...|........|
|00000fa0| 45 fb f3 ff 41 17 b5 a5 | a3 71 03 00 33 00 00 00 |E...A...|.q..3...|
|00000fb0| 6b ec 6e fe 82 63 00 00 | 00 00 00 00 00 00 00 00 |k.n..c..|........|
|00000fc0| ff ff ff ff 45 ff ff ff | 73 68 c0 a5 30 00 00 00 |....E...|sh..0...|
|00000fd0| ff ff ff ff c0 0f 00 80 | 82 73 63 72 65 65 6e 5f |........|.screen_|
|00000fe0| 69 6f 00 ff d6 00 00 00 | 45 ff ff ff 6c cf 0f a5 |io......|E...l...|
|00000ff0| 33 00 26 8e d6 00 00 00 | c1 70 11 00 00 f0 09 00 |3.&.....|.p......|
|00001000| 33 00 00 00 ff ff ff ff | 03 00 9d 00 45 fb f3 ff |3.......|....E...|
|00001010| 41 17 b5 a5 a3 71 03 00 | 33 00 00 00 6b ec 6e fe |A....q..|3...k.n.|
|00001020| 82 64 61 74 00 00 00 00 | 00 00 00 00 ff ff ff ff |.dat....|........|
|00001030| 45 ff ff ff 52 69 c0 a5 | 30 00 00 00 ff ff ff ff |E...Ri..|0.......|
|00001040| bc 10 00 80 82 63 6f 6e | 63 6f 72 64 00 ff ff ff |.....con|cord....|
|00001050| 3f 00 00 00 44 ff ff ff | 10 23 13 26 33 00 71 19 |?...D...|.#.&3.q.|
|00001060| 3f 00 00 00 bb 71 11 00 | 82 64 61 74 65 73 33 00 |?....q..|.dates3.|
|00001070| ff ff ff ff 18 00 00 00 | 44 ff ff ff 10 23 13 26 |........|D....#.&|
|00001080| 33 00 7a 6f 18 00 00 00 | 1e 72 11 00 82 65 6e 00 |3.zo....|.r...en.|
|00001090| 33 00 00 00 ff ff ff ff | 23 00 00 00 44 ff ff ff |3.......|#...D...|
|000010a0| d8 23 13 26 33 00 15 62 | 23 00 00 00 5a 72 11 00 |.#.&3..b|#...Zr..|
|000010b0| 82 66 61 63 74 72 00 00 | ff ff ff ff 0b 00 00 00 |.factr..|........|
|000010c0| 44 ff ff ff d8 23 13 26 | 33 00 51 73 0b 00 00 00 |D....#.&|3.Qs....|
|000010d0| a1 72 11 00 82 74 6f 70 | 73 6f 72 74 00 ff ff ff |.r...top|sort....|
|000010e0| 39 00 00 00 44 ff ff ff | 30 26 13 26 33 00 34 93 |9...D...|0&.&3.4.|
|000010f0| 39 00 00 00 d0 72 11 00 | 00 f0 09 00 33 00 00 00 |9....r..|....3...|
|00001100| ff ff ff ff 03 00 9d 00 | 45 fb f3 ff 41 17 b5 a5 |........|E...A...|
|00001110| a3 71 03 00 33 00 00 00 | 6b ec 6e fe 82 64 6f 63 |.q..3...|k.n..doc|
|00001120| 00 00 00 00 00 00 00 00 | ff ff ff ff 45 ff ff ff |........|....E...|
|00001130| 73 6b c0 a5 30 00 00 00 | ff ff ff ff 4c 11 00 80 |sk..0...|....L...|
|00001140| 82 64 69 6e 65 72 73 00 | ff ff ff ff 1e 0e 00 00 |.diners.|........|
|00001150| 44 ff ff ff 74 23 13 26 | 33 00 d6 2d 1e 0e 00 00 |D...t#.&|3..-....|
|00001160| 2d 73 11 00 82 70 61 67 | 65 72 32 00 ff ff ff ff |-s...pag|er2.....|
|00001170| 42 37 00 00 44 ff ff ff | a0 24 13 26 33 00 2e 74 |B7..D...|.$.&3..t|
|00001180| 42 37 00 00 6f 81 11 00 | 00 f0 09 00 33 00 00 00 |B7..o...|....3...|
|00001190| ff ff ff ff 03 00 9d 00 | 45 fb f3 ff 41 17 b5 a5 |........|E...A...|
|000011a0| a3 71 03 00 33 00 00 00 | 6b ec 6e fe 82 6d 61 6b |.q..3...|k.n..mak|
|000011b0| 65 64 72 61 77 00 00 00 | 4a 05 00 00 45 ff ff ff |edraw...|J...E...|
|000011c0| 7d f9 02 a5 33 00 a5 fa | 4a 05 00 00 d5 b8 11 00 |}...3...|J.......|
|000011d0| 82 6d 61 6b 65 66 69 6c | 65 00 00 00 2d 06 00 00 |.makefil|e...-...|
|000011e0| 45 ff ff ff 35 fc 02 a5 | 33 00 93 48 2d 06 00 00 |E...5...|3..H-...|
|000011f0| 43 be 11 00 82 72 65 61 | 64 6d 65 00 00 00 00 00 |C....rea|dme.....|
|00001200| 78 05 00 00 44 ff ff ff | 04 25 13 26 33 00 71 31 |x...D...|.%.&3.q1|
|00001210| 78 05 00 00 94 c4 11 00 | 82 72 75 6e 31 00 00 00 |x.......|.run1...|
|00001220| 00 00 00 00 47 00 00 00 | 44 eb ff ff 04 25 13 26 |....G...|D....%.&|
|00001230| 33 00 f6 c0 47 00 00 00 | 30 ca 11 00 82 72 75 6e |3...G...|0....run|
|00001240| 32 00 00 00 00 00 00 00 | 4d 00 00 00 45 eb ff ff |2.......|M...E...|
|00001250| f8 b9 02 a5 33 00 ea 7a | 4d 00 00 00 9b ca 11 00 |....3..z|M.......|
|00001260| 82 72 75 6e 33 00 00 00 | 00 00 00 00 4f 00 00 00 |.run3...|....O...|
|00001270| 45 eb ff ff 59 e7 02 a5 | 33 00 dd 2c 4f 00 00 00 |E...Y...|3..,O...|
|00001280| 0c cb 11 00 82 72 75 6e | 34 00 00 00 00 00 00 00 |.....run|4.......|
|00001290| 45 00 00 00 44 eb ff ff | 68 25 13 26 33 00 78 37 |E...D...|h%.&3.x7|
|000012a0| 45 00 00 00 7f cb 11 00 | 82 72 75 6e 35 00 00 00 |E.......|.run5...|
|000012b0| 00 00 00 00 41 00 00 00 | 44 eb ff ff 68 25 13 26 |....A...|D...h%.&|
|000012c0| 33 00 c5 85 41 00 00 00 | e8 cb 11 00 82 72 75 6e |3...A...|.....run|
|000012d0| 36 00 00 00 00 00 00 00 | 47 00 00 00 44 eb ff ff |6.......|G...D...|
|000012e0| 68 25 13 26 33 00 01 ee | 47 00 00 00 4d cc 11 00 |h%.&3...|G...M...|
|000012f0| 82 72 75 6e 37 00 00 00 | 00 00 00 00 51 00 00 00 |.run7...|....Q...|
|00001300| 45 eb ff ff 14 ed 02 a5 | 33 00 27 ae 51 00 00 00 |E.......|3.'.Q...|
|00001310| b8 cc 11 00 82 72 75 6e | 38 00 00 00 00 00 00 00 |.....run|8.......|
|00001320| 43 00 00 00 44 eb ff ff | 68 25 13 26 33 00 49 28 |C...D...|h%.&3.I(|
|00001330| 43 00 00 00 2d cd 11 00 | 82 72 75 6e 39 00 00 00 |C...-...|.run9...|
|00001340| 00 00 00 00 43 00 00 00 | 44 eb ff ff 68 25 13 26 |....C...|D...h%.&|
|00001350| 33 00 40 e9 43 00 00 00 | 94 cd 11 00 82 72 75 6e |3.@.C...|.....run|
|00001360| 61 00 00 00 00 00 00 00 | 44 00 00 00 44 eb ff ff |a.......|D...D...|
|00001370| 68 25 13 26 33 00 7a 38 | 44 00 00 00 fb cd 11 00 |h%.&3.z8|D.......|
|00001380| 82 72 75 6e 62 00 00 00 | 00 00 00 00 e5 00 00 00 |.runb...|........|
|00001390| 45 eb ff ff 70 ef 02 a5 | 33 00 d1 52 e5 00 00 00 |E...p...|3..R....|
|000013a0| 63 ce 11 00 82 72 75 6e | 63 00 00 00 00 00 00 00 |c....run|c.......|
|000013b0| 5d 01 00 00 45 eb ff ff | 72 f1 02 a5 33 00 c1 0a |]...E...|r...3...|
|000013c0| 5d 01 00 00 6c cf 11 00 | 82 72 75 6e 64 00 00 00 |]...l...|.rund...|
|000013d0| 00 00 00 00 76 00 00 00 | 45 eb ff ff 4c f4 02 a5 |....v...|E...L...|
|000013e0| 33 00 7b a6 76 00 00 00 | ed d0 11 00 82 72 75 6e |3.{.v...|.....run|
|000013f0| 65 00 00 00 00 00 00 00 | 66 00 00 00 45 eb ff ff |e.......|f...E...|
|00001400| f2 f2 02 a5 33 00 9d 93 | 66 00 00 00 87 d1 11 00 |....3...|f.......|
|00001410| 82 72 75 6e 66 00 00 00 | 00 00 00 00 49 00 00 00 |.runf...|....I...|
|00001420| 44 eb ff ff cc 25 13 26 | 33 00 ae 48 49 00 00 00 |D....%.&|3..HI...|
|00001430| 11 d2 11 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001440| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001450| 00 00 00 00 00 00 00 00 | 82 6d 61 6b 65 66 69 6c |........|.makefil|
|00001460| 65 00 ff ff e4 02 00 00 | 45 ff ff ff 46 e8 8b a5 |e.......|E...F...|
|00001470| 33 00 83 c9 e4 02 00 00 | 7e d2 11 00 82 6f 00 00 |3.......|~....o..|
|00001480| 33 00 00 00 ff ff ff ff | ff ff ff ff 45 ff ff ff |3.......|....E...|
|00001490| ad 74 c0 a5 30 00 00 00 | ff ff ff ff 88 14 00 80 |.t..0...|........|
|000014a0| 82 70 72 6f 63 00 00 00 | 00 00 00 00 7c 02 00 00 |.proc...|....|...|
|000014b0| 45 fd ff ff e6 e9 8b a5 | 33 00 7b f2 7c 02 00 00 |E.......|3.{.|...|
|000014c0| 86 d5 11 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000014e0| 00 00 00 00 00 00 00 00 | 00 f0 09 00 33 00 00 00 |........|....3...|
|000014f0| ff ff ff ff 03 00 9d 00 | 45 fb f3 ff 41 17 b5 a5 |........|E...A...|
|00001500| a3 71 03 00 33 00 00 00 | 6b ec 6e fe 00 00 00 00 |.q..3...|k.n.....|
|00001510| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001520| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001530| 2e 61 64 61 67 65 6e 0a | 2a 53 65 74 20 42 4e 44 |.adagen.|*Set BND|
|00001540| 20 61 64 61 62 69 6e 64 | 0a 2a 53 65 74 20 49 4e | adabind|.*Set IN|
|00001550| 54 20 61 64 61 3a 6c 69 | 62 0a 2a 53 65 74 20 41 |T ada:li|b.*Set A|
|00001560| 64 61 45 44 50 52 45 44 | 45 46 20 61 64 61 3a 6c |daEDPRED|EF ada:l|
|00001570| 69 62 0a 46 69 6c 65 44 | 61 74 61 82 21 68 65 6c |ib.FileD|ata.!hel|
|00001580| 70 00 00 42 00 00 00 c0 | 05 00 00 45 ff ff ff cc |p..B....|...E....|
|00001590| dc ea 8b 03 00 2a 6d 20 | 20 20 41 64 61 0a 20 20 |.....*m | Ada. |
|000015a0| 20 7e 7e 7e 0a 20 20 20 | 50 75 72 70 6f 73 65 3a | ~~~. |Purpose:|
|000015b0| 20 20 41 64 61 20 43 6f | 6d 70 69 6c 65 72 0a 0a | Ada Co|mpiler..|
|000015c0| 20 20 20 53 65 74 75 70 | 3a 0a 20 20 20 20 20 20 | Setup|:. |
|000015d0| 49 63 6f 6e 20 20 20 20 | 20 20 20 20 20 20 20 20 |Icon | |
|000015e0| 20 20 20 20 20 20 20 20 | 41 63 74 69 6f 6e 2f 4d | |Action/M|
|000015f0| 65 61 6e 69 6e 67 20 20 | 20 20 20 20 20 20 20 20 |eaning | |
|00001600| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 44 65 66 | | Def|
|00001610| 61 75 6c 74 0a 20 20 20 | 20 20 20 2d 2d 2d 2d 20 |ault. | ---- |
|00001620| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001630| 20 20 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -----|--------|
|00001640| 2d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |- | |
|00001650| 20 20 20 20 20 20 20 20 | 2d 2d 2d 2d 2d 2d 2d 0a | |-------.|
|00001660| 20 20 20 20 20 20 53 6f | 75 72 63 65 20 20 20 20 | So|urce |
|00001670| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4e 61 | | Na|
|00001680| 6d 65 20 6f 66 20 66 69 | 6c 65 20 74 6f 20 62 65 |me of fi|le to be|
|00001690| 20 63 6f 6d 70 69 6c 65 | 64 20 20 20 20 20 20 20 | compile|d |
|000016a0| 20 20 20 20 20 6e 69 6c | 0a 20 20 20 20 20 20 20 | nil|. |
|000016b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000016c0| 20 20 20 20 20 20 20 28 | 74 79 70 65 64 20 6f 72 | (|typed or|
|000016d0| 20 64 72 61 67 67 65 64 | 29 2e 0a 20 20 20 20 20 | dragged|).. |
|000016e0| 20 4c 69 62 72 61 72 79 | 20 20 20 20 20 20 20 20 | Library| |
|000016f0| 20 20 20 20 20 20 20 20 | 20 41 64 61 20 6c 69 62 | | Ada lib|
|00001700| 72 61 72 79 46 69 6c 65 | 44 61 74 61 82 21 42 6f |raryFile|Data.!Bo|
|00001710| 6f 74 00 00 42 00 00 00 | 1b 01 00 00 45 eb ff ff |ot..B...|....E...|
|00001720| 2e d9 ea 8b 03 00 a9 49 | 7c 0a 7c 20 41 64 61 20 |.......I||.| Ada |
|00001730| 21 42 6f 6f 74 0a 7c 20 | 28 43 29 20 43 6f 70 79 |!Boot.| |(C) Copy|
|00001740| 72 69 67 68 74 20 50 65 | 74 65 72 20 42 75 72 77 |right Pe|ter Burw|
|00001750| 6f 6f 64 2c 20 31 39 39 | 34 0a 7c 0a 49 66 20 22 |ood, 199|4.|.If "|
|00001760| 3c 41 64 61 24 50 61 74 | 68 3e 22 20 3d 20 22 22 |<Ada$Pat|h>" = ""|
|00001770| 20 54 68 65 6e 20 53 65 | 74 20 52 75 6e 24 50 61 | Then Se|t Run$Pa|
|00001780| 74 68 20 3c 52 75 6e 24 | 50 61 74 68 3e 2c 61 64 |th <Run$|Path>,ad|
|00001790| 61 3a 62 69 6e 2e 0a 49 | 63 6f 6e 53 70 72 69 74 |a:bin..I|conSprit|
|000017a0| 65 73 20 3c 4f 62 65 79 | 24 44 69 72 3e 2e 21 53 |es <Obey|$Dir>.!S|
|000017b0| 70 72 69 74 65 73 0a 2a | 53 65 74 20 41 64 61 24 |prites.*|Set Ada$|
|000017c0| 50 61 74 68 20 3c 4f 62 | 65 79 24 44 69 72 3e 2e |Path <Ob|ey$Dir>.|
|000017d0| 0a 2a 53 65 74 20 41 64 | 61 46 72 6f 6e 74 20 61 |.*Set Ad|aFront a|
|000017e0| 64 61 3a 6c 69 62 2e 61 | 64 61 66 72 6f 6e 74 0a |da:lib.a|dafront.|
|000017f0| 2a 53 65 74 20 47 45 4e | 20 61 64 61 3a 6c 69 62 |*Set GEN| ada:lib|
|00001800| 2e 61 64 61 67 65 6e 0a | 2a 53 65 74 20 42 4e 44 |.adagen.|*Set BND|
|00001810| 20 61 64 61 62 69 6e 64 | 0a 2a 53 65 74 20 49 4e | adabind|.*Set IN|
|00001820| 54 20 61 64 61 3a 6c 69 | 62 0a 2a 53 65 74 20 41 |T ada:li|b.*Set A|
|00001830| 64 61 45 44 50 52 45 44 | 45 46 20 61 64 61 3a 6c |daEDPRED|EF ada:l|
|00001840| 69 62 0a 46 69 6c 65 44 | 61 74 61 82 21 68 65 6c |ib.FileD|ata.!hel|
|00001850| 70 00 00 42 00 00 00 c0 | 05 00 00 45 ff ff ff cc |p..B....|...E....|
|00001860| dc ea 8b 03 00 2a 6d 20 | 20 20 41 64 61 0a 20 20 |.....*m | Ada. |
|00001870| 20 7e 7e 7e 0a 20 20 20 | 50 75 72 70 6f 73 65 3a | ~~~. |Purpose:|
|00001880| 20 20 41 64 61 20 43 6f | 6d 70 69 6c 65 72 0a 0a | Ada Co|mpiler..|
|00001890| 20 20 20 53 65 74 75 70 | 3a 0a 20 20 20 20 20 20 | Setup|:. |
|000018a0| 49 63 6f 6e 20 20 20 20 | 20 20 20 20 20 20 20 20 |Icon | |
|000018b0| 20 20 20 20 20 20 20 20 | 41 63 74 69 6f 6e 2f 4d | |Action/M|
|000018c0| 65 61 6e 69 6e 67 20 20 | 20 20 20 20 20 20 20 20 |eaning | |
|000018d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 44 65 66 | | Def|
|000018e0| 61 75 6c 74 0a 20 20 20 | 20 20 20 2d 2d 2d 2d 20 |ault. | ---- |
|000018f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001900| 20 20 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d | -----|--------|
|00001910| 2d 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |- | |
|00001920| 20 20 20 20 20 20 20 20 | 2d 2d 2d 2d 2d 2d 2d 0a | |-------.|
|00001930| 20 20 20 20 20 20 53 6f | 75 72 63 65 20 20 20 20 | So|urce |
|00001940| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 4e 61 | | Na|
|00001950| 6d 65 20 6f 66 20 66 69 | 6c 65 20 74 6f 20 62 65 |me of fi|le to be|
|00001960| 20 63 6f 6d 70 69 6c 65 | 64 20 20 20 20 20 20 20 | compile|d |
|00001970| 20 20 20 20 20 6e 69 6c | 0a 20 20 20 20 20 20 20 | nil|. |
|00001980| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001990| 20 20 20 20 20 20 20 28 | 74 79 70 65 64 20 6f 72 | (|typed or|
|000019a0| 20 64 72 61 67 67 65 64 | 29 2e 0a 20 20 20 20 20 | dragged|).. |
|000019b0| 20 4c 69 62 72 61 72 79 | 20 20 20 20 20 20 20 20 | Library| |
|000019c0| 20 20 20 20 20 20 20 20 | 20 41 64 61 20 6c 69 62 | | Ada lib|
|000019d0| 72 61 72 79 20 74 6f 20 | 68 6f 6c 64 20 75 6e 69 |rary to |hold uni|
|000019e0| 74 73 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ts | |
|000019f0| 6e 69 6c 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |nil. | |
|00001a00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001a10| 20 20 28 74 79 70 65 64 | 20 6f 72 20 64 72 61 67 | (typed| or drag|
|00001a20| 67 65 64 29 2e 0a 20 20 | 20 20 20 20 4f 62 6a 65 |ged).. | Obje|
|00001a30| 63 74 73 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |cts | |
|00001a40| 20 20 20 20 4c 69 73 74 | 20 6f 66 20 65 78 74 65 | List| of exte|
|00001a50| 72 6e 61 6c 20 6f 62 6a | 65 63 74 20 66 69 6c 65 |rnal obj|ect file|
|00001a60| 73 20 74 6f 20 20 20 20 | 20 20 20 6e 69 6c 0a 20 |s to | nil. |
|00001a70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001a80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 69 6e 63 | | inc|
|00001a90| 6c 75 64 65 20 69 6e 20 | 74 68 65 20 62 69 6e 64 |lude in |the bind|
|00001aa0| 69 6e 67 0a 20 20 20 20 | 20 20 42 69 6e 64 20 65 |ing. | Bind e|
|00001ab0| 78 65 63 75 74 61 62 6c | 65 20 20 20 20 20 20 20 |xecutabl|e |
|00001ac0| 20 20 49 6e 76 6f 6b 65 | 20 74 68 65 20 41 64 61 | Invoke| the Ada|
|00001ad0| 20 62 69 6e 64 65 72 20 | 20 20 20 20 20 20 20 20 | binder | |
|00001ae0| 20 20 20 20 20 20 20 20 | 20 6f 66 66 0a 20 20 20 | | off. |
|00001af0| 20 20 20 4e 65 77 20 6c | 69 62 72 61 72 79 20 20 | New l|ibrary |
|00001b00| 20 20 20 20 20 20 20 20 | 20 20 20 43 72 65 61 74 | | Creat|
|00001b10| 65 20 61 20 6e 65 77 20 | 41 64 61 20 6c 69 62 72 |e a new |Ada libr|
|00001b20| 61 72 79 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ary | |
|00001b30| 20 20 6f 66 66 0a 20 20 | 20 20 20 20 44 65 62 75 | off. | Debu|
|00001b40| 67 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |g | |
|00001b50| 20 20 20 20 43 6f 6d 70 | 69 6c 65 20 69 6e 20 64 | Comp|ile in d|
|00001b60| 65 62 75 67 67 69 6e 67 | 20 69 6e 66 6f 72 6d 61 |ebugging| informa|
|00001b70| 74 69 6f 6e 20 20 20 20 | 20 20 20 6f 66 66 0a 20 |tion | off. |
|00001b80| 20 20 20 20 20 54 68 72 | 6f 77 62 61 63 6b 20 20 | Thr|owback |
|00001b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 52 65 70 | | Rep|
|00001ba0| 6f 72 74 20 65 72 72 6f | 72 73 20 61 6e 64 20 77 |ort erro|rs and w|
|00001bb0| 61 72 6e 69 6e 67 73 20 | 74 6f 20 74 68 65 20 20 |arnings |to the |
|00001bc0| 20 20 20 20 6f 6e 0a 20 | 20 20 20 20 20 20 20 20 | on. | |
|00001bd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001be0| 20 20 20 20 20 65 64 69 | 74 6f 72 0a 0a 20 20 20 | edi|tor.. |
|00001bf0| 4d 65 6e 75 3a 0a 20 20 | 20 20 20 20 45 6e 74 72 |Menu:. | Entr|
|00001c00| 79 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |y | |
|00001c10| 20 20 20 20 41 63 74 69 | 6f 6e 2f 4d 65 61 6e 69 | Acti|on/Meani|
|00001c20| 6e 67 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ng | |
|00001c30| 20 20 20 20 20 20 20 20 | 20 44 65 66 61 75 6c 74 | | Default|
|00001c40| 0a 20 20 20 20 20 20 2d | 2d 2d 2d 2d 20 20 20 20 |. -|---- |
|00001c50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2d | | -|
|00001c60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 20 20 20 |--------|----- |
|00001c70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001c80| 20 20 20 20 2d 2d 2d 2d | 2d 2d 2d 0a 20 20 20 20 | ----|---. |
|00001c90| 20 20 4d 61 69 6e 20 70 | 72 6f 67 72 61 6d 20 20 | Main p|rogram |
|00001ca0| 20 3d 3e 20 20 20 20 20 | 20 20 73 65 74 20 74 68 | => | set th|
|00001cb0| 65 20 6e 61 6d 65 20 6f | 66 20 74 68 65 20 6d 61 |e name o|f the ma|
|00001cc0| 69 6e 20 70 72 6f 67 72 | 61 6d 20 75 6e 69 74 20 |in progr|am unit |
|00001cd0| 20 6f 66 66 0a 20 20 20 | 20 20 20 4c 69 73 74 69 | off. | Listi|
|00001ce0| 6e 67 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ng | |
|00001cf0| 20 20 20 67 65 6e 65 72 | 61 74 65 20 61 20 63 6f | gener|ate a co|
|00001d00| 6d 70 69 6c 61 74 69 6f | 6e 20 6c 69 73 74 69 6e |mpilatio|n listin|
|00001d10| 67 20 20 20 20 20 20 20 | 20 20 6f 66 66 0a 20 20 |g | off. |
|00001d20| 20 20 20 20 56 65 72 62 | 6f 73 65 20 20 20 20 20 | Verb|ose |
|00001d30| 20 20 20 20 20 20 20 20 | 20 20 20 20 67 69 76 65 | | give|
|00001d40| 20 61 20 64 65 73 63 72 | 69 70 74 69 76 65 20 74 | a descr|iptive t|
|00001d50| 72 61 63 65 20 6f 66 20 | 20 20 20 20 20 20 20 20 |race of | |
|00001d60| 20 20 20 6f 66 66 0a 20 | 20 20 20 20 20 20 20 20 | off. | |
|00001d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001d80| 20 20 20 20 20 73 75 62 | 73 69 64 69 61 72 79 20 | sub|sidiary |
|00001d90| 70 72 6f 67 72 61 6d 73 | 20 69 6e 76 6f 6b 65 64 |programs| invoked|
|00001da0| 20 62 79 20 61 64 61 63 | 6f 6d 70 0a 20 20 20 20 | by adac|omp. |
|00001db0| 20 20 41 73 73 65 6d 62 | 6c 65 72 20 20 20 20 20 | Assemb|ler |
|00001dc0| 20 20 20 20 20 20 20 20 | 20 20 4f 75 74 70 75 74 | | Output|
|00001dd0| 20 76 69 72 74 75 61 6c | 20 6d 61 63 68 69 6e 65 | virtual| machine|
|00001de0| 20 61 73 73 65 6d 62 6c | 79 20 63 6f 64 65 20 20 | assembl|y code |
|00001df0| 20 6f 66 66 0a 20 20 20 | 20 20 20 20 20 20 20 20 | off. | |
|00001e00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001e10| 20 20 20 69 6e 20 74 68 | 65 20 6c 69 73 74 69 6e | in th|e listin|
|00001e20| 67 20 66 69 6c 65 0a 46 | 69 6c 65 44 61 74 61 82 |g file.F|ileData.|
|00001e30| 21 52 65 61 64 4d 65 00 | 00 00 00 d4 03 00 00 45 |!ReadMe.|.......E|
|00001e40| ff ff ff f8 a9 65 85 03 | 00 bd 2a 20 20 20 20 20 |.....e..|..* |
|00001e50| 20 20 20 20 20 20 20 20 | 20 20 20 41 64 61 2f 45 | | Ada/E|
|00001e60| 64 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |d. | |
|00001e70| 20 20 3d 3d 3d 3d 3d 3d | 0a 0a 54 68 69 73 20 69 | ======|..This i|
|00001e80| 73 20 61 20 70 6f 72 74 | 20 6f 66 20 74 68 65 20 |s a port| of the |
|00001e90| 41 64 61 2f 45 64 20 74 | 72 61 6e 73 6c 61 74 6f |Ada/Ed t|ranslato|
|00001ea0| 72 20 61 6e 64 20 69 6e | 74 65 72 70 72 65 74 65 |r and in|terprete|
|00001eb0| 72 20 66 6f 72 20 74 68 | 65 20 41 64 61 0a 70 72 |r for th|e Ada.pr|
|00001ec0| 6f 67 72 61 6d 6d 69 6e | 67 20 6c 61 6e 67 75 61 |ogrammin|g langua|
|00001ed0| 67 65 20 74 6f 20 74 68 | 65 20 41 63 6f 72 6e 20 |ge to th|e Acorn |
|00001ee0| 72 61 6e 67 65 20 6f 66 | 20 41 52 4d 20 62 61 73 |range of| ARM bas|
|00001ef0| 65 64 20 6d 61 63 68 69 | 6e 65 73 2c 20 72 75 6e |ed machi|nes, run|
|00001f00| 6e 69 6e 67 20 75 6e 64 | 65 72 0a 52 49 53 43 2d |ning und|er.RISC-|
|00001f10| 4f 53 2e 20 41 73 20 73 | 75 63 68 2c 20 74 68 69 |OS. As s|uch, thi|
|00001f20| 73 20 70 61 63 6b 61 67 | 65 20 69 73 20 63 6f 76 |s packag|e is cov|
|00001f30| 65 72 65 64 20 62 79 20 | 74 68 65 20 46 53 46 20 |ered by |the FSF |
|00001f40| 47 65 6e 65 72 61 6c 20 | 50 75 62 6c 69 63 20 4c |General |Public L|
|00001f50| 69 63 65 6e 73 65 0a 28 | 73 65 65 20 74 68 65 20 |icense.(|see the |
|00001f60| 66 69 6c 65 20 44 6f 63 | 73 2e 43 6f 70 79 69 6e |file Doc|s.Copyin|
|00001f70| 67 20 61 6e 64 20 6c 61 | 74 65 72 20 66 6f 72 20 |g and la|ter for |
|00001f80| 64 65 74 61 69 6c 73 29 | 2e 0a 0a 54 68 69 73 20 |details)|...This |
|00001f90| 70 6f 72 74 20 69 73 20 | a9 20 31 39 39 34 2c 20 |port is |. 1994, |
|00001fa0| 50 65 74 65 72 20 42 75 | 72 77 6f 6f 64 0a 0a 54 |Peter Bu|rwood..T|
|00001fb0| 68 61 6e 6b 73 20 67 6f | 20 74 6f 20 74 68 65 20 |hanks go| to the |
|00001fc0| 4e 65 77 20 59 6f 72 6b | 20 55 6e 69 76 65 72 73 |New York| Univers|
|00001fd0| 69 74 79 20 66 6f 72 20 | 77 72 69 74 69 6e 67 20 |ity for |writing |
|00001fe0| 61 6e 64 20 69 6d 70 6c | 65 6d 65 6e 74 69 6e 67 |and impl|ementing|
|00001ff0| 20 74 68 69 73 0a 73 6f | 66 74 77 61 72 65 2e 0a | this.so|ftware..|
|00002000| 0a 49 6e 73 74 61 6c 6c | 61 74 69 6f 6e 0a 3d 3d |.Install|ation.==|
|00002010| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 0a 0a 53 65 65 20 |========|==..See |
|00002020| 21 52 65 61 64 4d 65 20 | 66 6f 72 20 64 65 74 61 |!ReadMe |for deta|
|00002030| 69 6c 73 0a 0a 43 6f 70 | 79 72 69 67 68 74 73 0a |ils..Cop|yrights.|
|00002040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 0a 0a 54 68 65 20 |========|==..The |
|00002050| 70 72 6f 67 72 61 6d 73 | 20 61 64 61 63 6f 6d 70 |programs| adacomp|
|00002060| 2c 20 61 64 61 62 69 6e | 64 2c 20 61 64 61 65 78 |, adabin|d, adaex|
|00002070| 65 63 2c 20 61 64 61 6c | 69 62 2c 20 61 64 61 67 |ec, adal|ib, adag|
|00002080| 65 6e 2c 20 61 64 61 70 | 72 73 2c 20 61 64 61 73 |en, adap|rs, adas|
|00002090| 65 6d 20 61 6e 64 0a 74 | 68 65 20 61 64 61 69 6e |em and.t|he adain|
|000020a0| 74 20 70 61 72 74 69 61 | 6c 6c 79 20 6c 69 6e 6b |t partia|lly link|
|000020b0| 65 64 20 6c 69 62 72 61 | 72 79 20 61 72 65 20 63 |ed libra|ry are c|
|000020c0| 6f 76 65 72 65 64 20 62 | 79 20 74 68 65 20 47 4e |overed b|y the GN|
|000020d0| 55 20 47 65 6e 65 72 61 | 6c 20 50 75 62 6c 69 63 |U Genera|l Public|
|000020e0| 0a 4c 69 63 65 6e 73 65 | 20 28 73 65 65 20 44 6f |.License| (see Do|
|000020f0| 63 2e 43 6f 70 79 69 6e | 67 29 2e 0a 0a 54 68 65 |c.Copyin|g)...The|
|00002100| 20 65 78 61 6d 70 6c 65 | 20 41 64 61 20 61 6e 64 | example| Ada and|
|00002110| 20 43 20 70 72 6f 67 72 | 61 6d 73 20 61 72 65 20 | C progr|ams are |
|00002120| a9 20 31 39 39 34 2c 20 | 50 65 74 65 72 20 42 75 |. 1994, |Peter Bu|
|00002130| 72 77 6f 6f 64 2c 20 61 | 6e 64 20 61 72 65 20 61 |rwood, a|nd are a|
|00002140| 6c 73 6f 0a 63 6f 76 65 | 72 65 64 20 62 79 20 74 |lso.cove|red by t|
|00002150| 68 65 20 47 50 4c 2e 0a | 0a 43 6f 6e 74 61 63 74 |he GPL..|.Contact|
|00002160| 69 6e 67 20 6d 65 0a 3d | 3d 3d 3d 3d 3d 3d 3d 3d |ing me.=|========|
|00002170| 3d 3d 3d 3d 0a 0a 43 75 | 72 72 65 6e 74 6c 79 20 |====..Cu|rrently |
|00002180| 49 20 63 61 6e 20 62 65 | 20 63 6f 6e 74 61 63 74 |I can be| contact|
|00002190| 65 64 20 61 73 20 3a 0a | 45 2d 4d 61 69 6c 20 2d |ed as :.|E-Mail -|
|000021a0| 20 61 64 61 65 64 40 61 | 72 63 61 6e 67 65 6c 2e | adaed@a|rcangel.|
|000021b0| 64 65 6d 6f 6e 2e 63 6f | 2e 75 6b 0a 0a 50 6f 73 |demon.co|.uk..Pos|
|000021c0| 74 20 2d 20 20 20 50 65 | 74 65 72 20 42 75 72 77 |t - Pe|ter Burw|
|000021d0| 6f 6f 64 0a 20 20 20 20 | 20 20 20 20 20 32 30 35 |ood. | 205|
|000021e0| 20 4d 61 73 6f 6e 73 20 | 41 76 65 6e 75 65 0a 20 | Masons |Avenue. |
|000021f0| 20 20 20 20 20 20 20 20 | 48 61 72 72 6f 77 0a 20 | |Harrow. |
|00002200| 20 20 20 20 20 20 20 20 | 4d 69 64 64 78 0a 20 20 | |Middx. |
|00002210| 20 20 20 20 20 20 20 48 | 41 33 20 35 41 5a 0a 46 | H|A3 5AZ.F|
|00002220| 69 6c 65 44 61 74 61 82 | 21 52 65 61 64 4d 65 32 |ileData.|!ReadMe2|
|00002230| 00 00 00 db 1b 00 00 45 | fd ff ff 64 45 c0 a5 03 |.......E|...dE...|
|00002240| 00 e9 18 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |... | |
|00002250| 20 20 20 20 20 20 20 20 | 20 20 20 41 64 61 2f 45 | | Ada/E|
|00002260| 64 20 74 72 61 6e 73 6c | 61 74 6f 72 20 61 6e 64 |d transl|ator and|
|00002270| 20 69 6e 74 65 72 70 72 | 65 74 65 72 0a 0a 30 2e | interpr|eter..0.|
|00002280| 20 20 20 20 20 20 49 6e | 74 72 6f 64 75 63 74 69 | In|troducti|
|00002290| 6f 6e 0a 0a 54 68 69 73 | 20 66 69 6c 65 20 28 73 |on..This| file (s|
|000022a0| 6f 72 74 20 6f 66 29 20 | 64 6f 63 75 6d 65 6e 74 |ort of) |document|
|000022b0| 73 20 74 68 65 20 50 65 | 74 65 72 20 42 75 72 77 |s the Pe|ter Burw|
|000022c0| 6f 6f 64 20 70 6f 72 74 | 20 6f 66 20 74 68 65 20 |ood port| of the |
|000022d0| 41 64 61 2f 45 64 0a 74 | 72 61 6e 73 6c 61 74 6f |Ada/Ed.t|ranslato|
|000022e0| 72 20 61 6e 64 20 69 6e | 74 65 72 70 72 65 74 65 |r and in|terprete|
|000022f0| 72 20 66 6f 72 20 74 68 | 65 20 41 64 61 20 70 72 |r for th|e Ada pr|
|00002300| 6f 67 72 61 6d 6d 69 6e | 67 20 6c 61 6e 67 75 61 |ogrammin|g langua|
|00002310| 67 65 20 74 6f 20 74 68 | 65 0a 41 63 6f 72 6e 20 |ge to th|e.Acorn |
|00002320| 72 61 6e 67 65 20 6f 66 | 20 41 52 4d 20 62 61 73 |range of| ARM bas|
|00002330| 65 64 20 6d 61 63 68 69 | 6e 65 73 2c 20 72 75 6e |ed machi|nes, run|
|00002340| 6e 69 6e 67 20 52 49 53 | 43 2d 4f 53 20 32 20 2f |ning RIS|C-OS 2 /|
|00002350| 20 33 2e 20 46 6f 72 20 | 63 6f 70 79 72 69 67 68 | 3. For |copyrigh|
|00002360| 74 0a 64 65 74 61 69 6c | 73 20 73 65 65 20 21 52 |t.detail|s see !R|
|00002370| 65 61 64 4d 65 2e 0a 0a | 54 68 69 73 20 69 73 20 |eadMe...|This is |
|00002380| 74 68 65 20 73 65 63 6f | 6e 64 20 72 65 6c 65 61 |the seco|nd relea|
|00002390| 73 65 20 6f 66 20 76 65 | 72 73 69 6f 6e 20 41 64 |se of ve|rsion Ad|
|000023a0| 61 2f 45 64 2c 20 6e 6f | 77 20 62 61 73 65 64 20 |a/Ed, no|w based |
|000023b0| 75 70 6f 6e 20 76 65 72 | 73 69 6f 6e 20 31 2e 31 |upon ver|sion 1.1|
|000023c0| 31 2e 32 2e 0a 49 74 20 | 61 70 70 65 61 72 73 20 |1.2..It |appears |
|000023d0| 4e 59 55 20 61 72 65 20 | 6e 6f 20 6c 6f 6e 67 65 |NYU are |no longe|
|000023e0| 72 20 64 65 76 65 6c 6f | 70 69 6e 67 20 41 64 61 |r develo|ping Ada|
|000023f0| 2f 45 64 20 73 69 6e 63 | 65 20 74 68 65 20 72 65 |/Ed sinc|e the re|
|00002400| 6c 65 61 73 65 20 6f 66 | 20 47 4e 41 54 0a 28 74 |lease of| GNAT.(t|
|00002410| 68 65 20 47 4e 55 20 41 | 64 61 20 73 79 73 74 65 |he GNU A|da syste|
|00002420| 6d 29 2e 20 47 4e 41 54 | 20 63 61 6e 6e 6f 74 20 |m). GNAT| cannot |
|00002430| 62 65 20 70 6f 72 74 65 | 64 20 75 6e 74 69 6c 20 |be porte|d until |
|00002440| 74 68 65 20 47 4e 55 20 | 61 73 73 65 6d 62 6c 65 |the GNU |assemble|
|00002450| 72 20 28 47 41 53 29 20 | 69 73 0a 61 76 61 69 6c |r (GAS) |is.avail|
|00002460| 61 62 6c 65 20 66 6f 72 | 20 41 52 4d 20 61 6e 64 |able for| ARM and|
|00002470| 20 74 68 65 6e 20 6d 75 | 73 74 20 62 65 20 63 72 | then mu|st be cr|
|00002480| 6f 73 73 2d 63 6f 6d 70 | 69 6c 65 64 20 66 72 6f |oss-comp|iled fro|
|00002490| 6d 20 61 20 47 4e 41 54 | 20 73 75 70 70 6f 72 74 |m a GNAT| support|
|000024a0| 65 64 0a 70 6c 61 74 66 | 6f 72 6d 2e 0a 0a 41 64 |ed.platf|orm...Ad|
|000024b0| 61 2f 45 64 20 67 65 6e | 65 72 61 6c 6c 79 20 72 |a/Ed gen|erally r|
|000024c0| 75 6e 73 20 69 6e 20 61 | 20 36 34 30 4b 20 77 69 |uns in a| 640K wi|
|000024d0| 6d 70 73 6c 6f 74 20 74 | 68 6f 75 67 68 20 6c 61 |mpslot t|hough la|
|000024e0| 72 67 65 20 70 72 6f 67 | 72 61 6d 73 20 6d 61 79 |rge prog|rams may|
|000024f0| 0a 72 65 71 75 69 72 65 | 20 6d 6f 72 65 2e 0a 0a |.require| more...|
|00002500| 54 68 69 73 20 69 73 20 | 61 20 62 69 6e 61 72 79 |This is |a binary|
|00002510| 20 64 69 73 74 72 69 62 | 75 74 69 6f 6e 20 6f 6e | distrib|ution on|
|00002520| 6c 79 20 28 73 6f 75 72 | 63 65 73 20 61 72 65 20 |ly (sour|ces are |
|00002530| 6f 76 65 72 20 33 4d 42 | 20 69 6e 20 73 69 7a 65 |over 3MB| in size|
|00002540| 29 2c 20 61 6e 64 0a 63 | 6f 6e 73 69 73 74 73 20 |), and.c|onsists |
|00002550| 6f 66 20 74 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |of the f|ollowing|
|00002560| 20 70 61 63 6b 61 67 65 | 73 20 3a 0a 0a 21 41 64 | package|s :..!Ad|
|00002570| 61 20 2d 20 4e 6f 6e 2d | 73 70 65 63 69 66 69 63 |a - Non-|specific|
|00002580| 20 66 69 6c 65 73 2c 20 | 64 6f 63 75 6d 65 6e 74 | files, |document|
|00002590| 61 74 69 6f 6e 2c 20 65 | 74 63 2e 0a 20 20 21 42 |ation, e|tc.. !B|
|000025a0| 6f 6f 74 0a 20 20 21 48 | 65 6c 70 20 20 20 20 20 |oot. !H|elp |
|000025b0| 20 20 20 20 20 44 44 45 | 20 68 65 6c 70 20 66 69 | DDE| help fi|
|000025c0| 6c 65 2e 0a 20 20 21 52 | 65 61 64 4d 65 20 20 20 |le.. !R|eadMe |
|000025d0| 20 20 20 20 20 47 65 6e | 65 72 61 6c 20 68 65 6c | Gen|eral hel|
|000025e0| 70 20 61 6e 64 20 63 6f | 70 79 72 69 67 68 74 2e |p and co|pyright.|
|000025f0| 0a 20 20 21 52 65 61 64 | 4d 65 32 20 20 20 20 20 |. !Read|Me2 |
|00002600| 20 20 54 68 69 73 20 66 | 69 6c 65 2e 0a 20 20 21 | This f|ile.. !|
|00002610| 52 75 6e 0a 20 20 21 53 | 70 72 69 74 65 73 0a 20 |Run. !S|prites. |
|00002620| 20 61 64 61 2e 70 72 65 | 64 65 66 20 20 20 20 20 | ada.pre|def |
|00002630| 41 64 61 20 73 79 73 74 | 65 6d 20 70 61 63 6b 61 |Ada syst|em packa|
|00002640| 67 65 73 2e 0a 20 20 44 | 65 73 63 20 20 20 20 20 |ges.. D|esc |
|00002650| 20 20 20 20 20 20 44 44 | 45 20 64 65 73 63 20 66 | DD|E desc f|
|00002660| 69 6c 65 2e 0a 20 20 44 | 6f 63 2e 2a 20 20 20 20 |ile.. D|oc.* |
|00002670| 20 20 20 20 20 20 54 68 | 65 20 41 64 61 2f 45 64 | Th|e Ada/Ed|
|00002680| 20 75 73 65 72 73 20 6d | 61 6e 75 61 6c 20 61 6e | users m|anual an|
|00002690| 64 20 6f 74 68 65 72 20 | 64 6f 63 75 6d 65 6e 74 |d other |document|
|000026a0| 61 74 69 6f 6e 2e 0a 20 | 20 4d 65 73 73 61 67 65 |ation.. | Message|
|000026b0| 73 20 20 20 20 20 20 20 | 44 44 45 20 6d 65 73 73 |s |DDE mess|
|000026c0| 61 67 65 73 20 66 69 6c | 65 2e 0a 20 20 54 65 6d |ages fil|e.. Tem|
|000026d0| 70 6c 61 74 65 73 0a 20 | 20 63 2e 2a 20 20 20 20 |plates. | c.* |
|000026e0| 20 20 20 20 20 20 20 20 | 45 78 61 6d 70 6c 65 20 | |Example |
|000026f0| 43 20 70 72 6f 67 72 61 | 6d 20 63 61 6c 6c 65 64 |C progra|m called|
|00002700| 20 66 72 6f 6d 20 41 64 | 61 2e 0a 20 20 6f 2e 2a | from Ad|a.. o.*|
|00002710| 20 20 20 20 20 20 20 20 | 20 20 20 20 4f 62 6a 65 | | Obje|
|00002720| 63 74 20 66 69 6c 65 20 | 66 6f 72 20 65 78 61 6d |ct file |for exam|
|00002730| 70 6c 65 20 63 20 70 72 | 6f 67 72 61 6d 2e 0a 0a |ple c pr|ogram...|
|00002740| 41 64 61 2f 45 64 20 74 | 72 61 6e 73 6c 61 74 6f |Ada/Ed t|ranslato|
|00002750| 72 20 61 6e 64 20 69 6e | 74 65 72 70 72 65 74 65 |r and in|terprete|
|00002760| 72 0a 20 20 62 69 6e 2e | 61 64 61 62 69 6e 64 20 |r. bin.|adabind |
|00002770| 20 20 20 41 64 61 20 6c | 69 6e 6b 65 72 2e 0a 20 | Ada l|inker.. |
|00002780| 20 62 69 6e 2e 61 64 61 | 63 6f 6d 70 20 20 20 20 | bin.ada|comp |
|00002790| 41 64 61 20 63 6f 6d 70 | 69 6c 65 72 20 63 6f 6e |Ada comp|iler con|
|000027a0| 74 72 6f 6c 20 70 72 6f | 67 72 61 6d 2e 0a 20 20 |trol pro|gram.. |
|000027b0| 62 69 6e 2e 61 64 61 65 | 78 65 63 20 20 20 20 41 |bin.adae|xec A|
|000027c0| 64 61 20 69 6e 74 65 72 | 70 72 65 74 65 72 2e 0a |da inter|preter..|
|000027d0| 20 20 62 69 6e 2e 61 64 | 61 6c 69 62 20 20 20 20 | bin.ad|alib |
|000027e0| 20 41 64 61 20 6c 69 62 | 72 61 72 79 20 6d 61 6e | Ada lib|rary man|
|000027f0| 61 67 65 72 2e 0a 20 20 | 6c 69 62 2e 61 64 61 67 |ager.. |lib.adag|
|00002800| 65 6e 20 20 20 20 20 41 | 64 61 20 76 69 72 74 75 |en A|da virtu|
|00002810| 61 6c 20 6d 61 63 68 69 | 6e 65 20 63 6f 64 65 20 |al machi|ne code |
|00002820| 67 65 6e 65 72 61 74 6f | 72 2e 0a 20 20 6c 69 62 |generato|r.. lib|
|00002830| 2e 61 64 61 69 6e 74 20 | 20 20 20 20 50 61 72 74 |.adaint | Part|
|00002840| 69 61 6c 6c 79 20 6c 69 | 6e 6b 65 64 20 41 64 61 |ially li|nked Ada|
|00002850| 20 69 6e 74 65 72 70 72 | 65 74 65 72 20 66 6f 72 | interpr|eter for|
|00002860| 20 69 6e 74 65 72 66 61 | 63 69 6e 67 20 74 6f 20 | interfa|cing to |
|00002870| 43 0a 20 20 6c 69 62 2e | 61 64 61 66 72 6f 6e 74 |C. lib.|adafront|
|00002880| 20 20 20 41 64 61 20 70 | 61 72 73 65 72 20 61 6e | Ada p|arser an|
|00002890| 64 20 73 65 6d 61 6e 74 | 69 63 20 61 6e 61 6c 79 |d semant|ic analy|
|000028a0| 73 65 72 2e 0a 20 20 6c | 69 62 2e 70 72 65 64 65 |ser.. l|ib.prede|
|000028b0| 66 20 20 20 20 20 63 6f | 6d 70 69 6c 65 64 20 41 |f co|mpiled A|
|000028c0| 64 61 20 70 72 65 64 65 | 66 69 6e 65 64 20 6c 69 |da prede|fined li|
|000028d0| 62 72 61 72 79 2e 0a 20 | 20 0a 21 41 64 61 42 69 |brary.. | .!AdaBi|
|000028e0| 6e 64 0a 20 20 44 44 45 | 20 63 6f 6e 74 72 6f 6c |nd. DDE| control|
|000028f0| 20 66 69 6c 65 73 20 66 | 6f 72 20 41 64 61 20 62 | files f|or Ada b|
|00002900| 69 6e 64 65 72 2e 0a 0a | 21 41 64 61 4c 69 62 0a |inder...|!AdaLib.|
|00002910| 20 20 44 44 45 20 63 6f | 6e 74 72 6f 6c 20 66 69 | DDE co|ntrol fi|
|00002920| 6c 65 73 20 66 6f 72 20 | 41 64 61 20 6c 69 62 72 |les for |Ada libr|
|00002930| 61 72 79 20 6d 61 6e 61 | 67 65 72 2e 0a 0a 45 78 |ary mana|ger...Ex|
|00002940| 61 6d 70 6c 65 73 0a 20 | 20 61 64 61 2e 2a 20 20 |amples. | ada.* |
|00002950| 20 20 20 20 20 20 20 20 | 73 6f 6d 65 20 41 64 61 | |some Ada|
|00002960| 20 65 78 61 6d 70 6c 65 | 73 20 6f 66 20 6d 79 20 | example|s of my |
|00002970| 6f 77 6e 20 28 6c 69 67 | 68 74 20 6f 6e 20 63 6f |own (lig|ht on co|
|00002980| 6d 6d 65 6e 74 73 21 29 | 0a 20 20 63 2e 2a 20 20 |mments!)|. c.* |
|00002990| 20 20 20 20 20 20 20 20 | 20 20 65 78 61 6d 70 6c | | exampl|
|000029a0| 65 20 69 6e 74 65 72 66 | 61 63 65 20 74 6f 20 43 |e interf|ace to C|
|000029b0| 20 63 6f 64 65 20 66 72 | 6f 6d 20 41 64 61 0a 20 | code fr|om Ada. |
|000029c0| 20 64 61 74 2e 2a 20 20 | 20 20 20 20 20 20 20 20 | dat.* | |
|000029d0| 64 61 74 61 20 66 69 6c | 65 73 20 66 6f 72 20 41 |data fil|es for A|
|000029e0| 64 61 20 65 78 61 6d 70 | 6c 65 73 0a 20 20 64 65 |da examp|les. de|
|000029f0| 6d 6f 73 2e 2a 20 20 20 | 20 20 20 20 20 64 65 6d |mos.* | dem|
|00002a00| 6f 73 20 73 75 70 70 6c | 69 65 64 20 77 69 74 68 |os suppl|ied with|
|00002a10| 20 41 64 61 2f 45 64 20 | 76 65 72 73 69 6f 6e 20 | Ada/Ed |version |
|00002a20| 31 2e 31 31 2e 32 0a 20 | 20 09 09 20 74 68 65 73 |1.11.2. | .. thes|
|00002a30| 65 20 66 69 6c 65 73 20 | 63 61 6e 20 62 65 20 72 |e files |can be r|
|00002a40| 75 6e 20 62 79 20 75 73 | 69 6e 67 20 74 68 65 20 |un by us|ing the |
|00002a50| 6d 61 6b 65 20 66 69 6c | 65 0a 20 20 09 09 20 6d |make fil|e. .. m|
|00002a60| 61 6b 65 64 72 61 77 20 | 73 68 6f 77 73 20 61 20 |akedraw |shows a |
|00002a70| 6d 65 74 68 6f 64 20 6f | 66 20 75 73 69 6e 67 20 |method o|f using |
|00002a80| 64 65 70 65 6e 64 61 6e | 63 69 65 73 20 77 69 74 |dependan|cies wit|
|00002a90| 68 20 41 6d 75 2e 0a 20 | 20 6d 61 6b 65 66 69 6c |h Amu.. | makefil|
|00002aa0| 65 20 20 20 20 20 20 20 | 74 68 69 73 20 77 69 6c |e |this wil|
|00002ab0| 6c 20 6d 61 6b 65 20 61 | 6e 64 20 72 75 6e 20 61 |l make a|nd run a|
|00002ac0| 6c 6c 20 74 68 65 20 65 | 78 61 6d 70 6c 65 73 20 |ll the e|xamples |
|00002ad0| 69 6e 20 61 64 61 2e 2a | 0a 20 20 6f 2e 2a 20 20 |in ada.*|. o.* |
|00002ae0| 20 20 20 20 20 20 20 20 | 20 20 6f 62 6a 65 63 74 | | object|
|00002af0| 20 66 69 6c 65 20 66 6f | 72 20 65 78 61 6d 70 6c | file fo|r exampl|
|00002b00| 65 20 69 6e 74 65 72 66 | 61 63 65 20 74 6f 20 43 |e interf|ace to C|
|00002b10| 20 63 6f 64 65 20 66 72 | 6f 6d 20 41 64 61 0a 0a | code fr|om Ada..|
|00002b20| 0a 31 2e 20 20 20 20 20 | 20 49 6e 73 74 61 6c 6c |.1. | Install|
|00002b30| 61 74 69 6f 6e 0a 0a 54 | 68 65 20 28 64 65 66 61 |ation..T|he (defa|
|00002b40| 75 6c 74 29 20 69 6e 73 | 74 61 6c 6c 61 74 69 6f |ult) ins|tallatio|
|00002b50| 6e 20 6f 66 20 41 64 61 | 2f 45 64 20 69 73 20 72 |n of Ada|/Ed is r|
|00002b60| 65 6c 61 74 69 76 65 6c | 79 20 73 69 6d 70 6c 65 |elativel|y simple|
|00002b70| 20 3a 0a 0a 2a 20 20 20 | 20 20 20 20 43 6f 70 79 | :..* | Copy|
|00002b80| 20 74 68 69 73 20 64 69 | 72 65 63 74 6f 72 79 2c | this di|rectory,|
|00002b90| 20 61 6e 64 20 69 74 73 | 20 66 69 6c 65 73 2c 20 | and its| files, |
|00002ba0| 6f 6e 74 6f 20 79 6f 75 | 72 20 68 61 72 64 20 64 |onto you|r hard d|
|00002bb0| 69 73 63 2e 0a 2a 20 20 | 20 20 20 20 20 44 6f 75 |isc..* | Dou|
|00002bc0| 62 6c 65 20 63 6c 69 63 | 6b 20 6f 6e 20 74 68 65 |ble clic|k on the|
|00002bd0| 20 21 41 64 61 20 61 70 | 70 6c 69 63 61 74 69 6f | !Ada ap|plicatio|
|00002be0| 6e 20 74 6f 20 73 65 74 | 75 70 20 74 68 65 20 65 |n to set|up the e|
|00002bf0| 6e 76 69 72 6f 6e 6d 65 | 6e 74 2e 0a 0a 54 68 69 |nvironme|nt...Thi|
|00002c00| 73 20 76 65 72 73 69 6f | 6e 20 75 73 65 73 20 74 |s versio|n uses t|
|00002c10| 68 65 20 44 44 45 20 74 | 6f 6f 6c 73 2e 0a 0a 32 |he DDE t|ools...2|
|00002c20| 2e 20 20 20 20 20 20 55 | 73 69 6e 67 20 41 64 61 |. U|sing Ada|
|00002c30| 2f 45 64 0a 0a 53 65 65 | 20 74 68 65 20 45 78 61 |/Ed..See| the Exa|
|00002c40| 6d 70 6c 65 73 2e 6d 61 | 6b 65 66 69 6c 65 20 66 |mples.ma|kefile f|
|00002c50| 69 6c 65 20 66 6f 72 20 | 65 78 61 6d 70 6c 65 73 |ile for |examples|
|00002c60| 20 6f 6e 20 63 6f 6d 70 | 69 6c 69 6e 67 20 61 6e | on comp|iling an|
|00002c70| 64 20 72 75 6e 6e 69 6e | 67 20 73 6f 6d 65 20 6f |d runnin|g some o|
|00002c80| 66 0a 74 68 65 20 73 75 | 70 70 6c 69 65 64 20 65 |f.the su|pplied e|
|00002c90| 78 61 6d 70 6c 65 20 41 | 64 61 20 70 72 6f 67 72 |xample A|da progr|
|00002ca0| 61 6d 73 2e 20 52 65 61 | 64 20 74 68 65 20 66 69 |ams. Rea|d the fi|
|00002cb0| 6c 65 20 21 41 64 61 2e | 64 6f 63 2e 61 64 61 65 |le !Ada.|doc.adae|
|00002cc0| 64 20 66 6f 72 20 61 20 | 66 75 6c 6c 65 72 0a 64 |d for a |fuller.d|
|00002cd0| 65 73 63 72 69 70 74 69 | 6f 6e 2e 20 54 68 69 73 |escripti|on. This|
|00002ce0| 20 66 69 6c 65 20 68 61 | 73 20 62 65 65 6e 20 75 | file ha|s been u|
|00002cf0| 6e 65 64 69 74 65 64 2c | 20 61 70 61 72 74 20 66 |nedited,| apart f|
|00002d00| 72 6f 6d 20 66 6f 72 6d | 61 74 74 69 6e 67 2c 20 |rom form|atting, |
|00002d10| 61 6e 64 20 73 6f 0a 63 | 6f 6e 74 61 69 6e 73 20 |and so.c|ontains |
|00002d20| 73 6f 6d 65 20 6e 6f 6e | 20 52 49 53 43 20 4f 53 |some non| RISC OS|
|00002d30| 20 6e 6f 74 65 73 2c 20 | 70 61 72 74 69 63 75 6c | notes, |particul|
|00002d40| 61 72 6c 79 20 74 68 65 | 20 46 4f 52 54 52 41 4e |arly the| FORTRAN|
|00002d50| 20 73 74 75 66 66 2c 20 | 74 68 6f 75 67 68 20 74 | stuff, |though t|
|00002d60| 68 69 73 0a 6d 61 79 20 | 77 6f 72 6b 2e 0a 0a 46 |his.may |work...F|
|00002d70| 69 6c 65 20 6e 61 6d 65 | 73 20 61 72 65 20 61 75 |ile name|s are au|
|00002d80| 74 6f 6d 61 74 69 63 61 | 6c 6c 79 20 63 6f 6e 76 |tomatica|lly conv|
|00002d90| 65 72 74 65 64 20 66 72 | 6f 6d 20 3c 66 69 6c 65 |erted fr|om <file|
|00002da0| 3e 2e 3c 65 78 74 3e 20 | 77 68 65 6e 20 6e 65 63 |>.<ext> |when nec|
|00002db0| 65 73 73 61 72 79 20 74 | 6f 0a 3c 65 78 74 3e 2e |essary t|o.<ext>.|
|00002dc0| 3c 66 69 6c 65 3e 20 69 | 66 20 74 68 65 20 6f 72 |<file> i|f the or|
|00002dd0| 69 67 69 6e 61 6c 20 66 | 69 6c 65 20 64 6f 65 73 |iginal f|ile does|
|00002de0| 6e 27 74 20 65 78 69 73 | 74 2e 20 44 69 72 65 63 |n't exis|t. Direc|
|00002df0| 74 6f 72 69 65 73 20 61 | 72 65 20 63 72 65 61 74 |tories a|re creat|
|00002e00| 65 64 20 61 73 0a 6e 65 | 63 65 73 73 61 72 79 20 |ed as.ne|cessary |
|00002e10| 61 6e 64 20 72 65 6d 6f | 76 65 64 20 77 68 65 6e |and remo|ved when|
|00002e20| 20 74 68 65 79 20 62 65 | 63 6f 6d 65 20 65 6d 70 | they be|come emp|
|00002e30| 74 79 2e 0a 0a 44 75 72 | 69 6e 67 20 63 6f 6d 70 |ty...Dur|ing comp|
|00002e40| 69 6c 61 74 69 6f 6e 20 | 77 6f 72 6b 20 66 69 6c |ilation |work fil|
|00002e50| 65 73 20 61 72 65 20 63 | 72 65 61 74 65 64 20 69 |es are c|reated i|
|00002e60| 6e 20 74 68 65 20 3c 6c | 69 62 72 61 72 79 3e 20 |n the <l|ibrary> |
|00002e70| 64 69 72 65 63 74 6f 72 | 79 20 61 6e 64 0a 73 68 |director|y and.sh|
|00002e80| 6f 75 6c 64 20 62 65 20 | 61 75 74 6f 6d 61 74 69 |ould be |automati|
|00002e90| 63 61 6c 6c 79 20 64 65 | 6c 65 74 65 64 20 77 68 |cally de|leted wh|
|00002ea0| 65 6e 20 74 68 65 79 20 | 61 72 65 20 6e 6f 20 6c |en they |are no l|
|00002eb0| 6f 6e 67 65 72 20 72 65 | 71 75 69 72 65 64 2e 20 |onger re|quired. |
|00002ec0| 54 68 65 20 6f 75 74 70 | 75 74 0a 6f 66 20 74 68 |The outp|ut.of th|
|00002ed0| 65 20 63 6f 6d 70 69 6c | 65 72 20 69 73 20 61 6c |e compil|er is al|
|00002ee0| 73 6f 20 73 74 6f 72 65 | 64 20 69 6e 20 74 68 65 |so store|d in the|
|00002ef0| 20 6c 69 62 72 61 72 79 | 20 64 69 72 65 63 74 6f | library| directo|
|00002f00| 72 79 20 61 73 20 72 61 | 74 68 65 72 0a 75 6e 68 |ry as ra|ther.unh|
|00002f10| 65 6c 70 66 75 6c 6c 79 | 20 60 6e 75 6d 62 65 72 |elpfully| `number|
|00002f20| 65 64 27 20 66 69 6c 65 | 73 2e 20 49 66 20 74 68 |ed' file|s. If th|
|00002f30| 65 20 73 6f 75 72 63 65 | 20 66 69 6c 65 20 74 6f |e source| file to|
|00002f40| 20 62 65 20 63 6f 6d 70 | 69 6c 65 64 20 63 6f 6e | be comp|iled con|
|00002f50| 74 61 69 6e 73 0a 65 72 | 72 6f 72 73 20 74 68 65 |tains.er|rors the|
|00002f60| 6e 20 65 78 61 6d 69 6e | 65 20 74 68 65 20 6c 69 |n examin|e the li|
|00002f70| 73 74 69 6e 67 20 66 69 | 6c 65 20 69 6e 20 74 68 |sting fi|le in th|
|00002f80| 65 20 6c 69 73 20 64 69 | 72 65 63 74 6f 72 79 2e |e lis di|rectory.|
|00002f90| 20 52 65 2d 72 75 6e 6e | 69 6e 67 20 74 68 65 0a | Re-runn|ing the.|
|00002fa0| 63 6f 6d 70 69 6c 65 72 | 20 73 68 6f 75 6c 64 20 |compiler| should |
|00002fb0| 64 65 6c 65 74 65 20 61 | 6c 6c 20 6f 62 73 6f 6c |delete a|ll obsol|
|00002fc0| 65 74 65 20 77 6f 72 6b | 20 66 69 6c 65 73 2c 20 |ete work| files, |
|00002fd0| 74 68 6f 75 67 68 20 6e | 6f 74 20 61 6c 77 61 79 |though n|ot alway|
|00002fe0| 73 21 0a 0a 54 68 65 72 | 65 20 69 73 20 61 20 6c |s!..Ther|e is a l|
|00002ff0| 69 6d 69 74 61 74 69 6f | 6e 20 6f 66 20 61 70 70 |imitatio|n of app|
|00003000| 72 6f 78 69 6d 61 74 65 | 6c 79 20 32 35 36 20 75 |roximate|ly 256 u|
|00003010| 6e 69 74 73 20 69 6e 20 | 61 6d 20 41 64 61 20 6c |nits in |am Ada l|
|00003020| 69 62 72 61 72 79 20 61 | 6e 64 20 61 0a 63 75 6e |ibrary a|nd a.cun|
|00003030| 6e 69 6e 67 20 66 69 6c | 65 20 6e 61 6d 69 6e 67 |ning fil|e naming|
|00003040| 20 63 6f 6e 76 65 6e 74 | 69 6f 6e 20 69 73 20 75 | convent|ion is u|
|00003050| 73 65 64 20 74 6f 20 6f | 76 65 72 63 6f 6d 65 20 |sed to o|vercome |
|00003060| 74 68 65 20 52 49 53 43 | 20 4f 53 20 6c 69 6d 69 |the RISC| OS limi|
|00003070| 74 20 6f 66 20 37 37 0a | 66 69 6c 65 73 20 70 65 |t of 77.|files pe|
|00003080| 72 20 64 69 72 65 63 74 | 6f 72 79 2e 20 42 61 73 |r direct|ory. Bas|
|00003090| 69 63 61 6c 6c 79 2c 20 | 61 64 64 69 74 69 6f 6e |ically, |addition|
|000030a0| 61 6c 20 64 69 72 65 63 | 74 6f 72 69 65 73 20 61 |al direc|tories a|
|000030b0| 72 65 20 63 72 65 61 74 | 65 64 20 77 68 65 6e 0a |re creat|ed when.|
|000030c0| 72 65 71 75 69 72 65 64 | 20 62 79 20 61 70 70 65 |required| by appe|
|000030d0| 6e 64 69 6e 67 20 61 20 | 6e 75 6d 62 65 72 20 66 |nding a |number f|
|000030e0| 72 6f 6d 20 31 20 74 6f | 20 39 20 74 6f 20 74 68 |rom 1 to| 9 to th|
|000030f0| 65 20 64 69 72 65 63 74 | 6f 72 79 20 6e 61 6d 65 |e direct|ory name|
|00003100| 2e 0a 0a 46 6f 72 20 6d | 6f 73 74 20 6f 66 20 74 |...For m|ost of t|
|00003110| 68 65 20 64 65 74 61 69 | 6c 73 20 66 6f 72 20 75 |he detai|ls for u|
|00003120| 73 69 6e 67 20 41 64 61 | 2f 45 64 20 73 65 65 20 |sing Ada|/Ed see |
|00003130| 74 68 65 20 66 69 6c 65 | 20 21 41 64 61 2e 64 6f |the file| !Ada.do|
|00003140| 63 2e 61 64 61 65 64 0a | 0a 32 2e 31 20 20 20 20 |c.adaed.|.2.1 |
|00003150| 20 52 49 53 43 2d 4f 53 | 20 73 70 65 63 69 66 69 | RISC-OS| specifi|
|00003160| 63 20 66 65 61 74 75 72 | 65 73 2e 0a 0a 2a 20 20 |c featur|es...* |
|00003170| 20 20 20 20 20 49 6e 74 | 65 72 77 6f 72 6b 69 6e | Int|erworkin|
|00003180| 67 20 77 69 74 68 20 4e | 6f 72 63 72 6f 66 74 20 |g with N|orcroft |
|00003190| 63 63 0a 0a 43 6f 64 65 | 20 63 6f 6d 70 69 6c 65 |cc..Code| compile|
|000031a0| 64 20 77 69 74 68 20 41 | 64 61 2f 45 64 20 63 61 |d with A|da/Ed ca|
|000031b0| 6e 20 62 65 20 6c 69 6e | 6b 65 64 20 62 79 20 74 |n be lin|ked by t|
|000031c0| 68 65 20 41 64 61 20 62 | 69 6e 64 65 72 20 77 69 |he Ada b|inder wi|
|000031d0| 74 68 20 63 6f 64 65 20 | 70 72 6f 64 75 63 65 64 |th code |produced|
|000031e0| 0a 62 79 20 74 68 65 20 | 4e 6f 72 63 72 6f 66 74 |.by the |Norcroft|
|000031f0| 20 43 43 20 63 6f 6d 70 | 69 6c 65 72 2c 20 61 6e | CC comp|iler, an|
|00003200| 64 20 70 72 6f 62 61 62 | 6c 79 20 6f 74 68 65 72 |d probab|ly other|
|00003210| 20 41 50 43 53 2d 52 20 | 63 6f 6e 66 6f 72 6d 61 | APCS-R |conforma|
|00003220| 6e 74 20 63 6f 6d 70 69 | 6c 65 72 73 2c 0a 77 69 |nt compi|lers,.wi|
|00003230| 74 68 20 6e 6f 20 70 72 | 6f 62 6c 65 6d 73 2e 20 |th no pr|oblems. |
|00003240| 53 65 65 20 21 41 64 61 | 2e 61 64 61 2e 74 65 73 |See !Ada|.ada.tes|
|00003250| 74 5f 69 6e 74 20 61 6e | 64 20 21 41 64 61 2e 64 |t_int an|d !Ada.d|
|00003260| 6f 63 2e 61 64 61 65 64 | 20 66 6f 72 20 6d 6f 72 |oc.adaed| for mor|
|00003270| 65 0a 69 6e 66 6f 72 6d | 61 74 69 6f 6e 2e 0a 0a |e.inform|ation...|
|00003280| 2a 20 20 20 20 20 20 20 | 57 69 6d 70 73 6c 6f 74 |* |Wimpslot|
|00003290| 0a 0a 41 64 61 2f 45 64 | 20 69 73 20 61 62 6c 65 |..Ada/Ed| is able|
|000032a0| 20 74 6f 20 65 78 74 65 | 6e 64 20 74 68 65 20 77 | to exte|nd the w|
|000032b0| 69 6d 70 73 6c 6f 74 20 | 77 68 69 6c 65 20 65 78 |impslot |while ex|
|000032c0| 65 63 75 74 69 6e 67 20 | 61 6e 20 41 64 61 20 70 |ecuting |an Ada p|
|000032d0| 72 6f 67 72 61 6d 2c 20 | 74 68 6f 75 67 68 0a 36 |rogram, |though.6|
|000032e0| 34 30 4b 20 69 73 20 6e | 6f 72 6d 61 6c 6c 79 20 |40K is n|ormally |
|000032f0| 73 75 66 66 69 63 69 65 | 6e 74 2e 0a 0a 2a 20 20 |sufficie|nt...* |
|00003300| 20 20 20 20 20 44 65 62 | 75 67 67 69 6e 67 0a 0a | Deb|ugging..|
|00003310| 44 65 62 75 67 67 69 6e | 67 20 69 73 20 6f 6e 6c |Debuggin|g is onl|
|00003320| 79 20 61 76 61 69 6c 61 | 62 6c 65 20 62 79 20 61 |y availa|ble by a|
|00003330| 20 73 69 6d 70 6c 65 20 | 74 72 61 63 65 20 6f 70 | simple |trace op|
|00003340| 74 69 6f 6e 2e 20 53 65 | 65 20 21 41 64 61 2e 64 |tion. Se|e !Ada.d|
|00003350| 6f 63 2e 61 64 61 65 64 | 20 66 6f 72 0a 6d 6f 72 |oc.adaed| for.mor|
|00003360| 65 20 69 6e 66 6f 72 6d | 61 74 69 6f 6e 2e 0a 0a |e inform|ation...|
|00003370| 2a 20 20 20 20 20 20 20 | 41 4d 55 20 73 75 70 70 |* |AMU supp|
|00003380| 6f 72 74 0a 0a 54 68 65 | 20 66 69 6c 65 73 20 61 |ort..The| files a|
|00003390| 72 65 20 63 6f 6d 70 69 | 6c 65 64 20 74 6f 20 72 |re compi|led to r|
|000033a0| 61 74 68 65 72 20 75 6e | 66 72 69 65 6e 64 6c 79 |ather un|friendly|
|000033b0| 20 6e 61 6d 65 64 20 66 | 69 6c 65 73 20 69 6e 20 | named f|iles in |
|000033c0| 74 68 65 20 6c 69 62 72 | 61 72 79 0a 64 69 72 65 |the libr|ary.dire|
|000033d0| 63 74 6f 72 79 20 61 6e | 64 20 69 74 20 69 73 20 |ctory an|d it is |
|000033e0| 69 6d 70 6f 73 73 69 62 | 6c 65 20 66 6f 72 20 41 |impossib|le for A|
|000033f0| 4d 55 20 74 6f 20 64 65 | 74 65 72 6d 69 6e 65 20 |MU to de|termine |
|00003400| 77 68 65 74 68 65 72 20 | 61 20 75 6e 69 74 20 69 |whether |a unit i|
|00003410| 73 20 75 70 20 74 6f 0a | 64 61 74 65 2e 20 48 6f |s up to.|date. Ho|
|00003420| 77 65 76 65 72 2c 20 69 | 74 20 69 73 20 70 6f 73 |wever, i|t is pos|
|00003430| 73 69 62 6c 65 20 74 6f | 20 60 66 75 64 67 65 27 |sible to| `fudge'|
|00003440| 20 69 74 20 73 6f 20 74 | 68 61 74 20 41 6d 75 20 | it so t|hat Amu |
|00003450| 63 61 6e 20 77 6f 72 6b | 2e 20 53 65 65 20 74 68 |can work|. See th|
|00003460| 65 0a 65 78 61 6d 70 6c | 65 20 6d 61 6b 65 66 69 |e.exampl|e makefi|
|00003470| 6c 65 20 60 45 78 61 6d | 70 6c 65 73 2e 64 65 6d |le `Exam|ples.dem|
|00003480| 6f 73 2e 6d 61 6b 65 64 | 72 61 77 27 2e 0a 0a 2a |os.maked|raw'...*|
|00003490| 20 20 20 20 20 20 20 54 | 68 72 6f 77 62 61 63 6b | T|hrowback|
|000034a0| 0a 0a 54 68 72 6f 77 62 | 61 63 6b 20 6f 66 20 65 |..Throwb|ack of e|
|000034b0| 72 72 6f 72 73 20 69 73 | 20 6e 6f 77 20 73 75 70 |rrors is| now sup|
|000034c0| 70 6f 72 74 65 64 2e 0a | 0a 33 2e 20 20 20 20 20 |ported..|.3. |
|000034d0| 20 4b 6e 6f 77 6e 20 62 | 75 67 73 20 2f 20 50 72 | Known b|ugs / Pr|
|000034e0| 6f 62 6c 65 6d 73 0a 0a | 54 68 69 73 20 69 73 20 |oblems..|This is |
|000034f0| 61 20 6c 69 73 74 20 6f | 66 20 61 6c 6c 20 74 68 |a list o|f all th|
|00003500| 65 20 6b 6e 6f 77 6e 20 | 28 62 79 20 6d 65 29 20 |e known |(by me) |
|00003510| 62 75 67 73 20 61 6e 64 | 20 70 72 6f 62 6c 65 6d |bugs and| problem|
|00003520| 73 20 69 6e 20 41 64 61 | 2f 45 64 0a 31 2e 31 31 |s in Ada|/Ed.1.11|
|00003530| 2e 32 20 52 65 6c 65 61 | 73 65 20 31 2e 20 54 68 |.2 Relea|se 1. Th|
|00003540| 69 73 20 6c 69 73 74 20 | 64 6f 65 73 20 6e 6f 74 |is list |does not|
|00003550| 20 69 6e 63 6c 75 64 65 | 20 61 6e 79 20 69 6d 70 | include| any imp|
|00003560| 6c 65 6d 65 6e 74 61 74 | 69 6f 6e 20 72 65 73 74 |lementat|ion rest|
|00003570| 72 69 63 74 69 6f 6e 73 | 0a 6d 65 6e 74 69 6f 6e |rictions|.mention|
|00003580| 65 64 20 69 6e 20 21 41 | 64 61 2e 64 6f 63 2e 61 |ed in !A|da.doc.a|
|00003590| 70 70 65 6e 64 69 78 5f | 66 2e 0a 0a 42 75 67 20 |ppendix_|f...Bug |
|000035a0| 31 3a 0a 54 68 65 20 63 | 6f 6d 70 69 6c 65 72 20 |1:.The c|ompiler |
|000035b0| 6d 61 79 20 63 72 61 73 | 68 20 77 69 74 68 20 61 |may cras|h with a|
|000035c0| 20 60 67 65 74 73 79 6d | 70 74 72 27 20 65 72 72 | `getsym|ptr' err|
|000035d0| 6f 72 2e 20 49 20 68 61 | 76 65 20 73 65 65 6e 20 |or. I ha|ve seen |
|000035e0| 74 68 69 73 20 68 61 70 | 70 65 6e 0a 77 69 74 68 |this hap|pen.with|
|000035f0| 20 61 20 70 61 63 6b 61 | 67 65 20 69 6e 63 6f 72 | a packa|ge incor|
|00003600| 70 6f 72 61 74 69 6e 67 | 20 67 65 6e 65 72 69 63 |porating| generic|
|00003610| 20 66 75 6e 63 74 69 6f | 6e 73 20 77 68 69 63 68 | functio|ns which|
|00003620| 20 61 63 63 65 73 73 65 | 73 20 70 61 63 6b 61 67 | accesse|s packag|
|00003630| 65 20 6c 65 76 65 6c 0a | 67 6c 6f 62 61 6c 20 73 |e level.|global s|
|00003640| 79 6d 62 6f 6c 73 20 28 | 69 6e 20 74 68 65 20 70 |ymbols (|in the p|
|00003650| 61 72 65 6e 74 20 70 61 | 63 6b 61 67 65 20 6f 66 |arent pa|ckage of|
|00003660| 20 74 68 65 20 67 65 6e | 65 72 69 63 29 20 61 6e | the gen|eric) an|
|00003670| 64 20 69 73 20 74 68 65 | 6e 20 77 69 74 68 27 65 |d is the|n with'e|
|00003680| 64 20 62 79 0a 61 20 6c | 61 74 65 72 20 75 6e 69 |d by.a l|ater uni|
|00003690| 74 2e 0a 0a 52 65 70 6f | 72 74 65 64 20 62 79 3a |t...Repo|rted by:|
|000036a0| 20 20 20 20 4d 65 0a 73 | 74 61 74 75 73 3a 20 20 | Me.s|tatus: |
|000036b0| 20 20 20 20 20 20 20 4e | 6f 74 20 79 65 74 20 63 | N|ot yet c|
|000036c0| 6c 65 61 72 65 64 0a 0a | 50 72 65 76 65 6e 74 61 |leared..|Preventa|
|000036d0| 74 69 76 65 20 61 63 74 | 69 6f 6e 73 3a 0a 54 72 |tive act|ions:.Tr|
|000036e0| 79 20 72 65 63 6f 6d 70 | 69 6c 69 6e 67 20 74 68 |y recomp|iling th|
|000036f0| 65 20 75 6e 69 74 20 74 | 68 61 74 20 75 73 65 73 |e unit t|hat uses|
|00003700| 20 74 68 65 20 67 65 6e | 65 72 69 63 20 69 6e 20 | the gen|eric in |
|00003710| 74 68 65 20 73 61 6d 65 | 20 66 69 6c 65 20 61 73 |the same| file as|
|00003720| 20 74 68 65 0a 67 65 6e | 65 72 69 63 2e 0a 0a 3d | the.gen|eric...=|
|00003730| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003740| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003750| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003760| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003770| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 0a |========|=======.|
|00003780| 0a 42 75 67 20 32 3a 0a | 4f 63 63 61 73 69 6f 6e |.Bug 2:.|Occasion|
|00003790| 61 6c 79 2c 20 41 64 61 | 2f 45 64 20 63 61 6c 6c |aly, Ada|/Ed call|
|000037a0| 73 20 6c 61 74 65 72 20 | 70 68 61 73 65 73 20 6f |s later |phases o|
|000037b0| 66 20 74 68 65 20 63 6f | 6d 70 69 6c 65 72 20 77 |f the co|mpiler w|
|000037c0| 68 65 6e 20 74 68 65 20 | 73 6f 75 72 63 65 0a 63 |hen the |source.c|
|000037d0| 6f 6e 74 61 69 6e 65 64 | 20 65 72 72 6f 72 73 2e |ontained| errors.|
|000037e0| 20 54 68 69 73 20 67 65 | 6e 65 72 61 6c 6c 79 20 | This ge|nerally |
|000037f0| 72 65 73 75 6c 74 73 20 | 69 6e 20 61 20 60 63 68 |results |in a `ch|
|00003800| 61 6f 73 27 20 6d 65 73 | 73 61 67 65 2e 0a 0a 52 |aos' mes|sage...R|
|00003810| 65 70 6f 72 74 65 64 20 | 62 79 3a 20 20 20 20 4d |eported |by: M|
|00003820| 65 0a 73 74 61 74 75 73 | 3a 20 20 20 20 20 20 20 |e.status|: |
|00003830| 20 20 46 69 78 65 64 20 | 69 6e 20 74 68 69 73 20 | Fixed |in this |
|00003840| 72 65 6c 65 61 73 65 2e | 0a 0a 3d 3d 3d 3d 3d 3d |release.|..======|
|00003850| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003860| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003870| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003880| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003890| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 0a 0a 42 75 67 20 |========|==..Bug |
|000038a0| 33 3a 0a 49 66 20 79 6f | 75 20 75 73 65 20 61 20 |3:.If yo|u use a |
|000038b0| 63 6f 6d 6d 61 6e 64 20 | 6c 69 6e 65 20 6c 69 6b |command |line lik|
|000038c0| 65 20 60 61 64 61 63 6f | 6d 70 20 2d 73 20 61 64 |e `adaco|mp -s ad|
|000038d0| 66 73 3a 3a 68 61 72 64 | 64 69 73 63 34 2e 24 2e |fs::hard|disc4.$.|
|000038e0| 77 6f 72 6b 2e 62 75 67 | 2e 61 64 61 27 0a 28 6f |work.bug|.ada'.(o|
|000038f0| 72 20 2e 2e 2e 20 61 64 | 61 2e 62 75 67 29 2c 20 |r ... ad|a.bug), |
|00003900| 74 68 65 20 72 65 73 75 | 6c 74 61 6e 74 20 6c 69 |the resu|ltant li|
|00003910| 73 74 69 6e 67 20 66 69 | 6c 65 20 77 69 6c 6c 20 |sting fi|le will |
|00003920| 62 65 20 63 61 6c 6c 65 | 64 20 6c 69 73 2e 68 61 |be calle|d lis.ha|
|00003930| 72 64 64 69 73 63 34 20 | 69 6e 0a 79 6f 75 72 20 |rddisc4 |in.your |
|00003940| 63 75 72 72 65 6e 74 20 | 64 69 72 65 63 74 6f 72 |current |director|
|00003950| 79 2e 0a 0a 52 65 70 6f | 72 74 65 64 20 62 79 3a |y...Repo|rted by:|
|00003960| 20 20 20 20 4d 65 0a 73 | 74 61 74 75 73 3a 20 20 | Me.s|tatus: |
|00003970| 20 20 20 20 20 20 20 66 | 69 78 65 64 20 69 6e 20 | f|ixed in |
|00003980| 74 68 69 73 20 72 65 6c | 65 61 73 65 0a 0a 3d 3d |this rel|ease..==|
|00003990| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000039a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000039b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000039c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000039d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 0a 0a |========|======..|
|000039e0| 34 2e 20 20 20 20 20 20 | 41 63 6b 6e 6f 77 6c 65 |4. |Acknowle|
|000039f0| 64 67 65 6d 65 6e 74 73 | 2c 20 73 6f 75 72 63 65 |dgements|, source|
|00003a00| 73 20 61 6e 64 20 6f 74 | 68 65 72 20 62 69 74 73 |s and ot|her bits|
|00003a10| 0a 0a 2a 20 20 20 20 20 | 20 20 41 63 6b 6e 6f 77 |..* | Acknow|
|00003a20| 6c 65 64 67 65 6d 65 6e | 74 73 0a 0a 54 68 61 6e |ledgemen|ts..Than|
|00003a30| 6b 73 20 67 6f 20 74 6f | 20 74 68 65 20 4e 65 77 |ks go to| the New|
|00003a40| 20 59 6f 72 6b 20 55 6e | 69 76 65 72 73 69 74 79 | York Un|iversity|
|00003a50| 20 66 6f 72 20 77 72 69 | 74 69 6e 67 20 61 6e 64 | for wri|ting and|
|00003a60| 20 69 6d 70 6c 65 6d 65 | 6e 74 69 6e 67 20 74 68 | impleme|nting th|
|00003a70| 69 73 0a 73 6f 66 74 77 | 61 72 65 2e 0a 0a 2a 20 |is.softw|are...* |
|00003a80| 20 20 20 20 20 20 53 6f | 75 72 63 65 73 0a 0a 54 | So|urces..T|
|00003a90| 68 65 20 73 74 61 6e 64 | 61 72 64 20 73 6f 75 72 |he stand|ard sour|
|00003aa0| 63 65 73 20 66 6f 72 20 | 41 64 61 2f 45 64 20 61 |ces for |Ada/Ed a|
|00003ab0| 72 65 20 66 72 65 65 6c | 79 20 61 76 61 69 6c 61 |re freel|y availa|
|00003ac0| 62 6c 65 20 66 72 6f 6d | 20 63 73 2e 6e 79 75 2e |ble from| cs.nyu.|
|00003ad0| 65 64 75 0a 28 31 32 38 | 2e 31 32 32 2e 31 34 30 |edu.(128|.122.140|
|00003ae0| 2e 32 34 29 20 69 6e 20 | 74 68 65 20 64 69 72 65 |.24) in |the dire|
|00003af0| 63 74 6f 72 79 20 70 75 | 62 2f 61 64 61 65 64 2f |ctory pu|b/adaed/|
|00003b00| 70 6c 63 6c 61 73 73 2f | 41 64 61 65 64 2d 31 2e |plclass/|Adaed-1.|
|00003b10| 31 31 2e 32 2e 74 61 72 | 2e 5a 20 76 69 61 0a 61 |11.2.tar|.Z via.a|
|00003b20| 6e 6f 6e 79 6d 6f 75 73 | 20 46 54 50 2e 20 54 68 |nonymous| FTP. Th|
|00003b30| 65 73 65 20 73 6f 75 72 | 63 65 73 20 68 61 76 65 |ese sour|ces have|
|00003b40| 20 6e 6f 74 20 62 65 65 | 6e 20 63 6f 6e 76 65 72 | not bee|n conver|
|00003b50| 74 65 64 20 74 6f 20 72 | 75 6e 20 6f 6e 20 41 63 |ted to r|un on Ac|
|00003b60| 6f 72 6e 0a 6d 61 63 68 | 69 6e 65 73 2e 20 54 68 |orn.mach|ines. Th|
|00003b70| 65 72 65 20 61 72 65 20 | 61 6c 73 6f 20 73 6f 6d |ere are |also som|
|00003b80| 65 20 70 61 74 63 68 65 | 73 20 61 70 70 6c 69 65 |e patche|s applie|
|00003b90| 64 20 66 72 6f 6d 20 63 | 73 2e 6d 61 6e 2e 61 63 |d from c|s.man.ac|
|00003ba0| 2e 75 6b 2e 0a 0a 49 66 | 20 79 6f 75 20 77 61 6e |.uk...If| you wan|
|00003bb0| 74 20 74 68 65 20 63 6f | 6d 70 6c 65 74 65 20 73 |t the co|mplete s|
|00003bc0| 6f 75 72 63 65 73 20 66 | 6f 72 20 41 64 61 2f 45 |ources f|or Ada/E|
|00003bd0| 64 20 66 6f 72 20 41 63 | 6f 72 6e 20 6d 61 63 68 |d for Ac|orn mach|
|00003be0| 69 6e 65 73 2c 20 79 6f | 75 72 20 62 65 73 74 0a |ines, yo|ur best.|
|00003bf0| 61 63 74 69 6f 6e 20 69 | 73 20 70 72 6f 62 61 62 |action i|s probab|
|00003c00| 6c 79 20 6e 6f 74 20 74 | 6f 20 62 6f 74 68 65 72 |ly not t|o bother|
|00003c10| 20 61 74 20 74 68 65 20 | 6d 6f 6d 65 6e 74 2c 20 | at the |moment, |
|00003c20| 61 6e 64 20 77 61 69 74 | 20 74 69 6c 6c 20 61 20 |and wait| till a |
|00003c30| 6c 61 74 65 72 0a 76 65 | 72 73 69 6f 6e 20 63 6f |later.ve|rsion co|
|00003c40| 6d 65 73 20 6f 75 74 20 | 77 69 74 68 20 72 65 70 |mes out |with rep|
|00003c50| 6f 72 74 65 64 20 62 75 | 67 73 20 68 6f 70 65 66 |orted bu|gs hopef|
|00003c60| 75 6c 6c 79 20 66 69 78 | 65 64 2c 20 61 6e 64 20 |ully fix|ed, and |
|00003c70| 74 68 65 6e 20 67 65 74 | 20 69 6e 20 74 6f 75 63 |then get| in touc|
|00003c80| 68 0a 77 69 74 68 20 6d | 65 2e 0a 0a 36 2e 20 20 |h.with m|e...6. |
|00003c90| 20 20 20 20 4f 62 74 61 | 69 6e 69 6e 67 20 41 64 | Obta|ining Ad|
|00003ca0| 61 2f 45 64 20 66 6f 72 | 20 52 49 53 43 4f 53 0a |a/Ed for| RISCOS.|
|00003cb0| 0a 41 64 61 2f 45 64 20 | 63 61 6e 20 62 65 20 6f |.Ada/Ed |can be o|
|00003cc0| 62 74 61 69 6e 65 64 20 | 66 72 6f 6d 20 76 61 72 |btained |from var|
|00003cd0| 69 6f 75 73 20 46 54 50 | 20 73 69 74 65 73 20 28 |ious FTP| sites (|
|00003ce0| 48 45 4e 53 41 20 65 74 | 63 2e 29 20 6f 72 20 63 |HENSA et|c.) or c|
|00003cf0| 61 6e 20 62 65 0a 6f 62 | 74 61 69 6e 65 64 20 64 |an be.ob|tained d|
|00003d00| 69 72 65 63 74 6c 79 20 | 66 72 6f 6d 20 6d 65 20 |irectly |from me |
|00003d10| 62 79 20 73 65 6e 64 69 | 6e 67 20 32 20 73 69 6e |by sendi|ng 2 sin|
|00003d20| 67 6c 65 20 64 65 6e 73 | 69 74 79 20 6f 72 20 31 |gle dens|ity or 1|
|00003d30| 20 68 69 67 68 20 64 65 | 6e 73 69 74 79 0a 66 6c | high de|nsity.fl|
|00003d40| 6f 70 70 79 20 64 69 73 | 63 73 20 61 6e 64 20 72 |oppy dis|cs and r|
|00003d50| 65 74 75 72 6e 20 70 6f | 73 74 61 67 65 20 74 6f |eturn po|stage to|
|00003d60| 3a 0a 0a 35 2e 20 20 20 | 20 20 20 43 6f 6e 74 61 |:..5. | Conta|
|00003d70| 63 74 69 6e 67 20 6d 65 | 0a 0a 20 20 20 20 20 20 |cting me|.. |
|00003d80| 20 20 20 50 65 74 65 72 | 20 42 75 72 77 6f 6f 64 | Peter| Burwood|
|00003d90| 0a 20 20 20 20 20 20 20 | 20 20 32 30 35 20 4d 61 |. | 205 Ma|
|00003da0| 73 6f 6e 73 20 41 76 65 | 6e 75 65 0a 20 20 20 20 |sons Ave|nue. |
|00003db0| 20 20 20 20 20 48 61 72 | 72 6f 77 0a 20 20 20 20 | Har|row. |
|00003dc0| 20 20 20 20 20 4d 69 64 | 64 78 0a 20 20 20 20 20 | Mid|dx. |
|00003dd0| 20 20 20 20 48 41 33 20 | 35 41 5a 0a 0a 49 20 63 | HA3 |5AZ..I c|
|00003de0| 61 6e 20 61 6c 73 6f 20 | 62 65 20 63 6f 6e 74 61 |an also |be conta|
|00003df0| 63 74 65 64 20 62 79 20 | 65 6d 61 69 6c 20 61 73 |cted by |email as|
|00003e00| 20 60 61 64 61 65 64 40 | 61 72 63 61 6e 67 65 6c | `adaed@|arcangel|
|00003e10| 2e 64 65 6d 6f 6e 2e 63 | 6f 2e 75 6b 27 0a 46 69 |.demon.c|o.uk'.Fi|
|00003e20| 6c 65 44 61 74 61 82 21 | 52 75 6e 00 00 00 42 00 |leData.!|Run...B.|
|00003e30| 00 00 60 04 00 00 45 eb | ff ff 48 e7 ea 8b 03 00 |..`...E.|..H.....|
|00003e40| 0d 9d 7c 0a 7c 20 41 64 | 61 20 21 52 75 6e 0a 7c |..|.| Ad|a !Run.||
|00003e50| 20 28 43 29 20 43 6f 70 | 79 72 69 67 68 74 20 50 | (C) Cop|yright P|
|00003e60| 65 74 65 72 20 42 75 72 | 77 6f 6f 64 2c 20 31 39 |eter Bur|wood, 19|
|00003e70| 39 34 0a 7c 0a 2a 49 66 | 20 22 3c 53 79 73 74 65 |94.|.*If| "<Syste|
|00003e80| 6d 24 50 61 74 68 3e 22 | 20 3d 20 22 22 20 54 68 |m$Path>"| = "" Th|
|00003e90| 65 6e 20 45 72 72 6f 72 | 20 30 20 53 79 73 74 65 |en Error| 0 Syste|
|00003ea0| 6d 20 72 65 73 6f 75 72 | 63 65 73 20 63 61 6e 6e |m resour|ces cann|
|00003eb0| 6f 74 20 62 65 20 66 6f | 75 6e 64 0a 2a 57 69 6d |ot be fo|und.*Wim|
|00003ec0| 70 53 6c 6f 74 20 2d 4d | 69 6e 20 31 32 38 6b 20 |pSlot -M|in 128k |
|00003ed0| 2d 4d 61 78 20 31 32 38 | 6b 0a 2a 49 63 6f 6e 53 |-Max 128|k.*IconS|
|00003ee0| 70 72 69 74 65 73 20 3c | 4f 62 65 79 24 44 69 72 |prites <|Obey$Dir|
|00003ef0| 3e 2e 21 53 70 72 69 74 | 65 73 0a 2a 49 66 20 22 |>.!Sprit|es.*If "|
|00003f00| 3c 41 64 61 24 50 61 74 | 68 3e 22 20 3d 20 22 22 |<Ada$Pat|h>" = ""|
|00003f10| 20 54 68 65 6e 20 53 65 | 74 20 52 75 6e 24 50 61 | Then Se|t Run$Pa|
|00003f20| 74 68 20 3c 52 75 6e 24 | 50 61 74 68 3e 2c 61 64 |th <Run$|Path>,ad|
|00003f30| 61 3a 62 69 6e 2e 0a 2a | 53 65 74 20 41 64 61 24 |a:bin..*|Set Ada$|
|00003f40| 44 69 72 20 3c 4f 62 65 | 79 24 44 69 72 3e 0a 2a |Dir <Obe|y$Dir>.*|
|00003f50| 53 65 74 20 41 64 61 24 | 50 61 74 68 20 3c 4f 62 |Set Ada$|Path <Ob|
|00003f60| 65 79 24 44 69 72 3e 2e | 0a 2a 53 65 74 20 41 64 |ey$Dir>.|.*Set Ad|
|00003f70| 61 46 72 6f 6e 74 20 61 | 64 61 3a 6c 69 62 2e 61 |aFront a|da:lib.a|
|00003f80| 64 61 66 72 6f 6e 74 0a | 2a 53 65 74 20 47 45 4e |dafront.|*Set GEN|
|00003f90| 20 61 64 61 3a 6c 69 62 | 2e 61 64 61 67 65 6e 0a | ada:lib|.adagen.|
|00003fa0| 2a 53 65 74 20 42 4e 44 | 20 61 64 61 62 69 6e 64 |*Set BND| adabind|
|00003fb0| 0a 2a 53 65 74 20 49 4e | 54 20 61 64 61 3a 6c 69 |.*Set IN|T ada:li|
|00003fc0| 62 0a 2a 53 65 74 20 41 | 64 61 45 44 50 52 45 44 |b.*Set A|daEDPRED|
|00003fd0| 45 46 20 61 64 61 3a 6c | 69 62 0a 2a 52 4d 45 6e |EF ada:l|ib.*RMEn|
|00003fe0| 73 75 72 65 20 46 50 45 | 6d 75 6c 61 74 6f 72 20 |sure FPE|mulator |
|00003ff0| 30 20 52 4d 4c 6f 61 64 | 20 53 79 73 74 65 6d 3a |0 RMLoad| System:|
|00004000| 6d 6f 64 75 6c 65 73 2e | 66 70 65 6d 75 6c 61 74 |modules.|fpemulat|
|00004010| 6f 72 0a 2a 52 4d 45 6e | 73 75 72 65 20 46 50 45 |or.*RMEn|sure FPE|
|00004020| 6d 75 6c 61 74 6f 72 20 | 32 2e 38 30 20 45 72 72 |mulator |2.80 Err|
|00004030| 6f 72 20 59 6f 75 20 6e | 65 65 64 20 46 50 45 6d |or You n|eed FPEm|
|00004040| 75 6c 61 74 6f 72 20 32 | 2e 38 30 20 74 6f 20 72 |ulator 2|.80 to r|
|00004050| 75 6e 20 21 41 64 61 0a | 2a 52 4d 45 6e 73 75 72 |un !Ada.|*RMEnsur|
|00004060| 65 20 53 68 61 72 65 64 | 43 4c 69 62 72 61 72 79 |e Shared|CLibrary|
|00004070| 20 30 20 53 79 73 74 65 | 6d 3a 6d 6f 64 75 6c 65 | 0 Syste|m:module|
|00004080| 73 2e 63 6c 69 62 0a 2a | 52 4d 45 6e 73 75 72 65 |s.clib.*|RMEnsure|
|00004090| 20 53 68 61 72 65 64 43 | 4c 69 62 72 61 72 79 20 | SharedC|Library |
|000040a0| 33 2e 37 35 20 45 72 72 | 6f 72 20 59 6f 75 20 6e |3.75 Err|or You n|
|000040b0| 65 65 64 20 43 6c 69 62 | 20 33 2e 37 35 20 74 6f |eed Clib| 3.75 to|
|000040c0| 20 72 75 6e 20 21 41 64 | 61 0a 2a 52 4d 45 6e 73 | run !Ad|a.*RMEns|
|000040d0| 75 72 65 20 46 72 6f 6e | 74 45 6e 64 20 30 20 53 |ure Fron|tEnd 0 S|
|000040e0| 79 73 74 65 6d 3a 6d 6f | 64 75 6c 65 73 2e 66 72 |ystem:mo|dules.fr|
|000040f0| 6f 6e 74 65 6e 64 0a 2a | 52 4d 45 6e 73 75 72 65 |ontend.*|RMEnsure|
|00004100| 20 46 72 6f 6e 74 65 6e | 64 20 31 2e 31 33 20 45 | Fronten|d 1.13 E|
|00004110| 72 72 6f 72 20 59 6f 75 | 20 6e 65 65 64 20 76 65 |rror You| need ve|
|00004120| 72 73 69 6f 6e 20 31 2e | 31 33 20 6f 66 20 74 68 |rsion 1.|13 of th|
|00004130| 65 20 46 72 6f 6e 74 45 | 6e 64 20 6d 6f 64 75 6c |e FrontE|nd modul|
|00004140| 65 20 74 6f 20 72 75 6e | 20 21 41 64 61 0a 2a 52 |e to run| !Ada.*R|
|00004150| 4d 45 6e 73 75 72 65 20 | 54 61 73 6b 57 69 6e 64 |MEnsure |TaskWind|
|00004160| 6f 77 20 30 20 53 79 73 | 74 65 6d 3a 6d 6f 64 75 |ow 0 Sys|tem:modu|
|00004170| 6c 65 73 2e 74 61 73 6b | 0a 2a 52 4d 45 6e 73 75 |les.task|.*RMEnsu|
|00004180| 72 65 20 54 61 73 6b 57 | 69 6e 64 6f 77 20 30 2e |re TaskW|indow 0.|
|00004190| 32 39 20 45 72 72 6f 72 | 20 59 6f 75 20 6e 65 65 |29 Error| You nee|
|000041a0| 64 20 76 65 72 73 69 6f | 6e 20 30 2e 32 39 20 6f |d versio|n 0.29 o|
|000041b0| 66 20 74 68 65 20 74 61 | 73 6b 77 69 6e 64 6f 77 |f the ta|skwindow|
|000041c0| 20 6d 6f 64 75 6c 65 20 | 74 6f 20 72 75 6e 20 21 | module |to run !|
|000041d0| 41 64 61 0a 2a 52 4d 45 | 6e 73 75 72 65 20 44 44 |Ada.*RME|nsure DD|
|000041e0| 45 55 74 69 6c 73 20 30 | 20 53 79 73 74 65 6d 3a |EUtils 0| System:|
|000041f0| 6d 6f 64 75 6c 65 73 2e | 64 64 65 75 74 69 6c 73 |modules.|ddeutils|
|00004200| 0a 2a 52 4d 45 6e 73 75 | 72 65 20 44 44 45 55 74 |.*RMEnsu|re DDEUt|
|00004210| 69 6c 73 20 31 2e 35 30 | 20 45 72 72 6f 72 20 59 |ils 1.50| Error Y|
|00004220| 6f 75 20 6e 65 65 64 20 | 76 65 72 73 69 6f 6e 20 |ou need |version |
|00004230| 31 2e 35 30 20 6f 66 20 | 74 68 65 20 44 44 45 55 |1.50 of |the DDEU|
|00004240| 74 69 6c 73 20 6d 6f 64 | 75 6c 65 20 74 6f 20 72 |tils mod|ule to r|
|00004250| 75 6e 20 21 41 64 61 0a | 2a 57 69 6d 70 53 6c 6f |un !Ada.|*WimpSlo|
|00004260| 74 20 2d 4d 69 6e 20 36 | 34 6b 20 2d 4d 61 78 20 |t -Min 6|4k -Max |
|00004270| 36 34 6b 0a 2a 46 72 6f | 6e 74 45 6e 64 5f 53 74 |64k.*Fro|ntEnd_St|
|00004280| 61 72 74 20 2d 61 70 70 | 20 41 64 61 20 2d 64 65 |art -app| Ada -de|
|00004290| 73 63 20 3c 41 64 61 24 | 44 69 72 3e 2e 64 65 73 |sc <Ada$|Dir>.des|
|000042a0| 63 0a 46 69 6c 65 44 61 | 74 61 82 21 53 70 72 69 |c.FileDa|ta.!Spri|
|000042b0| 74 65 73 00 00 00 e4 03 | 00 00 45 f9 ff ff db e4 |tes.....|..E.....|
|000042c0| ea 8b 03 00 fb 34 02 00 | 00 00 10 00 00 00 e8 03 |.....4..|........|
|000042d0| 00 00 d4 02 00 00 21 61 | 64 61 00 00 00 00 00 00 |......!a|da......|
|000042e0| 00 00 04 00 00 00 10 00 | 00 00 00 00 00 00 07 00 |........|........|
|000042f0| 00 00 2c 00 00 00 80 01 | 00 00 0c 00 00 00 00 20 |..,.....|....... |
|00004300| 00 95 be be 7b 00 40 33 | 07 00 34 73 00 02 00 00 |....{.@3|..4s....|
|00004310| 00 00 70 20 50 e9 eb eb | bb 07 34 33 07 00 34 33 |..p P...|..43..43|
|00004320| 07 02 07 00 00 00 00 20 | 50 e9 be be be 27 34 33 |....... |P....'43|
|00004330| 43 44 33 33 07 02 00 00 | 00 00 70 20 50 e9 eb eb |CD33....|..p P...|
|00004340| bb 07 00 34 33 33 33 07 | 00 02 07 00 00 00 00 20 |...4333.|....... |
|00004350| 50 e9 be be be 37 02 00 | 24 32 07 40 02 02 00 00 |P....7..|$2.@....|
|00004360| 00 00 70 20 00 95 ee eb | 7b 00 00 00 24 32 07 00 |..p ....|{...$2..|
|00004370| 00 02 07 00 00 00 00 20 | 00 95 be be 7b 01 22 02 |....... |....{.".|
|00004380| 24 32 07 31 01 02 00 00 | 00 00 70 20 00 50 e9 bb |$2.1....|..p .P..|
|00004390| 07 00 00 00 24 32 07 00 | 00 02 06 00 00 00 00 20 |....$2..|....... |
|000043a0| 30 30 31 25 10 20 21 00 | 24 32 17 31 00 02 00 00 |001%. !.|$2.1....|
|000043b0| 00 00 70 20 00 00 30 05 | 00 00 00 00 24 32 07 00 |..p ..0.|....$2..|
|000043c0| 00 02 07 00 00 00 00 20 | 20 13 31 25 10 32 01 01 |....... | .1%.2..|
|000043d0| 24 32 17 32 00 02 00 00 | 00 00 70 20 10 22 32 05 |$2.2....|..p ."2.|
|000043e0| 00 00 00 00 24 32 07 00 | 00 02 07 00 00 00 00 20 |....$2..|....... |
|000043f0| 03 00 30 05 22 00 01 10 | 24 32 07 10 01 02 00 00 |..0."...|$2......|
|00004400| 00 00 10 03 00 07 30 05 | 00 20 00 34 33 33 33 07 |......0.|. .4333.|
|00004410| 00 02 31 00 00 00 03 00 | 00 07 34 43 00 00 34 33 |..1.....|..4C..43|
|00004420| 43 44 33 33 17 32 00 00 | 00 00 00 00 07 ee 43 34 |CD33.2..|......C4|
|00004430| 00 00 34 33 07 00 34 33 | 05 00 00 00 00 00 00 e0 |..43..43|........|
|00004440| ee ee 42 24 00 00 40 33 | 07 00 34 53 00 00 00 00 |..B$..@3|..4S....|
|00004450| 00 00 ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004460| ff ff ff 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004470| ff ff ff ff ff ff ff 00 | 00 00 ff ff ff ff ff ff |........|........|
|00004480| ff ff ff ff ff ff ff ff | ff ff ff 00 00 00 ff ff |........|........|
|00004490| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff 00 |........|........|
|000044a0| 00 00 ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|000044b0| ff ff ff 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|000044c0| ff ff ff ff ff ff ff 00 | 00 00 ff ff ff ff ff ff |........|........|
|000044d0| ff ff ff ff ff ff ff ff | ff ff ff 00 00 00 ff ff |........|........|
|000044e0| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff 00 |........|........|
|000044f0| 00 00 ff ff ff ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004500| ff ff ff 00 00 00 ff ff | ff ff ff ff ff ff ff ff |........|........|
|00004510| ff ff ff ff ff ff ff 00 | 00 00 ff ff ff ff ff ff |........|........|
|00004520| ff ff ff ff ff ff ff ff | ff ff ff 00 00 00 ff ff |........|........|
|00004530| ff ff ff ff ff ff ff ff | ff ff ff ff ff ff ff 00 |........|........|
|00004540| 00 00 ff ff 0f 00 f0 0f | ff ff ff ff ff ff ff ff |........|........|
|00004550| ff ff ff 00 00 00 ff 0f | 00 00 f0 0f 00 f0 ff ff |........|........|
|00004560| ff ff ff ff ff ff ff 00 | 00 00 0f 00 00 00 ff ff |........|........|
|00004570| 00 00 ff ff ff ff ff ff | ff ff 00 00 00 00 00 00 |........|........|
|00004580| 00 00 ff ff 00 00 ff ff | 0f 00 ff ff 0f 00 00 00 |........|........|
|00004590| 00 00 00 00 00 00 f0 0f | 00 00 f0 ff 0f 00 ff ff |........|........|
|000045a0| 00 00 00 00 00 00 04 01 | 00 00 73 6d 21 61 64 61 |........|..sm!ada|
|000045b0| 00 00 00 00 00 00 02 00 | 00 00 08 00 00 00 00 00 |........|........|
|000045c0| 00 00 03 00 00 00 2c 00 | 00 00 98 00 00 00 0c 00 |......,.|........|
|000045d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 02 ee |........|........|
|000045e0| 0e 30 03 30 03 03 00 00 | 00 00 02 ee 0e 30 33 33 |.0.0....|.....033|
|000045f0| 03 00 00 00 00 00 02 ee | 0e 00 20 03 00 03 00 00 |........|.. .....|
|00004600| 00 00 02 ee 0e 00 20 03 | 00 00 00 00 00 00 02 30 |...... .|.......0|
|00004610| 00 00 20 03 00 03 00 00 | 00 00 12 32 00 00 20 03 |.. .....|...2.. .|
|00004620| 00 00 00 00 00 00 00 30 | 00 32 33 33 03 30 00 00 |.......0|.233.0..|
|00004630| 00 00 00 40 03 30 03 30 | 03 00 00 00 00 00 00 00 |...@.0.0|........|
|00004640| 00 00 00 00 00 00 f0 ff | ff ff ff ff ff ff ff ff |........|........|
|00004650| ff ff f0 ff ff ff ff ff | ff ff ff ff ff ff f0 ff |........|........|
|00004660| ff ff ff ff ff ff ff ff | ff ff f0 ff ff ff ff ff |........|........|
|00004670| ff ff ff ff ff ff f0 ff | ff ff ff ff ff ff ff ff |........|........|
|00004680| ff ff f0 ff ff ff ff ff | 00 f0 ff ff ff ff f0 ff |........|........|
|00004690| ff ff 00 f0 00 ff ff ff | ff ff f0 ff ff ff 00 f0 |........|........|
|000046a0| 0f f0 0f f0 0f 00 f0 ff | ff ff 46 69 6c 65 44 61 |........|..FileDa|
|000046b0| 74 61 82 70 72 65 64 65 | 66 00 00 00 00 00 36 62 |ta.prede|f.....6b|
|000046c0| 00 00 45 fd ff ff 9c 46 | c0 a5 03 00 67 ec 2d 2d |..E....F|....g.--|
|000046d0| 20 0a 2d 2d 20 0a 2d 2d | 20 20 20 20 20 20 20 20 | .-- .--| |
|000046e0| 20 20 20 20 20 20 20 2a | 2a 2a 2a 2a 2a 2a 2a 2a | *|********|
|000046f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004700| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 20 0a 2d 2d 20 20 20 |********|* .-- |
|00004710| 20 20 20 20 20 20 20 20 | 20 20 20 20 2a 20 20 20 | | * |
|00004720| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004730| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2a 20 20 | | * |
|00004740| 0a 2d 2d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.-- | |
|00004750| 20 20 2a 20 20 20 20 20 | 20 20 20 20 20 20 54 20 | * | T |
|00004760| 20 65 20 20 78 20 20 74 | 20 20 20 20 20 20 20 20 | e x t| |
|00004770| 20 20 20 2a 20 0a 2d 2d | 20 20 20 20 20 20 20 20 | * .--| |
|00004780| 20 20 20 20 20 20 20 2a | 20 20 20 20 20 20 20 20 | *| |
|00004790| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000047a0| 20 20 20 20 20 20 20 20 | 2a 20 20 0a 2d 2d 20 20 | |* .-- |
|000047b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2a 20 20 | | * |
|000047c0| 20 20 20 49 6e 70 75 74 | 20 2f 20 4f 75 74 70 75 | Input| / Outpu|
|000047d0| 74 20 20 50 61 63 6b 61 | 67 65 20 20 20 20 2a 20 |t Packa|ge * |
|000047e0| 0a 2d 2d 09 09 20 2a 09 | 09 09 09 20 20 2a 0a 2d |.--.. *.|... *.-|
|000047f0| 2d 09 09 20 2a 09 20 20 | 20 20 20 61 6e 64 20 6f |-.. *. | and o|
|00004800| 74 68 65 72 09 09 20 20 | 2a 0a 2d 2d 09 09 20 2a |ther.. |*.--.. *|
|00004810| 09 09 09 09 20 20 2a 0a | 2d 2d 09 09 20 2a 20 20 |.... *.|--.. * |
|00004820| 20 20 20 20 20 20 50 72 | 65 64 65 66 69 6e 65 64 | Pr|edefined|
|00004830| 20 55 6e 69 74 73 09 20 | 20 2a 0a 2d 2d 20 20 20 | Units. | *.-- |
|00004840| 20 20 20 20 20 20 20 20 | 20 20 20 20 2a 20 20 20 | | * |
|00004850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004860| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2a 20 20 | | * |
|00004870| 0a 2d 2d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.-- | |
|00004880| 20 20 2a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | * | |
|00004890| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000048a0| 20 20 20 2a 20 20 0a 2d | 2d 09 09 20 2a 09 20 20 | * .-|-.. *. |
|000048b0| 20 20 20 41 44 41 20 50 | 72 6f 6a 65 63 74 09 20 | ADA P|roject. |
|000048c0| 20 2a 0a 2d 2d 09 09 20 | 2a 09 20 20 43 6f 75 72 | *.--.. |*. Cour|
|000048d0| 61 6e 74 20 49 6e 73 74 | 69 74 75 74 65 09 20 20 |ant Inst|itute. |
|000048e0| 2a 0a 2d 2d 09 09 20 2a | 09 20 4e 65 77 20 59 6f |*.--.. *|. New Yo|
|000048f0| 72 6b 20 55 6e 69 76 65 | 72 73 69 74 79 09 20 20 |rk Unive|rsity. |
|00004900| 2a 0a 2d 2d 09 09 20 2a | 09 20 20 32 35 31 20 4d |*.--.. *|. 251 M|
|00004910| 65 72 63 65 72 20 53 74 | 72 65 65 74 2c 09 20 20 |ercer St|reet,. |
|00004920| 2a 0a 2d 2d 09 09 20 2a | 09 20 20 4e 65 77 20 59 |*.--.. *|. New Y|
|00004930| 6f 72 6b 2c 20 4e 59 20 | 31 30 30 31 32 09 20 20 |ork, NY |10012. |
|00004940| 2a 0a 2d 2d 20 20 20 20 | 20 20 20 20 20 20 20 20 |*.-- | |
|00004950| 20 20 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 | * | |
|00004960| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004970| 20 20 20 20 2a 20 20 0a | 2d 2d 20 20 20 20 20 20 | * .|-- |
|00004980| 20 20 20 20 20 20 20 20 | 20 2a 2a 2a 2a 2a 2a 2a | | *******|
|00004990| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000049a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 20 0a 2d 2d 20 |********|*** .-- |
|000049b0| 0a 2d 2d 20 0a 2d 2d 0a | 70 72 61 67 6d 61 20 70 |.-- .--.|pragma p|
|000049c0| 61 67 65 3b 0a 2d 2d 20 | 20 54 68 69 73 20 66 69 |age;.-- | This fi|
|000049d0| 6c 65 20 63 6f 6e 74 61 | 69 6e 73 20 73 65 76 65 |le conta|ins seve|
|000049e0| 72 61 6c 20 6f 66 20 74 | 68 65 20 70 72 65 64 65 |ral of t|he prede|
|000049f0| 66 69 6e 65 64 20 41 64 | 61 20 70 61 63 6b 61 67 |fined Ad|a packag|
|00004a00| 65 20 73 70 65 63 2d 0a | 2d 2d 20 20 69 66 69 63 |e spec-.|-- ific|
|00004a10| 61 74 69 6f 6e 73 2e 20 | 20 54 68 65 79 20 64 6f |ations. | They do|
|00004a20| 20 6e 6f 74 20 61 63 74 | 75 61 6c 6c 79 20 69 6d | not act|ually im|
|00004a30| 70 6c 65 6d 65 6e 74 20 | 74 68 65 20 70 61 63 6b |plement |the pack|
|00004a40| 61 67 65 27 73 0a 2d 2d | 20 20 6f 70 65 72 61 74 |age's.--| operat|
|00004a50| 69 6f 6e 73 2c 20 77 68 | 69 63 68 20 61 72 65 20 |ions, wh|ich are |
|00004a60| 63 6f 64 65 64 20 69 6e | 20 74 68 65 20 69 6d 70 |coded in| the imp|
|00004a70| 6c 65 6d 65 6e 74 61 74 | 69 6f 6e 20 6c 61 6e 67 |lementat|ion lang|
|00004a80| 75 61 67 65 20 43 2c 0a | 2d 2d 20 20 62 75 74 20 |uage C,.|-- but |
|00004a90| 74 68 65 79 20 70 72 6f | 76 69 64 65 20 61 6e 20 |they pro|vide an |
|00004aa0| 69 6e 74 65 72 66 61 63 | 65 20 74 6f 20 74 68 65 |interfac|e to the|
|00004ab0| 6d 20 74 68 72 6f 75 67 | 68 20 74 68 65 20 73 74 |m throug|h the st|
|00004ac0| 61 6e 64 61 72 64 20 0a | 2d 2d 20 20 70 72 6f 63 |andard .|-- proc|
|00004ad0| 65 64 75 72 65 2f 66 75 | 6e 63 74 69 6f 6e 20 63 |edure/fu|nction c|
|00004ae0| 61 6c 6c 69 6e 67 20 6d | 65 63 68 61 6e 69 73 6d |alling m|echanism|
|00004af0| 2e 20 54 68 65 20 70 72 | 65 64 65 66 69 6e 65 64 |. The pr|edefined|
|00004b00| 20 70 61 63 6b 61 67 65 | 73 20 61 72 65 3a 0a 2d | package|s are:.-|
|00004b10| 2d 0a 2d 2d 20 20 20 20 | 20 20 2e 20 54 68 65 20 |-.-- | . The |
|00004b20| 53 59 53 54 45 4d 20 70 | 61 63 6b 61 67 65 2e 0a |SYSTEM p|ackage..|
|00004b30| 2d 2d 0a 2d 2d 20 20 20 | 20 20 20 2e 20 54 68 65 |--.-- | . The|
|00004b40| 20 49 4f 5f 45 58 43 45 | 50 54 49 4f 4e 53 20 70 | IO_EXCE|PTIONS p|
|00004b50| 61 63 6b 61 67 65 2e 0a | 2d 2d 0a 2d 2d 20 20 09 |ackage..|--.-- .|
|00004b60| 2e 20 54 68 65 20 67 65 | 6e 65 72 69 63 20 53 45 |. The ge|neric SE|
|00004b70| 51 55 45 4e 54 49 41 4c | 5f 49 4f 20 70 61 63 6b |QUENTIAL|_IO pack|
|00004b80| 61 67 65 2e 0a 2d 2d 0a | 2d 2d 20 20 20 20 20 20 |age..--.|-- |
|00004b90| 2e 20 54 68 65 20 67 65 | 6e 65 72 69 63 20 44 49 |. The ge|neric DI|
|00004ba0| 52 45 43 54 5f 49 4f 20 | 70 61 63 6b 61 67 65 2e |RECT_IO |package.|
|00004bb0| 0a 2d 2d 20 0a 2d 2d 20 | 20 09 2e 20 54 68 65 20 |.-- .-- | .. The |
|00004bc0| 54 45 58 54 5f 49 4f 20 | 70 61 63 6b 61 67 65 2e |TEXT_IO |package.|
|00004bd0| 20 20 0a 2d 2d 0a 2d 2d | 09 2e 20 54 68 65 20 43 | .--.--|.. The C|
|00004be0| 41 4c 45 4e 44 41 52 20 | 70 61 63 6b 61 67 65 20 |ALENDAR |package |
|00004bf0| 61 6e 64 20 74 68 65 20 | 70 72 65 64 65 66 69 6e |and the |predefin|
|00004c00| 65 64 20 73 75 62 70 72 | 6f 67 72 61 6d 73 20 0a |ed subpr|ograms .|
|00004c10| 2d 2d 09 20 20 55 4e 43 | 48 45 43 4b 45 44 5f 43 |--. UNC|HECKED_C|
|00004c20| 4f 4e 56 45 52 53 49 4f | 4e 20 61 6e 64 20 55 4e |ONVERSIO|N and UN|
|00004c30| 43 48 45 43 4b 45 44 5f | 44 45 41 4c 4c 4f 43 41 |CHECKED_|DEALLOCA|
|00004c40| 54 49 4f 4e 2e 0a 2d 2d | 0a 2d 2d 0a 70 72 61 67 |TION..--|.--.prag|
|00004c50| 6d 61 20 70 61 67 65 3b | 0a 0a 70 61 63 6b 61 67 |ma page;|..packag|
|00004c60| 65 20 53 59 53 54 45 4d | 20 69 73 0a 0a 20 20 20 |e SYSTEM| is.. |
|00004c70| 74 79 70 65 20 4e 41 4d | 45 20 20 20 20 69 73 20 |type NAM|E is |
|00004c80| 28 45 4c 58 53 49 5f 42 | 53 44 2c 20 45 4c 58 53 |(ELXSI_B|SD, ELXS|
|00004c90| 49 5f 45 4e 49 58 2c 20 | 50 43 5f 44 4f 53 2c 20 |I_ENIX, |PC_DOS, |
|00004ca0| 0a 09 09 20 20 20 20 20 | 53 55 4e 5f 55 4e 49 58 |... |SUN_UNIX|
|00004cb0| 2c 20 56 41 58 5f 55 4e | 49 58 2c 20 56 41 58 5f |, VAX_UN|IX, VAX_|
|00004cc0| 56 4d 53 2c 20 52 49 53 | 43 5f 4f 53 29 20 3b 20 |VMS, RIS|C_OS) ; |
|00004cd0| 0a 0a 20 20 20 53 59 53 | 54 45 4d 5f 4e 41 4d 45 |.. SYS|TEM_NAME|
|00004ce0| 20 20 3a 20 63 6f 6e 73 | 74 61 6e 74 20 4e 41 4d | : cons|tant NAM|
|00004cf0| 45 20 3a 3d 20 52 49 53 | 43 5f 4f 53 3b 0a 20 20 |E := RIS|C_OS;. |
|00004d00| 20 53 54 4f 52 41 47 45 | 5f 55 4e 49 54 20 3a 20 | STORAGE|_UNIT : |
|00004d10| 63 6f 6e 73 74 61 6e 74 | 20 20 20 20 20 20 3a 3d |constant| :=|
|00004d20| 20 33 32 3b 0a 20 20 20 | 4d 45 4d 4f 52 59 5f 53 | 32;. |MEMORY_S|
|00004d30| 49 5a 45 20 20 3a 20 63 | 6f 6e 73 74 61 6e 74 20 |IZE : c|onstant |
|00004d40| 20 20 20 20 20 3a 3d 20 | 32 2a 2a 31 36 20 2d 20 | := |2**16 - |
|00004d50| 31 3b 0a 0a 20 20 20 2d | 2d 20 53 79 73 74 65 6d |1;.. -|- System|
|00004d60| 20 44 65 70 65 6e 64 65 | 6e 74 20 4e 61 6d 65 64 | Depende|nt Named|
|00004d70| 20 4e 75 6d 62 65 72 73 | 3a 0a 0a 20 20 20 4d 49 | Numbers|:.. MI|
|00004d80| 4e 5f 49 4e 54 20 20 20 | 20 20 20 3a 20 63 6f 6e |N_INT | : con|
|00004d90| 73 74 61 6e 74 20 20 20 | 20 20 20 3a 3d 20 2d 32 |stant | := -2|
|00004da0| 2a 2a 33 31 3b 0a 20 20 | 20 4d 41 58 5f 49 4e 54 |**31;. | MAX_INT|
|00004db0| 20 20 20 20 20 20 3a 20 | 63 6f 6e 73 74 61 6e 74 | : |constant|
|00004dc0| 20 20 20 20 20 20 3a 3d | 20 20 32 2a 2a 33 31 2d | :=| 2**31-|
|00004dd0| 31 3b 0a 20 20 20 4d 41 | 58 5f 44 49 47 49 54 53 |1;. MA|X_DIGITS|
|00004de0| 20 20 20 3a 20 63 6f 6e | 73 74 61 6e 74 20 20 20 | : con|stant |
|00004df0| 20 20 20 3a 3d 20 36 3b | 0a 20 20 20 4d 41 58 5f | := 6;|. MAX_|
|00004e00| 4d 41 4e 54 49 53 53 41 | 20 3a 20 63 6f 6e 73 74 |MANTISSA| : const|
|00004e10| 61 6e 74 20 20 20 20 20 | 20 3a 3d 20 33 31 3b 0a |ant | := 31;.|
|00004e20| 20 20 20 46 49 4e 45 5f | 44 45 4c 54 41 20 20 20 | FINE_|DELTA |
|00004e30| 3a 20 63 6f 6e 73 74 61 | 6e 74 20 20 20 20 20 20 |: consta|nt |
|00004e40| 3a 3d 20 32 2e 30 2a 2a | 28 2d 33 30 29 3b 0a 20 |:= 2.0**|(-30);. |
|00004e50| 20 20 54 49 43 4b 20 20 | 20 20 20 20 20 20 20 3a | TICK | :|
|00004e60| 20 63 6f 6e 73 74 61 6e | 74 20 20 20 20 20 20 3a | constan|t :|
|00004e70| 3d 20 30 2e 30 31 3b 0a | 0a 20 20 20 2d 2d 20 4f |= 0.01;.|. -- O|
|00004e80| 74 68 65 72 20 53 79 73 | 74 65 6d 20 44 65 70 65 |ther Sys|tem Depe|
|00004e90| 6e 64 65 6e 74 20 44 65 | 63 6c 61 72 61 74 69 6f |ndent De|claratio|
|00004ea0| 6e 73 0a 0a 20 20 20 73 | 75 62 74 79 70 65 20 50 |ns.. s|ubtype P|
|00004eb0| 52 49 4f 52 49 54 59 20 | 69 73 20 49 4e 54 45 47 |RIORITY |is INTEG|
|00004ec0| 45 52 20 72 61 6e 67 65 | 20 31 20 2e 2e 20 34 3b |ER range| 1 .. 4;|
|00004ed0| 0a 0a 20 20 20 74 79 70 | 65 20 53 45 47 4d 45 4e |.. typ|e SEGMEN|
|00004ee0| 54 5f 54 59 50 45 20 69 | 73 20 6e 65 77 20 49 4e |T_TYPE i|s new IN|
|00004ef0| 54 45 47 45 52 20 72 61 | 6e 67 65 20 30 2e 2e 32 |TEGER ra|nge 0..2|
|00004f00| 35 35 3b 0a 20 20 20 74 | 79 70 65 20 4f 46 46 53 |55;. t|ype OFFS|
|00004f10| 45 54 5f 54 59 50 45 20 | 20 69 73 20 6e 65 77 20 |ET_TYPE | is new |
|00004f20| 49 4e 54 45 47 45 52 20 | 72 61 6e 67 65 20 30 2e |INTEGER |range 0.|
|00004f30| 2e 33 32 37 36 37 3b 0a | 2d 2d 20 20 20 74 79 70 |.32767;.|-- typ|
|00004f40| 65 20 41 44 44 52 45 53 | 53 20 69 73 20 72 65 63 |e ADDRES|S is rec|
|00004f50| 6f 72 64 0a 2d 2d 20 20 | 20 20 20 20 20 20 53 45 |ord.-- | SE|
|00004f60| 47 4d 45 4e 54 20 3a 20 | 53 45 47 4d 45 4e 54 5f |GMENT : |SEGMENT_|
|00004f70| 54 59 50 45 20 3a 3d 20 | 53 45 47 4d 45 4e 54 5f |TYPE := |SEGMENT_|
|00004f80| 54 59 50 45 27 4c 41 53 | 54 3b 0a 2d 2d 20 20 20 |TYPE'LAS|T;.-- |
|00004f90| 20 20 20 20 20 4f 46 46 | 53 45 54 20 20 3a 20 4f | OFF|SET : O|
|00004fa0| 46 46 53 45 54 5f 54 59 | 50 45 20 20 3a 3d 20 4f |FFSET_TY|PE := O|
|00004fb0| 46 46 53 45 54 5f 54 59 | 50 45 27 4c 41 53 54 3b |FFSET_TY|PE'LAST;|
|00004fc0| 0a 2d 2d 20 20 20 65 6e | 64 20 72 65 63 6f 72 64 |.-- en|d record|
|00004fd0| 3b 0a 20 20 20 74 79 70 | 65 20 44 4f 4e 54 45 56 |;. typ|e DONTEV|
|00004fe0| 45 52 54 52 59 54 4f 55 | 53 45 54 48 49 53 54 59 |ERTRYTOU|SETHISTY|
|00004ff0| 50 45 20 69 73 20 6c 69 | 6d 69 74 65 64 20 70 72 |PE is li|mited pr|
|00005000| 69 76 61 74 65 3b 0a 20 | 20 20 74 79 70 65 20 41 |ivate;. | type A|
|00005010| 44 44 52 45 53 53 20 69 | 73 20 61 63 63 65 73 73 |DDRESS i|s access|
|00005020| 20 44 4f 4e 54 45 56 45 | 52 54 52 59 54 4f 55 53 | DONTEVE|RTRYTOUS|
|00005030| 45 54 48 49 53 54 59 50 | 45 3b 0a 0a 20 20 20 53 |ETHISTYP|E;.. S|
|00005040| 59 53 54 45 4d 5f 45 52 | 52 4f 52 20 3a 20 65 78 |YSTEM_ER|ROR : ex|
|00005050| 63 65 70 74 69 6f 6e 3b | 0a 0a 70 72 69 76 61 74 |ception;|..privat|
|00005060| 65 0a 0a 20 20 20 74 79 | 70 65 20 44 4f 4e 54 45 |e.. ty|pe DONTE|
|00005070| 56 45 52 54 52 59 54 4f | 55 53 45 54 48 49 53 54 |VERTRYTO|USETHIST|
|00005080| 59 50 45 20 69 73 20 6e | 65 77 20 49 4e 54 45 47 |YPE is n|ew INTEG|
|00005090| 45 52 3b 0a 0a 65 6e 64 | 20 53 59 53 54 45 4d 3b |ER;..end| SYSTEM;|
|000050a0| 0a 0a 70 61 63 6b 61 67 | 65 20 49 4f 5f 45 58 43 |..packag|e IO_EXC|
|000050b0| 45 50 54 49 4f 4e 53 20 | 69 73 0a 0a 20 20 20 53 |EPTIONS |is.. S|
|000050c0| 54 41 54 55 53 5f 45 52 | 52 4f 52 20 3a 20 65 78 |TATUS_ER|ROR : ex|
|000050d0| 63 65 70 74 69 6f 6e 3b | 0a 20 20 20 4d 4f 44 45 |ception;|. MODE|
|000050e0| 5f 45 52 52 4f 52 20 20 | 20 3a 20 65 78 63 65 70 |_ERROR | : excep|
|000050f0| 74 69 6f 6e 3b 0a 20 20 | 20 4e 41 4d 45 5f 45 52 |tion;. | NAME_ER|
|00005100| 52 4f 52 20 20 20 3a 20 | 65 78 63 65 70 74 69 6f |ROR : |exceptio|
|00005110| 6e 3b 0a 20 20 20 55 53 | 45 5f 45 52 52 4f 52 20 |n;. US|E_ERROR |
|00005120| 20 20 20 3a 20 65 78 63 | 65 70 74 69 6f 6e 3b 0a | : exc|eption;.|
|00005130| 20 20 20 44 45 56 49 43 | 45 5f 45 52 52 4f 52 20 | DEVIC|E_ERROR |
|00005140| 3a 20 65 78 63 65 70 74 | 69 6f 6e 3b 0a 20 20 20 |: except|ion;. |
|00005150| 45 4e 44 5f 45 52 52 4f | 52 20 20 20 20 3a 20 65 |END_ERRO|R : e|
|00005160| 78 63 65 70 74 69 6f 6e | 3b 0a 20 20 20 44 41 54 |xception|;. DAT|
|00005170| 41 5f 45 52 52 4f 52 20 | 20 20 3a 20 65 78 63 65 |A_ERROR | : exce|
|00005180| 70 74 69 6f 6e 3b 0a 20 | 20 20 4c 41 59 4f 55 54 |ption;. | LAYOUT|
|00005190| 5f 45 52 52 4f 52 20 3a | 20 65 78 63 65 70 74 69 |_ERROR :| excepti|
|000051a0| 6f 6e 3b 0a 0a 65 6e 64 | 20 49 4f 5f 45 58 43 45 |on;..end| IO_EXCE|
|000051b0| 50 54 49 4f 4e 53 3b 0a | 0a 70 72 61 67 6d 61 20 |PTIONS;.|.pragma |
|000051c0| 70 61 67 65 3b 0a 77 69 | 74 68 20 49 4f 5f 45 58 |page;.wi|th IO_EX|
|000051d0| 43 45 50 54 49 4f 4e 53 | 3b 0a 67 65 6e 65 72 69 |CEPTIONS|;.generi|
|000051e0| 63 0a 20 20 20 20 74 79 | 70 65 20 45 4c 45 4d 45 |c. ty|pe ELEME|
|000051f0| 4e 54 5f 54 59 50 45 20 | 69 73 20 70 72 69 76 61 |NT_TYPE |is priva|
|00005200| 74 65 3b 0a 0a 70 61 63 | 6b 61 67 65 20 53 45 51 |te;..pac|kage SEQ|
|00005210| 55 45 4e 54 49 41 4c 5f | 49 4f 20 69 73 0a 0a 20 |UENTIAL_|IO is.. |
|00005220| 20 20 20 74 79 70 65 20 | 46 49 4c 45 5f 54 59 50 | type |FILE_TYP|
|00005230| 45 20 69 73 20 6c 69 6d | 69 74 65 64 20 70 72 69 |E is lim|ited pri|
|00005240| 76 61 74 65 3b 0a 20 20 | 20 20 0a 20 20 20 20 74 |vate;. | . t|
|00005250| 79 70 65 20 46 49 4c 45 | 5f 4d 4f 44 45 20 69 73 |ype FILE|_MODE is|
|00005260| 20 28 49 4e 5f 46 49 4c | 45 2c 20 4f 55 54 5f 46 | (IN_FIL|E, OUT_F|
|00005270| 49 4c 45 29 3b 0a 20 20 | 20 20 20 20 0a 0a 20 20 |ILE);. | .. |
|00005280| 20 20 2d 2d 20 46 69 6c | 65 20 6d 61 6e 61 67 65 | -- Fil|e manage|
|00005290| 6d 65 6e 74 0a 0a 0a 20 | 20 20 20 70 72 6f 63 65 |ment... | proce|
|000052a0| 64 75 72 65 20 43 52 45 | 41 54 45 20 20 20 28 46 |dure CRE|ATE (F|
|000052b0| 49 4c 45 20 3a 20 69 6e | 20 6f 75 74 20 46 49 4c |ILE : in| out FIL|
|000052c0| 45 5f 54 59 50 45 3b 0a | 20 20 20 20 20 20 20 20 |E_TYPE;.| |
|000052d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000052e0| 4d 4f 44 45 20 3a 20 69 | 6e 20 46 49 4c 45 5f 4d |MODE : i|n FILE_M|
|000052f0| 4f 44 45 20 3a 3d 20 4f | 55 54 5f 46 49 4c 45 3b |ODE := O|UT_FILE;|
|00005300| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00005310| 20 20 20 20 20 20 20 20 | 20 4e 41 4d 45 20 3a 20 | | NAME : |
|00005320| 69 6e 20 53 54 52 49 4e | 47 20 20 20 20 3a 3d 20 |in STRIN|G := |
|00005330| 22 22 3b 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |"";. | |
|00005340| 20 20 20 20 20 20 20 20 | 20 20 20 20 46 4f 52 4d | | FORM|
|00005350| 20 3a 20 69 6e 20 53 54 | 52 49 4e 47 20 20 20 20 | : in ST|RING |
|00005360| 3a 3d 20 22 22 29 3b 0a | 20 20 20 20 70 72 61 67 |:= "");.| prag|
|00005370| 6d 61 20 49 4f 5f 69 6e | 74 65 72 66 61 63 65 28 |ma IO_in|terface(|
|00005380| 43 52 45 41 54 45 2c 53 | 49 4f 5f 43 52 45 41 54 |CREATE,S|IO_CREAT|
|00005390| 45 2c 45 4c 45 4d 45 4e | 54 5f 54 59 50 45 29 3b |E,ELEMEN|T_TYPE);|
|000053a0| 0a 0a 20 20 20 20 70 72 | 6f 63 65 64 75 72 65 20 |.. pr|ocedure |
|000053b0| 4f 50 45 4e 20 20 20 20 | 20 28 46 49 4c 45 20 3a |OPEN | (FILE :|
|000053c0| 20 69 6e 20 6f 75 74 20 | 46 49 4c 45 5f 54 59 50 | in out |FILE_TYP|
|000053d0| 45 3b 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |E;. | |
|000053e0| 20 20 20 20 20 20 20 20 | 20 20 20 4d 4f 44 45 20 | | MODE |
|000053f0| 3a 20 69 6e 20 46 49 4c | 45 5f 4d 4f 44 45 3b 0a |: in FIL|E_MODE;.|
|00005400| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005410| 20 20 20 20 20 20 20 20 | 4e 41 4d 45 20 3a 20 69 | |NAME : i|
|00005420| 6e 20 53 54 52 49 4e 47 | 3b 0a 20 20 20 20 20 20 |n STRING|;. |
|00005430| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005440| 20 20 46 4f 52 4d 20 3a | 20 69 6e 20 53 54 52 49 | FORM :| in STRI|
|00005450| 4e 47 20 3a 3d 20 22 22 | 29 3b 0a 20 20 20 20 70 |NG := ""|);. p|
|00005460| 72 61 67 6d 61 20 49 4f | 5f 69 6e 74 65 72 66 61 |ragma IO|_interfa|
|00005470| 63 65 28 4f 50 45 4e 2c | 53 49 4f 5f 4f 50 45 4e |ce(OPEN,|SIO_OPEN|
|00005480| 2c 45 4c 45 4d 45 4e 54 | 5f 54 59 50 45 29 3b 0a |,ELEMENT|_TYPE);.|
|00005490| 0a 20 20 20 20 70 72 6f | 63 65 64 75 72 65 20 43 |. pro|cedure C|
|000054a0| 4c 4f 53 45 20 20 20 20 | 28 46 49 4c 45 20 3a 20 |LOSE |(FILE : |
|000054b0| 69 6e 20 6f 75 74 20 46 | 49 4c 45 5f 54 59 50 45 |in out F|ILE_TYPE|
|000054c0| 29 3b 0a 20 20 20 20 70 | 72 61 67 6d 61 20 49 4f |);. p|ragma IO|
|000054d0| 5f 69 6e 74 65 72 66 61 | 63 65 28 43 4c 4f 53 45 |_interfa|ce(CLOSE|
|000054e0| 2c 53 49 4f 5f 43 4c 4f | 53 45 29 3b 0a 0a 20 20 |,SIO_CLO|SE);.. |
|000054f0| 20 20 70 72 6f 63 65 64 | 75 72 65 20 44 45 4c 45 | proced|ure DELE|
|00005500| 54 45 20 20 20 28 46 49 | 4c 45 20 3a 20 69 6e 20 |TE (FI|LE : in |
|00005510| 6f 75 74 20 46 49 4c 45 | 5f 54 59 50 45 29 3b 0a |out FILE|_TYPE);.|
|00005520| 20 20 20 20 70 72 61 67 | 6d 61 20 49 4f 5f 69 6e | prag|ma IO_in|
|00005530| 74 65 72 66 61 63 65 28 | 44 45 4c 45 54 45 2c 53 |terface(|DELETE,S|
|00005540| 49 4f 5f 44 45 4c 45 54 | 45 29 3b 0a 0a 20 20 20 |IO_DELET|E);.. |
|00005550| 20 70 72 6f 63 65 64 75 | 72 65 20 52 45 53 45 54 | procedu|re RESET|
|00005560| 20 20 20 20 28 46 49 4c | 45 20 3a 20 69 6e 20 6f | (FIL|E : in o|
|00005570| 75 74 20 46 49 4c 45 5f | 54 59 50 45 3b 20 4d 4f |ut FILE_|TYPE; MO|
|00005580| 44 45 20 3a 20 69 6e 20 | 20 46 49 4c 45 5f 4d 4f |DE : in | FILE_MO|
|00005590| 44 45 29 3b 0a 20 20 20 | 20 70 72 61 67 6d 61 20 |DE);. | pragma |
|000055a0| 49 4f 5f 69 6e 74 65 72 | 66 61 63 65 28 52 45 53 |IO_inter|face(RES|
|000055b0| 45 54 2c 53 49 4f 5f 52 | 45 53 45 54 5f 4d 4f 44 |ET,SIO_R|ESET_MOD|
|000055c0| 45 2c 45 4c 45 4d 45 4e | 54 5f 54 59 50 45 29 3b |E,ELEMEN|T_TYPE);|
|000055d0| 0a 20 20 20 20 70 72 6f | 63 65 64 75 72 65 20 52 |. pro|cedure R|
|000055e0| 45 53 45 54 20 20 20 20 | 28 46 49 4c 45 20 3a 20 |ESET |(FILE : |
|000055f0| 69 6e 20 6f 75 74 20 46 | 49 4c 45 5f 54 59 50 45 |in out F|ILE_TYPE|
|00005600| 29 3b 0a 20 20 20 20 70 | 72 61 67 6d 61 20 49 4f |);. p|ragma IO|
|00005610| 5f 69 6e 74 65 72 66 61 | 63 65 28 52 45 53 45 54 |_interfa|ce(RESET|
|00005620| 2c 53 49 4f 5f 52 45 53 | 45 54 2c 45 4c 45 4d 45 |,SIO_RES|ET,ELEME|
|00005630| 4e 54 5f 54 59 50 45 29 | 3b 0a 0a 20 20 20 20 66 |NT_TYPE)|;.. f|
|00005640| 75 6e 63 74 69 6f 6e 20 | 20 4d 4f 44 45 20 20 20 |unction | MODE |
|00005650| 20 20 28 46 49 4c 45 20 | 3a 20 69 6e 20 46 49 4c | (FILE |: in FIL|
|00005660| 45 5f 54 59 50 45 29 20 | 20 72 65 74 75 72 6e 20 |E_TYPE) | return |
|00005670| 46 49 4c 45 5f 4d 4f 44 | 45 3b 0a 20 20 20 20 70 |FILE_MOD|E;. p|
|00005680| 72 61 67 6d 61 20 49 4f | 5f 69 6e 74 65 72 66 61 |ragma IO|_interfa|
|00005690| 63 65 28 4d 4f 44 45 2c | 53 49 4f 5f 4d 4f 44 45 |ce(MODE,|SIO_MODE|
|000056a0| 29 3b 0a 0a 20 20 20 20 | 66 75 6e 63 74 69 6f 6e |);.. |function|
|000056b0| 20 20 4e 41 4d 45 20 20 | 20 20 20 28 46 49 4c 45 | NAME | (FILE|
|000056c0| 20 3a 20 69 6e 20 46 49 | 4c 45 5f 54 59 50 45 29 | : in FI|LE_TYPE)|
|000056d0| 20 20 72 65 74 75 72 6e | 20 53 54 52 49 4e 47 3b | return| STRING;|
|000056e0| 0a 20 20 20 20 70 72 61 | 67 6d 61 20 49 4f 5f 69 |. pra|gma IO_i|
|000056f0| 6e 74 65 72 66 61 63 65 | 28 4e 41 4d 45 2c 53 49 |nterface|(NAME,SI|
|00005700| 4f 5f 4e 41 4d 45 29 3b | 0a 0a 20 20 20 20 66 75 |O_NAME);|.. fu|
|00005710| 6e 63 74 69 6f 6e 20 20 | 46 4f 52 4d 20 20 20 20 |nction |FORM |
|00005720| 20 28 46 49 4c 45 20 3a | 20 69 6e 20 46 49 4c 45 | (FILE :| in FILE|
|00005730| 5f 54 59 50 45 29 20 20 | 72 65 74 75 72 6e 20 53 |_TYPE) |return S|
|00005740| 54 52 49 4e 47 3b 0a 20 | 20 20 20 70 72 61 67 6d |TRING;. | pragm|
|00005750| 61 20 49 4f 5f 69 6e 74 | 65 72 66 61 63 65 28 46 |a IO_int|erface(F|
|00005760| 4f 52 4d 2c 53 49 4f 5f | 46 4f 52 4d 29 3b 0a 20 |ORM,SIO_|FORM);. |
|00005770| 20 20 20 0a 20 20 20 20 | 66 75 6e 63 74 69 6f 6e | . |function|
|00005780| 20 20 49 53 5f 4f 50 45 | 4e 20 20 28 46 49 4c 45 | IS_OPE|N (FILE|
|00005790| 20 3a 20 69 6e 20 46 49 | 4c 45 5f 54 59 50 45 29 | : in FI|LE_TYPE)|
|000057a0| 20 20 72 65 74 75 72 6e | 20 42 4f 4f 4c 45 41 4e | return| BOOLEAN|
|000057b0| 3b 0a 20 20 20 20 70 72 | 61 67 6d 61 20 49 4f 5f |;. pr|agma IO_|
|000057c0| 69 6e 74 65 72 66 61 63 | 65 28 49 53 5f 4f 50 45 |interfac|e(IS_OPE|
|000057d0| 4e 2c 53 49 4f 5f 49 53 | 5f 4f 50 45 4e 29 3b 0a |N,SIO_IS|_OPEN);.|
|000057e0| 0a 20 20 20 20 2d 2d 20 | 49 6e 70 75 74 20 61 6e |. -- |Input an|
|000057f0| 64 20 4f 75 74 70 75 74 | 20 4f 70 65 72 61 74 69 |d Output| Operati|
|00005800| 6f 6e 73 3a 0a 0a 20 20 | 20 20 70 72 6f 63 65 64 |ons:.. | proced|
|00005810| 75 72 65 20 52 45 41 44 | 20 20 20 28 46 49 4c 45 |ure READ| (FILE|
|00005820| 20 3a 20 69 6e 20 46 49 | 4c 45 5f 54 59 50 45 3b | : in FI|LE_TYPE;|
|00005830| 20 49 54 45 4d 20 3a 20 | 6f 75 74 20 45 4c 45 4d | ITEM : |out ELEM|
|00005840| 45 4e 54 5f 54 59 50 45 | 29 3b 0a 20 20 20 20 70 |ENT_TYPE|);. p|
|00005850| 72 61 67 6d 61 20 49 4f | 5f 69 6e 74 65 72 66 61 |ragma IO|_interfa|
|00005860| 63 65 28 52 45 41 44 2c | 53 49 4f 5f 52 45 41 44 |ce(READ,|SIO_READ|
|00005870| 2c 45 4c 45 4d 45 4e 54 | 5f 54 59 50 45 29 3b 0a |,ELEMENT|_TYPE);.|
|00005880| 0a 20 20 20 20 70 72 6f | 63 65 64 75 72 65 20 57 |. pro|cedure W|
|00005890| 52 49 54 45 20 20 28 46 | 49 4c 45 20 3a 20 69 6e |RITE (F|ILE : in|
|000058a0| 20 46 49 4c 45 5f 54 59 | 50 45 3b 20 49 54 45 4d | FILE_TY|PE; ITEM|
|000058b0| 20 3a 20 69 6e 20 45 4c | 45 4d 45 4e 54 5f 54 59 | : in EL|EMENT_TY|
|000058c0| 50 45 29 3b 0a 20 20 20 | 20 70 72 61 67 6d 61 20 |PE);. | pragma |
|000058d0| 49 4f 5f 69 6e 74 65 72 | 66 61 63 65 28 57 52 49 |IO_inter|face(WRI|
|000058e0| 54 45 2c 53 49 4f 5f 57 | 52 49 54 45 2c 45 4c 45 |TE,SIO_W|RITE,ELE|
|000058f0| 4d 45 4e 54 5f 54 59 50 | 45 29 3b 0a 0a 20 20 20 |MENT_TYP|E);.. |
|00005900| 20 66 75 6e 63 74 69 6f | 6e 20 20 45 4e 44 5f 4f | functio|n END_O|
|00005910| 46 5f 46 49 4c 45 28 46 | 49 4c 45 20 3a 20 69 6e |F_FILE(F|ILE : in|
|00005920| 20 46 49 4c 45 5f 54 59 | 50 45 29 20 72 65 74 75 | FILE_TY|PE) retu|
|00005930| 72 6e 20 42 4f 4f 4c 45 | 41 4e 3b 0a 20 20 20 20 |rn BOOLE|AN;. |
|00005940| 70 72 61 67 6d 61 20 49 | 4f 5f 69 6e 74 65 72 66 |pragma I|O_interf|
|00005950| 61 63 65 28 45 4e 44 5f | 4f 46 5f 46 49 4c 45 2c |ace(END_|OF_FILE,|
|00005960| 53 49 4f 5f 45 4e 44 5f | 4f 46 5f 46 49 4c 45 29 |SIO_END_|OF_FILE)|
|00005970| 3b 0a 0a 20 20 20 20 2d | 2d 20 45 78 63 65 70 74 |;.. -|- Except|
|00005980| 69 6f 6e 73 3a 0a 0a 20 | 20 20 20 53 54 41 54 55 |ions:.. | STATU|
|00005990| 53 5f 45 52 52 4f 52 20 | 3a 20 65 78 63 65 70 74 |S_ERROR |: except|
|000059a0| 69 6f 6e 20 72 65 6e 61 | 6d 65 73 20 49 4f 5f 45 |ion rena|mes IO_E|
|000059b0| 58 43 45 50 54 49 4f 4e | 53 2e 53 54 41 54 55 53 |XCEPTION|S.STATUS|
|000059c0| 5f 45 52 52 4f 52 3b 0a | 20 20 20 20 4d 4f 44 45 |_ERROR;.| MODE|
|000059d0| 5f 45 52 52 4f 52 20 20 | 20 3a 20 65 78 63 65 70 |_ERROR | : excep|
|000059e0| 74 69 6f 6e 20 72 65 6e | 61 6d 65 73 20 49 4f 5f |tion ren|ames IO_|
|000059f0| 45 58 43 45 50 54 49 4f | 4e 53 2e 4d 4f 44 45 5f |EXCEPTIO|NS.MODE_|
|00005a00| 45 52 52 4f 52 3b 0a 20 | 20 20 20 4e 41 4d 45 5f |ERROR;. | NAME_|
|00005a10| 45 52 52 4f 52 09 20 3a | 20 65 78 63 65 70 74 69 |ERROR. :| excepti|
|00005a20| 6f 6e 20 72 65 6e 61 6d | 65 73 20 49 4f 5f 45 58 |on renam|es IO_EX|
|00005a30| 43 45 50 54 49 4f 4e 53 | 2e 4e 41 4d 45 5f 45 52 |CEPTIONS|.NAME_ER|
|00005a40| 52 4f 52 3b 0a 20 20 20 | 20 55 53 45 5f 45 52 52 |ROR;. | USE_ERR|
|00005a50| 4f 52 09 20 3a 20 65 78 | 63 65 70 74 69 6f 6e 20 |OR. : ex|ception |
|00005a60| 72 65 6e 61 6d 65 73 20 | 49 4f 5f 45 58 43 45 50 |renames |IO_EXCEP|
|00005a70| 54 49 4f 4e 53 2e 55 53 | 45 5f 45 52 52 4f 52 3b |TIONS.US|E_ERROR;|
|00005a80| 0a 20 20 20 20 44 45 56 | 49 43 45 5f 45 52 52 4f |. DEV|ICE_ERRO|
|00005a90| 52 20 3a 20 65 78 63 65 | 70 74 69 6f 6e 20 72 65 |R : exce|ption re|
|00005aa0| 6e 61 6d 65 73 20 49 4f | 5f 45 58 43 45 50 54 49 |names IO|_EXCEPTI|
|00005ab0| 4f 4e 53 2e 44 45 56 49 | 43 45 5f 45 52 52 4f 52 |ONS.DEVI|CE_ERROR|
|00005ac0| 3b 0a 20 20 20 20 45 4e | 44 5f 45 52 52 4f 52 09 |;. EN|D_ERROR.|
|00005ad0| 20 3a 20 65 78 63 65 70 | 74 69 6f 6e 20 72 65 6e | : excep|tion ren|
|00005ae0| 61 6d 65 73 20 49 4f 5f | 45 58 43 45 50 54 49 4f |ames IO_|EXCEPTIO|
|00005af0| 4e 53 2e 45 4e 44 5f 45 | 52 52 4f 52 3b 0a 20 20 |NS.END_E|RROR;. |
|00005b00| 20 20 44 41 54 41 5f 45 | 52 52 4f 52 09 20 3a 20 | DATA_E|RROR. : |
|00005b10| 65 78 63 65 70 74 69 6f | 6e 20 72 65 6e 61 6d 65 |exceptio|n rename|
|00005b20| 73 20 49 4f 5f 45 58 43 | 45 50 54 49 4f 4e 53 2e |s IO_EXC|EPTIONS.|
|00005b30| 44 41 54 41 5f 45 52 52 | 4f 52 3b 0a 0a 70 72 69 |DATA_ERR|OR;..pri|
|00005b40| 76 61 74 65 0a 0a 20 20 | 20 20 55 4e 49 4e 49 54 |vate.. | UNINIT|
|00005b50| 49 41 4c 49 5a 45 44 3a | 20 63 6f 6e 73 74 61 6e |IALIZED:| constan|
|00005b60| 74 20 3a 3d 20 30 3b 0a | 20 20 20 20 74 79 70 65 |t := 0;.| type|
|00005b70| 20 46 49 4c 45 5f 54 59 | 50 45 20 69 73 20 72 65 | FILE_TY|PE is re|
|00005b80| 63 6f 72 64 0a 20 20 20 | 20 20 20 20 20 20 20 20 |cord. | |
|00005b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 46 49 | | FI|
|00005ba0| 4c 45 4e 55 4d 3a 20 49 | 4e 54 45 47 45 52 20 3a |LENUM: I|NTEGER :|
|00005bb0| 3d 20 55 4e 49 4e 49 54 | 49 41 4c 49 5a 45 44 3b |= UNINIT|IALIZED;|
|00005bc0| 20 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | . | |
|00005bd0| 20 20 20 20 20 20 20 20 | 65 6e 64 20 72 65 63 6f | |end reco|
|00005be0| 72 64 3b 0a 0a 65 6e 64 | 20 53 45 51 55 45 4e 54 |rd;..end| SEQUENT|
|00005bf0| 49 41 4c 5f 49 4f 3b 0a | 0a 70 61 63 6b 61 67 65 |IAL_IO;.|.package|
|00005c00| 20 62 6f 64 79 20 53 45 | 51 55 45 4e 54 49 41 4c | body SE|QUENTIAL|
|00005c10| 5f 49 4f 20 69 73 0a 65 | 6e 64 20 53 45 51 55 45 |_IO is.e|nd SEQUE|
|00005c20| 4e 54 49 41 4c 5f 49 4f | 3b 0a 0a 70 72 61 67 6d |NTIAL_IO|;..pragm|
|00005c30| 61 20 70 61 67 65 3b 0a | 77 69 74 68 20 49 4f 5f |a page;.|with IO_|
|00005c40| 45 58 43 45 50 54 49 4f | 4e 53 3b 0a 67 65 6e 65 |EXCEPTIO|NS;.gene|
|00005c50| 72 69 63 0a 20 20 20 20 | 74 79 70 65 20 45 4c 45 |ric. |type ELE|
|00005c60| 4d 45 4e 54 5f 54 59 50 | 45 20 69 73 20 70 72 69 |MENT_TYP|E is pri|
|00005c70| 76 61 74 65 3b 0a 0a 70 | 61 63 6b 61 67 65 20 44 |vate;..p|ackage D|
|00005c80| 49 52 45 43 54 5f 49 4f | 20 69 73 0a 0a 20 20 20 |IRECT_IO| is.. |
|00005c90| 20 74 79 70 65 20 20 46 | 49 4c 45 5f 54 59 50 45 | type F|ILE_TYPE|
|00005ca0| 20 20 69 73 20 6c 69 6d | 69 74 65 64 20 70 72 69 | is lim|ited pri|
|00005cb0| 76 61 74 65 3b 0a 0a 20 | 20 20 20 74 79 70 65 20 |vate;.. | type |
|00005cc0| 20 20 20 46 49 4c 45 5f | 4d 4f 44 45 20 20 20 20 | FILE_|MODE |
|00005cd0| 20 20 20 69 73 20 28 49 | 4e 5f 46 49 4c 45 2c 20 | is (I|N_FILE, |
|00005ce0| 49 4e 4f 55 54 5f 46 49 | 4c 45 2c 20 4f 55 54 5f |INOUT_FI|LE, OUT_|
|00005cf0| 46 49 4c 45 29 3b 0a 20 | 20 20 20 74 79 70 65 20 |FILE);. | type |
|00005d00| 20 20 20 43 4f 55 4e 54 | 20 20 20 20 20 20 20 20 | COUNT| |
|00005d10| 20 20 20 69 73 20 72 61 | 6e 67 65 20 30 20 2e 2e | is ra|nge 0 ..|
|00005d20| 20 49 4e 54 45 47 45 52 | 27 4c 41 53 54 3b 0a 20 | INTEGER|'LAST;. |
|00005d30| 20 20 20 73 75 62 74 79 | 70 65 20 50 4f 53 49 54 | subty|pe POSIT|
|00005d40| 49 56 45 5f 43 4f 55 4e | 54 20 20 69 73 20 43 4f |IVE_COUN|T is CO|
|00005d50| 55 4e 54 20 72 61 6e 67 | 65 20 31 20 2e 2e 20 43 |UNT rang|e 1 .. C|
|00005d60| 4f 55 4e 54 27 4c 41 53 | 54 3b 20 20 20 20 0a 20 |OUNT'LAS|T; . |
|00005d70| 20 20 20 20 20 0a 0a 20 | 20 20 20 2d 2d 20 46 69 | .. | -- Fi|
|00005d80| 6c 65 20 6d 61 6e 61 67 | 65 6d 65 6e 74 0a 0a 0a |le manag|ement...|
|00005d90| 20 20 20 20 70 72 6f 63 | 65 64 75 72 65 20 43 52 | proc|edure CR|
|00005da0| 45 41 54 45 20 20 20 28 | 46 49 4c 45 20 3a 20 69 |EATE (|FILE : i|
|00005db0| 6e 20 6f 75 74 20 46 49 | 4c 45 5f 54 59 50 45 3b |n out FI|LE_TYPE;|
|00005dc0| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. | |
|00005dd0| 20 20 20 20 20 20 20 20 | 20 4d 4f 44 45 20 3a 20 | | MODE : |
|00005de0| 69 6e 20 46 49 4c 45 5f | 4d 4f 44 45 20 3a 3d 20 |in FILE_|MODE := |
|00005df0| 49 4e 4f 55 54 5f 46 49 | 4c 45 3b 0a 20 20 20 20 |INOUT_FI|LE;. |
|00005e00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005e10| 20 20 20 20 4e 41 4d 45 | 20 3a 20 69 6e 20 53 54 | NAME| : in ST|
|00005e20| 52 49 4e 47 20 3a 3d 20 | 22 22 3b 0a 20 20 20 20 |RING := |"";. |
|00005e30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005e40| 20 20 20 20 46 4f 52 4d | 20 3a 20 69 6e 20 53 54 | FORM| : in ST|
|00005e50| 52 49 4e 47 20 3a 3d 20 | 22 22 29 3b 0a 20 20 20 |RING := |"");. |
|00005e60| 20 70 72 61 67 6d 61 20 | 49 4f 5f 69 6e 74 65 72 | pragma |IO_inter|
|00005e70| 66 61 63 65 28 43 52 45 | 41 54 45 2c 44 49 4f 5f |face(CRE|ATE,DIO_|
|00005e80| 43 52 45 41 54 45 2c 45 | 4c 45 4d 45 4e 54 5f 54 |CREATE,E|LEMENT_T|
|00005e90| 59 50 45 29 3b 0a 0a 20 | 20 20 20 70 72 6f 63 65 |YPE);.. | proce|
|00005ea0| 64 75 72 65 20 4f 50 45 | 4e 20 20 20 20 20 28 46 |dure OPE|N (F|
|00005eb0| 49 4c 45 20 3a 20 69 6e | 20 6f 75 74 20 46 49 4c |ILE : in| out FIL|
|00005ec0| 45 5f 54 59 50 45 3b 0a | 20 20 20 20 20 20 20 20 |E_TYPE;.| |
|00005ed0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005ee0| 4d 4f 44 45 20 3a 20 69 | 6e 20 46 49 4c 45 5f 4d |MODE : i|n FILE_M|
|00005ef0| 4f 44 45 3b 0a 20 20 20 | 20 20 20 20 20 20 20 20 |ODE;. | |
|00005f00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 4e 41 4d | | NAM|
|00005f10| 45 20 3a 20 69 6e 20 53 | 54 52 49 4e 47 3b 0a 20 |E : in S|TRING;. |
|00005f20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005f30| 20 20 20 20 20 20 20 46 | 4f 52 4d 20 3a 20 69 6e | F|ORM : in|
|00005f40| 20 53 54 52 49 4e 47 20 | 3a 3d 20 22 22 29 3b 0a | STRING |:= "");.|
|00005f50| 20 20 20 20 70 72 61 67 | 6d 61 20 49 4f 5f 69 6e | prag|ma IO_in|
|00005f60| 74 65 72 66 61 63 65 28 | 4f 50 45 4e 2c 44 49 4f |terface(|OPEN,DIO|
|00005f70| 5f 4f 50 45 4e 2c 45 4c | 45 4d 45 4e 54 5f 54 59 |_OPEN,EL|EMENT_TY|
|00005f80| 50 45 29 3b 0a 0a 20 20 | 20 20 70 72 6f 63 65 64 |PE);.. | proced|
|00005f90| 75 72 65 20 43 4c 4f 53 | 45 20 20 20 20 28 46 49 |ure CLOS|E (FI|
|00005fa0| 4c 45 20 3a 20 69 6e 20 | 6f 75 74 20 46 49 4c 45 |LE : in |out FILE|
|00005fb0| 5f 54 59 50 45 29 3b 0a | 20 20 20 20 70 72 61 67 |_TYPE);.| prag|
|00005fc0| 6d 61 20 49 4f 5f 69 6e | 74 65 72 66 61 63 65 28 |ma IO_in|terface(|
|00005fd0| 43 4c 4f 53 45 2c 44 49 | 4f 5f 43 4c 4f 53 45 29 |CLOSE,DI|O_CLOSE)|
|00005fe0| 3b 0a 0a 20 20 20 20 70 | 72 6f 63 65 64 75 72 65 |;.. p|rocedure|
|00005ff0| 20 44 45 4c 45 54 45 20 | 20 20 28 46 49 4c 45 20 | DELETE | (FILE |
|00006000| 3a 20 69 6e 20 6f 75 74 | 20 46 49 4c 45 5f 54 59 |: in out| FILE_TY|
|00006010| 50 45 29 3b 0a 20 20 20 | 20 70 72 61 67 6d 61 20 |PE);. | pragma |
|00006020| 49 4f 5f 69 6e 74 65 72 | 66 61 63 65 28 44 45 4c |IO_inter|face(DEL|
|00006030| 45 54 45 2c 44 49 4f 5f | 44 45 4c 45 54 45 29 3b |ETE,DIO_|DELETE);|
|00006040| 0a 0a 20 20 20 20 70 72 | 6f 63 65 64 75 72 65 20 |.. pr|ocedure |
|00006050| 52 45 53 45 54 20 20 20 | 20 28 46 49 4c 45 20 3a |RESET | (FILE :|
|00006060| 20 69 6e 20 6f 75 74 20 | 46 49 4c 45 5f 54 59 50 | in out |FILE_TYP|
|00006070| 45 3b 20 4d 4f 44 45 20 | 3a 20 69 6e 20 20 46 49 |E; MODE |: in FI|
|00006080| 4c 45 5f 4d 4f 44 45 29 | 3b 0a 20 20 20 20 70 72 |LE_MODE)|;. pr|
|00006090| 61 67 6d 61 20 49 4f 5f | 69 6e 74 65 72 66 61 63 |agma IO_|interfac|
|000060a0| 65 28 52 45 53 45 54 2c | 44 49 4f 5f 52 45 53 45 |e(RESET,|DIO_RESE|
|000060b0| 54 5f 4d 4f 44 45 2c 45 | 4c 45 4d 45 4e 54 5f 54 |T_MODE,E|LEMENT_T|
|000060c0| 59 50 45 29 3b 0a 20 20 | 20 20 70 72 6f 63 65 64 |YPE);. | proced|
|000060d0| 75 72 65 20 52 45 53 45 | 54 20 20 20 20 28 46 49 |ure RESE|T (FI|
|000060e0| 4c 45 20 3a 20 69 6e 20 | 6f 75 74 20 46 49 4c 45 |LE : in |out FILE|
|000060f0| 5f 54 59 50 45 29 3b 0a | 20 20 20 20 70 72 61 67 |_TYPE);.| prag|
|00006100| 6d 61 20 49 4f 5f 69 6e | 74 65 72 66 61 63 65 28 |ma IO_in|terface(|
|00006110| 52 45 53 45 54 2c 44 49 | 4f 5f 52 45 53 45 54 2c |RESET,DI|O_RESET,|
|00006120| 45 4c 45 4d 45 4e 54 5f | 54 59 50 45 29 3b 0a 0a |ELEMENT_|TYPE);..|
|00006130| 20 20 20 20 66 75 6e 63 | 74 69 6f 6e 20 20 4d 4f | func|tion MO|
|00006140| 44 45 20 20 20 20 20 28 | 46 49 4c 45 20 3a 20 69 |DE (|FILE : i|
|00006150| 6e 20 46 49 4c 45 5f 54 | 59 50 45 29 20 20 72 65 |n FILE_T|YPE) re|
|00006160| 74 75 72 6e 20 46 49 4c | 45 5f 4d 4f 44 45 3b 0a |turn FIL|E_MODE;.|
|00006170| 20 20 20 20 70 72 61 67 | 6d 61 20 49 4f 5f 69 6e | prag|ma IO_in|
|00006180| 74 65 72 66 61 63 65 28 | 4d 4f 44 45 2c 44 49 4f |terface(|MODE,DIO|
|00006190| 5f 4d 4f 44 45 29 3b 0a | 0a 20 20 20 20 66 75 6e |_MODE);.|. fun|
|000061a0| 63 74 69 6f 6e 20 20 4e | 41 4d 45 20 20 20 20 20 |ction N|AME |
|000061b0| 28 46 49 4c 45 20 3a 20 | 69 6e 20 46 49 4c 45 5f |(FILE : |in FILE_|
|000061c0| 54 59 50 45 29 20 20 72 | 65 74 75 72 6e 20 53 54 |TYPE) r|eturn ST|
|000061d0| 52 49 4e 47 3b 0a 20 20 | 20 20 70 72 61 67 6d 61 |RING;. | pragma|
|000061e0| 20 49 4f 5f 69 6e 74 65 | 72 66 61 63 65 28 4e 41 | IO_inte|rface(NA|
|000061f0| 4d 45 2c 44 49 4f 5f 4e | 41 4d 45 29 3b 0a 0a 20 |ME,DIO_N|AME);.. |
|00006200| 20 20 20 66 75 6e 63 74 | 69 6f 6e 20 20 46 4f 52 | funct|ion FOR|
|00006210| 4d 20 20 20 20 20 28 46 | 49 4c 45 20 3a 20 69 6e |M (F|ILE : in|
|00006220| 20 46 49 4c 45 5f 54 59 | 50 45 29 20 20 72 65 74 | FILE_TY|PE) ret|
|00006230| 75 72 6e 20 53 54 52 49 | 4e 47 3b 0a 20 20 20 20 |urn STRI|NG;. |
|00006240| 70 72 61 67 6d 61 20 49 | 4f 5f 69 6e 74 65 72 66 |pragma I|O_interf|
|00006250| 61 63 65 28 46 4f 52 4d | 2c 44 49 4f 5f 46 4f 52 |ace(FORM|,DIO_FOR|
|00006260| 4d 29 3b 0a 20 20 20 20 | 0a 20 20 20 20 66 75 6e |M);. |. fun|
|00006270| 63 74 69 6f 6e 20 20 49 | 53 5f 4f 50 45 4e 20 20 |ction I|S_OPEN |
|00006280| 28 46 49 4c 45 20 3a 20 | 69 6e 20 46 49 4c 45 5f |(FILE : |in FILE_|
|00006290| 54 59 50 45 29 20 20 72 | 65 74 75 72 6e 20 42 4f |TYPE) r|eturn BO|
|000062a0| 4f 4c 45 41 4e 3b 0a 20 | 20 20 20 70 72 61 67 6d |OLEAN;. | pragm|
|000062b0| 61 20 49 4f 5f 69 6e 74 | 65 72 66 61 63 65 28 49 |a IO_int|erface(I|
|000062c0| 53 5f 4f 50 45 4e 2c 44 | 49 4f 5f 49 53 5f 4f 50 |S_OPEN,D|IO_IS_OP|
|000062d0| 45 4e 29 3b 0a 0a 20 20 | 20 20 2d 2d 20 49 6e 70 |EN);.. | -- Inp|
|000062e0| 75 74 20 61 6e 64 20 4f | 75 74 70 75 74 20 4f 70 |ut and O|utput Op|
|000062f0| 65 72 61 74 69 6f 6e 73 | 3a 0a 0a 20 20 20 20 70 |erations|:.. p|
|00006300| 72 6f 63 65 64 75 72 65 | 20 52 45 41 44 20 20 20 |rocedure| READ |
|00006310| 28 46 49 4c 45 20 3a 20 | 69 6e 20 46 49 4c 45 5f |(FILE : |in FILE_|
|00006320| 54 59 50 45 3b 20 49 54 | 45 4d 20 3a 20 6f 75 74 |TYPE; IT|EM : out|
|00006330| 20 45 4c 45 4d 45 4e 54 | 5f 54 59 50 45 29 3b 0a | ELEMENT|_TYPE);.|
|00006340| 20 20 20 20 70 72 61 67 | 6d 61 20 49 4f 5f 69 6e | prag|ma IO_in|
|00006350| 74 65 72 66 61 63 65 28 | 52 45 41 44 2c 44 49 4f |terface(|READ,DIO|
|00006360| 5f 52 45 41 44 2c 45 4c | 45 4d 45 4e 54 5f 54 59 |_READ,EL|EMENT_TY|
|00006370| 50 45 29 3b 0a 20 20 20 | 20 70 72 6f 63 65 64 75 |PE);. | procedu|
|00006380| 72 65 20 52 45 41 44 20 | 20 20 28 46 49 4c 45 20 |re READ | (FILE |
|00006390| 3a 20 69 6e 20 46 49 4c | 45 5f 54 59 50 45 3b 20 |: in FIL|E_TYPE; |
|000063a0| 49 54 45 4d 20 3a 20 6f | 75 74 20 45 4c 45 4d 45 |ITEM : o|ut ELEME|
|000063b0| 4e 54 5f 54 59 50 45 3b | 0a 20 20 20 20 20 20 20 |NT_TYPE;|. |
|000063c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000063d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000063e0| 20 20 20 20 46 52 4f 4d | 20 3a 20 69 6e 20 50 4f | FROM| : in PO|
|000063f0| 53 49 54 49 56 45 5f 43 | 4f 55 4e 54 29 3b 0a 20 |SITIVE_C|OUNT);. |
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.