|
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: 3072 (0xc00) Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 02d8 | | .CONST 0x02d8 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0042 | B | .CONST 0x0042 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001a | | .CONST 0x001a ; Number of locals 000b INIT_0008: 000b 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x034a,0x8000,0x0000,0x0037,0xddc4,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 00e9 | | Load_Encached String_Cache ; Debug Table 0x0.0x2 = 0xf,0xffff 0010 0129 | ) | Execute Any,Make_Visible 0011 00e9 | | Load_Encached String_Cache ; Debug Table 0x0.0x3 = 0x11,0xfffe 0012 0129 | ) | Execute Any,Make_Visible 0013 00e9 | | Load_Encached String_Cache ; Debug Table 0x0.0x4 = 0x13,0xfffd 0014 0129 | ) | Execute Any,Make_Visible 0015 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffc 0017 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfffb 0019 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfffa 001b 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff9 001d 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff8 001f 0007 | | Action Break_Optional ; Debug Table 0x0.0xa = 0x1f,0xfff7 0020 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x20,0xfffd 0022 00bf | | Action Accept_Activation 0023 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0023,0x0364,0x8000,0x0000,0x0037,0xdf14,0x0000,0x000b ; Debug Table 0x1.0x0 = 0x23,0xffff 0024 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x24,0xffff 0025 0092 02b3 | | Action Push_String_Extended,0x2b3 ; "ERROR_NODES" ; Debug Table 0x1.0x2 = 0x25,0xfffe 0027 e001 | | Load 0x0,0x1 0028 180f | | Execute Package,Field_Execute,Field_Number 0xf 0029 4973 |Is | Short_Literal 0x173 002a 00eb | | Load_Encached Diana_Cache 002b 0098 | | Execute Package,Field_Read_Dynamic 002c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002d 03f1 | | Declare_Variable Discrete,With_Value 002e 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x3 = 0x2e,0xfffd 002f 00c7 | | Action Elaborate_Subprogram 0030 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x4 = 0x30,0xfffc 0031 00c7 | | Action Elaborate_Subprogram 0032 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x5 = 0x32,0xffff 0033 00c7 | | Action Elaborate_Subprogram 0034 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x6 = 0x34,0xfffe 0035 00c7 | | Action Elaborate_Subprogram 0036 029d 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call ; Debug Table 0x1.0x7 = 0x36,0xfffd 0038 029d 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call ; Debug Table 0x1.0x8 = 0x38,0xfffc 003a 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x9 = 0x3a,0xfffb 003b 00c7 | | Action Elaborate_Subprogram 003c 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xa = 0x3c,0xfffa 003d 00c7 | | Action Elaborate_Subprogram 003e 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xb = 0x3e,0xfff9 003f 00c7 | | Action Elaborate_Subprogram 0040 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xc = 0x40,0xfffc 0041 00c7 | | Action Elaborate_Subprogram 0042 BODY_0008: 0042 00bc | | Action Signal_Activated 0043 00bb | | Action Signal_Completion 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b e218 | | Load 0x1,0x18 ; Debug Table 0x2 = .DEBUG 0x004b,0x0380,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0007 ; Debug Table 0x2.0x0 = 0x4b,0x1 004c 00db | | Load_Top At_Offset_3 004d 4973 |Is | Short_Literal 0x173 004e 00eb | | Load_Encached Diana_Cache 004f 0098 | | Execute Package,Field_Read_Dynamic 0050 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0051 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0052 0000 0000 | | .BLANK 0000[0x6] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x005b,0x0384,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0012 ; Debug Table 0x3.0x0 = 0x5b,0x1 005c e002 | | Load 0x0,0x2 005d 181f | | Execute Package,Field_Execute,Field_Number 0x1f 005e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 005f 0000 | | .XXX[0x1] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0066 | f | .CONST 0x0066 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0003 | | .CONST 0x0003 ; Number of locals 0063 INIT_0060: 0063 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x4 = .DEBUG 0x0063,0x0388,0x0002,0x0000,0x0037,0xddc4,0x0000,0x002e ; Debug Table 0x4.0x0 = 0x63,0xffff 0064 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0065 03e9 | | Declare_Variable Discrete,Duplicate 0066 BODY_0060: 0066 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x1 = 0x66,0x1 0067 01db | | Execute Vector,Length 0068 6860 |h` | Jump_Zero 0xc9 0069 00cf | | Action Mark_Auxiliary 006a e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x2 = 0x6a,0x2 006b 01d9 | | Execute Vector,Reverse_Bounds 006c 0263 | c | Execute Discrete,Above_Bound 006d 7019 |p | Jump_Nonzero 0x87 006e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x3 = 0x6e,0x3 006f e5ff | | Load 0x2,-0x1 0070 01d7 | | Execute Vector,Field_Read 0071 0b20 | | Execute_Immediate Case_Compare,0x20 0072 7011 |p | Jump_Nonzero 0x84 0073 00d8 | | Load_Top At_Offset_0 0074 4861 |Ha | Short_Literal 0x61 0075 487a |Hz | Short_Literal 0x7a 0076 0262 | b | Execute Discrete,In_Range 0077 7007 |p | Jump_Nonzero 0x7f 0078 00d8 | | Load_Top At_Offset_0 0079 4841 |HA | Short_Literal 0x41 007a 485a |HZ | Short_Literal 0x5a 007b 0262 | b | Execute Discrete,In_Range 007c 7002 |p | Jump_Nonzero 0x7f 007d 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x4 = 0x7d,0x7 007e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 007f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x5 = 0x7f,0x5 0080 0a01 | | Execute_Immediate Plus,0x1 0081 c402 | | Store 0x2,0x2 0082 00d3 | | Pop_Control Pop_Count_3 ; Debug Table 0x4.0x6 = 0x82,0x6 0083 7803 |x | Jump 0x87 0084 00d1 | | Pop_Control Pop_Count_1 0085 00c8 | | Action Pop_Auxiliary_Range 0086 3fe7 |? | Loop_Increasing 0x6e 0087 00ce | | Action Pop_Auxiliary 0088 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x7 = 0x88,0x8 0089 7002 |p | Jump_Nonzero 0x8c 008a 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x8 = 0x8a,0x9 008b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 008c 00cf | | Action Mark_Auxiliary 008d e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x9 = 0x8d,0xa 008e 01dc | | Execute Vector,Last 008f 00db | | Load_Top At_Offset_3 0090 0263 | c | Execute Discrete,Above_Bound 0091 7020 |p | Jump_Nonzero 0xb2 0092 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xa = 0x92,0xb 0093 e5ff | | Load 0x2,-0x1 0094 01d7 | | Execute Vector,Field_Read 0095 00d8 | | Load_Top At_Offset_0 0096 4861 |Ha | Short_Literal 0x61 0097 487a |Hz | Short_Literal 0x7a 0098 0262 | b | Execute Discrete,In_Range 0099 7015 |p | Jump_Nonzero 0xaf 009a 00d8 | | Load_Top At_Offset_0 009b 4841 |HA | Short_Literal 0x41 009c 485a |HZ | Short_Literal 0x5a 009d 0262 | b | Execute Discrete,In_Range 009e 7010 |p | Jump_Nonzero 0xaf 009f 00d8 | | Load_Top At_Offset_0 00a0 4830 |H0 | Short_Literal 0x30 00a1 4839 |H9 | Short_Literal 0x39 00a2 0262 | b | Execute Discrete,In_Range 00a3 700b |p | Jump_Nonzero 0xaf 00a4 0b5f | _ | Execute_Immediate Case_Compare,0x5f 00a5 7009 |p | Jump_Nonzero 0xaf 00a6 0b20 | | Execute_Immediate Case_Compare,0x20 00a7 7002 |p | Jump_Nonzero 0xaa 00a8 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xb = 0xa8,0xf 00a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00aa 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xc = 0xaa,0xd 00ab 0a01 | | Execute_Immediate Plus,0x1 00ac c403 | | Store 0x2,0x3 00ad 00d3 | | Pop_Control Pop_Count_3 ; Debug Table 0x4.0xd = 0xad,0xe 00ae 7803 |x | Jump 0xb2 00af 00d1 | | Pop_Control Pop_Count_1 00b0 00c8 | | Action Pop_Auxiliary_Range 00b1 3fe0 |? | Loop_Increasing 0x92 00b2 00ce | | Action Pop_Auxiliary 00b3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xe = 0xb3,0x10 00b4 7002 |p | Jump_Nonzero 0xb7 00b5 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0xf = 0xb5,0x11 00b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b7 00cf | | Action Mark_Auxiliary 00b8 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x10 = 0xb8,0x12 00b9 01dc | | Execute Vector,Last 00ba 00da | | Load_Top At_Offset_2 00bb 0263 | c | Execute Discrete,Above_Bound 00bc 7009 |p | Jump_Nonzero 0xc6 00bd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x11 = 0xbd,0x13 00be e5ff | | Load 0x2,-0x1 00bf 01d7 | | Execute Vector,Field_Read 00c0 0e20 | | Execute_Immediate Not_Equal,0x20 00c1 6802 |h | Jump_Zero 0xc4 00c2 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x12 = 0xc2,0x14 00c3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00c4 00c8 | | Action Pop_Auxiliary_Range 00c5 3ff7 |? | Loop_Increasing 0xbd 00c6 00ce | | Action Pop_Auxiliary 00c7 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x13 = 0xc7,0x15 00c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00c9 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x14 = 0xc9,0x16 00ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00cb 0000 0000 | | .BLANK 0000[0x5] 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; SUBPROGRAM 00d0 ; -------------------------------------------------------------------------------------- 00d0 00d6 | | .CONST 0x00d6 ; Address of begin 00d1 0004 | | .CONST 0x0004 ; Address of exception handler 00d2 0003 | | .CONST 0x0003 ; Number of locals 00d3 INIT_00d0: 00d3 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5 = .DEBUG 0x00d3,0x03b4,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0037 ; Debug Table 0x5.0x0 = 0xd3,0xffff 00d4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00d5 03e9 | | Declare_Variable Discrete,Duplicate 00d6 BODY_00d0: 00d6 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x1 = 0xd6,0x1 00d7 01db | | Execute Vector,Length 00d8 6899 |h | Jump_Zero 0x172 00d9 00cf | | Action Mark_Auxiliary 00da e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x2 = 0xda,0x2 00db 01d9 | | Execute Vector,Reverse_Bounds 00dc 0263 | c | Execute Discrete,Above_Bound 00dd 7029 |p) | Jump_Nonzero 0x107 00de 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x3 = 0xde,0x3 00df e5ff | | Load 0x2,-0x1 00e0 01d7 | | Execute Vector,Field_Read 00e1 0b20 | | Execute_Immediate Case_Compare,0x20 00e2 7021 |p! | Jump_Nonzero 0x104 00e3 00d8 | | Load_Top At_Offset_0 00e4 4861 |Ha | Short_Literal 0x61 00e5 487a |Hz | Short_Literal 0x7a 00e6 0262 | b | Execute Discrete,In_Range 00e7 7017 |p | Jump_Nonzero 0xff 00e8 00d8 | | Load_Top At_Offset_0 00e9 4841 |HA | Short_Literal 0x41 00ea 485a |HZ | Short_Literal 0x5a 00eb 0262 | b | Execute Discrete,In_Range 00ec 7012 |p | Jump_Nonzero 0xff 00ed 0b5f | _ | Execute_Immediate Case_Compare,0x5f 00ee 7010 |p | Jump_Nonzero 0xff 00ef 0b21 | ! | Execute_Immediate Case_Compare,0x21 00f0 700e |p | Jump_Nonzero 0xff 00f1 0b24 | $ | Execute_Immediate Case_Compare,0x24 00f2 700c |p | Jump_Nonzero 0xff 00f3 0b3f | ? | Execute_Immediate Case_Compare,0x3f 00f4 700a |p | Jump_Nonzero 0xff 00f5 0b5e | ^ | Execute_Immediate Case_Compare,0x5e 00f6 7008 |p | Jump_Nonzero 0xff 00f7 0b40 | @ | Execute_Immediate Case_Compare,0x40 00f8 7006 |p | Jump_Nonzero 0xff 00f9 0b60 | ` | Execute_Immediate Case_Compare,0x60 00fa 7004 |p | Jump_Nonzero 0xff 00fb 0b5c | \ | Execute_Immediate Case_Compare,0x5c 00fc 7002 |p | Jump_Nonzero 0xff 00fd 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x4 = 0xfd,0x7 00fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00ff 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x5 = 0xff,0x5 0100 0a01 | | Execute_Immediate Plus,0x1 0101 c402 | | Store 0x2,0x2 0102 00d3 | | Pop_Control Pop_Count_3 ; Debug Table 0x5.0x6 = 0x102,0x6 0103 7803 |x | Jump 0x107 0104 00d1 | | Pop_Control Pop_Count_1 0105 00c8 | | Action Pop_Auxiliary_Range 0106 3fd7 |? | Loop_Increasing 0xde 0107 00ce | | Action Pop_Auxiliary 0108 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x7 = 0x108,0x8 0109 7002 |p | Jump_Nonzero 0x10c 010a 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x8 = 0x10a,0x9 010b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 010c 00cf | | Action Mark_Auxiliary 010d e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x9 = 0x10d,0xa 010e 01dc | | Execute Vector,Last 010f 00db | | Load_Top At_Offset_3 0110 0263 | c | Execute Discrete,Above_Bound 0111 7030 |p0 | Jump_Nonzero 0x142 0112 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xa = 0x112,0xb 0113 e5ff | | Load 0x2,-0x1 0114 01d7 | | Execute Vector,Field_Read 0115 00d8 | | Load_Top At_Offset_0 0116 4861 |Ha | Short_Literal 0x61 0117 487a |Hz | Short_Literal 0x7a 0118 0262 | b | Execute Discrete,In_Range 0119 7025 |p% | Jump_Nonzero 0x13f 011a 00d8 | | Load_Top At_Offset_0 011b 4841 |HA | Short_Literal 0x41 011c 485a |HZ | Short_Literal 0x5a 011d 0262 | b | Execute Discrete,In_Range 011e 7020 |p | Jump_Nonzero 0x13f 011f 00d8 | | Load_Top At_Offset_0 0120 4830 |H0 | Short_Literal 0x30 0121 4839 |H9 | Short_Literal 0x39 0122 0262 | b | Execute Discrete,In_Range 0123 701b |p | Jump_Nonzero 0x13f 0124 0b5f | _ | Execute_Immediate Case_Compare,0x5f 0125 7019 |p | Jump_Nonzero 0x13f 0126 0b21 | ! | Execute_Immediate Case_Compare,0x21 0127 7017 |p | Jump_Nonzero 0x13f 0128 0b24 | $ | Execute_Immediate Case_Compare,0x24 0129 7015 |p | Jump_Nonzero 0x13f 012a 0b3f | ? | Execute_Immediate Case_Compare,0x3f 012b 7013 |p | Jump_Nonzero 0x13f 012c 0b5e | ^ | Execute_Immediate Case_Compare,0x5e 012d 7011 |p | Jump_Nonzero 0x13f 012e 0b40 | @ | Execute_Immediate Case_Compare,0x40 012f 700f |p | Jump_Nonzero 0x13f 0130 0b60 | ` | Execute_Immediate Case_Compare,0x60 0131 700d |p | Jump_Nonzero 0x13f 0132 0b5c | \ | Execute_Immediate Case_Compare,0x5c 0133 700b |p | Jump_Nonzero 0x13f 0134 0b2e | . | Execute_Immediate Case_Compare,0x2e 0135 7009 |p | Jump_Nonzero 0x13f 0136 0b20 | | Execute_Immediate Case_Compare,0x20 0137 7002 |p | Jump_Nonzero 0x13a 0138 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xb = 0x138,0xf 0139 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 013a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xc = 0x13a,0xd 013b 0a01 | | Execute_Immediate Plus,0x1 013c c403 | | Store 0x2,0x3 013d 00d3 | | Pop_Control Pop_Count_3 ; Debug Table 0x5.0xd = 0x13d,0xe 013e 7803 |x | Jump 0x142 013f 00d1 | | Pop_Control Pop_Count_1 0140 00c8 | | Action Pop_Auxiliary_Range 0141 3fd0 |? | Loop_Increasing 0x112 0142 00ce | | Action Pop_Auxiliary 0143 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0xe = 0x143,0x10 0144 6811 |h | Jump_Zero 0x156 0145 00cf | | Action Mark_Auxiliary 0146 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0xf = 0x146,0x11 0147 01dc | | Execute Vector,Last 0148 00da | | Load_Top At_Offset_2 0149 0263 | c | Execute Discrete,Above_Bound 014a 7009 |p | Jump_Nonzero 0x154 014b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x10 = 0x14b,0x12 014c e5ff | | Load 0x2,-0x1 014d 01d7 | | Execute Vector,Field_Read 014e 0e20 | | Execute_Immediate Not_Equal,0x20 014f 6802 |h | Jump_Zero 0x152 0150 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x11 = 0x150,0x13 0151 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0152 00c8 | | Action Pop_Auxiliary_Range 0153 3ff7 |? | Loop_Increasing 0x14b 0154 00ce | | Action Pop_Auxiliary 0155 7804 |x | Jump 0x15a 0156 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x12 = 0x156,0x14 0157 01dc | | Execute Vector,Last 0158 0a01 | | Execute_Immediate Plus,0x1 0159 0059 | Y | Store_Top Discrete,At_Offset_1 015a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x13 = 0x15a,0x15 015b 0aff | | Execute_Immediate Plus,-0x1 015c 0248 | H | Execute Discrete,Check_In_Integer 015d e5ff | | Load 0x2,-0x1 015e 01d7 | | Execute Vector,Field_Read 015f 00d8 | | Load_Top At_Offset_0 0160 4830 |H0 | Short_Literal 0x30 0161 4839 |H9 | Short_Literal 0x39 0162 0262 | b | Execute Discrete,In_Range 0163 700c |p | Jump_Nonzero 0x170 0164 00d8 | | Load_Top At_Offset_0 0165 4861 |Ha | Short_Literal 0x61 0166 487a |Hz | Short_Literal 0x7a 0167 0262 | b | Execute Discrete,In_Range 0168 7007 |p | Jump_Nonzero 0x170 0169 00d8 | | Load_Top At_Offset_0 016a 4841 |HA | Short_Literal 0x41 016b 485a |HZ | Short_Literal 0x5a 016c 0262 | b | Execute Discrete,In_Range 016d 7002 |p | Jump_Nonzero 0x170 016e 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x14 = 0x16e,0x17 016f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0170 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x15 = 0x170,0x16 0171 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0172 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x16 = 0x172,0x18 0173 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0174 0000 0000 | | .BLANK 0000[0x4] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 0182 | | .CONST 0x0182 ; Address of begin 0179 018c | | .CONST 0x018c ; Address of exception handler 017a 0005 | | .CONST 0x0005 ; Number of locals 017b INIT_0178: 017b 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x6 = .DEBUG 0x017b,0x03e4,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0040 ; Debug Table 0x6.0x0 = 0x17b,0xffff 017c 00c6 | | Action Check_Subprogram_Elaborated 017d 1d19 | | Execute_Immediate Reference_Lex_1,0x19 017e 612d |a- | Indirect_Literal Discrete,0x2ac,{0x00000000, 0x0037df14} 017f 4a13 |J | Short_Literal 0x213 0180 4805 |H | Short_Literal 0x5 0181 0007 | | Action Break_Optional 0182 BODY_0178: 0182 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x1 = 0x182,0x1 0183 4802 |H | Short_Literal 0x2 0184 4802 |H | Short_Literal 0x2 0185 0099 | | Action Reference_Dynamic 0186 4803 |H | Short_Literal 0x3 0187 4802 |H | Short_Literal 0x2 0188 0099 | | Action Reference_Dynamic 0189 8216 | | Call 0x1,0x16 018a 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x2 = 0x18a,0x2 018b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018c TRAP_0178: 018c 611b |a | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x37ddc401} 018d 010f | | Execute Exception,Equal 018e 6802 |h | Jump_Zero 0x191 018f 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x3 = 0x18f,0x3 0190 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0191 0100 | | Execute Exception,Raise 0192 0000 0000 | | .BLANK 0000[0x6] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 01a8 | | .CONST 0x01a8 ; Address of begin 0199 01b2 | | .CONST 0x01b2 ; Address of exception handler 019a 0007 | | .CONST 0x0007 ; Number of locals 019b INIT_0198: 019b 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x7 = .DEBUG 0x019b,0x03ee,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0049 ; Debug Table 0x7.0x0 = 0x19b,0xffff 019c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 019d 029f 028b | | Declare_Subprogram INIT_0288,For_Call ; Debug Table 0x7.0x1 = 0x19d,0xfffe 019f 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x7.0x2 = 0x19f,0xfffd 01a0 00c6 | | Action Check_Subprogram_Elaborated 01a1 4803 |H | Short_Literal 0x3 01a2 4802 |H | Short_Literal 0x2 01a3 0099 | | Action Reference_Dynamic 01a4 6107 |a | Indirect_Literal Discrete,0x2ac,{0x00000000, 0x0037df14} 01a5 4a4d |JM | Short_Literal 0x24d 01a6 4807 |H | Short_Literal 0x7 01a7 0007 | | Action Break_Optional 01a8 BODY_0198: 01a8 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x3 = 0x1a8,0x1 01a9 4804 |H | Short_Literal 0x4 01aa 4802 |H | Short_Literal 0x2 01ab 0099 | | Action Reference_Dynamic 01ac 4805 |H | Short_Literal 0x5 01ad 4802 |H | Short_Literal 0x2 01ae 0099 | | Action Reference_Dynamic 01af 8216 | | Call 0x1,0x16 01b0 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x7.0x4 = 0x1b0,0x2 01b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b2 TRAP_0198: 01b2 60f5 |` | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x37ddc401} 01b3 010f | | Execute Exception,Equal 01b4 680a |h | Jump_Zero 0x1bf 01b5 0092 02b4 | | Action Push_String_Extended,0x2b4 ; "List element" ; Debug Table 0x7.0x5 = 0x1b5,0x3 01b7 e402 | | Load 0x2,0x2 01b8 00e0 | | Load_Encached Standard_Cache 01b9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01ba 01cc | | Execute Vector,Catenate 01bb 0092 02b5 | | Action Push_String_Extended,0x2b5 ; " is invalid" 01bd 01cc | | Execute Vector,Catenate 01be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01bf 0100 | | Execute Exception,Raise 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01cd | | .CONST 0x01cd ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0006 | | .CONST 0x0006 ; Number of locals 01c3 INIT_01c0: 01c3 4800 |H | Short_Literal 0x0 ; Debug Table 0x8 = .DEBUG 0x01c3,0x03fc,0x2801,0x0002,0x0037,0xddc4,0x0000,0x0052 ; Debug Table 0x8.0x0 = 0x1c3,0xffff 01c4 4802 |H | Short_Literal 0x2 01c5 029f 0293 | | Declare_Subprogram INIT_0290,For_Call 01c7 03fd | | Declare_Type Discrete,Defined 01c8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x1 = 0x1c8,0xfffe 01c9 0007 | | Action Break_Optional 01ca 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x2 = 0x1ca,0xfffd 01cb 03e9 | | Declare_Variable Discrete,Duplicate 01cc 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x3 = 0x1cc,0xfffc 01cd BODY_01c0: 01cd e5fd | | Load 0x2,-0x3 ; Debug Table 0x8.0x4 = 0x1cd,0x1 01ce 821a | | Call 0x1,0x1a 01cf 6803 |h | Jump_Zero 0x1d3 01d0 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x5 = 0x1d0,0x2 01d1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 01d2 7802 |x | Jump 0x1d5 01d3 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x6 = 0x1d3,0x3 01d4 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 01d5 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x7 = 0x1d5,0x4 01d6 a403 | | Store_Unchecked 0x2,0x3 01d7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x8.0x8 = 0x1d7,0x5 01d8 01dc | | Execute Vector,Last 01d9 00d9 | | Load_Top At_Offset_1 01da 0272 | r | Execute Discrete,Minus 01db 005a | Z | Store_Top Discrete,At_Offset_2 01dc 00cf | | Action Mark_Auxiliary 01dd e5fd | | Load 0x2,-0x3 ; Debug Table 0x8.0x9 = 0x1dd,0x6 01de 01dc | | Execute Vector,Last 01df 00da | | Load_Top At_Offset_2 01e0 0272 | r | Execute Discrete,Minus 01e1 0248 | H | Execute Discrete,Check_In_Integer 01e2 e5fd | | Load 0x2,-0x3 01e3 01dd | | Execute Vector,First 01e4 00db | | Load_Top At_Offset_3 01e5 0273 | s | Execute Discrete,Plus 01e6 0248 | H | Execute Discrete,Check_In_Integer 01e7 0263 | c | Execute Discrete,Above_Bound 01e8 7058 |pX | Jump_Nonzero 0x241 01e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xa = 0x1e9,0x7 01ea e5fd | | Load 0x2,-0x3 01eb 01d7 | | Execute Vector,Field_Read 01ec 0b20 | | Execute_Immediate Case_Compare,0x20 01ed 7019 |p | Jump_Nonzero 0x207 01ee 0b2c | , | Execute_Immediate Case_Compare,0x2c 01ef 7025 |p% | Jump_Nonzero 0x215 01f0 0b3b | ; | Execute_Immediate Case_Compare,0x3b 01f1 7023 |p# | Jump_Nonzero 0x215 01f2 0b0a | | Execute_Immediate Case_Compare,0xa 01f3 7021 |p! | Jump_Nonzero 0x215 01f4 00d8 | | Load_Top At_Offset_0 01f5 4861 |Ha | Short_Literal 0x61 01f6 487a |Hz | Short_Literal 0x7a 01f7 0262 | b | Execute Discrete,In_Range 01f8 7032 |p2 | Jump_Nonzero 0x22b 01f9 00d8 | | Load_Top At_Offset_0 01fa 4841 |HA | Short_Literal 0x41 01fb 485a |HZ | Short_Literal 0x5a 01fc 0262 | b | Execute Discrete,In_Range 01fd 702d |p- | Jump_Nonzero 0x22b 01fe 00d8 | | Load_Top At_Offset_0 01ff 4830 |H0 | Short_Literal 0x30 0200 4839 |H9 | Short_Literal 0x39 0201 0262 | b | Execute Discrete,In_Range 0202 7034 |p4 | Jump_Nonzero 0x237 0203 0b5f | _ | Execute_Immediate Case_Compare,0x5f 0204 7032 |p2 | Jump_Nonzero 0x237 0205 60a2 |` | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x37ddc401} ; Debug Table 0x8.0xb = 0x205,0x1a 0206 0257 | W | Execute Discrete,Raise 0207 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0xc = 0x207,0x8 0208 0f01 | | Execute_Immediate Equal,0x1 0209 6834 |h4 | Jump_Zero 0x23e 020a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0xd = 0x20a,0x9 020b 0aff | | Execute_Immediate Plus,-0x1 020c c405 | | Store 0x2,0x5 020d 4802 |H | Short_Literal 0x2 ; Debug Table 0x8.0xe = 0x20d,0xa 020e a403 | | Store_Unchecked 0x2,0x3 020f e404 | | Load 0x2,0x4 ; Debug Table 0x8.0xf = 0x20f,0xb 0210 e405 | | Load 0x2,0x5 0211 e5fd | | Load 0x2,-0x3 0212 01cf | | Execute Vector,Slice_Read 0213 85fe | | Call 0x2,-0x2 0214 7829 |x) | Jump 0x23e 0215 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0x10 = 0x215,0xc 0216 0f01 | | Execute_Immediate Equal,0x1 0217 680b |h | Jump_Zero 0x223 0218 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x11 = 0x218,0xd 0219 0aff | | Execute_Immediate Plus,-0x1 021a c405 | | Store 0x2,0x5 021b 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x12 = 0x21b,0xe 021c a403 | | Store_Unchecked 0x2,0x3 021d e404 | | Load 0x2,0x4 ; Debug Table 0x8.0x13 = 0x21d,0xf 021e e405 | | Load 0x2,0x5 021f e5fd | | Load 0x2,-0x3 0220 01cf | | Execute Vector,Slice_Read 0221 85fe | | Call 0x2,-0x2 0222 781b |x | Jump 0x23e 0223 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0x14 = 0x223,0x10 0224 0f02 | | Execute_Immediate Equal,0x2 0225 6803 |h | Jump_Zero 0x229 0226 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x15 = 0x226,0x11 0227 a403 | | Store_Unchecked 0x2,0x3 0228 7815 |x | Jump 0x23e 0229 607e |`~ | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x37ddc401} ; Debug Table 0x8.0x16 = 0x229,0x12 022a 0257 | W | Execute Discrete,Raise 022b e403 | | Load 0x2,0x3 ; Debug Table 0x8.0x17 = 0x22b,0x13 022c 7005 |p | Jump_Nonzero 0x232 022d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x18 = 0x22d,0x14 022e c404 | | Store 0x2,0x4 022f 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x19 = 0x22f,0x15 0230 a403 | | Store_Unchecked 0x2,0x3 0231 780c |x | Jump 0x23e 0232 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0x1a = 0x232,0x16 0233 0f02 | | Execute_Immediate Equal,0x2 0234 6809 |h | Jump_Zero 0x23e 0235 6072 |`r | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x37ddc401} ; Debug Table 0x8.0x1b = 0x235,0x17 0236 0257 | W | Execute Discrete,Raise 0237 e403 | | Load 0x2,0x3 ; Debug Table 0x8.0x1c = 0x237,0x18 0238 6803 |h | Jump_Zero 0x23c 0239 e403 | | Load 0x2,0x3 023a 0f02 | | Execute_Immediate Equal,0x2 023b 6802 |h | Jump_Zero 0x23e 023c 606b |`k | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x37ddc401} ; Debug Table 0x8.0x1d = 0x23c,0x19 023d 0257 | W | Execute Discrete,Raise 023e 00d1 | | Pop_Control Pop_Count_1 023f 00c8 | | Action Pop_Auxiliary_Range 0240 3fa8 |? | Loop_Increasing 0x1e9 0241 00ce | | Action Pop_Auxiliary 0242 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1e = 0x242,0x1b 0243 0f01 | | Execute_Immediate Equal,0x1 0244 6809 |h | Jump_Zero 0x24e 0245 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x1f = 0x245,0x1c 0246 e5fd | | Load 0x2,-0x3 0247 01dc | | Execute Vector,Last 0248 0aff | | Execute_Immediate Plus,-0x1 0249 0248 | H | Execute Discrete,Check_In_Integer 024a e5fd | | Load 0x2,-0x3 024b 01cf | | Execute Vector,Slice_Read 024c 85fe | | Call 0x2,-0x2 024d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 024e 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x20 = 0x24e,0x1d 024f 7002 |p | Jump_Nonzero 0x252 0250 6057 |`W | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x37ddc401} ; Debug Table 0x8.0x21 = 0x250,0x1e 0251 0257 | W | Execute Discrete,Raise 0252 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0253 0000 0000 | | .BLANK 0000[0x5] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025d | ] | .CONST 0x025d ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0003 | | .CONST 0x0003 ; Number of locals 025b INIT_0258: 025b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9 = .DEBUG 0x025b,0x0442,0x0002,0x0000,0x0037,0xddc4,0x0000,0x006b ; Debug Table 0x9.0x0 = 0x25b,0xffff 025c 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x9.0x1 = 0x25c,0xfffe 025d BODY_0258: 025d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9.0x2 = 0x25d,0x1 025e 00e5 | | Load_Encached Long_Integer_Cache 025f 480a |H | Short_Literal 0xa 0260 e5ff | | Load 0x2,-0x1 0261 e003 | | Load 0x0,0x3 0262 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0263 005a | Z | Store_Top Discrete,At_Offset_2 0264 005a | Z | Store_Top Discrete,At_Offset_2 0265 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x3 = 0x265,0x2 0266 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0267 0000 | | .XXX[0x1] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0xa = .DEBUG 0x026b,0x044c,0x0001,0x0000,0x0037,0xdf14,0x0000,0x01da ; Debug Table 0xa.0x0 = 0x26b,0x1 026c 0000 0000 | | .BLANK 0000[0x4] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0273 | s | .CONST 0x0273 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0001 | | .CONST 0x0001 ; Number of locals 0273 BODY_0270: 0273 INIT_0270: 0273 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x0273,0x0450,0x0002,0x0000,0x0037,0xdf14,0x0000,0x01e7 ; Debug Table 0xb.0x0 = 0x273,0x1 0274 01dd | | Execute Vector,First 0275 00db | | Load_Top At_Offset_3 0276 01d7 | | Execute Vector,Field_Read 0277 0f28 | ( | Execute_Immediate Equal,0x28 0278 6806 |h | Jump_Zero 0x27f 0279 00da | | Load_Top At_Offset_2 027a 01dc | | Execute Vector,Last 027b 00db | | Load_Top At_Offset_3 027c 01d7 | | Execute Vector,Field_Read 027d 0f29 | ) | Execute_Immediate Equal,0x29 027e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 027f 4800 |H | Short_Literal 0x0 0280 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0281 0000 0000 | | .BLANK 0000[0x7] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b e402 | | Load 0x2,0x2 ; Debug Table 0xc = .DEBUG 0x028b,0x0454,0x0001,0x0000,0x0037,0xdf14,0x0000,0x023a ; Debug Table 0xc.0x0 = 0x28b,0x1 028c 0a01 | | Execute_Immediate Plus,0x1 028d c402 | | Store 0x2,0x2 028e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 028f 0000 | | .XXX[0x1] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 4603 |F | Jump_Case 0x4 ; Debug Table 0xd = .DEBUG 0x0293,0x0458,0x0805,0x0002,0x0037,0xdf14,0x0000,0x0279 0294 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0295 7802 |x | Jump 0x298 ; case 0x1 0296 7805 |x | Jump 0x29c ; case 0x2 0297 7809 |x | Jump 0x2a1 ; case 0x3 0298 00da | | Load_Top At_Offset_2 0299 0091 02b0 | | Action Push_String_Extended_Indexed,0x2b0 ; "LEADING" 029b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 029c 00db | | Load_Top At_Offset_3 029d 00db | | Load_Top At_Offset_3 029e 00e0 | | Load_Encached Standard_Cache 029f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02a0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a1 00da | | Load_Top At_Offset_2 02a2 00e0 | | Load_Encached Standard_Cache 02a3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02a4 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02a5 0000 0000 | | .XXX[0x3] 02a7 0000 | | 02a8 0000 0000 | | .LITERAL {0x00000000, 0x37ddc401} 02ac 0000 0000 | | .LITERAL {0x00000000, 0x0037df14} 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; STRING TABLE 02b0 ; -------------------------------------------------------------------------------------- 02b0 000e | | .STRTAB 0x000e->0x02b7 ; "LEADING" 02b1 0013 | | .STRTAB 0x0013->0x02ba ; "GUTS" 02b2 0015 | | .STRTAB 0x0015->0x02bc ; "TRAILING" 02b3 001b | | .STRTAB 0x001b->0x02c0 ; "ERROR_NODES" 02b4 0024 | $ | .STRTAB 0x0024->0x02c6 ; "List element" 02b5 002e | . | .STRTAB 0x002e->0x02cc ; " is invalid" 02b6 0037 | 7 | .STREND 0x0037->0x02d1 02b7 4c45 4144 |LEAD| .STRTAB_STRINGS 02d2 0000 0000 | | .BLANK 0000[0x6] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; Debug Table 02d8 ; -------------------------------------------------------------------------------------- 02d8 0003 000e | | .CONST 0x0003,0x000e 02da 000b 034a | J| .DEBUG 0x000b,0x034a,0x8000,0x0000,0x0037,0xddc4,0x0000,0x0005 02e2 0023 0364 | # d| .DEBUG 0x0023,0x0364,0x8000,0x0000,0x0037,0xdf14,0x0000,0x000b 02ea 004b 0380 | K | .DEBUG 0x004b,0x0380,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0007 02f2 005b 0384 | [ | .DEBUG 0x005b,0x0384,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0012 02fa 0063 0388 | c | .DEBUG 0x0063,0x0388,0x0002,0x0000,0x0037,0xddc4,0x0000,0x002e 0302 00d3 03b4 | | .DEBUG 0x00d3,0x03b4,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0037 030a 017b 03e4 | { | .DEBUG 0x017b,0x03e4,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0040 0312 019b 03ee | | .DEBUG 0x019b,0x03ee,0x0002,0x0000,0x0037,0xddc4,0x0000,0x0049 031a 01c3 03fc | | .DEBUG 0x01c3,0x03fc,0x2801,0x0002,0x0037,0xddc4,0x0000,0x0052 0322 025b 0442 | [ B| .DEBUG 0x025b,0x0442,0x0002,0x0000,0x0037,0xddc4,0x0000,0x006b 032a 026b 044c | k L| .DEBUG 0x026b,0x044c,0x0001,0x0000,0x0037,0xdf14,0x0000,0x01da 0332 0273 0450 | s P| .DEBUG 0x0273,0x0450,0x0002,0x0000,0x0037,0xdf14,0x0000,0x01e7 033a 028b 0454 | T| .DEBUG 0x028b,0x0454,0x0001,0x0000,0x0037,0xdf14,0x0000,0x023a 0342 0293 0458 | X| .DEBUG 0x0293,0x0458,0x0805,0x0002,0x0037,0xdf14,0x0000,0x0279 034a ; -------------------------------------------------------------------------------------- 034a ; Debug3 Subtable 0x0 034a ; -------------------------------------------------------------------------------------- 034a 000c 0000 | | .DBG3TAB 0x000c,0x0000 034c 000b ffff | | .CONST 0x000b,0xffff 034e 000d fffe | | .CONST 0x000d,0xfffe 0350 000f ffff | | .CONST 0x000f,0xffff 0352 0011 fffe | | .CONST 0x0011,0xfffe 0354 0013 fffd | | .CONST 0x0013,0xfffd 0356 0015 fffc | | .CONST 0x0015,0xfffc 0358 0017 fffb | | .CONST 0x0017,0xfffb 035a 0019 fffa | | .CONST 0x0019,0xfffa 035c 001b fff9 | | .CONST 0x001b,0xfff9 035e 001d fff8 | | .CONST 0x001d,0xfff8 0360 001f fff7 | | .CONST 0x001f,0xfff7 0362 0020 fffd | | .CONST 0x0020,0xfffd 0364 ; -------------------------------------------------------------------------------------- 0364 ; Debug3 Subtable 0x1 0364 ; -------------------------------------------------------------------------------------- 0364 000d 0000 | | .DBG3TAB 0x000d,0x0000 0366 0023 ffff | # | .CONST 0x0023,0xffff 0368 0024 ffff | $ | .CONST 0x0024,0xffff 036a 0025 fffe | % | .CONST 0x0025,0xfffe 036c 002e fffd | . | .CONST 0x002e,0xfffd 036e 0030 fffc | 0 | .CONST 0x0030,0xfffc 0370 0032 ffff | 2 | .CONST 0x0032,0xffff 0372 0034 fffe | 4 | .CONST 0x0034,0xfffe 0374 0036 fffd | 6 | .CONST 0x0036,0xfffd 0376 0038 fffc | 8 | .CONST 0x0038,0xfffc 0378 003a fffb | : | .CONST 0x003a,0xfffb 037a 003c fffa | < | .CONST 0x003c,0xfffa 037c 003e fff9 | > | .CONST 0x003e,0xfff9 037e 0040 fffc | @ | .CONST 0x0040,0xfffc 0380 ; -------------------------------------------------------------------------------------- 0380 ; Debug3 Subtable 0x2 0380 ; -------------------------------------------------------------------------------------- 0380 0000 0001 | | .DBG3TAB 0x0000,0x0001 0382 004b 0001 | K | .CONST 0x004b,0x0001 0384 ; -------------------------------------------------------------------------------------- 0384 ; Debug3 Subtable 0x3 0384 ; -------------------------------------------------------------------------------------- 0384 0000 0001 | | .DBG3TAB 0x0000,0x0001 0386 005b 0001 | [ | .CONST 0x005b,0x0001 0388 ; -------------------------------------------------------------------------------------- 0388 ; Debug3 Subtable 0x4 0388 ; -------------------------------------------------------------------------------------- 0388 0001 0014 | | .DBG3TAB 0x0001,0x0014 038a 0063 ffff | c | .CONST 0x0063,0xffff 038c 0066 0001 | f | .CONST 0x0066,0x0001 038e 006a 0002 | j | .CONST 0x006a,0x0002 0390 006e 0003 | n | .CONST 0x006e,0x0003 0392 007d 0007 | } | .CONST 0x007d,0x0007 0394 007f 0005 | | .CONST 0x007f,0x0005 0396 0082 0006 | | .CONST 0x0082,0x0006 0398 0088 0008 | | .CONST 0x0088,0x0008 039a 008a 0009 | | .CONST 0x008a,0x0009 039c 008d 000a | | .CONST 0x008d,0x000a 039e 0092 000b | | .CONST 0x0092,0x000b 03a0 00a8 000f | | .CONST 0x00a8,0x000f 03a2 00aa 000d | | .CONST 0x00aa,0x000d 03a4 00ad 000e | | .CONST 0x00ad,0x000e 03a6 00b3 0010 | | .CONST 0x00b3,0x0010 03a8 00b5 0011 | | .CONST 0x00b5,0x0011 03aa 00b8 0012 | | .CONST 0x00b8,0x0012 03ac 00bd 0013 | | .CONST 0x00bd,0x0013 03ae 00c2 0014 | | .CONST 0x00c2,0x0014 03b0 00c7 0015 | | .CONST 0x00c7,0x0015 03b2 00c9 0016 | | .CONST 0x00c9,0x0016 03b4 ; -------------------------------------------------------------------------------------- 03b4 ; Debug3 Subtable 0x5 03b4 ; -------------------------------------------------------------------------------------- 03b4 0001 0016 | | .DBG3TAB 0x0001,0x0016 03b6 00d3 ffff | | .CONST 0x00d3,0xffff 03b8 00d6 0001 | | .CONST 0x00d6,0x0001 03ba 00da 0002 | | .CONST 0x00da,0x0002 03bc 00de 0003 | | .CONST 0x00de,0x0003 03be 00fd 0007 | | .CONST 0x00fd,0x0007 03c0 00ff 0005 | | .CONST 0x00ff,0x0005 03c2 0102 0006 | | .CONST 0x0102,0x0006 03c4 0108 0008 | | .CONST 0x0108,0x0008 03c6 010a 0009 | | .CONST 0x010a,0x0009 03c8 010d 000a | | .CONST 0x010d,0x000a 03ca 0112 000b | | .CONST 0x0112,0x000b 03cc 0138 000f | 8 | .CONST 0x0138,0x000f 03ce 013a 000d | : | .CONST 0x013a,0x000d 03d0 013d 000e | = | .CONST 0x013d,0x000e 03d2 0143 0010 | C | .CONST 0x0143,0x0010 03d4 0146 0011 | F | .CONST 0x0146,0x0011 03d6 014b 0012 | K | .CONST 0x014b,0x0012 03d8 0150 0013 | P | .CONST 0x0150,0x0013 03da 0156 0014 | V | .CONST 0x0156,0x0014 03dc 015a 0015 | Z | .CONST 0x015a,0x0015 03de 016e 0017 | n | .CONST 0x016e,0x0017 03e0 0170 0016 | p | .CONST 0x0170,0x0016 03e2 0172 0018 | r | .CONST 0x0172,0x0018 03e4 ; -------------------------------------------------------------------------------------- 03e4 ; Debug3 Subtable 0x6 03e4 ; -------------------------------------------------------------------------------------- 03e4 0001 0003 | | .DBG3TAB 0x0001,0x0003 03e6 017b ffff | { | .CONST 0x017b,0xffff 03e8 0182 0001 | | .CONST 0x0182,0x0001 03ea 018a 0002 | | .CONST 0x018a,0x0002 03ec 018f 0003 | | .CONST 0x018f,0x0003 03ee ; -------------------------------------------------------------------------------------- 03ee ; Debug3 Subtable 0x7 03ee ; -------------------------------------------------------------------------------------- 03ee 0003 0003 | | .DBG3TAB 0x0003,0x0003 03f0 019b ffff | | .CONST 0x019b,0xffff 03f2 019d fffe | | .CONST 0x019d,0xfffe 03f4 019f fffd | | .CONST 0x019f,0xfffd 03f6 01a8 0001 | | .CONST 0x01a8,0x0001 03f8 01b0 0002 | | .CONST 0x01b0,0x0002 03fa 01b5 0003 | | .CONST 0x01b5,0x0003 03fc ; -------------------------------------------------------------------------------------- 03fc ; Debug3 Subtable 0x8 03fc ; -------------------------------------------------------------------------------------- 03fc 0004 001e | | .DBG3TAB 0x0004,0x001e 03fe 01c3 ffff | | .CONST 0x01c3,0xffff 0400 01c8 fffe | | .CONST 0x01c8,0xfffe 0402 01ca fffd | | .CONST 0x01ca,0xfffd 0404 01cc fffc | | .CONST 0x01cc,0xfffc 0406 01cd 0001 | | .CONST 0x01cd,0x0001 0408 01d0 0002 | | .CONST 0x01d0,0x0002 040a 01d3 0003 | | .CONST 0x01d3,0x0003 040c 01d5 0004 | | .CONST 0x01d5,0x0004 040e 01d7 0005 | | .CONST 0x01d7,0x0005 0410 01dd 0006 | | .CONST 0x01dd,0x0006 0412 01e9 0007 | | .CONST 0x01e9,0x0007 0414 0205 001a | | .CONST 0x0205,0x001a 0416 0207 0008 | | .CONST 0x0207,0x0008 0418 020a 0009 | | .CONST 0x020a,0x0009 041a 020d 000a | | .CONST 0x020d,0x000a 041c 020f 000b | | .CONST 0x020f,0x000b 041e 0215 000c | | .CONST 0x0215,0x000c 0420 0218 000d | | .CONST 0x0218,0x000d 0422 021b 000e | | .CONST 0x021b,0x000e 0424 021d 000f | | .CONST 0x021d,0x000f 0426 0223 0010 | # | .CONST 0x0223,0x0010 0428 0226 0011 | & | .CONST 0x0226,0x0011 042a 0229 0012 | ) | .CONST 0x0229,0x0012 042c 022b 0013 | + | .CONST 0x022b,0x0013 042e 022d 0014 | - | .CONST 0x022d,0x0014 0430 022f 0015 | / | .CONST 0x022f,0x0015 0432 0232 0016 | 2 | .CONST 0x0232,0x0016 0434 0235 0017 | 5 | .CONST 0x0235,0x0017 0436 0237 0018 | 7 | .CONST 0x0237,0x0018 0438 023c 0019 | < | .CONST 0x023c,0x0019 043a 0242 001b | B | .CONST 0x0242,0x001b 043c 0245 001c | E | .CONST 0x0245,0x001c 043e 024e 001d | N | .CONST 0x024e,0x001d 0440 0250 001e | P | .CONST 0x0250,0x001e 0442 ; -------------------------------------------------------------------------------------- 0442 ; Debug3 Subtable 0x9 0442 ; -------------------------------------------------------------------------------------- 0442 0002 0002 | | .DBG3TAB 0x0002,0x0002 0444 025b ffff | [ | .CONST 0x025b,0xffff 0446 025c fffe | \ | .CONST 0x025c,0xfffe 0448 025d 0001 | ] | .CONST 0x025d,0x0001 044a 0265 0002 | e | .CONST 0x0265,0x0002 044c ; -------------------------------------------------------------------------------------- 044c ; Debug3 Subtable 0xa 044c ; -------------------------------------------------------------------------------------- 044c 0000 0001 | | .DBG3TAB 0x0000,0x0001 044e 026b 0001 | k | .CONST 0x026b,0x0001 0450 ; -------------------------------------------------------------------------------------- 0450 ; Debug3 Subtable 0xb 0450 ; -------------------------------------------------------------------------------------- 0450 0000 0001 | | .DBG3TAB 0x0000,0x0001 0452 0273 0001 | s | .CONST 0x0273,0x0001 0454 ; -------------------------------------------------------------------------------------- 0454 ; Debug3 Subtable 0xc 0454 ; -------------------------------------------------------------------------------------- 0454 0000 0001 | | .DBG3TAB 0x0000,0x0001 0456 028b 0001 | | .CONST 0x028b,0x0001 0458 ; -------------------------------------------------------------------------------------- 0458 ; Debug3 Subtable 0xd 0458 ; -------------------------------------------------------------------------------------- 0458 0000 0000 | | .DBG3TAB 0x0000,0x0000 045a 0000 0000 | | .BLANK 0000[0x1a6]