|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 01b0 | | .CONST 0x01b0 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0063 | c | .CONST 0x0063 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0025 | % | .CONST 0x0025 ; Number of locals 000b INIT_0008: 000b 00bf | | Action Accept_Activation ; Debug Table 0x0 = .DEBUG 0x000b,0x024a,0x8000,0x0000,0x0055,0xbad5,0x0000,0x0003 000c e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x000c,0x024c,0x8000,0x0000,0x0058,0x7b05,0x0000,0x0019 ; Debug Table 0x1.0x0 = 0xc,0xffff ; Debug Table 0x1.0x1 = 0xc,0xfffe 000d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x2 = 0xe,0xfffd 000f 02a0 | | Declare_Subprogram Null_Subprogram 0010 03ad | | Declare_Type Heap_Access,Defined 0011 6196 |a | Indirect_Literal Discrete,0x1a8,{0x00000000, 0x00587b05} ; Debug Table 0x1.0x3 = 0x11,0xfffc ; Debug Table 0x1.0x4 = 0x11,0xfffb 0012 482e |H. | Short_Literal 0x2e 0013 00db | | Load_Top At_Offset_3 0014 00db | | Load_Top At_Offset_3 0015 e002 | | Load 0x0,0x2 0016 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0017 0387 | | Declare_Variable Package 0018 00d8 | | Load_Top At_Offset_0 0019 020f | | Execute Module,Activate 001a e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x5 = 0x1a,0xfffa 001b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001c e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x6 = 0x1c,0xfff9 001d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 001e e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x7 = 0x1e,0xfff8 001f 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0020 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x8 = 0x20,0xfff7 0021 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0022 029d 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call ; Debug Table 0x1.0x9 = 0x22,0xfff6 0024 029d 009b | | Declare_Subprogram INIT_0098,For_Outer_Call ; Debug Table 0x1.0xa = 0x24,0xfff5 0026 029d 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call ; Debug Table 0x1.0xb = 0x26,0xfff4 0028 029d 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call ; Debug Table 0x1.0xc = 0x28,0xfff3 002a 029d 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call ; Debug Table 0x1.0xd = 0x2a,0xfff2 002c 029d 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call ; Debug Table 0x1.0xe = 0x2c,0xfff1 002e 029d 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call ; Debug Table 0x1.0xf = 0x2e,0xfff0 0030 029d 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call ; Debug Table 0x1.0x10 = 0x30,0xffef 0032 029d 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call ; Debug Table 0x1.0x11 = 0x32,0xffee 0034 029d 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call ; Debug Table 0x1.0x12 = 0x34,0xffed 0036 029d 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call ; Debug Table 0x1.0x13 = 0x36,0xffec 0038 029d 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call ; Debug Table 0x1.0x14 = 0x38,0xffeb 003a 029d 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call ; Debug Table 0x1.0x15 = 0x3a,0xffea 003c 029d 018b | | Declare_Subprogram INIT_0188,For_Outer_Call ; Debug Table 0x1.0x16 = 0x3c,0xffe9 003e 029d 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call ; Debug Table 0x1.0x17 = 0x3e,0xffe8 0040 029d 019b | | Declare_Subprogram INIT_0198,For_Outer_Call ; Debug Table 0x1.0x18 = 0x40,0xffe7 0042 029d 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call ; Debug Table 0x1.0x19 = 0x42,0xffe6 0044 6163 |ac | Indirect_Literal Discrete,0x1a8,{0x00000000, 0x00587b05} ; Debug Table 0x1.0x1a = 0x44,0xffe5 0045 4b34 |K4 | Short_Literal 0x334 0046 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0047 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0048 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0049 1d16 | | Execute_Immediate Reference_Lex_1,0x16 004a 1d17 | | Execute_Immediate Reference_Lex_1,0x17 004b 1d18 | | Execute_Immediate Reference_Lex_1,0x18 004c 1d19 | | Execute_Immediate Reference_Lex_1,0x19 004d 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 004e 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 004f 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0050 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0051 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0052 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0053 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0054 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0055 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0056 e002 | | Load 0x0,0x2 0057 1936 | 6 | Execute Package,Field_Reference,Field_Number 0x36 0058 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0059 e003 | | Load 0x0,0x3 005a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 005b e004 | | Load 0x0,0x4 005c 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 005d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 005e e002 | | Load 0x0,0x2 005f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0060 0387 | | Declare_Variable Package 0061 00d8 | | Load_Top At_Offset_0 0062 020f | | Execute Module,Activate 0063 BODY_0008: 0063 00bc | | Action Signal_Activated 0064 00bb | | Action Signal_Completion 0065 0000 0000 | | .XXX[0x3] 0067 0000 | | 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 007a | z | .CONST 0x007a ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0003 | | .CONST 0x0003 ; Number of locals 006b INIT_0068: 006b e004 | | Load 0x0,0x4 ; Debug Table 0x2 = .DEBUG 0x006b,0x0284,0x0001,0x0000,0x0058,0x7b05,0x0000,0x004f ; Debug Table 0x2.0x0 = 0x6b,0xffff 006c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 006d 02ff | | Declare_Variable Variant_Record 006e 00db | | Load_Top At_Offset_3 006f e002 | | Load 0x0,0x2 0070 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0071 00d9 | | Load_Top At_Offset_1 0072 016d | m | Execute Variant_Record,Structure_Write 0073 e005 | | Load 0x0,0x5 ; Debug Table 0x2.0x1 = 0x73,0xfffe ; Debug Table 0x2.0x2 = 0x73,0x401 0074 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0075 e003 | | Load 0x0,0x3 0076 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0077 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0078 e006 | | Load 0x0,0x6 ; Debug Table 0x2.0x3 = 0x78,0xfffe 0079 1814 | | Execute Package,Field_Execute,Field_Number 0x14 007a BODY_0068: 007a e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x4 = 0x7a,0xfffd ; Debug Table 0x2.0x5 = 0x7a,0xfffc ; Debug Table 0x2.0x6 = 0x7a,0x1 007b 0f01 | | Execute_Immediate Equal,0x1 007c 7002 |p | Jump_Nonzero 0x7f 007d 4911 |I | Short_Literal 0x111 ; Debug Table 0x2.0x7 = 0x7d,0x2 007e 0257 | W | Execute Discrete,Raise 007f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x8 = 0x7f,0x3 0080 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0081 00da | | Load_Top At_Offset_2 0082 016f | o | Execute Variant_Record,Equal 0083 7002 |p | Jump_Nonzero 0x86 0084 4931 |I1 | Short_Literal 0x131 ; Debug Table 0x2.0x9 = 0x84,0x4 0085 0257 | W | Execute Discrete,Raise 0086 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0xa = 0x86,0x5 0087 2608 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8 0088 e20e | | Load 0x1,0xe 0089 e007 | | Load 0x0,0x7 008a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 008b e008 | | Load 0x0,0x8 008c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 008d 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 008e e5ff | | Load 0x2,-0x1 008f e20f | | Load 0x1,0xf 0090 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0091 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0x2.0xb = 0x91,0x6 0092 0000 0000 | | .BLANK 0000[0x6] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b e5fc | | Load 0x2,-0x4 ; Debug Table 0x3 = .DEBUG 0x009b,0x029e,0x0001,0x0000,0x0058,0x7b05,0x0000,0x00de ; Debug Table 0x3.0x0 = 0x9b,0x1 009c e5fd | | Load 0x2,-0x3 009d e5fe | | Load 0x2,-0x2 009e e5ff | | Load 0x2,-0x1 009f 8214 | | Call 0x1,0x14 00a0 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00a1 0000 0000 | | .BLANK 0000[0x7] 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x4 = .DEBUG 0x00ab,0x02a2,0x0001,0x0000,0x0058,0x7b05,0x0000,0x00ff ; Debug Table 0x4.0x0 = 0xab,0x1 00ac 0000 0000 | | .BLANK 0000[0x4] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00b3 | | .CONST 0x00b3 ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0001 | | .CONST 0x0001 ; Number of locals 00b3 BODY_00b0: 00b3 INIT_00b0: 00b3 4939 |I9 | Short_Literal 0x139 ; Debug Table 0x5 = .DEBUG 0x00b3,0x02a6,0x0001,0x0000,0x0058,0x7b05,0x0000,0x010c ; Debug Table 0x5.0x0 = 0xb3,0x1 00b4 0257 | W | Execute Discrete,Raise 00b5 0000 0000 | | .XXX[0x3] 00b7 0000 | | 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bb | | .CONST 0x00bb ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0001 | | .CONST 0x0001 ; Number of locals 00bb BODY_00b8: 00bb INIT_00b8: 00bb 4939 |I9 | Short_Literal 0x139 ; Debug Table 0x6 = .DEBUG 0x00bb,0x02aa,0x0001,0x0000,0x0058,0x7b05,0x0000,0x011c ; Debug Table 0x6.0x0 = 0xbb,0x1 00bc 0257 | W | Execute Discrete,Raise 00bd 0000 0000 | | .XXX[0x3] 00bf 0000 | | 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c3 | | .CONST 0x00c3 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0001 | | .CONST 0x0001 ; Number of locals 00c3 BODY_00c0: 00c3 INIT_00c0: 00c3 4912 |I | Short_Literal 0x112 ; Debug Table 0x7 = .DEBUG 0x00c3,0x02ae,0x0001,0x0000,0x0058,0x7b05,0x0000,0x0130 ; Debug Table 0x7.0x0 = 0xc3,0x1 00c4 0257 | W | Execute Discrete,Raise 00c5 0000 0000 | | .XXX[0x3] 00c7 0000 | | 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb 4912 |I | Short_Literal 0x112 ; Debug Table 0x8 = .DEBUG 0x00cb,0x02b2,0x0001,0x0000,0x0058,0x7b05,0x0000,0x0144 ; Debug Table 0x8.0x0 = 0xcb,0x1 00cc 0257 | W | Execute Discrete,Raise 00cd 0000 0000 | | .XXX[0x3] 00cf 0000 | | 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; SUBPROGRAM 00d0 ; -------------------------------------------------------------------------------------- 00d0 00d3 | | .CONST 0x00d3 ; Address of begin 00d1 0004 | | .CONST 0x0004 ; Address of exception handler 00d2 0001 | | .CONST 0x0001 ; Number of locals 00d3 BODY_00d0: 00d3 INIT_00d0: 00d3 4912 |I | Short_Literal 0x112 ; Debug Table 0x9 = .DEBUG 0x00d3,0x02b6,0x0001,0x0000,0x0058,0x7b05,0x0000,0x015c ; Debug Table 0x9.0x0 = 0xd3,0x1 00d4 0257 | W | Execute Discrete,Raise 00d5 0000 0000 | | .XXX[0x3] 00d7 0000 | | 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db 4912 |I | Short_Literal 0x112 ; Debug Table 0xa = .DEBUG 0x00db,0x02ba,0x0001,0x0000,0x0058,0x7b05,0x0000,0x0174 ; Debug Table 0xa.0x0 = 0xdb,0x1 00dc 0257 | W | Execute Discrete,Raise 00dd 0000 0000 | | .XXX[0x3] 00df 0000 | | 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e3 | | .CONST 0x00e3 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0001 | | .CONST 0x0001 ; Number of locals 00e3 BODY_00e0: 00e3 INIT_00e0: 00e3 4939 |I9 | Short_Literal 0x139 ; Debug Table 0xb = .DEBUG 0x00e3,0x02be,0x0001,0x0000,0x0058,0x7b05,0x0000,0x0188 ; Debug Table 0xb.0x0 = 0xe3,0x1 00e4 0257 | W | Execute Discrete,Raise 00e5 0000 0000 | | .XXX[0x3] 00e7 0000 | | 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 4939 |I9 | Short_Literal 0x139 ; Debug Table 0xc = .DEBUG 0x00eb,0x02c2,0x0001,0x0000,0x0058,0x7b05,0x0000,0x019c ; Debug Table 0xc.0x0 = 0xeb,0x1 00ec 0257 | W | Execute Discrete,Raise 00ed 0000 0000 | | .XXX[0x3] 00ef 0000 | | 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 0101 | | .CONST 0x0101 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0004 | | .CONST 0x0004 ; Number of locals 00f3 INIT_00f0: 00f3 e001 | | Load 0x0,0x1 ; Debug Table 0xd = .DEBUG 0x00f3,0x02c6,0x0001,0x0000,0x0058,0x7b05,0x0000,0x01b0 ; Debug Table 0xd.0x0 = 0xf3,0xffff 00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00f5 0322 | " | Declare_Variable Record 00f6 00db | | Load_Top At_Offset_3 00f7 e20f | | Load 0x1,0xf 00f8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00f9 0217 | | Execute Heap_Access,All_Reference 00fa 00d9 | | Load_Top At_Offset_1 00fb 017d | } | Execute Record,Structure_Write 00fc e5fe | | Load 0x2,-0x2 ; Debug Table 0xd.0x1 = 0xfc,0xfffe 00fd 01dd | | Execute Vector,First 00fe 00e2 | | Load_Encached Integer_Cache 00ff 03f1 | | Declare_Variable Discrete,With_Value 0100 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0x2 = 0x100,0xfffd 0101 BODY_00f0: 0101 00cf | | Action Mark_Auxiliary 0102 e5fe | | Load 0x2,-0x2 ; Debug Table 0xd.0x3 = 0x102,0x1 0103 01dc | | Execute Vector,Last 0104 e5fe | | Load 0x2,-0x2 0105 01dd | | Execute Vector,First 0106 0263 | c | Execute Discrete,Above_Bound 0107 7034 |p4 | Jump_Nonzero 0x13c 0108 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x4 = 0x108,0x2 0109 e5fe | | Load 0x2,-0x2 010a 01d7 | | Execute Vector,Field_Read 010b 0f0a | | Execute_Immediate Equal,0xa 010c 7005 |p | Jump_Nonzero 0x112 010d 00d8 | | Load_Top At_Offset_0 010e e5fe | | Load 0x2,-0x2 010f 01d7 | | Execute Vector,Field_Read 0110 0f0d | | Execute_Immediate Equal,0xd 0111 6812 |h | Jump_Zero 0x124 0112 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0x5 = 0x112,0x3 0113 4800 |H | Short_Literal 0x0 0114 4801 |H | Short_Literal 0x1 0115 e403 | | Load 0x2,0x3 0116 e407 | | Load 0x2,0x7 0117 0aff | | Execute_Immediate Plus,-0x1 0118 0248 | H | Execute Discrete,Check_In_Integer 0119 e5fe | | Load 0x2,-0x2 011a 01cf | | Execute Vector,Slice_Read 011b e402 | | Load 0x2,0x2 011c e001 | | Load 0x0,0x1 011d 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 011e c404 | | Store 0x2,0x4 011f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x6 = 0x11f,0x4 0120 0a01 | | Execute_Immediate Plus,0x1 0121 0248 | H | Execute Discrete,Check_In_Integer 0122 a403 | | Store_Unchecked 0x2,0x3 0123 7816 |x | Jump 0x13a 0124 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x7 = 0x124,0x5 0125 e5fe | | Load 0x2,-0x2 0126 01d7 | | Execute Vector,Field_Read 0127 0f07 | | Execute_Immediate Equal,0x7 0128 6811 |h | Jump_Zero 0x13a 0129 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0x8 = 0x129,0x6 012a 4801 |H | Short_Literal 0x1 012b 4800 |H | Short_Literal 0x0 012c e403 | | Load 0x2,0x3 012d e407 | | Load 0x2,0x7 012e 0aff | | Execute_Immediate Plus,-0x1 012f 0248 | H | Execute Discrete,Check_In_Integer 0130 e5fe | | Load 0x2,-0x2 0131 01cf | | Execute Vector,Slice_Read 0132 e402 | | Load 0x2,0x2 0133 e001 | | Load 0x0,0x1 0134 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0135 c404 | | Store 0x2,0x4 0136 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x9 = 0x136,0x7 0137 0a01 | | Execute_Immediate Plus,0x1 0138 0248 | H | Execute Discrete,Check_In_Integer 0139 a403 | | Store_Unchecked 0x2,0x3 013a 00c8 | | Action Pop_Auxiliary_Range 013b 3fcc |? | Loop_Increasing 0x108 013c 00ce | | Action Pop_Auxiliary 013d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xd.0xa = 0x13d,0x8 013e 4800 |H | Short_Literal 0x0 013f 4800 |H | Short_Literal 0x0 0140 e403 | | Load 0x2,0x3 0141 e5fe | | Load 0x2,-0x2 0142 01dc | | Execute Vector,Last 0143 e5fe | | Load 0x2,-0x2 0144 01cf | | Execute Vector,Slice_Read 0145 e402 | | Load 0x2,0x2 0146 e001 | | Load 0x0,0x1 0147 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0148 0059 | Y | Store_Top Discrete,At_Offset_1 0149 4503 |E | Exit_Suprogram New_Top_Offset 0x3 014a 0000 0000 | | .BLANK 0000[0x6] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0154 | T | .CONST 0x0154 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0002 | | .CONST 0x0002 ; Number of locals 0153 INIT_0150: 0153 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe = .DEBUG 0x0153,0x02de,0x0001,0x0000,0x0058,0x7b05,0x0000,0x026b ; Debug Table 0xe.0x0 = 0x153,0xffff 0154 BODY_0150: 0154 e5fe | | Load 0x2,-0x2 ; Debug Table 0xe.0x1 = 0x154,0x1 0155 0f0d | | Execute_Immediate Equal,0xd 0156 7003 |p | Jump_Nonzero 0x15a 0157 e5fe | | Load 0x2,-0x2 0158 0f0a | | Execute_Immediate Equal,0xa 0159 680c |h | Jump_Zero 0x166 015a 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0x2 = 0x15a,0x2 015b 4800 |H | Short_Literal 0x0 015c 4801 |H | Short_Literal 0x1 015d 00ea | | Load_Encached Null_String_Cache 015e e5ff | | Load 0x2,-0x1 015f e20f | | Load 0x1,0xf 0160 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0161 0217 | | Execute Heap_Access,All_Reference 0162 e001 | | Load 0x0,0x1 0163 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0164 0059 | Y | Store_Top Discrete,At_Offset_1 0165 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0166 e5fe | | Load 0x2,-0x2 ; Debug Table 0xe.0x3 = 0x166,0x3 0167 0f07 | | Execute_Immediate Equal,0x7 0168 680c |h | Jump_Zero 0x175 0169 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0x4 = 0x169,0x4 016a 4801 |H | Short_Literal 0x1 016b 4800 |H | Short_Literal 0x0 016c 00ea | | Load_Encached Null_String_Cache 016d e5ff | | Load 0x2,-0x1 016e e20f | | Load 0x1,0xf 016f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0170 0217 | | Execute Heap_Access,All_Reference 0171 e001 | | Load 0x0,0x1 0172 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0173 0059 | Y | Store_Top Discrete,At_Offset_1 0174 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0175 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0x5 = 0x175,0x5 0176 4800 |H | Short_Literal 0x0 0177 4800 |H | Short_Literal 0x0 0178 4801 |H | Short_Literal 0x1 0179 4801 |H | Short_Literal 0x1 017a 00e9 | | Load_Encached String_Cache 017b 0334 | 4 | Declare_Variable Array,With_Constraint 017c e5fe | | Load 0x2,-0x2 017d 4801 |H | Short_Literal 0x1 017e 00da | | Load_Top At_Offset_2 017f 01d6 | | Execute Vector,Field_Write 0180 e5ff | | Load 0x2,-0x1 0181 e20f | | Load 0x1,0xf 0182 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0183 0217 | | Execute Heap_Access,All_Reference 0184 e001 | | Load 0x0,0x1 0185 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0186 0059 | Y | Store_Top Discrete,At_Offset_1 0187 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 4912 |I | Short_Literal 0x112 ; Debug Table 0xf = .DEBUG 0x018b,0x02ec,0x0002,0x0000,0x0058,0x7b05,0x0000,0x02f2 ; Debug Table 0xf.0x0 = 0x18b,0x1 018c 0257 | W | Execute Discrete,Raise 018d 0000 0000 | | .XXX[0x3] 018f 0000 | | 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 4800 |H | Short_Literal 0x0 ; Debug Table 0x10 = .DEBUG 0x0193,0x02f0,0x0002,0x0000,0x0058,0x7b05,0x0000,0x0303 ; Debug Table 0x10.0x0 = 0x193,0x1 0194 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0195 0000 0000 | | .XXX[0x3] 0197 0000 | | 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019b | | .CONST 0x019b ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0001 | | .CONST 0x0001 ; Number of locals 019b BODY_0198: 019b INIT_0198: 019b e009 | | Load 0x0,0x9 ; Debug Table 0x11 = .DEBUG 0x019b,0x02f4,0x0002,0x0000,0x0058,0x7b05,0x0000,0x0312 ; Debug Table 0x11.0x0 = 0x19b,0x1 019c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 019d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019e 0000 0000 | | .XXX[0x2] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01a3 | | .CONST 0x01a3 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0001 | | .CONST 0x0001 ; Number of locals 01a3 BODY_01a0: 01a3 INIT_01a0: 01a3 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x12 = .DEBUG 0x01a3,0x02f8,0x0002,0x0000,0x0058,0x7b05,0x0000,0x0325 ; Debug Table 0x12.0x0 = 0x1a3,0x1 01a4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a5 0000 0000 | | .XXX[0x3] 01a7 0000 | | 01a8 0000 0000 | | .LITERAL {0x00000000, 0x00587b05} 01ac 0000 0000 | | .BLANK 0000[0x4] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; Debug Table 01b0 ; -------------------------------------------------------------------------------------- 01b0 0003 0013 | | .CONST 0x0003,0x0013 01b2 000b 024a | J| .DEBUG 0x000b,0x024a,0x8000,0x0000,0x0055,0xbad5,0x0000,0x0003 01ba 000c 024c | L| .DEBUG 0x000c,0x024c,0x8000,0x0000,0x0058,0x7b05,0x0000,0x0019 01c2 006b 0284 | k | .DEBUG 0x006b,0x0284,0x0001,0x0000,0x0058,0x7b05,0x0000,0x004f 01ca 009b 029e | | .DEBUG 0x009b,0x029e,0x0001,0x0000,0x0058,0x7b05,0x0000,0x00de 01d2 00ab 02a2 | | .DEBUG 0x00ab,0x02a2,0x0001,0x0000,0x0058,0x7b05,0x0000,0x00ff 01da 00b3 02a6 | | .DEBUG 0x00b3,0x02a6,0x0001,0x0000,0x0058,0x7b05,0x0000,0x010c 01e2 00bb 02aa | | .DEBUG 0x00bb,0x02aa,0x0001,0x0000,0x0058,0x7b05,0x0000,0x011c 01ea 00c3 02ae | | .DEBUG 0x00c3,0x02ae,0x0001,0x0000,0x0058,0x7b05,0x0000,0x0130 01f2 00cb 02b2 | | .DEBUG 0x00cb,0x02b2,0x0001,0x0000,0x0058,0x7b05,0x0000,0x0144 01fa 00d3 02b6 | | .DEBUG 0x00d3,0x02b6,0x0001,0x0000,0x0058,0x7b05,0x0000,0x015c 0202 00db 02ba | | .DEBUG 0x00db,0x02ba,0x0001,0x0000,0x0058,0x7b05,0x0000,0x0174 020a 00e3 02be | | .DEBUG 0x00e3,0x02be,0x0001,0x0000,0x0058,0x7b05,0x0000,0x0188 0212 00eb 02c2 | | .DEBUG 0x00eb,0x02c2,0x0001,0x0000,0x0058,0x7b05,0x0000,0x019c 021a 00f3 02c6 | | .DEBUG 0x00f3,0x02c6,0x0001,0x0000,0x0058,0x7b05,0x0000,0x01b0 0222 0153 02de | S | .DEBUG 0x0153,0x02de,0x0001,0x0000,0x0058,0x7b05,0x0000,0x026b 022a 018b 02ec | | .DEBUG 0x018b,0x02ec,0x0002,0x0000,0x0058,0x7b05,0x0000,0x02f2 0232 0193 02f0 | | .DEBUG 0x0193,0x02f0,0x0002,0x0000,0x0058,0x7b05,0x0000,0x0303 023a 019b 02f4 | | .DEBUG 0x019b,0x02f4,0x0002,0x0000,0x0058,0x7b05,0x0000,0x0312 0242 01a3 02f8 | | .DEBUG 0x01a3,0x02f8,0x0002,0x0000,0x0058,0x7b05,0x0000,0x0325 024a ; -------------------------------------------------------------------------------------- 024a ; Debug3 Subtable 0x0 024a ; -------------------------------------------------------------------------------------- 024a 0000 0000 | | .DBG3TAB 0x0000,0x0000 024c ; -------------------------------------------------------------------------------------- 024c ; Debug3 Subtable 0x1 024c ; -------------------------------------------------------------------------------------- 024c 001b 0000 | | .DBG3TAB 0x001b,0x0000 024e 000c ffff | | .CONST 0x000c,0xffff 0250 000c fffe | | .CONST 0x000c,0xfffe 0252 000e fffd | | .CONST 0x000e,0xfffd 0254 0011 fffc | | .CONST 0x0011,0xfffc 0256 0011 fffb | | .CONST 0x0011,0xfffb 0258 001a fffa | | .CONST 0x001a,0xfffa 025a 001c fff9 | | .CONST 0x001c,0xfff9 025c 001e fff8 | | .CONST 0x001e,0xfff8 025e 0020 fff7 | | .CONST 0x0020,0xfff7 0260 0022 fff6 | " | .CONST 0x0022,0xfff6 0262 0024 fff5 | $ | .CONST 0x0024,0xfff5 0264 0026 fff4 | & | .CONST 0x0026,0xfff4 0266 0028 fff3 | ( | .CONST 0x0028,0xfff3 0268 002a fff2 | * | .CONST 0x002a,0xfff2 026a 002c fff1 | , | .CONST 0x002c,0xfff1 026c 002e fff0 | . | .CONST 0x002e,0xfff0 026e 0030 ffef | 0 | .CONST 0x0030,0xffef 0270 0032 ffee | 2 | .CONST 0x0032,0xffee 0272 0034 ffed | 4 | .CONST 0x0034,0xffed 0274 0036 ffec | 6 | .CONST 0x0036,0xffec 0276 0038 ffeb | 8 | .CONST 0x0038,0xffeb 0278 003a ffea | : | .CONST 0x003a,0xffea 027a 003c ffe9 | < | .CONST 0x003c,0xffe9 027c 003e ffe8 | > | .CONST 0x003e,0xffe8 027e 0040 ffe7 | @ | .CONST 0x0040,0xffe7 0280 0042 ffe6 | B | .CONST 0x0042,0xffe6 0282 0044 ffe5 | D | .CONST 0x0044,0xffe5 0284 ; -------------------------------------------------------------------------------------- 0284 ; Debug3 Subtable 0x2 0284 ; -------------------------------------------------------------------------------------- 0284 0005 0007 | | .DBG3TAB 0x0005,0x0007 0286 006b ffff | k | .CONST 0x006b,0xffff 0288 0073 fffe | s | .CONST 0x0073,0xfffe 028a 0073 0401 | s | .CONST 0x0073,0x0401 028c 0078 fffe | x | .CONST 0x0078,0xfffe 028e 007a fffd | z | .CONST 0x007a,0xfffd 0290 007a fffc | z | .CONST 0x007a,0xfffc 0292 007a 0001 | z | .CONST 0x007a,0x0001 0294 007d 0002 | } | .CONST 0x007d,0x0002 0296 007f 0003 | | .CONST 0x007f,0x0003 0298 0084 0004 | | .CONST 0x0084,0x0004 029a 0086 0005 | | .CONST 0x0086,0x0005 029c 0091 0006 | | .CONST 0x0091,0x0006 029e ; -------------------------------------------------------------------------------------- 029e ; Debug3 Subtable 0x3 029e ; -------------------------------------------------------------------------------------- 029e 0000 0001 | | .DBG3TAB 0x0000,0x0001 02a0 009b 0001 | | .CONST 0x009b,0x0001 02a2 ; -------------------------------------------------------------------------------------- 02a2 ; Debug3 Subtable 0x4 02a2 ; -------------------------------------------------------------------------------------- 02a2 0000 0001 | | .DBG3TAB 0x0000,0x0001 02a4 00ab 0001 | | .CONST 0x00ab,0x0001 02a6 ; -------------------------------------------------------------------------------------- 02a6 ; Debug3 Subtable 0x5 02a6 ; -------------------------------------------------------------------------------------- 02a6 0000 0001 | | .DBG3TAB 0x0000,0x0001 02a8 00b3 0001 | | .CONST 0x00b3,0x0001 02aa ; -------------------------------------------------------------------------------------- 02aa ; Debug3 Subtable 0x6 02aa ; -------------------------------------------------------------------------------------- 02aa 0000 0001 | | .DBG3TAB 0x0000,0x0001 02ac 00bb 0001 | | .CONST 0x00bb,0x0001 02ae ; -------------------------------------------------------------------------------------- 02ae ; Debug3 Subtable 0x7 02ae ; -------------------------------------------------------------------------------------- 02ae 0000 0001 | | .DBG3TAB 0x0000,0x0001 02b0 00c3 0001 | | .CONST 0x00c3,0x0001 02b2 ; -------------------------------------------------------------------------------------- 02b2 ; Debug3 Subtable 0x8 02b2 ; -------------------------------------------------------------------------------------- 02b2 0000 0001 | | .DBG3TAB 0x0000,0x0001 02b4 00cb 0001 | | .CONST 0x00cb,0x0001 02b6 ; -------------------------------------------------------------------------------------- 02b6 ; Debug3 Subtable 0x9 02b6 ; -------------------------------------------------------------------------------------- 02b6 0000 0001 | | .DBG3TAB 0x0000,0x0001 02b8 00d3 0001 | | .CONST 0x00d3,0x0001 02ba ; -------------------------------------------------------------------------------------- 02ba ; Debug3 Subtable 0xa 02ba ; -------------------------------------------------------------------------------------- 02ba 0000 0001 | | .DBG3TAB 0x0000,0x0001 02bc 00db 0001 | | .CONST 0x00db,0x0001 02be ; -------------------------------------------------------------------------------------- 02be ; Debug3 Subtable 0xb 02be ; -------------------------------------------------------------------------------------- 02be 0000 0001 | | .DBG3TAB 0x0000,0x0001 02c0 00e3 0001 | | .CONST 0x00e3,0x0001 02c2 ; -------------------------------------------------------------------------------------- 02c2 ; Debug3 Subtable 0xc 02c2 ; -------------------------------------------------------------------------------------- 02c2 0000 0001 | | .DBG3TAB 0x0000,0x0001 02c4 00eb 0001 | | .CONST 0x00eb,0x0001 02c6 ; -------------------------------------------------------------------------------------- 02c6 ; Debug3 Subtable 0xd 02c6 ; -------------------------------------------------------------------------------------- 02c6 0003 0008 | | .DBG3TAB 0x0003,0x0008 02c8 00f3 ffff | | .CONST 0x00f3,0xffff 02ca 00fc fffe | | .CONST 0x00fc,0xfffe 02cc 0100 fffd | | .CONST 0x0100,0xfffd 02ce 0102 0001 | | .CONST 0x0102,0x0001 02d0 0108 0002 | | .CONST 0x0108,0x0002 02d2 0112 0003 | | .CONST 0x0112,0x0003 02d4 011f 0004 | | .CONST 0x011f,0x0004 02d6 0124 0005 | $ | .CONST 0x0124,0x0005 02d8 0129 0006 | ) | .CONST 0x0129,0x0006 02da 0136 0007 | 6 | .CONST 0x0136,0x0007 02dc 013d 0008 | = | .CONST 0x013d,0x0008 02de ; -------------------------------------------------------------------------------------- 02de ; Debug3 Subtable 0xe 02de ; -------------------------------------------------------------------------------------- 02de 0001 0005 | | .DBG3TAB 0x0001,0x0005 02e0 0153 ffff | S | .CONST 0x0153,0xffff 02e2 0154 0001 | T | .CONST 0x0154,0x0001 02e4 015a 0002 | Z | .CONST 0x015a,0x0002 02e6 0166 0003 | f | .CONST 0x0166,0x0003 02e8 0169 0004 | i | .CONST 0x0169,0x0004 02ea 0175 0005 | u | .CONST 0x0175,0x0005 02ec ; -------------------------------------------------------------------------------------- 02ec ; Debug3 Subtable 0xf 02ec ; -------------------------------------------------------------------------------------- 02ec 0000 0001 | | .DBG3TAB 0x0000,0x0001 02ee 018b 0001 | | .CONST 0x018b,0x0001 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; Debug3 Subtable 0x10 02f0 ; -------------------------------------------------------------------------------------- 02f0 0000 0001 | | .DBG3TAB 0x0000,0x0001 02f2 0193 0001 | | .CONST 0x0193,0x0001 02f4 ; -------------------------------------------------------------------------------------- 02f4 ; Debug3 Subtable 0x11 02f4 ; -------------------------------------------------------------------------------------- 02f4 0000 0001 | | .DBG3TAB 0x0000,0x0001 02f6 019b 0001 | | .CONST 0x019b,0x0001 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; Debug3 Subtable 0x12 02f8 ; -------------------------------------------------------------------------------------- 02f8 0000 0001 | | .DBG3TAB 0x0000,0x0001 02fa 01a3 0001 | | .CONST 0x01a3,0x0001 02fc 0000 0000 | | .BLANK 0000[0x104]