|
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_07b4f8
└─⟦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,0x0032,0xc984,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,0x0032,0xcb64,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,0x0032,0xc984,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,0x0032,0xc984,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,0x0032,0xc984,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,0x0032,0xc984,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,0x0032,0xc984,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, 0x0032cb64}
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, 0x32c98401}
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,0x0032,0xc984,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, 0x0032cb64}
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, 0x32c98401}
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,0x0032,0xc984,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, 0x32c98401} ; 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, 0x32c98401} ; 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, 0x32c98401} ; 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, 0x32c98401} ; 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, 0x32c98401} ; 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,0x0032,0xc984,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,0x0032,0xcb64,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,0x0032,0xcb64,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,0x0032,0xcb64,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,0x0032,0xcb64,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, 0x32c98401}
02ac 0000 0000 | | .LITERAL {0x00000000, 0x0032cb64}
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,0x0032,0xc984,0x0000,0x0005
02e2 0023 0364 | # d| .DEBUG 0x0023,0x0364,0x8000,0x0000,0x0032,0xcb64,0x0000,0x000b
02ea 004b 0380 | K | .DEBUG 0x004b,0x0380,0x0002,0x0000,0x0032,0xc984,0x0000,0x0007
02f2 005b 0384 | [ | .DEBUG 0x005b,0x0384,0x0002,0x0000,0x0032,0xc984,0x0000,0x0012
02fa 0063 0388 | c | .DEBUG 0x0063,0x0388,0x0002,0x0000,0x0032,0xc984,0x0000,0x002e
0302 00d3 03b4 | | .DEBUG 0x00d3,0x03b4,0x0002,0x0000,0x0032,0xc984,0x0000,0x0037
030a 017b 03e4 | { | .DEBUG 0x017b,0x03e4,0x0002,0x0000,0x0032,0xc984,0x0000,0x0040
0312 019b 03ee | | .DEBUG 0x019b,0x03ee,0x0002,0x0000,0x0032,0xc984,0x0000,0x0049
031a 01c3 03fc | | .DEBUG 0x01c3,0x03fc,0x2801,0x0002,0x0032,0xc984,0x0000,0x0052
0322 025b 0442 | [ B| .DEBUG 0x025b,0x0442,0x0002,0x0000,0x0032,0xc984,0x0000,0x006b
032a 026b 044c | k L| .DEBUG 0x026b,0x044c,0x0001,0x0000,0x0032,0xcb64,0x0000,0x01da
0332 0273 0450 | s P| .DEBUG 0x0273,0x0450,0x0002,0x0000,0x0032,0xcb64,0x0000,0x01e7
033a 028b 0454 | T| .DEBUG 0x028b,0x0454,0x0001,0x0000,0x0032,0xcb64,0x0000,0x023a
0342 0293 0458 | X| .DEBUG 0x0293,0x0458,0x0805,0x0002,0x0032,0xcb64,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]