|
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 - metrics - download
Length: 6144 (0x1800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe, seg_06e8fd
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0a40 | @ | .CONST 0x0a40 ; 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 8006 | | .CONST 0x8006 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0017 | | .CONST 0x0017 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000f | | .CONST 0x000f ; Number of locals
000b INIT_0008:
000b 029a 0023 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0020
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 029a 0053 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0050
0011 c20f | | Store 0x1,0xf
0012 00bf | | Action Accept_Activation
0013 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0014 00c7 | | Action Elaborate_Subprogram
0015 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0016 00c7 | | Action Elaborate_Subprogram
0017 BODY_0008:
0017 00bc | | Action Signal_Activated
0018 00bb | | Action Signal_Completion
0019 0000 0000 | | .BLANK 0000[0x7]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0034 | 4 | .CONST 0x0034 ; Address of begin
0021 0004 | | .CONST 0x0004 ; Address of exception handler
0022 0009 | | .CONST 0x0009 ; Number of locals
0023 INIT_0020:
0023 00e1 | | Load_Encached Boolean_Cache
0024 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0025 e5fd | | Load 0x2,-0x3
0026 01dd | | Execute Vector,First
0027 00e3 | | Load_Encached Natural_Cache
0028 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0029 00e3 | | Load_Encached Natural_Cache
002a 029f 0103 | | Declare_Subprogram For_Call,INIT_0100
002c 029f 011b | | Declare_Subprogram For_Call,INIT_0118
002e 029f 013b | ;| Declare_Subprogram For_Call,INIT_0138
0030 029f 0153 | S| Declare_Subprogram For_Call,INIT_0150
0032 029f 019b | | Declare_Subprogram For_Call,INIT_0198
0034 BODY_0020:
0034 e5fd | | Load 0x2,-0x3
0035 01db | | Execute Vector,Length
0036 7003 |p | Jump_Nonzero 0x3a
0037 e5fd | | Load 0x2,-0x3
0038 85fe | | Call 0x2,-0x2
0039 4506 |E | Exit_Subprogram 0x6
003a 00cf | | Action Mark_Auxiliary
003b 8408 | | Call 0x2,0x8
003c e403 | | Load 0x2,0x3
003d e404 | | Load 0x2,0x4
003e 027d | } | Execute Discrete,Greater
003f 7009 |p | Jump_Nonzero 0x49
0040 8409 | | Call 0x2,0x9
0041 85fe | | Call 0x2,-0x2
0042 4801 |H | Short_Literal 0x1
0043 a402 | | Store_Unchecked 0x2,0x2
0044 e404 | | Load 0x2,0x4
0045 0a01 | | Execute_Immediate Plus,0x1
0046 c403 | | Store 0x2,0x3
0047 00c9 | | Action Pop_Auxiliary_Loop
0048 7ff2 | | Jump 0x3b
0049 00ce | | Action Pop_Auxiliary
004a 4506 |E | Exit_Subprogram 0x6
004b 0000 0000 | | .BLANK 0000[0x5]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 00d5 | | .CONST 0x00d5 ; Address of begin
0051 00e7 | | .CONST 0x00e7 ; Address of exception handler
0052 0028 | ( | .CONST 0x0028 ; Number of locals
0053 INIT_0050:
0053 4800 |H | Short_Literal 0x0
0054 4803 |H | Short_Literal 0x3
0055 029f 01b3 | | Declare_Subprogram For_Call,INIT_01b0
0057 03fd | | Declare_Type Discrete,Defined
0058 00d8 | | Load_Top At_Offset_0
0059 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
005a 029f 01cb | | Declare_Subprogram For_Call,INIT_01c8
005c 00e3 | | Load_Encached Natural_Cache
005d 00e3 | | Load_Encached Natural_Cache
005e 02a0 | | Declare_Subprogram Null_Subprogram
005f 4802 |H | Short_Literal 0x2
0060 032d | - | Declare_Type Record,Defined
0061 00d8 | | Load_Top At_Offset_0
0062 0322 | " | Declare_Variable Record
0063 4801 |H | Short_Literal 0x1
0064 e406 | | Load 0x2,0x6
0065 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0066 4800 |H | Short_Literal 0x0
0067 e406 | | Load 0x2,0x6
0068 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0069 029f 01d3 | | Declare_Subprogram For_Call,INIT_01d0
006b 4800 |H | Short_Literal 0x0
006c 4802 |H | Short_Literal 0x2
006d 029f 01e3 | | Declare_Subprogram For_Call,INIT_01e0
006f 03fd | | Declare_Type Discrete,Defined
0070 00d8 | | Load_Top At_Offset_0
0071 4803 |H | Short_Literal 0x3
0072 4800 |H | Short_Literal 0x0
0073 4801 |H | Short_Literal 0x1
0074 4807 |H | Short_Literal 0x7
0075 0318 | | Declare_Type Variant_Record,Incomplete
0076 029f 01fb | | Declare_Subprogram For_Call,INIT_01f8
0078 00d9 | | Load_Top At_Offset_1
0079 012a | * | Execute Any,Change_Utility
007a 0007 | | Action Break_Optional
007b 00d8 | | Load_Top At_Offset_0
007c 02a0 | | Declare_Subprogram Null_Subprogram
007d 481c |H | Short_Literal 0x1c
007e 03d5 | | Declare_Type Access,Defined
007f 00d8 | | Load_Top At_Offset_0
0080 4801 |H | Short_Literal 0x1
0081 e405 | | Load 0x2,0x5
0082 4802 |H | Short_Literal 0x2
0083 e405 | | Load 0x2,0x5
0084 e405 | | Load 0x2,0x5
0085 4802 |H | Short_Literal 0x2
0086 e405 | | Load 0x2,0x5
0087 e40a | | Load 0x2,0xa
0088 029f 01fb | | Declare_Subprogram For_Call,INIT_01f8
008a 4805 |H | Short_Literal 0x5
008b 4801 |H | Short_Literal 0x1
008c e409 | | Load 0x2,0x9
008d 0307 | | Complete_Type Variant_Record,By_Defining
008e 00d8 | | Load_Top At_Offset_0
008f 03c4 | | Complete_Type Access,By_Component_Completion
0090 029f 022b | +| Declare_Subprogram For_Call,INIT_0228
0092 029f 0243 | C| Declare_Subprogram For_Call,INIT_0240
0094 029f 026b | k| Declare_Subprogram For_Call,INIT_0268
0096 e5fd | | Load 0x2,-0x3
0097 01dd | | Execute Vector,First
0098 00e2 | | Load_Encached Integer_Cache
0099 03f1 | | Declare_Variable Discrete,With_Value
009a 4801 |H | Short_Literal 0x1
009b 480c |H | Short_Literal 0xc
009c 00e2 | | Load_Encached Integer_Cache
009d 03f8 | | Declare_Type Discrete,Constrained
009e 029f 0283 | | Declare_Subprogram For_Call,INIT_0280
00a0 029f 029b | | Declare_Subprogram For_Call,INIT_0298
00a2 029f 02cb | | Declare_Subprogram For_Call,INIT_02c8
00a4 029f 02eb | | Declare_Subprogram For_Call,INIT_02e8
00a6 029f 0323 | #| Declare_Subprogram For_Call,INIT_0320
00a8 029f 0343 | C| Declare_Subprogram For_Call,INIT_0340
00aa 029f 0593 | | Declare_Subprogram For_Call,INIT_0590
00ac 029f 05d3 | | Declare_Subprogram For_Call,INIT_05d0
00ae 604d |`M | Indirect_Literal Discrete,0xfc,{0x00000000, 0x00001388}
00af e001 | | Load 0x0,0x1
00b0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00b1 1c08 | | Execute_Immediate Run_Utility,0x8
00b2 00d8 | | Load_Top At_Offset_0
00b3 1c00 | | Execute_Immediate Run_Utility,0x0
00b4 1d0d | | Execute_Immediate Reference_Lex_1,0xd
00b5 00c6 | | Action Check_Subprogram_Elaborated
00b6 4807 |H | Short_Literal 0x7
00b7 4802 |H | Short_Literal 0x2
00b8 0099 | | Action Reference_Dynamic
00b9 e002 | | Load 0x0,0x2
00ba e003 | | Load 0x0,0x3
00bb 481c |H | Short_Literal 0x1c
00bc 0007 | | Action Break_Optional
00bd 029f 05e3 | | Declare_Subprogram For_Call,INIT_05e0
00bf 029f 05fb | | Declare_Subprogram For_Call,INIT_05f8
00c1 029f 0623 | #| Declare_Subprogram For_Call,INIT_0620
00c3 029f 0633 | 3| Declare_Subprogram For_Call,INIT_0630
00c5 029f 0683 | | Declare_Subprogram For_Call,INIT_0680
00c7 029f 068b | | Declare_Subprogram For_Call,INIT_0688
00c9 029f 06cb | | Declare_Subprogram For_Call,INIT_06c8
00cb 029f 06e3 | | Declare_Subprogram For_Call,INIT_06e0
00cd 029f 06f3 | | Declare_Subprogram For_Call,INIT_06f0
00cf 029f 0713 | | Declare_Subprogram For_Call,INIT_0710
00d1 029f 0753 | S| Declare_Subprogram For_Call,INIT_0750
00d3 029f 07a3 | | Declare_Subprogram For_Call,INIT_07a0
00d5 BODY_0050:
00d5 e5fc | | Load 0x2,-0x4
00d6 680b |h | Jump_Zero 0xe2
00d7 484f |HO | Short_Literal 0x4f
00d8 00ea | | Load_Encached Null_String_Cache
00d9 e5fd | | Load 0x2,-0x3
00da 4819 |H | Short_Literal 0x19
00db 4802 |H | Short_Literal 0x2
00dc 0099 | | Action Reference_Dynamic
00dd 481a |H | Short_Literal 0x1a
00de 4802 |H | Short_Literal 0x2
00df 0099 | | Action Reference_Dynamic
00e0 820d | | Call 0x1,0xd
00e1 4509 |E | Exit_Subprogram 0x9
00e2 4800 |H | Short_Literal 0x0
00e3 8416 | | Call 0x2,0x16
00e4 8428 | ( | Call 0x2,0x28
00e5 841d | | Call 0x2,0x1d
00e6 4509 |E | Exit_Subprogram 0x9
00e7 TRAP_0050:
00e7 0007 | | Action Break_Optional
00e8 e403 | | Load 0x2,0x3
00e9 0f01 | | Execute_Immediate Equal,0x1
00ea 6806 |h | Jump_Zero 0xf1
00eb e5f8 | | Load 0x2,-0x8
00ec 6802 |h | Jump_Zero 0xef
00ed 00d8 | | Load_Top At_Offset_0
00ee 0101 | | Execute Exception,Reraise
00ef 0008 | | Action Idle
00f0 4509 |E | Exit_Subprogram 0x9
00f1 484f |HO | Short_Literal 0x4f
00f2 00ea | | Load_Encached Null_String_Cache
00f3 e5fd | | Load 0x2,-0x3
00f4 4819 |H | Short_Literal 0x19
00f5 4802 |H | Short_Literal 0x2
00f6 0099 | | Action Reference_Dynamic
00f7 481a |H | Short_Literal 0x1a
00f8 4802 |H | Short_Literal 0x2
00f9 0099 | | Action Reference_Dynamic
00fa 820d | | Call 0x1,0xd
00fb 4509 |E | Exit_Subprogram 0x9
00fc 0000 0000 | | .LITERAL {0x00000000, 0x00001388}
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 e402 | | Load 0x2,0x2
0104 680c |h | Jump_Zero 0x111
0105 e5fb | | Load 0x2,-0x5
0106 e5fc | | Load 0x2,-0x4
0107 01db | | Execute Vector,Length
0108 027d | } | Execute Discrete,Greater
0109 6807 |h | Jump_Zero 0x111
010a e5fb | | Load 0x2,-0x5
010b e5fc | | Load 0x2,-0x4
010c 01db | | Execute Vector,Length
010d 0272 | r | Execute Discrete,Minus
010e 00e3 | | Load_Encached Natural_Cache
010f 025b | [ | Execute Discrete,Check_In_Type
0110 00ca | | Action Exit_Nullary_Function
0111 e5fb | | Load 0x2,-0x5
0112 00ca | | Action Exit_Nullary_Function
0113 0000 0000 | | .BLANK 0000[0x5]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b | | .CONST 0x011b ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0001 | | .CONST 0x0001 ; Number of locals
011b BODY_0118:
011b INIT_0118:
011b e7ff | | Load 0x3,-0x1
011c 00d8 | | Load_Top At_Offset_0
011d 0d2d | - | Execute_Immediate Less,0x2d
011e 700b |p | Jump_Nonzero 0x12a
011f 00d8 | | Load_Top At_Offset_0
0120 0c3b | ; | Execute_Immediate Greater_Equal,0x3b
0121 7003 |p | Jump_Nonzero 0x125
0122 00d1 | | Pop_Control Pop_Count_1
0123 4800 |H | Short_Literal 0x0
0124 4401 |D | Exit_Subprogram With_Result,0x1
0125 483c |H< | Short_Literal 0x3c
0126 487e |H~ | Short_Literal 0x7e
0127 0262 | b | Execute Discrete,In_Range
0128 77fa |w | Jump_Nonzero 0x123
0129 7805 |x | Jump 0x12f
012a 4821 |H! | Short_Literal 0x21
012b 482b |H+ | Short_Literal 0x2b
012c 0262 | b | Execute Discrete,In_Range
012d 77f5 |w | Jump_Nonzero 0x123
012e 7800 |x | Jump 0x12f
012f 4801 |H | Short_Literal 0x1
0130 4401 |D | Exit_Subprogram With_Result,0x1
0131 0000 0000 | | .BLANK 0000[0x7]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0141 | A | .CONST 0x0141 ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b e403 | | Load 0x2,0x3
013c 8405 | | Call 0x2,0x5
013d 0273 | s | Execute Discrete,Plus
013e 0aff | | Execute_Immediate Plus,-0x1
013f 00e2 | | Load_Encached Integer_Cache
0140 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0141 BODY_0138:
0141 00d8 | | Load_Top At_Offset_0
0142 e5fd | | Load 0x2,-0x3
0143 01dc | | Execute Vector,Last
0144 027d | } | Execute Discrete,Greater
0145 6805 |h | Jump_Zero 0x14b
0146 e5fd | | Load 0x2,-0x3
0147 01dc | | Execute Vector,Last
0148 00e3 | | Load_Encached Natural_Cache
0149 025b | [ | Execute Discrete,Check_In_Type
014a 00ca | | Action Exit_Nullary_Function
014b 00d8 | | Load_Top At_Offset_0
014c 00e3 | | Load_Encached Natural_Cache
014d 025b | [ | Execute Discrete,Check_In_Type
014e 00ca | | Action Exit_Nullary_Function
014f 0000 | | .XXX[0x1]
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 00e2 | | Load_Encached Integer_Cache
0154 BODY_0150:
0154 00cf | | Action Mark_Auxiliary
0155 e403 | | Load 0x2,0x3
0156 e5fd | | Load 0x2,-0x3
0157 01dc | | Execute Vector,Last
0158 027d | } | Execute Discrete,Greater
0159 700a |p | Jump_Nonzero 0x164
015a e403 | | Load 0x2,0x3
015b e5fd | | Load 0x2,-0x3
015c 01d7 | | Execute Vector,Field_Read
015d 0e0a | | Execute_Immediate Not_Equal,0xa
015e 7005 |p | Jump_Nonzero 0x164
015f e403 | | Load 0x2,0x3
0160 0a01 | | Execute_Immediate Plus,0x1
0161 c403 | | Store 0x2,0x3
0162 00c9 | | Action Pop_Auxiliary_Loop
0163 7ff1 | | Jump 0x155
0164 00ce | | Action Pop_Auxiliary
0165 8407 | | Call 0x2,0x7
0166 a602 | | Store_Unchecked 0x3,0x2
0167 00cf | | Action Mark_Auxiliary
0168 e602 | | Load 0x3,0x2
0169 e403 | | Load 0x2,0x3
016a 0263 | c | Execute Discrete,Above_Bound
016b 700b |p | Jump_Nonzero 0x177
016c 00d8 | | Load_Top At_Offset_0
016d e5fd | | Load 0x2,-0x3
016e 01d7 | | Execute Vector,Field_Read
016f 0f0a | | Execute_Immediate Equal,0xa
0170 6804 |h | Jump_Zero 0x175
0171 00d8 | | Load_Top At_Offset_0
0172 0aff | | Execute_Immediate Plus,-0x1
0173 c404 | | Store 0x2,0x4
0174 4501 |E | Exit_Subprogram 0x1
0175 00c8 | | Action Pop_Auxiliary_Range
0176 3ff5 |? | Loop_Increasing 0x16c
0177 00ce | | Action Pop_Auxiliary
0178 00d8 | | Load_Top At_Offset_0
0179 e5fd | | Load 0x2,-0x3
017a 01dc | | Execute Vector,Last
017b 027f | | Execute Discrete,Equal
017c 6803 |h | Jump_Zero 0x180
017d 00d8 | | Load_Top At_Offset_0
017e c404 | | Store 0x2,0x4
017f 4501 |E | Exit_Subprogram 0x1
0180 00cf | | Action Mark_Auxiliary
0181 e403 | | Load 0x2,0x3
0182 e602 | | Load 0x3,0x2
0183 0264 | d | Execute Discrete,Below_Bound
0184 700a |p | Jump_Nonzero 0x18f
0185 00d8 | | Load_Top At_Offset_0
0186 e5fd | | Load 0x2,-0x3
0187 01d7 | | Execute Vector,Field_Read
0188 8406 | | Call 0x2,0x6
0189 6803 |h | Jump_Zero 0x18d
018a 00d8 | | Load_Top At_Offset_0
018b a404 | | Store_Unchecked 0x2,0x4
018c 4501 |E | Exit_Subprogram 0x1
018d 00c8 | | Action Pop_Auxiliary_Range
018e 37f6 |7 | Loop_Decreasing 0x185
018f 00ce | | Action Pop_Auxiliary
0190 00d8 | | Load_Top At_Offset_0
0191 c404 | | Store 0x2,0x4
0192 4501 |E | Exit_Subprogram 0x1
0193 0000 0000 | | .BLANK 0000[0x5]
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 e402 | | Load 0x2,0x2
019c 6807 |h | Jump_Zero 0x1a4
019d e5fc | | Load 0x2,-0x4
019e e403 | | Load 0x2,0x3
019f e404 | | Load 0x2,0x4
01a0 e5fd | | Load 0x2,-0x3
01a1 01cf | | Execute Vector,Slice_Read
01a2 01cc | | Execute Vector,Catenate
01a3 00ca | | Action Exit_Nullary_Function
01a4 e403 | | Load 0x2,0x3
01a5 e404 | | Load 0x2,0x4
01a6 e5fd | | Load 0x2,-0x3
01a7 01cf | | Execute Vector,Slice_Read
01a8 0335 | 5 | Declare_Variable Array,Duplicate
01a9 00cd | | Action Spare6_Action
01aa 00ca | | Action Exit_Nullary_Function
01ab 0000 0000 | | .BLANK 0000[0x5]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 4603 |F | Jump_Case 0x3
01b4 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
01b5 7802 |x | Jump 0x1b8 ; case 0x1
01b6 7805 |x | Jump 0x1bc ; case 0x2
01b7 7809 |x | Jump 0x1c1 ; case 0x3
01b8 e7ff | | Load 0x3,-0x1
01b9 0091 0817 | | Action Push_String_Extended_Indexed,0x817 ; "UNHANDLED"
01bb 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01bc e7fe | | Load 0x3,-0x2
01bd e7ff | | Load 0x3,-0x1
01be 00e0 | | Load_Encached Standard_Cache
01bf 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01c0 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
01c1 e7ff | | Load 0x3,-0x1
01c2 00e0 | | Load_Encached Standard_Cache
01c3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01c4 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01c5 0000 0000 | | .XXX[0x3]
01c7 0000 | |
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb | | .CONST 0x01cb ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0001 | | .CONST 0x0001 ; Number of locals
01cb BODY_01c8:
01cb INIT_01c8:
01cb 0092 081e | | Action Push_String_Extended,0x81e ; "unknown"
01cd 00ca | | Action Exit_Nullary_Function
01ce 0000 0000 | | .XXX[0x2]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 01d6 | | .CONST 0x01d6 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 e7ff | | Load 0x3,-0x1
01d4 85fe | | Call 0x2,-0x2
01d5 4502 |E | Exit_Subprogram 0x2
01d6 TRAP_01d0:
01d6 0007 | | Action Break_Optional
01d7 4801 |H | Short_Literal 0x1
01d8 a403 | | Store_Unchecked 0x2,0x3
01d9 00d8 | | Load_Top At_Offset_0
01da 0101 | | Execute Exception,Reraise
01db 0000 0000 | | .BLANK 0000[0x5]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 4603 |F | Jump_Case 0x3
01e4 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
01e5 7802 |x | Jump 0x1e8 ; case 0x1
01e6 7805 |x | Jump 0x1ec ; case 0x2
01e7 7809 |x | Jump 0x1f1 ; case 0x3
01e8 e7ff | | Load 0x3,-0x1
01e9 0091 081b | | Action Push_String_Extended_Indexed,0x81b ; "VALUE"
01eb 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01ec e7fe | | Load 0x3,-0x2
01ed e7ff | | Load 0x3,-0x1
01ee 00e0 | | Load_Encached Standard_Cache
01ef 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01f0 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
01f1 e7ff | | Load 0x3,-0x1
01f2 00e0 | | Load_Encached Standard_Cache
01f3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01f4 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
01f5 0000 0000 | | .XXX[0x3]
01f7 0000 | |
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
; Number of locals
01fb BODY_01f8:
01fb BODY_01f8:
01fb INIT_01f8:
01fb INIT_01f8:
01fb 4608 |F | Jump_Case 0x8
01fc 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
01fd 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
01fe 7826 |x& | Jump 0x225 ; case 0x2
01ff 7825 |x% | Jump 0x225 ; case 0x3
0200 7824 |x$ | Jump 0x225 ; case 0x4
0201 7823 |x# | Jump 0x225 ; case 0x5
0202 7802 |x | Jump 0x205 ; case 0x6
0203 780c |x | Jump 0x210 ; case 0x7
0204 7819 |x | Jump 0x21e ; case 0x8
0205 e7fe | | Load 0x3,-0x2
0206 4602 |F | Jump_Case 0x2
0207 7804 |x | Jump 0x20c ; case 0x0
0208 7805 |x | Jump 0x20e ; case 0x1
0209 7800 |x | Jump 0x20a ; case 0x2
020a 4803 |H | Short_Literal 0x3
020b 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
020c 4801 |H | Short_Literal 0x1
020d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
020e 4802 |H | Short_Literal 0x2
020f 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0210 e7fe | | Load 0x3,-0x2
0211 e7fe | | Load 0x3,-0x2
0212 4602 |F | Jump_Case 0x2
0213 7804 |x | Jump 0x218 ; case 0x0
0214 7805 |x | Jump 0x21a ; case 0x1
0215 7800 |x | Jump 0x216 ; case 0x2
0216 4803 |H | Short_Literal 0x3
0217 7803 |x | Jump 0x21b
0218 4801 |H | Short_Literal 0x1
0219 7801 |x | Jump 0x21b
021a 4802 |H | Short_Literal 0x2
021b e7ff | | Load 0x3,-0x1
021c 031b | | Declare_Type Variant_Record,Constrained
021d 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
021e e7fe | | Load 0x3,-0x2
021f e7fe | | Load 0x3,-0x2
0220 e7ff | | Load 0x3,-0x1
0221 1c06 | | Execute_Immediate Run_Utility,0x6
0222 e7ff | | Load 0x3,-0x1
0223 02fc | | Declare_Variable Variant_Record,With_Constraint
0224 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0225 0869 | i | Execute_Immediate Raise,0x69
0226 0000 0000 | | .XXX[0x2]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b 4802 |H | Short_Literal 0x2
022c e409 | | Load 0x2,0x9
022d 1c08 | | Execute_Immediate Run_Utility,0x8
022e e406 | | Load 0x2,0x6
022f e602 | | Load 0x3,0x2
0230 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0231 e40a | | Load 0x2,0xa
0232 e602 | | Load 0x3,0x2
0233 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0234 e40a | | Load 0x2,0xa
0235 e602 | | Load 0x3,0x2
0236 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0237 e40a | | Load 0x2,0xa
0238 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0239 00ca | | Action Exit_Nullary_Function
023a 0000 0000 | | .BLANK 0000[0x6]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0251 | Q | .CONST 0x0251 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 4801 |H | Short_Literal 0x1
0244 e409 | | Load 0x2,0x9
0245 1c08 | | Execute_Immediate Run_Utility,0x8
0246 e7ff | | Load 0x3,-0x1
0247 e602 | | Load 0x3,0x2
0248 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0249 e7fe | | Load 0x3,-0x2
024a e602 | | Load 0x3,0x2
024b 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
024c e40a | | Load 0x2,0xa
024d e602 | | Load 0x3,0x2
024e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
024f e40a | | Load 0x2,0xa
0250 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0251 BODY_0240:
0251 e7fd | | Load 0x3,-0x3
0252 0227 | ' | Execute Access,All_Reference
0253 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0254 7005 |p | Jump_Nonzero 0x25a
0255 00d8 | | Load_Top At_Offset_0
0256 e7fd | | Load 0x3,-0x3
0257 0227 | ' | Execute Access,All_Reference
0258 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0259 7804 |x | Jump 0x25e
025a 00d8 | | Load_Top At_Offset_0
025b e7fc | | Load 0x3,-0x4
025c 0227 | ' | Execute Access,All_Reference
025d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
025e 00d8 | | Load_Top At_Offset_0
025f a7fc | | Store_Unchecked 0x3,-0x4
0260 4503 |E | Exit_Subprogram 0x3
0261 0000 0000 | | .BLANK 0000[0x7]
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 e7ff | | Load 0x3,-0x1
026c e7fe | | Load 0x3,-0x2
026d 0227 | ' | Execute Access,All_Reference
026e 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
026f e7fd | | Load 0x3,-0x3
0270 0227 | ' | Execute Access,All_Reference
0271 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0272 7005 |p | Jump_Nonzero 0x278
0273 e7fe | | Load 0x3,-0x2
0274 e7fd | | Load 0x3,-0x3
0275 0227 | ' | Execute Access,All_Reference
0276 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0277 7804 |x | Jump 0x27c
0278 e7fe | | Load 0x3,-0x2
0279 e7fc | | Load 0x3,-0x4
027a 0227 | ' | Execute Access,All_Reference
027b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
027c e7fe | | Load 0x3,-0x2
027d a7fc | | Store_Unchecked 0x3,-0x4
027e 4503 |E | Exit_Subprogram 0x3
027f 0000 | | .XXX[0x1]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0295 | | .CONST 0x0295 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0002 | | .CONST 0x0002 ; Number of locals
0283 INIT_0280:
0283 4801 |H | Short_Literal 0x1
0284 e7ff | | Load 0x3,-0x1
0285 00e9 | | Load_Encached String_Cache
0286 0334 | 4 | Declare_Variable Array,With_Constraint
0287 00d8 | | Load_Top At_Offset_0
0288 0335 | 5 | Declare_Variable Array,Duplicate
0289 00cd | | Action Spare6_Action
028a e602 | | Load 0x3,0x2
028b 01d9 | | Execute Vector,Reverse_Bounds
028c 0263 | c | Execute Discrete,Above_Bound
028d 7005 |p | Jump_Nonzero 0x293
028e 4820 |H | Short_Literal 0x20
028f e605 | | Load 0x3,0x5
0290 e603 | | Load 0x3,0x3
0291 01d6 | | Execute Vector,Field_Write
0292 3ffb |? | Loop_Increasing 0x28e
0293 e602 | | Load 0x3,0x2
0294 01d4 | | Execute Vector,Structure_Write
0295 BODY_0280:
0295 00d8 | | Load_Top At_Offset_0
0296 4401 |D | Exit_Subprogram With_Result,0x1
0297 0000 | | .XXX[0x1]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029d | | .CONST 0x029d ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0003 | | .CONST 0x0003 ; Number of locals
029b INIT_0298:
029b 00e2 | | Load_Encached Integer_Cache
029c 00e2 | | Load_Encached Integer_Cache
029d BODY_0298:
029d e40e | | Load 0x2,0xe
029e 0ad8 | | Execute_Immediate Plus,-0x28
029f c602 | | Store 0x3,0x2
02a0 e602 | | Load 0x3,0x2
02a1 e5fd | | Load 0x2,-0x3
02a2 01dd | | Execute Vector,First
02a3 027c | | | Execute Discrete,Less
02a4 6803 |h | Jump_Zero 0x2a8
02a5 e5fd | | Load 0x2,-0x3
02a6 01dd | | Execute Vector,First
02a7 a602 | | Store_Unchecked 0x3,0x2
02a8 e602 | | Load 0x3,0x2
02a9 e5f9 | | Load 0x2,-0x7
02aa 0273 | s | Execute Discrete,Plus
02ab 0afe | | Execute_Immediate Plus,-0x2
02ac c603 | | Store 0x3,0x3
02ad 00d8 | | Load_Top At_Offset_0
02ae e5fd | | Load 0x2,-0x3
02af 01dc | | Execute Vector,Last
02b0 027d | } | Execute Discrete,Greater
02b1 6803 |h | Jump_Zero 0x2b5
02b2 e5fd | | Load 0x2,-0x3
02b3 01dc | | Execute Vector,Last
02b4 a603 | | Store_Unchecked 0x3,0x3
02b5 e602 | | Load 0x3,0x2
02b6 e603 | | Load 0x3,0x3
02b7 e5fd | | Load 0x2,-0x3
02b8 01cf | | Execute Vector,Slice_Read
02b9 8407 | | Call 0x2,0x7
02ba e40e | | Load 0x2,0xe
02bb e602 | | Load 0x3,0x2
02bc 0272 | r | Execute Discrete,Minus
02bd 00e3 | | Load_Encached Natural_Cache
02be 025b | [ | Execute Discrete,Check_In_Type
02bf 8410 | | Call 0x2,0x10
02c0 0092 081f | | Action Push_String_Extended,0x81f ; "^"
02c2 01cc | | Execute Vector,Catenate
02c3 8407 | | Call 0x2,0x7
02c4 4501 |E | Exit_Subprogram 0x1
02c5 0000 0000 | | .XXX[0x3]
02c7 0000 | |
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb e40e | | Load 0x2,0xe
02cc e5fd | | Load 0x2,-0x3
02cd 01da | | Execute Vector,Bounds
02ce 0262 | b | Execute Discrete,In_Range
02cf 6813 |h | Jump_Zero 0x2e3
02d0 4801 |H | Short_Literal 0x1
02d1 4803 |H | Short_Literal 0x3
02d2 00e9 | | Load_Encached String_Cache
02d3 0334 | 4 | Declare_Variable Array,With_Constraint
02d4 4827 |H' | Short_Literal 0x27
02d5 4801 |H | Short_Literal 0x1
02d6 e602 | | Load 0x3,0x2
02d7 01d6 | | Execute Vector,Field_Write
02d8 e40e | | Load 0x2,0xe
02d9 e5fd | | Load 0x2,-0x3
02da 01d7 | | Execute Vector,Field_Read
02db 4802 |H | Short_Literal 0x2
02dc e602 | | Load 0x3,0x2
02dd 01d6 | | Execute Vector,Field_Write
02de 4827 |H' | Short_Literal 0x27
02df 4803 |H | Short_Literal 0x3
02e0 e602 | | Load 0x3,0x2
02e1 01d6 | | Execute Vector,Field_Write
02e2 00ca | | Action Exit_Nullary_Function
02e3 0092 0820 | | Action Push_String_Extended,0x820 ; "end"
02e5 00ca | | Action Exit_Nullary_Function
02e6 0000 0000 | | .XXX[0x2]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb e7ff | | Load 0x3,-0x1
02ec 0aff | | Execute_Immediate Plus,-0x1
02ed 460b |F | Jump_Case 0xb
02ee 780e |x | Jump 0x2fd ; case 0x0
02ef 7810 |x | Jump 0x300 ; case 0x1
02f0 7812 |x | Jump 0x303 ; case 0x2
02f1 7814 |x | Jump 0x306 ; case 0x3
02f2 7816 |x | Jump 0x309 ; case 0x4
02f3 7818 |x | Jump 0x30c ; case 0x5
02f4 781a |x | Jump 0x30f ; case 0x6
02f5 781c |x | Jump 0x312 ; case 0x7
02f6 781e |x | Jump 0x315 ; case 0x8
02f7 7820 |x | Jump 0x318 ; case 0x9
02f8 7801 |x | Jump 0x2fa ; case 0xa
02f9 7800 |x | Jump 0x2fa ; case 0xb
02fa 0092 0821 | !| Action Push_String_Extended,0x821 ; "how did we get here?"
02fc 4401 |D | Exit_Subprogram With_Result,0x1
02fd 0092 0822 | "| Action Push_String_Extended,0x822 ; "("
02ff 4401 |D | Exit_Subprogram With_Result,0x1
0300 0092 0823 | #| Action Push_String_Extended,0x823 ; "the first character of a name, or ')'; specifically, a character from the set { 'a'..'z', 'A'..'Z', '0'..'9', '#', '_', '-', '.', '<', '>', Nul, Ht }"
0302 4401 |D | Exit_Subprogram With_Result,0x1
0303 0092 0824 | $| Action Push_String_Extended,0x824 ; "a character appropriate for name, or \x22=>\x22; specifically, a character from the set { 'a'..'z', 'A'..'Z', '0'..'9', '#', '_', '-', '.', '<', '>', Nul, Ht, '=' }"
0305 4401 |D | Exit_Subprogram With_Result,0x1
0306 0092 0825 | %| Action Push_String_Extended,0x825 ; "an \x22=>\x22"
0308 4401 |D | Exit_Subprogram With_Result,0x1
0309 0092 0826 | &| Action Push_String_Extended,0x826 ; "the 2nd character from the \x22=>\x22 symbol"
030b 4401 |D | Exit_Subprogram With_Result,0x1
030c 0092 0827 | '| Action Push_String_Extended,0x827 ; "the 1st character from a value or quoted string; specifically, a character that does not come from the set { '(', ')', ',' }"
030e 4401 |D | Exit_Subprogram With_Result,0x1
030f 0092 0828 | (| Action Push_String_Extended,0x828 ; "a character from the set { ',', ')', '\x22'."
0311 4401 |D | Exit_Subprogram With_Result,0x1
0312 0092 0829 | )| Action Push_String_Extended,0x829 ; "a character appropriate for a quoted string."
0314 4401 |D | Exit_Subprogram With_Result,0x1
0315 0092 082a | *| Action Push_String_Extended,0x82a ; "a character from the set { ',', ')' }"
0317 4401 |D | Exit_Subprogram With_Result,0x1
0318 0092 082b | +| Action Push_String_Extended,0x82b ; "a character appropriate for a raw value; specifically, a character that does not come from the set { ',', ')' }"
031a 4401 |D | Exit_Subprogram With_Result,0x1
031b 0000 0000 | | .BLANK 0000[0x5]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323 | # | .CONST 0x0323 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0001 | | .CONST 0x0001 ; Number of locals
0323 BODY_0320:
0323 INIT_0320:
0323 8411 | | Call 0x2,0x11
0324 0092 082c | ,| Action Push_String_Extended,0x82c ; "Parsing error: received "
0326 8412 | | Call 0x2,0x12
0327 01cc | | Execute Vector,Catenate
0328 0092 082d | -| Action Push_String_Extended,0x82d ; " (at character position"
032a 01cc | | Execute Vector,Catenate
032b e40e | | Load 0x2,0xe
032c 00e0 | | Load_Encached Standard_Cache
032d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
032e 01cc | | Execute Vector,Catenate
032f 0092 082e | .| Action Push_String_Extended,0x82e ; ")"
0331 01cc | | Execute Vector,Catenate
0332 0092 082f | /| Action Push_String_Extended,0x82f ; ", expected "
0334 01cc | | Execute Vector,Catenate
0335 e7ff | | Load 0x3,-0x1
0336 8413 | | Call 0x2,0x13
0337 01cc | | Execute Vector,Catenate
0338 8407 | | Call 0x2,0x7
0339 4802 |H | Short_Literal 0x2
033a a403 | | Store_Unchecked 0x2,0x3
033b 08e0 | | Execute_Immediate Raise,0xe0
033c 0000 0000 | | .BLANK 0000[0x4]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0356 | V | .CONST 0x0356 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0008 | | .CONST 0x0008 ; Number of locals
0343 INIT_0340:
0343 e40a | | Load 0x2,0xa
0344 840b | | Call 0x2,0xb
0345 a602 | | Store_Unchecked 0x3,0x2
0346 e40a | | Load 0x2,0xa
0347 0007 | | Action Break_Optional
0348 4fff |O | Short_Literal 0x7ff
0349 00e2 | | Load_Encached Integer_Cache
034a 03f1 | | Declare_Variable Discrete,With_Value
034b e405 | | Load 0x2,0x5
034c 0322 | " | Declare_Variable Record
034d e406 | | Load 0x2,0x6
034e e605 | | Load 0x3,0x5
034f 017d | } | Execute Record,Structure_Write
0350 e40f | | Load 0x2,0xf
0351 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0352 029f 07b3 | | Declare_Subprogram For_Call,INIT_07b0
0354 029f 07c3 | | Declare_Subprogram For_Call,INIT_07c0
0356 BODY_0340:
0356 00cf | | Action Mark_Auxiliary
0357 e40e | | Load 0x2,0xe
0358 e5fd | | Load 0x2,-0x3
0359 01dc | | Execute Vector,Last
035a 027d | } | Execute Discrete,Greater
035b 6802 |h | Jump_Zero 0x35e
035c e606 | | Load 0x3,0x6
035d 8414 | | Call 0x2,0x14
035e e40e | | Load 0x2,0xe
035f e5fd | | Load 0x2,-0x3
0360 01d7 | | Execute Vector,Field_Read
0361 467f |F | Jump_Case 0x7f
0362 79d4 |y | Jump 0x537 ; case 0x0
0363 787e |x~ | Jump 0x3e2 ; case 0x1
0364 787d |x} | Jump 0x3e2 ; case 0x2
0365 787c |x| | Jump 0x3e2 ; case 0x3
0366 787b |x{ | Jump 0x3e2 ; case 0x4
0367 787a |xz | Jump 0x3e2 ; case 0x5
0368 7879 |xy | Jump 0x3e2 ; case 0x6
0369 7878 |xx | Jump 0x3e2 ; case 0x7
036a 7877 |xw | Jump 0x3e2 ; case 0x8
036b 79cb |y | Jump 0x537 ; case 0x9
036c 7875 |xu | Jump 0x3e2 ; case 0xa
036d 7874 |xt | Jump 0x3e2 ; case 0xb
036e 7873 |xs | Jump 0x3e2 ; case 0xc
036f 7872 |xr | Jump 0x3e2 ; case 0xd
0370 7871 |xq | Jump 0x3e2 ; case 0xe
0371 7870 |xp | Jump 0x3e2 ; case 0xf
0372 786f |xo | Jump 0x3e2 ; case 0x10
0373 786e |xn | Jump 0x3e2 ; case 0x11
0374 786d |xm | Jump 0x3e2 ; case 0x12
0375 786c |xl | Jump 0x3e2 ; case 0x13
0376 786b |xk | Jump 0x3e2 ; case 0x14
0377 786a |xj | Jump 0x3e2 ; case 0x15
0378 7869 |xi | Jump 0x3e2 ; case 0x16
0379 7868 |xh | Jump 0x3e2 ; case 0x17
037a 7867 |xg | Jump 0x3e2 ; case 0x18
037b 7866 |xf | Jump 0x3e2 ; case 0x19
037c 7865 |xe | Jump 0x3e2 ; case 0x1a
037d 79db |y | Jump 0x559 ; case 0x1b
037e 7863 |xc | Jump 0x3e2 ; case 0x1c
037f 7862 |xb | Jump 0x3e2 ; case 0x1d
0380 7861 |xa | Jump 0x3e2 ; case 0x1e
0381 7860 |x` | Jump 0x3e2 ; case 0x1f
0382 7963 |yc | Jump 0x4e6 ; case 0x20
0383 785e |x^ | Jump 0x3e2 ; case 0x21
0384 798f |y | Jump 0x514 ; case 0x22
0385 79b1 |y | Jump 0x537 ; case 0x23
0386 785b |x[ | Jump 0x3e2 ; case 0x24
0387 785a |xZ | Jump 0x3e2 ; case 0x25
0388 7859 |xY | Jump 0x3e2 ; case 0x26
0389 7858 |xX | Jump 0x3e2 ; case 0x27
038a 7874 |xt | Jump 0x3ff ; case 0x28
038b 7898 |x | Jump 0x424 ; case 0x29
038c 7855 |xU | Jump 0x3e2 ; case 0x2a
038d 7854 |xT | Jump 0x3e2 ; case 0x2b
038e 7916 |y | Jump 0x4a5 ; case 0x2c
038f 79a7 |y | Jump 0x537 ; case 0x2d
0390 79a6 |y | Jump 0x537 ; case 0x2e
0391 7850 |xP | Jump 0x3e2 ; case 0x2f
0392 79a4 |y | Jump 0x537 ; case 0x30
0393 79a3 |y | Jump 0x537 ; case 0x31
0394 79a2 |y | Jump 0x537 ; case 0x32
0395 79a1 |y | Jump 0x537 ; case 0x33
0396 79a0 |y | Jump 0x537 ; case 0x34
0397 799f |y | Jump 0x537 ; case 0x35
0398 799e |y | Jump 0x537 ; case 0x36
0399 799d |y | Jump 0x537 ; case 0x37
039a 799c |y | Jump 0x537 ; case 0x38
039b 799b |y | Jump 0x537 ; case 0x39
039c 7845 |xE | Jump 0x3e2 ; case 0x3a
039d 7844 |xD | Jump 0x3e2 ; case 0x3b
039e 7998 |y | Jump 0x537 ; case 0x3c
039f 78bc |x | Jump 0x45c ; case 0x3d
03a0 78df |x | Jump 0x480 ; case 0x3e
03a1 7840 |x@ | Jump 0x3e2 ; case 0x3f
03a2 783f |x? | Jump 0x3e2 ; case 0x40
03a3 7993 |y | Jump 0x537 ; case 0x41
03a4 7992 |y | Jump 0x537 ; case 0x42
03a5 7991 |y | Jump 0x537 ; case 0x43
03a6 7990 |y | Jump 0x537 ; case 0x44
03a7 798f |y | Jump 0x537 ; case 0x45
03a8 798e |y | Jump 0x537 ; case 0x46
03a9 798d |y | Jump 0x537 ; case 0x47
03aa 798c |y | Jump 0x537 ; case 0x48
03ab 798b |y | Jump 0x537 ; case 0x49
03ac 798a |y | Jump 0x537 ; case 0x4a
03ad 7989 |y | Jump 0x537 ; case 0x4b
03ae 7988 |y | Jump 0x537 ; case 0x4c
03af 7987 |y | Jump 0x537 ; case 0x4d
03b0 7986 |y | Jump 0x537 ; case 0x4e
03b1 7985 |y | Jump 0x537 ; case 0x4f
03b2 7984 |y | Jump 0x537 ; case 0x50
03b3 7983 |y | Jump 0x537 ; case 0x51
03b4 7982 |y | Jump 0x537 ; case 0x52
03b5 7981 |y | Jump 0x537 ; case 0x53
03b6 7980 |y | Jump 0x537 ; case 0x54
03b7 797f |y | Jump 0x537 ; case 0x55
03b8 797e |y~ | Jump 0x537 ; case 0x56
03b9 797d |y} | Jump 0x537 ; case 0x57
03ba 797c |y| | Jump 0x537 ; case 0x58
03bb 797b |y{ | Jump 0x537 ; case 0x59
03bc 797a |yz | Jump 0x537 ; case 0x5a
03bd 7824 |x$ | Jump 0x3e2 ; case 0x5b
03be 7823 |x# | Jump 0x3e2 ; case 0x5c
03bf 7822 |x" | Jump 0x3e2 ; case 0x5d
03c0 7821 |x! | Jump 0x3e2 ; case 0x5e
03c1 7975 |yu | Jump 0x537 ; case 0x5f
03c2 781f |x | Jump 0x3e2 ; case 0x60
03c3 7973 |ys | Jump 0x537 ; case 0x61
03c4 7972 |yr | Jump 0x537 ; case 0x62
03c5 7971 |yq | Jump 0x537 ; case 0x63
03c6 7970 |yp | Jump 0x537 ; case 0x64
03c7 796f |yo | Jump 0x537 ; case 0x65
03c8 796e |yn | Jump 0x537 ; case 0x66
03c9 796d |ym | Jump 0x537 ; case 0x67
03ca 796c |yl | Jump 0x537 ; case 0x68
03cb 796b |yk | Jump 0x537 ; case 0x69
03cc 796a |yj | Jump 0x537 ; case 0x6a
03cd 7969 |yi | Jump 0x537 ; case 0x6b
03ce 7968 |yh | Jump 0x537 ; case 0x6c
03cf 7967 |yg | Jump 0x537 ; case 0x6d
03d0 7966 |yf | Jump 0x537 ; case 0x6e
03d1 7965 |ye | Jump 0x537 ; case 0x6f
03d2 7964 |yd | Jump 0x537 ; case 0x70
03d3 7963 |yc | Jump 0x537 ; case 0x71
03d4 7962 |yb | Jump 0x537 ; case 0x72
03d5 7961 |ya | Jump 0x537 ; case 0x73
03d6 7960 |y` | Jump 0x537 ; case 0x74
03d7 795f |y_ | Jump 0x537 ; case 0x75
03d8 795e |y^ | Jump 0x537 ; case 0x76
03d9 795d |y] | Jump 0x537 ; case 0x77
03da 795c |y\ | Jump 0x537 ; case 0x78
03db 795b |y[ | Jump 0x537 ; case 0x79
03dc 795a |yZ | Jump 0x537 ; case 0x7a
03dd 7804 |x | Jump 0x3e2 ; case 0x7b
03de 7803 |x | Jump 0x3e2 ; case 0x7c
03df 7802 |x | Jump 0x3e2 ; case 0x7d
03e0 7801 |x | Jump 0x3e2 ; case 0x7e
03e1 7800 |x | Jump 0x3e2 ; case 0x7f
03e2 e606 | | Load 0x3,0x6
03e3 0aff | | Execute_Immediate Plus,-0x1
03e4 460b |F | Jump_Case 0xb
03e5 7816 |x | Jump 0x3fc ; case 0x0
03e6 7815 |x | Jump 0x3fc ; case 0x1
03e7 7814 |x | Jump 0x3fc ; case 0x2
03e8 7813 |x | Jump 0x3fc ; case 0x3
03e9 7812 |x | Jump 0x3fc ; case 0x4
03ea 7809 |x | Jump 0x3f4 ; case 0x5
03eb 7810 |x | Jump 0x3fc ; case 0x6
03ec 7993 |y | Jump 0x580 ; case 0x7
03ed 780e |x | Jump 0x3fc ; case 0x8
03ee 7991 |y | Jump 0x580 ; case 0x9
03ef 7809 |x | Jump 0x3f9 ; case 0xa
03f0 7800 |x | Jump 0x3f1 ; case 0xb
03f1 480a |H | Short_Literal 0xa
03f2 a606 | | Store_Unchecked 0x3,0x6
03f3 798c |y | Jump 0x580
03f4 480a |H | Short_Literal 0xa
03f5 a606 | | Store_Unchecked 0x3,0x6
03f6 e40e | | Load 0x2,0xe
03f7 a604 | | Store_Unchecked 0x3,0x4
03f8 7987 |y | Jump 0x580
03f9 4803 |H | Short_Literal 0x3
03fa a606 | | Store_Unchecked 0x3,0x6
03fb 7984 |y | Jump 0x580
03fc e606 | | Load 0x3,0x6
03fd 8414 | | Call 0x2,0x14
03fe 7981 |y | Jump 0x580
03ff e606 | | Load 0x3,0x6
0400 0aff | | Execute_Immediate Plus,-0x1
0401 460b |F | Jump_Case 0xb
0402 7818 |x | Jump 0x41b ; case 0x0
0403 781d |x | Jump 0x421 ; case 0x1
0404 781c |x | Jump 0x421 ; case 0x2
0405 781b |x | Jump 0x421 ; case 0x3
0406 781a |x | Jump 0x421 ; case 0x4
0407 7809 |x | Jump 0x411 ; case 0x5
0408 7818 |x | Jump 0x421 ; case 0x6
0409 7976 |yv | Jump 0x580 ; case 0x7
040a 7816 |x | Jump 0x421 ; case 0x8
040b 7974 |yt | Jump 0x580 ; case 0x9
040c 7811 |x | Jump 0x41e ; case 0xa
040d 7800 |x | Jump 0x40e ; case 0xb
040e 480a |H | Short_Literal 0xa
040f a606 | | Store_Unchecked 0x3,0x6
0410 796f |yo | Jump 0x580
0411 4809 |H | Short_Literal 0x9
0412 a606 | | Store_Unchecked 0x3,0x6
0413 e603 | | Load 0x3,0x3
0414 e602 | | Load 0x3,0x2
0415 8415 | | Call 0x2,0x15
0416 e605 | | Load 0x3,0x5
0417 840d | | Call 0x2,0xd
0418 c602 | | Store 0x3,0x2
0419 c603 | | Store 0x3,0x3
041a 7965 |ye | Jump 0x580
041b 4802 |H | Short_Literal 0x2
041c a606 | | Store_Unchecked 0x3,0x6
041d 7962 |yb | Jump 0x580
041e 4803 |H | Short_Literal 0x3
041f a606 | | Store_Unchecked 0x3,0x6
0420 795f |y_ | Jump 0x580
0421 e606 | | Load 0x3,0x6
0422 8414 | | Call 0x2,0x14
0423 795c |y\ | Jump 0x580
0424 e606 | | Load 0x3,0x6
0425 0aff | | Execute_Immediate Plus,-0x1
0426 460b |F | Jump_Case 0xb
0427 7831 |x1 | Jump 0x459 ; case 0x0
0428 795d |y] | Jump 0x586 ; case 0x1
0429 782f |x/ | Jump 0x459 ; case 0x2
042a 782e |x. | Jump 0x459 ; case 0x3
042b 782d |x- | Jump 0x459 ; case 0x4
042c 7809 |x | Jump 0x436 ; case 0x5
042d 7810 |x | Jump 0x43e ; case 0x6
042e 7951 |yQ | Jump 0x580 ; case 0x7
042f 7956 |yV | Jump 0x586 ; case 0x8
0430 781d |x | Jump 0x44e ; case 0x9
0431 7824 |x$ | Jump 0x456 ; case 0xa
0432 7800 |x | Jump 0x433 ; case 0xb
0433 480a |H | Short_Literal 0xa
0434 a606 | | Store_Unchecked 0x3,0x6
0435 794a |yJ | Jump 0x580
0436 e603 | | Load 0x3,0x3
0437 e602 | | Load 0x3,0x2
0438 e406 | | Load 0x2,0x6
0439 e605 | | Load 0x3,0x5
043a 840c | | Call 0x2,0xc
043b c602 | | Store 0x3,0x2
043c c603 | | Store 0x3,0x3
043d 7948 |yH | Jump 0x586
043e e603 | | Load 0x3,0x3
043f e602 | | Load 0x3,0x2
0440 e405 | | Load 0x2,0x5
0441 0322 | " | Declare_Variable Record
0442 e604 | | Load 0x3,0x4
0443 e60c | | Load 0x3,0xc
0444 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0445 e40e | | Load 0x2,0xe
0446 0aff | | Execute_Immediate Plus,-0x1
0447 e60c | | Load 0x3,0xc
0448 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0449 e605 | | Load 0x3,0x5
044a 840c | | Call 0x2,0xc
044b c602 | | Store 0x3,0x2
044c c603 | | Store 0x3,0x3
044d 7938 |y8 | Jump 0x586
044e e603 | | Load 0x3,0x3
044f e602 | | Load 0x3,0x2
0450 8608 | | Call 0x3,0x8
0451 e605 | | Load 0x3,0x5
0452 840c | | Call 0x2,0xc
0453 c602 | | Store 0x3,0x2
0454 c603 | | Store 0x3,0x3
0455 7930 |y0 | Jump 0x586
0456 4803 |H | Short_Literal 0x3
0457 a606 | | Store_Unchecked 0x3,0x6
0458 7927 |y' | Jump 0x580
0459 e606 | | Load 0x3,0x6
045a 8414 | | Call 0x2,0x14
045b 7924 |y$ | Jump 0x580
045c e606 | | Load 0x3,0x6
045d 0aff | | Execute_Immediate Plus,-0x1
045e 460b |F | Jump_Case 0xb
045f 781d |x | Jump 0x47d ; case 0x0
0460 781c |x | Jump 0x47d ; case 0x1
0461 7814 |x | Jump 0x476 ; case 0x2
0462 780b |x | Jump 0x46e ; case 0x3
0463 7819 |x | Jump 0x47d ; case 0x4
0464 780c |x | Jump 0x471 ; case 0x5
0465 7817 |x | Jump 0x47d ; case 0x6
0466 7919 |y | Jump 0x580 ; case 0x7
0467 7815 |x | Jump 0x47d ; case 0x8
0468 7917 |y | Jump 0x580 ; case 0x9
0469 7810 |x | Jump 0x47a ; case 0xa
046a 7800 |x | Jump 0x46b ; case 0xb
046b 480a |H | Short_Literal 0xa
046c a606 | | Store_Unchecked 0x3,0x6
046d 7912 |y | Jump 0x580
046e 4805 |H | Short_Literal 0x5
046f a606 | | Store_Unchecked 0x3,0x6
0470 790f |y | Jump 0x580
0471 480a |H | Short_Literal 0xa
0472 a606 | | Store_Unchecked 0x3,0x6
0473 e40e | | Load 0x2,0xe
0474 a604 | | Store_Unchecked 0x3,0x4
0475 790a |y | Jump 0x580
0476 4805 |H | Short_Literal 0x5
0477 a606 | | Store_Unchecked 0x3,0x6
0478 8607 | | Call 0x3,0x7
0479 7906 |y | Jump 0x580
047a 4803 |H | Short_Literal 0x3
047b a606 | | Store_Unchecked 0x3,0x6
047c 7903 |y | Jump 0x580
047d e606 | | Load 0x3,0x6
047e 8414 | | Call 0x2,0x14
047f 7900 |y | Jump 0x580
0480 e606 | | Load 0x3,0x6
0481 0aff | | Execute_Immediate Plus,-0x1
0482 460b |F | Jump_Case 0xb
0483 781e |x | Jump 0x4a2 ; case 0x0
0484 7815 |x | Jump 0x49a ; case 0x1
0485 78fa |x | Jump 0x580 ; case 0x2
0486 781b |x | Jump 0x4a2 ; case 0x3
0487 780a |x | Jump 0x492 ; case 0x4
0488 780c |x | Jump 0x495 ; case 0x5
0489 7818 |x | Jump 0x4a2 ; case 0x6
048a 78f5 |x | Jump 0x580 ; case 0x7
048b 7816 |x | Jump 0x4a2 ; case 0x8
048c 78f3 |x | Jump 0x580 ; case 0x9
048d 7811 |x | Jump 0x49f ; case 0xa
048e 7800 |x | Jump 0x48f ; case 0xb
048f 480a |H | Short_Literal 0xa
0490 a606 | | Store_Unchecked 0x3,0x6
0491 78ee |x | Jump 0x580
0492 4806 |H | Short_Literal 0x6
0493 a606 | | Store_Unchecked 0x3,0x6
0494 78eb |x | Jump 0x580
0495 480a |H | Short_Literal 0xa
0496 a606 | | Store_Unchecked 0x3,0x6
0497 e40e | | Load 0x2,0xe
0498 a604 | | Store_Unchecked 0x3,0x4
0499 78e6 |x | Jump 0x580
049a 4803 |H | Short_Literal 0x3
049b a606 | | Store_Unchecked 0x3,0x6
049c e40e | | Load 0x2,0xe
049d a604 | | Store_Unchecked 0x3,0x4
049e 78e1 |x | Jump 0x580
049f 4803 |H | Short_Literal 0x3
04a0 a606 | | Store_Unchecked 0x3,0x6
04a1 78de |x | Jump 0x580
04a2 e606 | | Load 0x3,0x6
04a3 8414 | | Call 0x2,0x14
04a4 78db |x | Jump 0x580
04a5 e606 | | Load 0x3,0x6
04a6 0aff | | Execute_Immediate Plus,-0x1
04a7 460b |F | Jump_Case 0xb
04a8 783a |x: | Jump 0x4e3 ; case 0x0
04a9 7839 |x9 | Jump 0x4e3 ; case 0x1
04aa 7838 |x8 | Jump 0x4e3 ; case 0x2
04ab 7837 |x7 | Jump 0x4e3 ; case 0x3
04ac 7836 |x6 | Jump 0x4e3 ; case 0x4
04ad 7809 |x | Jump 0x4b7 ; case 0x5
04ae 7812 |x | Jump 0x4c1 ; case 0x6
04af 78d0 |x | Jump 0x580 ; case 0x7
04b0 7822 |x" | Jump 0x4d3 ; case 0x8
04b1 7824 |x$ | Jump 0x4d6 ; case 0x9
04b2 782d |x- | Jump 0x4e0 ; case 0xa
04b3 7800 |x | Jump 0x4b4 ; case 0xb
04b4 480a |H | Short_Literal 0xa
04b5 a606 | | Store_Unchecked 0x3,0x6
04b6 78c9 |x | Jump 0x580
04b7 4802 |H | Short_Literal 0x2
04b8 a606 | | Store_Unchecked 0x3,0x6
04b9 e603 | | Load 0x3,0x3
04ba e602 | | Load 0x3,0x2
04bb e406 | | Load 0x2,0x6
04bc e605 | | Load 0x3,0x5
04bd 840c | | Call 0x2,0xc
04be c602 | | Store 0x3,0x2
04bf c603 | | Store 0x3,0x3
04c0 78bf |x | Jump 0x580
04c1 4802 |H | Short_Literal 0x2
04c2 a606 | | Store_Unchecked 0x3,0x6
04c3 e603 | | Load 0x3,0x3
04c4 e602 | | Load 0x3,0x2
04c5 e405 | | Load 0x2,0x5
04c6 0322 | " | Declare_Variable Record
04c7 e604 | | Load 0x3,0x4
04c8 e60c | | Load 0x3,0xc
04c9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04ca e40e | | Load 0x2,0xe
04cb 0aff | | Execute_Immediate Plus,-0x1
04cc e60c | | Load 0x3,0xc
04cd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04ce e605 | | Load 0x3,0x5
04cf 840c | | Call 0x2,0xc
04d0 c602 | | Store 0x3,0x2
04d1 c603 | | Store 0x3,0x3
04d2 78ad |x | Jump 0x580
04d3 4802 |H | Short_Literal 0x2
04d4 a606 | | Store_Unchecked 0x3,0x6
04d5 78aa |x | Jump 0x580
04d6 4802 |H | Short_Literal 0x2
04d7 a606 | | Store_Unchecked 0x3,0x6
04d8 e603 | | Load 0x3,0x3
04d9 e602 | | Load 0x3,0x2
04da 8608 | | Call 0x3,0x8
04db e605 | | Load 0x3,0x5
04dc 840c | | Call 0x2,0xc
04dd c602 | | Store 0x3,0x2
04de c603 | | Store 0x3,0x3
04df 78a0 |x | Jump 0x580
04e0 4803 |H | Short_Literal 0x3
04e1 a606 | | Store_Unchecked 0x3,0x6
04e2 789d |x | Jump 0x580
04e3 e606 | | Load 0x3,0x6
04e4 8414 | | Call 0x2,0x14
04e5 789a |x | Jump 0x580
04e6 e606 | | Load 0x3,0x6
04e7 0aff | | Execute_Immediate Plus,-0x1
04e8 460b |F | Jump_Case 0xb
04e9 7896 |x | Jump 0x580 ; case 0x0
04ea 7895 |x | Jump 0x580 ; case 0x1
04eb 780c |x | Jump 0x4f8 ; case 0x2
04ec 7893 |x | Jump 0x580 ; case 0x3
04ed 7823 |x# | Jump 0x511 ; case 0x4
04ee 7891 |x | Jump 0x580 ; case 0x5
04ef 780c |x | Jump 0x4fc ; case 0x6
04f0 788f |x | Jump 0x580 ; case 0x7
04f1 788e |x | Jump 0x580 ; case 0x8
04f2 788d |x | Jump 0x580 ; case 0x9
04f3 781a |x | Jump 0x50e ; case 0xa
04f4 7800 |x | Jump 0x4f5 ; case 0xb
04f5 480a |H | Short_Literal 0xa
04f6 a606 | | Store_Unchecked 0x3,0x6
04f7 7888 |x | Jump 0x580
04f8 4804 |H | Short_Literal 0x4
04f9 a606 | | Store_Unchecked 0x3,0x6
04fa 8607 | | Call 0x3,0x7
04fb 7884 |x | Jump 0x580
04fc 4809 |H | Short_Literal 0x9
04fd a606 | | Store_Unchecked 0x3,0x6
04fe e603 | | Load 0x3,0x3
04ff e602 | | Load 0x3,0x2
0500 e405 | | Load 0x2,0x5
0501 0322 | " | Declare_Variable Record
0502 e604 | | Load 0x3,0x4
0503 e60c | | Load 0x3,0xc
0504 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0505 e40e | | Load 0x2,0xe
0506 0aff | | Execute_Immediate Plus,-0x1
0507 e60c | | Load 0x3,0xc
0508 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0509 e605 | | Load 0x3,0x5
050a 840c | | Call 0x2,0xc
050b c602 | | Store 0x3,0x2
050c c603 | | Store 0x3,0x3
050d 7872 |xr | Jump 0x580
050e 4803 |H | Short_Literal 0x3
050f a606 | | Store_Unchecked 0x3,0x6
0510 786f |xo | Jump 0x580
0511 e606 | | Load 0x3,0x6
0512 8414 | | Call 0x2,0x14
0513 786c |xl | Jump 0x580
0514 e606 | | Load 0x3,0x6
0515 0aff | | Execute_Immediate Plus,-0x1
0516 460b |F | Jump_Case 0xb
0517 781c |x | Jump 0x534 ; case 0x0
0518 781b |x | Jump 0x534 ; case 0x1
0519 781a |x | Jump 0x534 ; case 0x2
051a 7819 |x | Jump 0x534 ; case 0x3
051b 7818 |x | Jump 0x534 ; case 0x4
051c 780f |x | Jump 0x52c ; case 0x5
051d 7808 |x | Jump 0x526 ; case 0x6
051e 780a |x | Jump 0x529 ; case 0x7
051f 7814 |x | Jump 0x534 ; case 0x8
0520 785f |x_ | Jump 0x580 ; case 0x9
0521 780f |x | Jump 0x531 ; case 0xa
0522 7800 |x | Jump 0x523 ; case 0xb
0523 480a |H | Short_Literal 0xa
0524 a606 | | Store_Unchecked 0x3,0x6
0525 785a |xZ | Jump 0x580
0526 4808 |H | Short_Literal 0x8
0527 a606 | | Store_Unchecked 0x3,0x6
0528 7857 |xW | Jump 0x580
0529 4807 |H | Short_Literal 0x7
052a a606 | | Store_Unchecked 0x3,0x6
052b 7854 |xT | Jump 0x580
052c 4808 |H | Short_Literal 0x8
052d a606 | | Store_Unchecked 0x3,0x6
052e e40e | | Load 0x2,0xe
052f a604 | | Store_Unchecked 0x3,0x4
0530 784f |xO | Jump 0x580
0531 4803 |H | Short_Literal 0x3
0532 a606 | | Store_Unchecked 0x3,0x6
0533 784c |xL | Jump 0x580
0534 e606 | | Load 0x3,0x6
0535 8414 | | Call 0x2,0x14
0536 7849 |xI | Jump 0x580
0537 e606 | | Load 0x3,0x6
0538 0aff | | Execute_Immediate Plus,-0x1
0539 460b |F | Jump_Case 0xb
053a 781b |x | Jump 0x556 ; case 0x0
053b 780d |x | Jump 0x549 ; case 0x1
053c 7843 |xC | Jump 0x580 ; case 0x2
053d 7818 |x | Jump 0x556 ; case 0x3
053e 7817 |x | Jump 0x556 ; case 0x4
053f 780e |x | Jump 0x54e ; case 0x5
0540 7815 |x | Jump 0x556 ; case 0x6
0541 783e |x> | Jump 0x580 ; case 0x7
0542 7813 |x | Jump 0x556 ; case 0x8
0543 783c |x< | Jump 0x580 ; case 0x9
0544 780e |x | Jump 0x553 ; case 0xa
0545 7800 |x | Jump 0x546 ; case 0xb
0546 480a |H | Short_Literal 0xa
0547 a606 | | Store_Unchecked 0x3,0x6
0548 7837 |x7 | Jump 0x580
0549 4803 |H | Short_Literal 0x3
054a a606 | | Store_Unchecked 0x3,0x6
054b e40e | | Load 0x2,0xe
054c a604 | | Store_Unchecked 0x3,0x4
054d 7832 |x2 | Jump 0x580
054e 480a |H | Short_Literal 0xa
054f a606 | | Store_Unchecked 0x3,0x6
0550 e40e | | Load 0x2,0xe
0551 a604 | | Store_Unchecked 0x3,0x4
0552 782d |x- | Jump 0x580
0553 4803 |H | Short_Literal 0x3
0554 a606 | | Store_Unchecked 0x3,0x6
0555 782a |x* | Jump 0x580
0556 e606 | | Load 0x3,0x6
0557 8414 | | Call 0x2,0x14
0558 7827 |x' | Jump 0x580
0559 e606 | | Load 0x3,0x6
055a 0aff | | Execute_Immediate Plus,-0x1
055b 460b |F | Jump_Case 0xb
055c 7821 |x! | Jump 0x57e ; case 0x0
055d 7815 |x | Jump 0x573 ; case 0x1
055e 780c |x | Jump 0x56b ; case 0x2
055f 781e |x | Jump 0x57e ; case 0x3
0560 781d |x | Jump 0x57e ; case 0x4
0561 780c |x | Jump 0x56e ; case 0x5
0562 781b |x | Jump 0x57e ; case 0x6
0563 781c |x | Jump 0x580 ; case 0x7
0564 7819 |x | Jump 0x57e ; case 0x8
0565 7812 |x | Jump 0x578 ; case 0x9
0566 7814 |x | Jump 0x57b ; case 0xa
0567 7800 |x | Jump 0x568 ; case 0xb
0568 480a |H | Short_Literal 0xa
0569 a606 | | Store_Unchecked 0x3,0x6
056a 7815 |x | Jump 0x580
056b 480b |H | Short_Literal 0xb
056c a606 | | Store_Unchecked 0x3,0x6
056d 7812 |x | Jump 0x580
056e 480c |H | Short_Literal 0xc
056f a606 | | Store_Unchecked 0x3,0x6
0570 e40e | | Load 0x2,0xe
0571 a604 | | Store_Unchecked 0x3,0x4
0572 780d |x | Jump 0x580
0573 480b |H | Short_Literal 0xb
0574 a606 | | Store_Unchecked 0x3,0x6
0575 e40e | | Load 0x2,0xe
0576 a604 | | Store_Unchecked 0x3,0x4
0577 7808 |x | Jump 0x580
0578 480c |H | Short_Literal 0xc
0579 a606 | | Store_Unchecked 0x3,0x6
057a 7805 |x | Jump 0x580
057b 4803 |H | Short_Literal 0x3
057c a606 | | Store_Unchecked 0x3,0x6
057d 7802 |x | Jump 0x580
057e e606 | | Load 0x3,0x6
057f 8414 | | Call 0x2,0x14
0580 e40e | | Load 0x2,0xe
0581 0a01 | | Execute_Immediate Plus,0x1
0582 c40e | | Store 0x2,0xe
0583 00c9 | | Action Pop_Auxiliary_Loop
0584 00a7 0357 | W| Action Jump_Extended,0x357
0586 00ce | | Action Pop_Auxiliary
0587 e602 | | Load 0x3,0x2
0588 00ca | | Action Exit_Nullary_Function
0589 0000 0000 | | .BLANK 0000[0x7]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0595 | | .CONST 0x0595 ; Address of begin
0591 05c0 | | .CONST 0x05c0 ; Address of exception handler
0592 0002 | | .CONST 0x0002 ; Number of locals
0593 INIT_0590:
0593 029f 07e3 | | Declare_Subprogram For_Call,INIT_07e0
0595 BODY_0590:
0595 e40e | | Load 0x2,0xe
0596 e5fd | | Load 0x2,-0x3
0597 01dc | | Execute Vector,Last
0598 027d | } | Execute Discrete,Greater
0599 680c |h | Jump_Zero 0x5a6
059a 4800 |H | Short_Literal 0x0
059b e409 | | Load 0x2,0x9
059c 1c08 | | Execute_Immediate Run_Utility,0x8
059d e406 | | Load 0x2,0x6
059e e603 | | Load 0x3,0x3
059f 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
05a0 e40a | | Load 0x2,0xa
05a1 e603 | | Load 0x3,0x3
05a2 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
05a3 e40a | | Load 0x2,0xa
05a4 03b6 | | Declare_Variable Access,By_Allocation,With_Value
05a5 00ca | | Action Exit_Nullary_Function
05a6 e40e | | Load 0x2,0xe
05a7 e5fd | | Load 0x2,-0x3
05a8 01d7 | | Execute Vector,Field_Read
05a9 0f28 | ( | Execute_Immediate Equal,0x28
05aa 6802 |h | Jump_Zero 0x5ad
05ab 8602 | | Call 0x3,0x2
05ac 7812 |x | Jump 0x5bf
05ad 4800 |H | Short_Literal 0x0
05ae e409 | | Load 0x2,0x9
05af 1c08 | | Execute_Immediate Run_Utility,0x8
05b0 00d8 | | Load_Top At_Offset_0
05b1 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
05b2 e40e | | Load 0x2,0xe
05b3 e604 | | Load 0x3,0x4
05b4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05b5 e5fd | | Load 0x2,-0x3
05b6 01dc | | Execute Vector,Last
05b7 00d0 | | Action Swap_Control
05b8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
05b9 e40a | | Load 0x2,0xa
05ba e603 | | Load 0x3,0x3
05bb 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
05bc e40a | | Load 0x2,0xa
05bd 03b6 | | Declare_Variable Access,By_Allocation,With_Value
05be 00ca | | Action Exit_Nullary_Function
05bf 0831 | 1 | Execute_Immediate Raise,0x31
05c0 TRAP_0590:
05c0 0007 | | Action Break_Optional
05c1 e403 | | Load 0x2,0x3
05c2 7007 |p | Jump_Nonzero 0x5ca
05c3 0092 0830 | 0| Action Push_String_Extended,0x830 ; "*** unhandled parser exception at position"
05c5 e40e | | Load 0x2,0xe
05c6 00e0 | | Load_Encached Standard_Cache
05c7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05c8 01cc | | Execute Vector,Catenate
05c9 8407 | | Call 0x2,0x7
05ca 00d8 | | Load_Top At_Offset_0
05cb 0101 | | Execute Exception,Reraise
05cc 0000 0000 | | .BLANK 0000[0x4]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3 | | .CONST 0x05d3 ; Address of begin
05d1 0004 | | .CONST 0x0004 ; Address of exception handler
05d2 0001 | | .CONST 0x0001 ; Number of locals
05d3 BODY_05d0:
05d3 INIT_05d0:
05d3 e7ff | | Load 0x3,-0x1
05d4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05d5 e7ff | | Load 0x3,-0x1
05d6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05d7 0272 | r | Execute Discrete,Minus
05d8 0a01 | | Execute_Immediate Plus,0x1
05d9 00e3 | | Load_Encached Natural_Cache
05da 025b | [ | Execute Discrete,Check_In_Type
05db 4401 |D | Exit_Subprogram With_Result,0x1
05dc 0000 0000 | | .BLANK 0000[0x4]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e3 | | .CONST 0x05e3 ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 0001 | | .CONST 0x0001 ; Number of locals
05e3 BODY_05e0:
05e3 INIT_05e0:
05e3 e5f9 | | Load 0x2,-0x7
05e4 0092 0831 | 1| Action Push_String_Extended,0x831 ; "... "
05e6 e418 | | Load 0x2,0x18
05e7 e001 | | Load 0x0,0x1
05e8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05e9 4819 |H | Short_Literal 0x19
05ea 4802 |H | Short_Literal 0x2
05eb 0099 | | Action Reference_Dynamic
05ec 481a |H | Short_Literal 0x1a
05ed 4802 |H | Short_Literal 0x2
05ee 0099 | | Action Reference_Dynamic
05ef 820d | | Call 0x1,0xd
05f0 e418 | | Load 0x2,0x18
05f1 4820 |H | Short_Literal 0x20
05f2 4800 |H | Short_Literal 0x0
05f3 e001 | | Load 0x0,0x1
05f4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
05f5 4501 |E | Exit_Subprogram 0x1
05f6 0000 0000 | | .XXX[0x2]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 0605 | | .CONST 0x0605 ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0002 | | .CONST 0x0002 ; Number of locals
05fb INIT_05f8:
05fb e418 | | Load 0x2,0x18
05fc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05fd e418 | | Load 0x2,0x18
05fe e001 | | Load 0x0,0x1
05ff 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0600 0272 | r | Execute Discrete,Minus
0601 e7ff | | Load 0x3,-0x1
0602 01db | | Execute Vector,Length
0603 027b | { | Execute Discrete,Greater_Equal
0604 0007 | | Action Break_Optional
0605 BODY_05f8:
0605 00d8 | | Load_Top At_Offset_0
0606 6806 |h | Jump_Zero 0x60d
0607 e418 | | Load 0x2,0x18
0608 e7ff | | Load 0x3,-0x1
0609 e001 | | Load 0x0,0x1
060a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
060b 00d1 | | Pop_Control Pop_Count_1
060c 4502 |E | Exit_Subprogram 0x2
060d 841d | | Call 0x2,0x1d
060e 484f |HO | Short_Literal 0x4f
060f 00ea | | Load_Encached Null_String_Cache
0610 e7ff | | Load 0x3,-0x1
0611 4819 |H | Short_Literal 0x19
0612 4802 |H | Short_Literal 0x2
0613 0099 | | Action Reference_Dynamic
0614 481a |H | Short_Literal 0x1a
0615 4802 |H | Short_Literal 0x2
0616 0099 | | Action Reference_Dynamic
0617 820d | | Call 0x1,0xd
0618 4502 |E | Exit_Subprogram 0x2
0619 0000 0000 | | .BLANK 0000[0x7]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0623 | # | .CONST 0x0623 ; Address of begin
0621 0004 | | .CONST 0x0004 ; Address of exception handler
0622 0001 | | .CONST 0x0001 ; Number of locals
0623 BODY_0620:
0623 INIT_0620:
0623 4800 |H | Short_Literal 0x0
0624 e7ff | | Load 0x3,-0x1
0625 4823 |H# | Short_Literal 0x23
0626 e004 | | Load 0x0,0x4
0627 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0628 7004 |p | Jump_Nonzero 0x62d
0629 e7ff | | Load 0x3,-0x1
062a e004 | | Load 0x0,0x4
062b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
062c 4401 |D | Exit_Subprogram With_Result,0x1
062d e7ff | | Load 0x3,-0x1
062e 4401 |D | Exit_Subprogram With_Result,0x1
062f 0000 | | .XXX[0x1]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0646 | F | .CONST 0x0646 ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0005 | | .CONST 0x0005 ; Number of locals
0633 INIT_0630:
0633 e7ff | | Load 0x3,-0x1
0634 8417 | | Call 0x2,0x17
0635 4801 |H | Short_Literal 0x1
0636 e602 | | Load 0x3,0x2
0637 00e9 | | Load_Encached String_Cache
0638 0334 | 4 | Declare_Variable Array,With_Constraint
0639 e7ff | | Load 0x3,-0x1
063a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
063b e7ff | | Load 0x3,-0x1
063c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
063d e5fd | | Load 0x2,-0x3
063e 01cf | | Execute Vector,Slice_Read
063f e603 | | Load 0x3,0x3
0640 01d4 | | Execute Vector,Structure_Write
0641 00e2 | | Load_Encached Integer_Cache
0642 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0643 e602 | | Load 0x3,0x2
0644 00e2 | | Load_Encached Integer_Cache
0645 03f1 | | Declare_Variable Discrete,With_Value
0646 BODY_0630:
0646 00cf | | Action Mark_Auxiliary
0647 e604 | | Load 0x3,0x4
0648 e603 | | Load 0x3,0x3
0649 01d7 | | Execute Vector,Field_Read
064a 0f09 | | Execute_Immediate Equal,0x9
064b 6804 |h | Jump_Zero 0x650
064c 482c |H, | Short_Literal 0x2c
064d e604 | | Load 0x3,0x4
064e e603 | | Load 0x3,0x3
064f 01d6 | | Execute Vector,Field_Write
0650 e604 | | Load 0x3,0x4
0651 e603 | | Load 0x3,0x3
0652 01d7 | | Execute Vector,Field_Read
0653 7004 |p | Jump_Nonzero 0x658
0654 4820 |H | Short_Literal 0x20
0655 e604 | | Load 0x3,0x4
0656 e603 | | Load 0x3,0x3
0657 01d6 | | Execute Vector,Field_Write
0658 e604 | | Load 0x3,0x4
0659 e603 | | Load 0x3,0x3
065a 01d7 | | Execute Vector,Field_Read
065b 0f1b | | Execute_Immediate Equal,0x1b
065c 680f |h | Jump_Zero 0x66c
065d e604 | | Load 0x3,0x4
065e 0a01 | | Execute_Immediate Plus,0x1
065f 0248 | H | Execute Discrete,Check_In_Integer
0660 e605 | | Load 0x3,0x5
0661 e603 | | Load 0x3,0x3
0662 01cf | | Execute Vector,Slice_Read
0663 e604 | | Load 0x3,0x4
0664 e605 | | Load 0x3,0x5
0665 0aff | | Execute_Immediate Plus,-0x1
0666 0248 | H | Execute Discrete,Check_In_Integer
0667 e603 | | Load 0x3,0x3
0668 01ce | | Execute Vector,Slice_Write
0669 e605 | | Load 0x3,0x5
066a 0aff | | Execute_Immediate Plus,-0x1
066b c605 | | Store 0x3,0x5
066c e604 | | Load 0x3,0x4
066d 0a01 | | Execute_Immediate Plus,0x1
066e c604 | | Store 0x3,0x4
066f e604 | | Load 0x3,0x4
0670 e605 | | Load 0x3,0x5
0671 027d | } | Execute Discrete,Greater
0672 7002 |p | Jump_Nonzero 0x675
0673 00c9 | | Action Pop_Auxiliary_Loop
0674 7fd2 | | Jump 0x647
0675 00ce | | Action Pop_Auxiliary
0676 4801 |H | Short_Literal 0x1
0677 e605 | | Load 0x3,0x5
0678 e603 | | Load 0x3,0x3
0679 01cf | | Execute Vector,Slice_Read
067a 4401 |D | Exit_Subprogram With_Result,0x1
067b 0000 0000 | | .BLANK 0000[0x5]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0683 | | .CONST 0x0683 ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0001 | | .CONST 0x0001 ; Number of locals
0683 BODY_0680:
0683 INIT_0680:
0683 e7ff | | Load 0x3,-0x1
0684 8420 | | Call 0x2,0x20
0685 841f | | Call 0x2,0x1f
0686 841e | | Call 0x2,0x1e
0687 4502 |E | Exit_Subprogram 0x2
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 069e | | .CONST 0x069e ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0005 | | .CONST 0x0005 ; Number of locals
068b INIT_0688:
068b e7ff | | Load 0x3,-0x1
068c 8417 | | Call 0x2,0x17
068d 4801 |H | Short_Literal 0x1
068e e602 | | Load 0x3,0x2
068f 00e9 | | Load_Encached String_Cache
0690 0334 | 4 | Declare_Variable Array,With_Constraint
0691 e7ff | | Load 0x3,-0x1
0692 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0693 e7ff | | Load 0x3,-0x1
0694 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0695 e5fd | | Load 0x2,-0x3
0696 01cf | | Execute Vector,Slice_Read
0697 e603 | | Load 0x3,0x3
0698 01d4 | | Execute Vector,Structure_Write
0699 00e2 | | Load_Encached Integer_Cache
069a 0602 | | Execute_Immediate Set_Value_Unchecked,0x2
069b e602 | | Load 0x3,0x2
069c 00e2 | | Load_Encached Integer_Cache
069d 03f1 | | Declare_Variable Discrete,With_Value
069e BODY_0688:
069e 00cf | | Action Mark_Auxiliary
069f e604 | | Load 0x3,0x4
06a0 e605 | | Load 0x3,0x5
06a1 027b | { | Execute Discrete,Greater_Equal
06a2 7019 |p | Jump_Nonzero 0x6bc
06a3 e604 | | Load 0x3,0x4
06a4 e603 | | Load 0x3,0x3
06a5 01d7 | | Execute Vector,Field_Read
06a6 0f22 | " | Execute_Immediate Equal,0x22
06a7 680f |h | Jump_Zero 0x6b7
06a8 e604 | | Load 0x3,0x4
06a9 0a01 | | Execute_Immediate Plus,0x1
06aa 0248 | H | Execute Discrete,Check_In_Integer
06ab e605 | | Load 0x3,0x5
06ac e603 | | Load 0x3,0x3
06ad 01cf | | Execute Vector,Slice_Read
06ae e604 | | Load 0x3,0x4
06af e605 | | Load 0x3,0x5
06b0 0aff | | Execute_Immediate Plus,-0x1
06b1 0248 | H | Execute Discrete,Check_In_Integer
06b2 e603 | | Load 0x3,0x3
06b3 01ce | | Execute Vector,Slice_Write
06b4 e605 | | Load 0x3,0x5
06b5 0aff | | Execute_Immediate Plus,-0x1
06b6 c605 | | Store 0x3,0x5
06b7 e604 | | Load 0x3,0x4
06b8 0a01 | | Execute_Immediate Plus,0x1
06b9 c604 | | Store 0x3,0x4
06ba 00c9 | | Action Pop_Auxiliary_Loop
06bb 7fe3 | | Jump 0x69f
06bc 00ce | | Action Pop_Auxiliary
06bd 4801 |H | Short_Literal 0x1
06be e605 | | Load 0x3,0x5
06bf e603 | | Load 0x3,0x3
06c0 01cf | | Execute Vector,Slice_Read
06c1 4401 |D | Exit_Subprogram With_Result,0x1
06c2 0000 0000 | | .BLANK 0000[0x6]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb | | .CONST 0x06cb ; Address of begin
06c9 0004 | | .CONST 0x0004 ; Address of exception handler
06ca 0001 | | .CONST 0x0001 ; Number of locals
06cb BODY_06c8:
06cb INIT_06c8:
06cb e7ff | | Load 0x3,-0x1
06cc 8417 | | Call 0x2,0x17
06cd 0c01 | | Execute_Immediate Greater_Equal,0x1
06ce 680a |h | Jump_Zero 0x6d9
06cf e7ff | | Load 0x3,-0x1
06d0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06d1 e5fd | | Load 0x2,-0x3
06d2 01d7 | | Execute Vector,Field_Read
06d3 0f22 | " | Execute_Immediate Equal,0x22
06d4 6804 |h | Jump_Zero 0x6d9
06d5 e7ff | | Load 0x3,-0x1
06d6 8422 | " | Call 0x2,0x22
06d7 841e | | Call 0x2,0x1e
06d8 4502 |E | Exit_Subprogram 0x2
06d9 e7ff | | Load 0x3,-0x1
06da 8420 | | Call 0x2,0x20
06db 841e | | Call 0x2,0x1e
06dc 4502 |E | Exit_Subprogram 0x2
06dd 0000 0000 | | .XXX[0x3]
06df 0000 | |
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e9 | | .CONST 0x06e9 ; Address of begin
06e1 0004 | | .CONST 0x0004 ; Address of exception handler
06e2 0002 | | .CONST 0x0002 ; Number of locals
06e3 INIT_06e0:
06e3 e7ff | | Load 0x3,-0x1
06e4 e5fa | | Load 0x2,-0x6
06e5 0271 | q | Execute Discrete,Times
06e6 0a01 | | Execute_Immediate Plus,0x1
06e7 00e2 | | Load_Encached Integer_Cache
06e8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
06e9 BODY_06e0:
06e9 e7fe | | Load 0x3,-0x2
06ea 6803 |h | Jump_Zero 0x6ee
06eb 00d8 | | Load_Top At_Offset_0
06ec 0aff | | Execute_Immediate Plus,-0x1
06ed c602 | | Store 0x3,0x2
06ee 00d8 | | Load_Top At_Offset_0
06ef 4402 |D | Exit_Subprogram With_Result,0x2
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 0708 | | .CONST 0x0708 ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0003 | | .CONST 0x0003 ; Number of locals
06f3 INIT_06f0:
06f3 e7fe | | Load 0x3,-0x2
06f4 e7ff | | Load 0x3,-0x1
06f5 8424 | $ | Call 0x2,0x24
06f6 4801 |H | Short_Literal 0x1
06f7 e602 | | Load 0x3,0x2
06f8 00e9 | | Load_Encached String_Cache
06f9 0334 | 4 | Declare_Variable Array,With_Constraint
06fa 00d8 | | Load_Top At_Offset_0
06fb 0335 | 5 | Declare_Variable Array,Duplicate
06fc 00cd | | Action Spare6_Action
06fd e603 | | Load 0x3,0x3
06fe 01d9 | | Execute Vector,Reverse_Bounds
06ff 0263 | c | Execute Discrete,Above_Bound
0700 7005 |p | Jump_Nonzero 0x706
0701 4820 |H | Short_Literal 0x20
0702 e606 | | Load 0x3,0x6
0703 e604 | | Load 0x3,0x4
0704 01d6 | | Execute Vector,Field_Write
0705 3ffb |? | Loop_Increasing 0x701
0706 e603 | | Load 0x3,0x3
0707 01d4 | | Execute Vector,Structure_Write
0708 BODY_06f0:
0708 00d8 | | Load_Top At_Offset_0
0709 841e | | Call 0x2,0x1e
070a 4503 |E | Exit_Subprogram 0x3
070b 0000 0000 | | .BLANK 0000[0x5]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 071e | | .CONST 0x071e ; Address of begin
0711 0004 | | .CONST 0x0004 ; Address of exception handler
0712 0003 | | .CONST 0x0003 ; Number of locals
0713 INIT_0710:
0713 e40a | | Load 0x2,0xa
0714 e7ff | | Load 0x3,-0x1
0715 0227 | ' | Execute Access,All_Reference
0716 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0717 a602 | | Store_Unchecked 0x3,0x2
0718 e418 | | Load 0x2,0x18
0719 e001 | | Load 0x0,0x1
071a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
071b 0a01 | | Execute_Immediate Plus,0x1
071c 00e2 | | Load_Encached Integer_Cache
071d 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
071e BODY_0710:
071e e602 | | Load 0x3,0x2
071f 6825 |h% | Jump_Zero 0x745
0720 00cf | | Action Mark_Auxiliary
0721 e602 | | Load 0x3,0x2
0722 0227 | ' | Execute Access,All_Reference
0723 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0724 0e01 | | Execute_Immediate Not_Equal,0x1
0725 6802 |h | Jump_Zero 0x728
0726 4800 |H | Short_Literal 0x0
0727 4402 |D | Exit_Subprogram With_Result,0x2
0728 e603 | | Load 0x3,0x3
0729 e602 | | Load 0x3,0x2
072a 0227 | ' | Execute Access,All_Reference
072b 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
072c 8417 | | Call 0x2,0x17
072d 0273 | s | Execute Discrete,Plus
072e c603 | | Store 0x3,0x3
072f e603 | | Load 0x3,0x3
0730 0a04 | | Execute_Immediate Plus,0x4
0731 c603 | | Store 0x3,0x3
0732 e603 | | Load 0x3,0x3
0733 e602 | | Load 0x3,0x2
0734 0227 | ' | Execute Access,All_Reference
0735 2605 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0736 8417 | | Call 0x2,0x17
0737 0273 | s | Execute Discrete,Plus
0738 c603 | | Store 0x3,0x3
0739 e602 | | Load 0x3,0x2
073a 0227 | ' | Execute Access,All_Reference
073b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
073c a602 | | Store_Unchecked 0x3,0x2
073d e602 | | Load 0x3,0x2
073e 6805 |h | Jump_Zero 0x744
073f e603 | | Load 0x3,0x3
0740 0a02 | | Execute_Immediate Plus,0x2
0741 c603 | | Store 0x3,0x3
0742 00c9 | | Action Pop_Auxiliary_Loop
0743 7fdd | | Jump 0x721
0744 00ce | | Action Pop_Auxiliary
0745 00d8 | | Load_Top At_Offset_0
0746 e7fe | | Load 0x3,-0x2
0747 0273 | s | Execute Discrete,Plus
0748 0a01 | | Execute_Immediate Plus,0x1
0749 c603 | | Store 0x3,0x3
074a 00d8 | | Load_Top At_Offset_0
074b e5f9 | | Load 0x2,-0x7
074c 027a | z | Execute Discrete,Less_Equal
074d 4402 |D | Exit_Subprogram With_Result,0x2
074e 0000 0000 | | .XXX[0x2]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0757 | W | .CONST 0x0757 ; Address of begin
0751 0004 | | .CONST 0x0004 ; Address of exception handler
0752 0003 | | .CONST 0x0003 ; Number of locals
0753 INIT_0750:
0753 00e1 | | Load_Encached Boolean_Cache
0754 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0755 029f 07f3 | | Declare_Subprogram For_Call,INIT_07f0
0757 BODY_0750:
0757 e7ff | | Load 0x3,-0x1
0758 0227 | ' | Execute Access,All_Reference
0759 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
075a 4602 |F | Jump_Case 0x2
075b 782d |x- | Jump 0x789 ; case 0x0
075c 7831 |x1 | Jump 0x78e ; case 0x1
075d 7800 |x | Jump 0x75e ; case 0x2
075e e7fe | | Load 0x3,-0x2
075f 0c01 | | Execute_Immediate Greater_Equal,0x1
0760 6815 |h | Jump_Zero 0x776
0761 e7ff | | Load 0x3,-0x1
0762 0227 | ' | Execute Access,All_Reference
0763 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
0764 8421 | ! | Call 0x2,0x21
0765 0092 0832 | 2| Action Push_String_Extended,0x832 ; " => "
0767 841e | | Call 0x2,0x1e
0768 e7fe | | Load 0x3,-0x2
0769 e7ff | | Load 0x3,-0x1
076a 8426 | & | Call 0x2,0x26
076b a602 | | Store_Unchecked 0x3,0x2
076c e602 | | Load 0x3,0x2
076d 7008 |p | Jump_Nonzero 0x776
076e e7fe | | Load 0x3,-0x2
076f e5fb | | Load 0x2,-0x5
0770 027c | | | Execute Discrete,Less
0771 6804 |h | Jump_Zero 0x776
0772 841d | | Call 0x2,0x1d
0773 4801 |H | Short_Literal 0x1
0774 e7fe | | Load 0x3,-0x2
0775 8425 | % | Call 0x2,0x25
0776 e7fe | | Load 0x3,-0x2
0777 e5fb | | Load 0x2,-0x5
0778 027c | | | Execute Discrete,Less
0779 680b |h | Jump_Zero 0x785
077a 0092 0822 | "| Action Push_String_Extended,0x822 ; "("
077c 841e | | Call 0x2,0x1e
077d e602 | | Load 0x3,0x2
077e 7004 |p | Jump_Nonzero 0x783
077f e7fe | | Load 0x3,-0x2
0780 e7ff | | Load 0x3,-0x1
0781 8426 | & | Call 0x2,0x26
0782 a602 | | Store_Unchecked 0x3,0x2
0783 8603 | | Call 0x3,0x3
0784 4503 |E | Exit_Subprogram 0x3
0785 0092 0833 | 3| Action Push_String_Extended,0x833 ; "..."
0787 841e | | Call 0x2,0x1e
0788 4503 |E | Exit_Subprogram 0x3
0789 e7ff | | Load 0x3,-0x1
078a 0227 | ' | Execute Access,All_Reference
078b 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
078c 8423 | # | Call 0x2,0x23
078d 4503 |E | Exit_Subprogram 0x3
078e e7ff | | Load 0x3,-0x1
078f 0227 | ' | Execute Access,All_Reference
0790 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
0791 8421 | ! | Call 0x2,0x21
0792 0092 0832 | 2| Action Push_String_Extended,0x832 ; " => "
0794 841e | | Call 0x2,0x1e
0795 e7ff | | Load 0x3,-0x1
0796 0227 | ' | Execute Access,All_Reference
0797 2605 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0798 8423 | # | Call 0x2,0x23
0799 4503 |E | Exit_Subprogram 0x3
079a 0000 0000 | | .BLANK 0000[0x6]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3 | | .CONST 0x07a3 ; Address of begin
07a1 07a7 | | .CONST 0x07a7 ; Address of exception handler
07a2 0001 | | .CONST 0x0001 ; Number of locals
07a3 BODY_07a0:
07a3 INIT_07a0:
07a3 e7fe | | Load 0x3,-0x2
07a4 e7ff | | Load 0x3,-0x1
07a5 8427 | ' | Call 0x2,0x27
07a6 4503 |E | Exit_Subprogram 0x3
07a7 TRAP_07a0:
07a7 0007 | | Action Break_Optional
07a8 e403 | | Load 0x2,0x3
07a9 7003 |p | Jump_Nonzero 0x7ad
07aa 0092 0834 | 4| Action Push_String_Extended,0x834 ; "*** unhandled pretty printer exception"
07ac 8407 | | Call 0x2,0x7
07ad 00d8 | | Load_Top At_Offset_0
07ae 0101 | | Execute Exception,Reraise
07af 0000 | | .XXX[0x1]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3 | | .CONST 0x07b3 ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0001 | | .CONST 0x0001 ; Number of locals
07b3 BODY_07b0:
07b3 INIT_07b0:
07b3 e405 | | Load 0x2,0x5
07b4 0322 | " | Declare_Variable Record
07b5 e604 | | Load 0x3,0x4
07b6 e802 | | Load 0x4,0x2
07b7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
07b8 e40e | | Load 0x2,0xe
07b9 0aff | | Execute_Immediate Plus,-0x1
07ba e802 | | Load 0x4,0x2
07bb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
07bc e605 | | Load 0x3,0x5
07bd 017d | } | Execute Record,Structure_Write
07be 4501 |E | Exit_Subprogram 0x1
07bf 0000 | | .XXX[0x1]
07c0 ; --------------------------------------------------------------------------------------
07c0 ; SUBPROGRAM
07c0 ; --------------------------------------------------------------------------------------
07c0 07c7 | | .CONST 0x07c7 ; Address of begin
07c1 0004 | | .CONST 0x0004 ; Address of exception handler
07c2 0002 | | .CONST 0x0002 ; Number of locals
07c3 INIT_07c0:
07c3 e40e | | Load 0x2,0xe
07c4 0aff | | Execute_Immediate Plus,-0x1
07c5 00e2 | | Load_Encached Integer_Cache
07c6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
07c7 BODY_07c0:
07c7 00cf | | Action Mark_Auxiliary
07c8 e802 | | Load 0x4,0x2
07c9 e604 | | Load 0x3,0x4
07ca 027c | | | Execute Discrete,Less
07cb 700a |p | Jump_Nonzero 0x7d6
07cc e802 | | Load 0x4,0x2
07cd e5fd | | Load 0x2,-0x3
07ce 01d7 | | Execute Vector,Field_Read
07cf 0e20 | | Execute_Immediate Not_Equal,0x20
07d0 7005 |p | Jump_Nonzero 0x7d6
07d1 e802 | | Load 0x4,0x2
07d2 0aff | | Execute_Immediate Plus,-0x1
07d3 c802 | | Store 0x4,0x2
07d4 00c9 | | Action Pop_Auxiliary_Loop
07d5 7ff2 | | Jump 0x7c8
07d6 00ce | | Action Pop_Auxiliary
07d7 e405 | | Load 0x2,0x5
07d8 0322 | " | Declare_Variable Record
07d9 e604 | | Load 0x3,0x4
07da e803 | | Load 0x4,0x3
07db 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
07dc e802 | | Load 0x4,0x2
07dd e803 | | Load 0x4,0x3
07de 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
07df 00ca | | Action Exit_Nullary_Function
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 07e4 | | .CONST 0x07e4 ; Address of begin
07e1 0004 | | .CONST 0x0004 ; Address of exception handler
07e2 0002 | | .CONST 0x0002 ; Number of locals
07e3 INIT_07e0:
07e3 8415 | | Call 0x2,0x15
07e4 BODY_07e0:
07e4 e40e | | Load 0x2,0xe
07e5 e5fd | | Load 0x2,-0x3
07e6 01dc | | Execute Vector,Last
07e7 027c | | | Execute Discrete,Less
07e8 6803 |h | Jump_Zero 0x7ec
07e9 0092 0835 | 5| Action Push_String_Extended,0x835 ; "warning: garbage characters beyond aggregate end"
07eb 8407 | | Call 0x2,0x7
07ec 00d8 | | Load_Top At_Offset_0
07ed 00cb | | Action Pop_Block_With_Result
07ee 00ca | | Action Exit_Nullary_Function
07ef 0000 | | .XXX[0x1]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f8 | | .CONST 0x07f8 ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0002 | | .CONST 0x0002 ; Number of locals
07f3 INIT_07f0:
07f3 e40a | | Load 0x2,0xa
07f4 e7ff | | Load 0x3,-0x1
07f5 0227 | ' | Execute Access,All_Reference
07f6 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
07f7 a802 | | Store_Unchecked 0x4,0x2
07f8 BODY_07f0:
07f8 00d8 | | Load_Top At_Offset_0
07f9 6819 |h | Jump_Zero 0x813
07fa 00cf | | Action Mark_Auxiliary
07fb e7fe | | Load 0x3,-0x2
07fc 0a01 | | Execute_Immediate Plus,0x1
07fd 00e3 | | Load_Encached Natural_Cache
07fe 025b | [ | Execute Discrete,Check_In_Type
07ff e802 | | Load 0x4,0x2
0800 8427 | ' | Call 0x2,0x27
0801 e802 | | Load 0x4,0x2
0802 0227 | ' | Execute Access,All_Reference
0803 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0804 a802 | | Store_Unchecked 0x4,0x2
0805 e802 | | Load 0x4,0x2
0806 680b |h | Jump_Zero 0x812
0807 0092 0836 | 6| Action Push_String_Extended,0x836 ; ", "
0809 841e | | Call 0x2,0x1e
080a e602 | | Load 0x3,0x2
080b 7004 |p | Jump_Nonzero 0x810
080c 841d | | Call 0x2,0x1d
080d 4800 |H | Short_Literal 0x0
080e e7fe | | Load 0x3,-0x2
080f 8425 | % | Call 0x2,0x25
0810 00c9 | | Action Pop_Auxiliary_Loop
0811 7fe9 | | Jump 0x7fb
0812 00ce | | Action Pop_Auxiliary
0813 0092 082e | .| Action Push_String_Extended,0x82e ; ")"
0815 841e | | Call 0x2,0x1e
0816 4501 |E | Exit_Subprogram 0x1
0817 ; --------------------------------------------------------------------------------------
0817 ; STRING TABLE
0817 ; --------------------------------------------------------------------------------------
0817 0042 | B | .STRTAB 0x0042->0x0838 ; "UNHANDLED"
0818 0049 | I | .STRTAB 0x0049->0x083c ; "PUT_LINE_ERROR"
0819 0055 | U | .STRTAB 0x0055->0x0843 ; "PARSER_ERROR"
081a 005f | _ | .STRTAB 0x005f->0x0849 ; "PRETTY_PRINTER_ERROR"
081b 0071 | q | .STRTAB 0x0071->0x0853 ; "VALUE"
081c 0074 | t | .STRTAB 0x0074->0x0856 ; "SIMPLE_FIELD"
081d 007e | ~ | .STRTAB 0x007e->0x085c ; "AGGREGATE_FIELD"
081e 008b | | .STRTAB 0x008b->0x0863 ; "unknown"
081f 0090 | | .STRTAB 0x0090->0x0867 ; "^"
0820 008f | | .STRTAB 0x008f->0x0867 ; "end"
0821 0090 | | .STRTAB 0x0090->0x0869 ; "how did we get here?"
0822 00a2 | | .STRTAB 0x00a2->0x0873 ; "("
; "("
0823 00a1 | | .STRTAB 0x00a1->0x0873 ; "the first character of a name, or ')'; specifically, a character from the set { 'a'..'z', 'A'..'Z', '0'..'9', '#', '_', '-', '.', '<', '>', Nul, Ht }"
0824 0134 | 4 | .STRTAB 0x0134->0x08be ; "a character appropriate for name, or \x22=>\x22; specifically, a character from the set { 'a'..'z', 'A'..'Z', '0'..'9', '#', '_', '-', '.', '<', '>', Nul, Ht, '=' }"
0825 01d0 | | .STRTAB 0x01d0->0x090d ; "an \x22=>\x22"
0826 01d5 | | .STRTAB 0x01d5->0x0910 ; "the 2nd character from the \x22=>\x22 symbol"
0827 01f9 | | .STRTAB 0x01f9->0x0923 ; "the 1st character from a value or quoted string; specifically, a character that does not come from the set { '(', ')', ',' }"
0828 0273 | s | .STRTAB 0x0273->0x0961 ; "a character from the set { ',', ')', '\x22'."
0829 029a | | .STRTAB 0x029a->0x0976 ; "a character appropriate for a quoted string."
082a 02c4 | | .STRTAB 0x02c4->0x098c ; "a character from the set { ',', ')' }"
082b 02e7 | | .STRTAB 0x02e7->0x099e ; "a character appropriate for a raw value; specifically, a character that does not come from the set { ',', ')' }"
082c 0354 | T | .STRTAB 0x0354->0x09d6 ; "Parsing error: received "
082d 036a | j | .STRTAB 0x036a->0x09e2 ; " (at character position"
082e 037f | | .STRTAB 0x037f->0x09ed ; ")"
; ")"
082f 037e | ~ | .STRTAB 0x037e->0x09ee ; ", expected "
0830 0387 | | .STRTAB 0x0387->0x09f3 ; "*** unhandled parser exception at position"
0831 03af | | .STRTAB 0x03af->0x0a08 ; "... "
0832 03b1 | | .STRTAB 0x03b1->0x0a0a ; " => "
; " => "
0833 03b3 | | .STRTAB 0x03b3->0x0a0c ; "..."
0834 03b4 | | .STRTAB 0x03b4->0x0a0e ; "*** unhandled pretty printer exception"
0835 03d8 | | .STRTAB 0x03d8->0x0a21 ; "warning: garbage characters beyond aggregate end"
0836 0406 | | .STRTAB 0x0406->0x0a39 ; ", "
0837 0406 | | .STREND 0x0406->0x0a3a
0838 554e 4841 |UNHA| .STRTAB_STRINGS
0a3a 0000 0000 | | .BLANK 0000[0x6]
0a40 ; --------------------------------------------------------------------------------------
0a40 ; Debug Table
0a40 ; --------------------------------------------------------------------------------------
0a40 0004 000b | | .DEBUG4 0x0004,0x000b,0xbb43,0x0000,0x0001,0x0000
0a46 0000 0000 | | .BLANK 0000[0x1ba]