|
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: 5120 (0x1400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 07a0 | | .CONST 0x07a0 ; 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 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0034 | 4 | .CONST 0x0034 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0017 | | .CONST 0x0017 ; Number of locals 000b INIT_0008: 000b 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated 000d 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 000f 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated 0011 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 0013 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated 0015 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0017 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated 0019 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 001b 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 001d 00bf | | Action Accept_Activation 001e 029d 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call 0020 029d 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call 0022 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0023 00c7 | | Action Elaborate_Subprogram 0024 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0025 00c7 | | Action Elaborate_Subprogram 0026 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0027 00c7 | | Action Elaborate_Subprogram 0028 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0029 00c7 | | Action Elaborate_Subprogram 002a 1d11 | | Execute_Immediate Reference_Lex_1,0x11 002b 00c7 | | Action Elaborate_Subprogram 002c 1d12 | | Execute_Immediate Reference_Lex_1,0x12 002d 00c7 | | Action Elaborate_Subprogram 002e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 002f 00c7 | | Action Elaborate_Subprogram 0030 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0031 00c7 | | Action Elaborate_Subprogram 0032 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0033 00c7 | | Action Elaborate_Subprogram 0034 BODY_0008: 0034 00bc | | Action Signal_Activated 0035 00bb | | Action Signal_Completion 0036 0000 0000 | | .XXX[0x2] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 0046 | F | .CONST 0x0046 ; Address of begin 0039 0004 | | .CONST 0x0004 ; Address of exception handler 003a 0005 | | .CONST 0x0005 ; Number of locals 003b INIT_0038: 003b e002 | | Load 0x0,0x2 003c 0322 | " | Declare_Variable Record 003d 00d8 | | Load_Top At_Offset_0 003e 1c00 | | Execute_Immediate Run_Utility,0x0 003f e003 | | Load 0x0,0x3 0040 02ff | | Declare_Variable Variant_Record 0041 00d8 | | Load_Top At_Offset_0 0042 1c00 | | Execute_Immediate Run_Utility,0x0 0043 e004 | | Load 0x0,0x4 0044 029f 0603 | | Declare_Subprogram INIT_0600,For_Call 0046 BODY_0038: 0046 e005 | | Load 0x0,0x5 0047 e004 | | Load 0x0,0x4 0048 022f | / | Execute Access,Equal 0049 6801 |h | Jump_Zero 0x4b 004a 8216 | | Call 0x1,0x16 004b 00da | | Load_Top At_Offset_2 004c e402 | | Load 0x2,0x2 004d 4800 |H | Short_Literal 0x0 004e 4814 |H | Short_Literal 0x14 004f e006 | | Load 0x0,0x6 0050 0334 | 4 | Declare_Variable Array,With_Constraint 0051 5012 |P | Indirect_Literal Any,0x64,{0x4572726f, 0x72547970} 0052 482e |H. | Short_Literal 0x2e 0053 e5fe | | Load 0x2,-0x2 0054 01cb | | Execute Vector,Append 0055 e5fd | | Load 0x2,-0x3 0056 01cc | | Execute Vector,Catenate 0057 e404 | | Load 0x2,0x4 0058 8007 | | Call 0x0,0x7 0059 00d2 | | Pop_Control Pop_Count_2 005a 00da | | Load_Top At_Offset_2 005b e008 | | Load 0x0,0x8 005c 016e | n | Execute Variant_Record,Not_Equal 005d 6801 |h | Jump_Zero 0x5f 005e 8405 | | Call 0x2,0x5 005f e5fc | | Load 0x2,-0x4 0060 0335 | 5 | Declare_Variable Array,Duplicate 0061 00cd | | Action Spare6_Action 0062 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0063 0000 | | .XXX[0x1] 0064 4572 726f |Erro| .LITERAL {0x4572726f, 0x72547970} 0068 652e 4572 |e.Er| .XXX[0x8] 006a 726f 724e |rorN| 006c 756d 6265 |umbe| 006e 7200 0000 |r | 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 007c | | | .CONST 0x007c ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0004 | | .CONST 0x0004 ; Number of locals 0073 INIT_0070: 0073 e009 | | Load 0x0,0x9 0074 0007 | | Action Break_Optional 0075 e5fe | | Load 0x2,-0x2 0076 e00a | | Load 0x0,0xa 0077 011c | | Execute Any,Convert_Unchecked 0078 1c01 | | Execute_Immediate Run_Utility,0x1 0079 800b | | Call 0x0,0xb 007a 029f 0613 | | Declare_Subprogram INIT_0610,For_Call 007c BODY_0070: 007c 8404 | | Call 0x2,0x4 007d 0831 | 1 | Execute_Immediate Raise,0x31 007e 0000 0000 | | .XXX[0x2] 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 00a5 | | .CONST 0x00a5 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 000a | | .CONST 0x000a ; Number of locals 0083 INIT_0080: 0083 e00c | | Load 0x0,0xc 0084 0322 | " | Declare_Variable Record 0085 00d8 | | Load_Top At_Offset_0 0086 1c00 | | Execute_Immediate Run_Utility,0x0 0087 4801 |H | Short_Literal 0x1 0088 4804 |H | Short_Literal 0x4 0089 e00d | | Load 0x0,0xd 008a 035b | [ | Declare_Type Array,Constrained 008b 0337 | 7 | Declare_Variable Array 008c 00d8 | | Load_Top At_Offset_0 008d 1c00 | | Execute_Immediate Run_Utility,0x0 008e 4801 |H | Short_Literal 0x1 008f 4804 |H | Short_Literal 0x4 0090 e00e | | Load 0x0,0xe 0091 035b | [ | Declare_Type Array,Constrained 0092 0337 | 7 | Declare_Variable Array 0093 00d8 | | Load_Top At_Offset_0 0094 1c00 | | Execute_Immediate Run_Utility,0x0 0095 e002 | | Load 0x0,0x2 0096 0322 | " | Declare_Variable Record 0097 00d8 | | Load_Top At_Offset_0 0098 1c00 | | Execute_Immediate Run_Utility,0x0 0099 e003 | | Load 0x0,0x3 009a 02ff | | Declare_Variable Variant_Record 009b 00d8 | | Load_Top At_Offset_0 009c 1c00 | | Execute_Immediate Run_Utility,0x0 009d e004 | | Load 0x0,0x4 009e 0007 | | Action Break_Optional 009f 029f 066b | k| Declare_Subprogram INIT_0668,For_Call 00a1 029f 06ab | | Declare_Subprogram INIT_06a8,For_Call 00a3 029f 06bb | | Declare_Subprogram INIT_06b8,For_Call 00a5 BODY_0080: 00a5 4801 |H | Short_Literal 0x1 00a6 e5ff | | Load 0x2,-0x1 00a7 800f | | Call 0x0,0xf 00a8 4801 |H | Short_Literal 0x1 00a9 e403 | | Load 0x2,0x3 00aa 01d6 | | Execute Vector,Field_Write 00ab 4801 |H | Short_Literal 0x1 00ac e5fe | | Load 0x2,-0x2 00ad 800f | | Call 0x0,0xf 00ae 4802 |H | Short_Literal 0x2 00af e403 | | Load 0x2,0x3 00b0 01d6 | | Execute Vector,Field_Write 00b1 e010 | | Load 0x0,0x10 00b2 4803 |H | Short_Literal 0x3 00b3 e403 | | Load 0x2,0x3 00b4 01d6 | | Execute Vector,Field_Write 00b5 e010 | | Load 0x0,0x10 00b6 4804 |H | Short_Literal 0x4 00b7 e403 | | Load 0x2,0x3 00b8 01d6 | | Execute Vector,Field_Write 00b9 4801 |H | Short_Literal 0x1 00ba 4800 |H | Short_Literal 0x0 00bb 4808 |H | Short_Literal 0x8 00bc e006 | | Load 0x0,0x6 00bd 0334 | 4 | Declare_Variable Array,With_Constraint 00be 5045 |PE | Indirect_Literal Any,0x104,{0x4572726f, 0x72547970} 00bf 8011 | | Call 0x0,0x11 00c0 4801 |H | Short_Literal 0x1 00c1 e404 | | Load 0x2,0x4 00c2 01d6 | | Execute Vector,Field_Write 00c3 4801 |H | Short_Literal 0x1 00c4 4800 |H | Short_Literal 0x0 00c5 480a |H | Short_Literal 0xa 00c6 e006 | | Load 0x0,0x6 00c7 0334 | 4 | Declare_Variable Array,With_Constraint 00c8 5043 |PC | Indirect_Literal Any,0x10c,{0x4572726f, 0x724e756d} 00c9 8011 | | Call 0x0,0x11 00ca 4802 |H | Short_Literal 0x2 00cb e404 | | Load 0x2,0x4 00cc 01d6 | | Execute Vector,Field_Write 00cd e012 | | Load 0x0,0x12 00ce 4803 |H | Short_Literal 0x3 00cf e404 | | Load 0x2,0x4 00d0 01d6 | | Execute Vector,Field_Write 00d1 e012 | | Load 0x0,0x12 00d2 4804 |H | Short_Literal 0x4 00d3 e404 | | Load 0x2,0x4 00d4 01d6 | | Execute Vector,Field_Write 00d5 e005 | | Load 0x0,0x5 00d6 e004 | | Load 0x0,0x4 00d7 022f | / | Execute Access,Equal 00d8 6801 |h | Jump_Zero 0xda 00d9 8216 | | Call 0x1,0x16 00da e406 | | Load 0x2,0x6 00db e405 | | Load 0x2,0x5 00dc e404 | | Load 0x2,0x4 00dd e403 | | Load 0x2,0x3 00de e407 | | Load 0x2,0x7 00df 8013 | | Call 0x0,0x13 00e0 00d2 | | Pop_Control Pop_Count_2 00e1 e406 | | Load 0x2,0x6 00e2 e008 | | Load 0x0,0x8 00e3 016e | n | Execute Variant_Record,Not_Equal 00e4 6802 |h | Jump_Zero 0xe7 00e5 8409 | | Call 0x2,0x9 00e6 781a |x | Jump 0x101 00e7 4801 |H | Short_Literal 0x1 00e8 4800 |H | Short_Literal 0x0 00e9 4800 |H | Short_Literal 0x0 00ea e006 | | Load 0x0,0x6 00eb 0334 | 4 | Declare_Variable Array,With_Constraint 00ec 5027 |P' | Indirect_Literal Any,0x114,{0x31000000, 0x00000000} 00ed 800f | | Call 0x0,0xf 00ee 4803 |H | Short_Literal 0x3 00ef e403 | | Load 0x2,0x3 00f0 01d6 | | Execute Vector,Field_Write 00f1 e406 | | Load 0x2,0x6 00f2 e405 | | Load 0x2,0x5 00f3 e404 | | Load 0x2,0x4 00f4 e403 | | Load 0x2,0x3 00f5 e407 | | Load 0x2,0x7 00f6 8013 | | Call 0x0,0x13 00f7 00d2 | | Pop_Control Pop_Count_2 00f8 e406 | | Load 0x2,0x6 00f9 e008 | | Load 0x0,0x8 00fa 016f | o | Execute Variant_Record,Equal 00fb 6804 |h | Jump_Zero 0x100 00fc e5fd | | Load 0x2,-0x3 00fd 0335 | 5 | Declare_Variable Array,Duplicate 00fe 00cd | | Action Spare6_Action 00ff 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0100 840a | | Call 0x2,0xa 0101 0831 | 1 | Execute_Immediate Raise,0x31 0102 0000 0000 | | .XXX[0x2] 0104 4572 726f |Erro| .LITERAL {0x4572726f, 0x72547970} 0108 6500 0000 |e | .XXX[0x4] 010a 0000 0000 | | 010c 4572 726f |Erro| .LITERAL {0x4572726f, 0x724e756d} 0110 6265 7200 |ber | .XXX[0x4] 0112 0000 0000 | | 0114 3100 0000 |1 | .LITERAL {0x31000000, 0x00000000} 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011d | | .CONST 0x011d ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0002 | | .CONST 0x0002 ; Number of locals 011b INIT_0118: 011b e014 | | Load 0x0,0x14 011c 0007 | | Action Break_Optional 011d BODY_0118: 011d e014 | | Load 0x0,0x14 011e 4801 |H | Short_Literal 0x1 011f e5ff | | Load 0x2,-0x1 0120 8015 | | Call 0x0,0x15 0121 e016 | | Load 0x0,0x16 0122 4804 |H | Short_Literal 0x4 0123 e017 | | Load 0x0,0x17 0124 e018 | | Load 0x0,0x18 0125 00ad | | QQ_Action Package,Field_Execute_Dynamic 0126 0039 | 9 | Store_Top Access,At_Offset_1 0127 00d8 | | Load_Top At_Offset_0 0128 8019 | | Call 0x0,0x19 0129 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 012a 0000 0000 | | .BLANK 0000[0x6] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0135 | 5 | .CONST 0x0135 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0002 | | .CONST 0x0002 ; Number of locals 0133 INIT_0130: 0133 e014 | | Load 0x0,0x14 0134 0007 | | Action Break_Optional 0135 BODY_0130: 0135 e014 | | Load 0x0,0x14 0136 4800 |H | Short_Literal 0x0 0137 e5fe | | Load 0x2,-0x2 0138 8015 | | Call 0x0,0x15 0139 e5ff | | Load 0x2,-0x1 013a 4804 |H | Short_Literal 0x4 013b e017 | | Load 0x0,0x17 013c e018 | | Load 0x0,0x18 013d 00ad | | QQ_Action Package,Field_Execute_Dynamic 013e 0039 | 9 | Store_Top Access,At_Offset_1 013f 00d8 | | Load_Top At_Offset_0 0140 8019 | | Call 0x0,0x19 0141 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0142 0000 0000 | | .BLANK 0000[0x6] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014d | M | .CONST 0x014d ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0002 | | .CONST 0x0002 ; Number of locals 014b INIT_0148: 014b e014 | | Load 0x0,0x14 014c 0007 | | Action Break_Optional 014d BODY_0148: 014d e014 | | Load 0x0,0x14 014e 4801 |H | Short_Literal 0x1 014f e5ff | | Load 0x2,-0x1 0150 801a | | Call 0x0,0x1a 0151 e016 | | Load 0x0,0x16 0152 4804 |H | Short_Literal 0x4 0153 e017 | | Load 0x0,0x17 0154 e01b | | Load 0x0,0x1b 0155 00ad | | QQ_Action Package,Field_Execute_Dynamic 0156 0039 | 9 | Store_Top Access,At_Offset_1 0157 00d8 | | Load_Top At_Offset_0 0158 801c | | Call 0x0,0x1c 0159 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 015a 0000 0000 | | .BLANK 0000[0x6] 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0165 | e | .CONST 0x0165 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0002 | | .CONST 0x0002 ; Number of locals 0163 INIT_0160: 0163 e014 | | Load 0x0,0x14 0164 0007 | | Action Break_Optional 0165 BODY_0160: 0165 e014 | | Load 0x0,0x14 0166 4800 |H | Short_Literal 0x0 0167 e5fe | | Load 0x2,-0x2 0168 801a | | Call 0x0,0x1a 0169 e5ff | | Load 0x2,-0x1 016a 4804 |H | Short_Literal 0x4 016b e017 | | Load 0x0,0x17 016c e01b | | Load 0x0,0x1b 016d 00ad | | QQ_Action Package,Field_Execute_Dynamic 016e 0039 | 9 | Store_Top Access,At_Offset_1 016f 00d8 | | Load_Top At_Offset_0 0170 801c | | Call 0x0,0x1c 0171 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0172 0000 0000 | | .BLANK 0000[0x6] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017d | } | .CONST 0x017d ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0002 | | .CONST 0x0002 ; Number of locals 017b INIT_0178: 017b e014 | | Load 0x0,0x14 017c 0007 | | Action Break_Optional 017d BODY_0178: 017d e014 | | Load 0x0,0x14 017e 4801 |H | Short_Literal 0x1 017f e5ff | | Load 0x2,-0x1 0180 801d | | Call 0x0,0x1d 0181 e016 | | Load 0x0,0x16 0182 4804 |H | Short_Literal 0x4 0183 e017 | | Load 0x0,0x17 0184 e01b | | Load 0x0,0x1b 0185 00ad | | QQ_Action Package,Field_Execute_Dynamic 0186 0039 | 9 | Store_Top Access,At_Offset_1 0187 00d8 | | Load_Top At_Offset_0 0188 801e | | Call 0x0,0x1e 0189 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 018a 0000 0000 | | .BLANK 0000[0x6] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0195 | | .CONST 0x0195 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0002 | | .CONST 0x0002 ; Number of locals 0193 INIT_0190: 0193 e014 | | Load 0x0,0x14 0194 0007 | | Action Break_Optional 0195 BODY_0190: 0195 e014 | | Load 0x0,0x14 0196 4800 |H | Short_Literal 0x0 0197 e5fe | | Load 0x2,-0x2 0198 801d | | Call 0x0,0x1d 0199 e5ff | | Load 0x2,-0x1 019a 4804 |H | Short_Literal 0x4 019b e017 | | Load 0x0,0x17 019c e01b | | Load 0x0,0x1b 019d 00ad | | QQ_Action Package,Field_Execute_Dynamic 019e 0039 | 9 | Store_Top Access,At_Offset_1 019f 00d8 | | Load_Top At_Offset_0 01a0 801e | | Call 0x0,0x1e 01a1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01a2 0000 0000 | | .BLANK 0000[0x6] 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ad | | .CONST 0x01ad ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0002 | | .CONST 0x0002 ; Number of locals 01ab INIT_01a8: 01ab 029f 06cb | | Declare_Subprogram INIT_06c8,For_Call 01ad BODY_01a8: 01ad e01f | | Load 0x0,0x1f 01ae 8020 | | Call 0x0,0x20 01af e005 | | Load 0x0,0x5 01b0 e004 | | Load 0x0,0x4 01b1 022e | . | Execute Access,Not_Equal 01b2 6803 |h | Jump_Zero 0x1b6 01b3 e01f | | Load 0x0,0x1f 01b4 8021 | ! | Call 0x0,0x21 01b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01b6 8402 | | Call 0x2,0x2 01b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb 00da | | Load_Top At_Offset_2 01bc 00d8 | | Load_Top At_Offset_0 01bd 0c12 | | Execute_Immediate Greater_Equal,0x12 01be 702a |p* | Jump_Nonzero 0x1e9 01bf 4611 |F | Jump_Case 0x12 01c0 783f |x? | Jump 0x200 ; case 0x0 01c1 784f |xO | Jump 0x211 ; case 0x1 01c2 7865 |xe | Jump 0x228 ; case 0x2 01c3 787b |x{ | Jump 0x23f ; case 0x3 01c4 788b |x | Jump 0x250 ; case 0x4 01c5 789b |x | Jump 0x261 ; case 0x5 01c6 78ab |x | Jump 0x272 ; case 0x6 01c7 78bb |x | Jump 0x283 ; case 0x7 01c8 78cb |x | Jump 0x294 ; case 0x8 01c9 78db |x | Jump 0x2a5 ; case 0x9 01ca 78eb |x | Jump 0x2b6 ; case 0xa 01cb 7901 |y | Jump 0x2cd ; case 0xb 01cc 7911 |y | Jump 0x2de ; case 0xc 01cd 7921 |y! | Jump 0x2ef ; case 0xd 01ce 7931 |y1 | Jump 0x300 ; case 0xe 01cf 7947 |yG | Jump 0x317 ; case 0xf 01d0 7957 |yW | Jump 0x328 ; case 0x10 01d1 7800 |x | Jump 0x1d2 ; case 0x11 01d2 4800 |H | Short_Literal 0x0 01d3 4812 |H | Short_Literal 0x12 01d4 e006 | | Load 0x0,0x6 01d5 0334 | 4 | Declare_Variable Array,With_Constraint 01d6 5169 |Qi | Indirect_Literal Any,0x340,{0x4261645f, 0x496d706c} 01d7 4800 |H | Short_Literal 0x0 01d8 4828 |H( | Short_Literal 0x28 01d9 e006 | | Load 0x0,0x6 01da 0334 | 4 | Declare_Variable Array,With_Constraint 01db 5170 |Qp | Indirect_Literal Any,0x34c,{0x2831372c, 0x20736572} 01dc 01cc | | Execute Vector,Catenate 01dd 4800 |H | Short_Literal 0x0 01de 4801 |H | Short_Literal 0x1 01df e006 | | Load 0x0,0x6 01e0 0334 | 4 | Declare_Variable Array,With_Constraint 01e1 5182 |Q | Indirect_Literal Any,0x364,{0x31370000, 0x00000000} 01e2 4800 |H | Short_Literal 0x0 01e3 480a |H | Short_Literal 0xa 01e4 e006 | | Load 0x0,0x6 01e5 0334 | 4 | Declare_Variable Array,With_Constraint 01e6 5181 |Q | Indirect_Literal Any,0x368,{0x5850726f, 0x746f4572} 01e7 820f | | Call 0x1,0xf 01e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e9 00d1 | | Pop_Control Pop_Count_1 01ea 4800 |H | Short_Literal 0x0 01eb 4813 |H | Short_Literal 0x13 01ec e006 | | Load 0x0,0x6 01ed 0334 | 4 | Declare_Variable Array,With_Constraint 01ee 5181 |Q | Indirect_Literal Any,0x370,{0x2a2a556e, 0x6b6e6f77} 01ef 00db | | Load_Top At_Offset_3 01f0 00d8 | | Load_Top At_Offset_0 01f1 00e2 | | Load_Encached Integer_Cache 01f2 0260 | ` | Execute Discrete,In_Type 01f3 7001 |p | Jump_Nonzero 0x1f5 01f4 0801 | | Execute_Immediate Raise,0x1 01f5 00e0 | | Load_Encached Standard_Cache 01f6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01f7 800b | | Call 0x0,0xb 01f8 01cc | | Execute Vector,Catenate 01f9 4800 |H | Short_Literal 0x0 01fa 4802 |H | Short_Literal 0x2 01fb e006 | | Load 0x0,0x6 01fc 0334 | 4 | Declare_Variable Array,With_Constraint 01fd 517e |Q~ | Indirect_Literal Any,0x37c,{0x2a2a2000, 0x00000000} 01fe 01cc | | Execute Vector,Catenate 01ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0200 4800 |H | Short_Literal 0x0 0201 480f |H | Short_Literal 0xf 0202 e006 | | Load 0x0,0x6 0203 0334 | 4 | Declare_Variable Array,With_Constraint 0204 517b |Q{ | Indirect_Literal Any,0x380,{0x4e6f7420, 0x416e2045} 0205 4800 |H | Short_Literal 0x0 0206 4800 |H | Short_Literal 0x0 0207 e006 | | Load 0x0,0x6 0208 0334 | 4 | Declare_Variable Array,With_Constraint 0209 517e |Q~ | Indirect_Literal Any,0x388,{0x30000000, 0x00000000} 020a 4800 |H | Short_Literal 0x0 020b 480a |H | Short_Literal 0xa 020c e006 | | Load 0x0,0x6 020d 0334 | 4 | Declare_Variable Array,With_Constraint 020e 517d |Q} | Indirect_Literal Any,0x38c,{0x5850726f, 0x746f4572} 020f 820f | | Call 0x1,0xf 0210 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0211 4800 |H | Short_Literal 0x0 0212 4827 |H' | Short_Literal 0x27 0213 e006 | | Load 0x0,0x6 0214 0334 | 4 | Declare_Variable Array,With_Constraint 0215 517e |Q~ | Indirect_Literal Any,0x394,{0x4261645f, 0x52657175} 0216 4800 |H | Short_Literal 0x0 0217 4811 |H | Short_Literal 0x11 0218 e006 | | Load 0x0,0x6 0219 0334 | 4 | Declare_Variable Array,With_Constraint 021a 518d |Q | Indirect_Literal Any,0x3a8,{0x6e6f2073, 0x75636820} 021b 01cc | | Execute Vector,Catenate 021c 4800 |H | Short_Literal 0x0 021d 4800 |H | Short_Literal 0x0 021e e006 | | Load 0x0,0x6 021f 0334 | 4 | Declare_Variable Array,With_Constraint 0220 5193 |Q | Indirect_Literal Any,0x3b4,{0x31000000, 0x00000000} 0221 4800 |H | Short_Literal 0x0 0222 480a |H | Short_Literal 0xa 0223 e006 | | Load 0x0,0x6 0224 0334 | 4 | Declare_Variable Array,With_Constraint 0225 5192 |Q | Indirect_Literal Any,0x3b8,{0x5850726f, 0x746f4572} 0226 820f | | Call 0x1,0xf 0227 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0228 4800 |H | Short_Literal 0x0 0229 4823 |H# | Short_Literal 0x23 022a e006 | | Load 0x0,0x6 022b 0334 | 4 | Declare_Variable Array,With_Constraint 022c 5193 |Q | Indirect_Literal Any,0x3c0,{0x4261645f, 0x56616c75} 022d 4800 |H | Short_Literal 0x0 022e 4816 |H | Short_Literal 0x16 022f e006 | | Load 0x0,0x6 0230 0334 | 4 | Declare_Variable Array,With_Constraint 0231 51a2 |Q | Indirect_Literal Any,0x3d4,{0x6f662072, 0x616e6765} 0232 01cc | | Execute Vector,Catenate 0233 4800 |H | Short_Literal 0x0 0234 4800 |H | Short_Literal 0x0 0235 e006 | | Load 0x0,0x6 0236 0334 | 4 | Declare_Variable Array,With_Constraint 0237 51a8 |Q | Indirect_Literal Any,0x3e0,{0x32000000, 0x00000000} 0238 4800 |H | Short_Literal 0x0 0239 480a |H | Short_Literal 0xa 023a e006 | | Load 0x0,0x6 023b 0334 | 4 | Declare_Variable Array,With_Constraint 023c 51a7 |Q | Indirect_Literal Any,0x3e4,{0x5850726f, 0x746f4572} 023d 820f | | Call 0x1,0xf 023e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 023f 4800 |H | Short_Literal 0x0 0240 4827 |H' | Short_Literal 0x27 0241 e006 | | Load 0x0,0x6 0242 0334 | 4 | Declare_Variable Array,With_Constraint 0243 51a8 |Q | Indirect_Literal Any,0x3ec,{0x4261645f, 0x57696e64} 0244 4800 |H | Short_Literal 0x0 0245 4800 |H | Short_Literal 0x0 0246 e006 | | Load 0x0,0x6 0247 0334 | 4 | Declare_Variable Array,With_Constraint 0248 51b7 |Q | Indirect_Literal Any,0x400,{0x33000000, 0x00000000} 0249 4800 |H | Short_Literal 0x0 024a 480a |H | Short_Literal 0xa 024b e006 | | Load 0x0,0x6 024c 0334 | 4 | Declare_Variable Array,With_Constraint 024d 51b6 |Q | Indirect_Literal Any,0x404,{0x5850726f, 0x746f4572} 024e 820f | | Call 0x1,0xf 024f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0250 4800 |H | Short_Literal 0x0 0251 4827 |H' | Short_Literal 0x27 0252 e006 | | Load 0x0,0x6 0253 0334 | 4 | Declare_Variable Array,With_Constraint 0254 51b7 |Q | Indirect_Literal Any,0x40c,{0x4261645f, 0x5069786d} 0255 4800 |H | Short_Literal 0x0 0256 4800 |H | Short_Literal 0x0 0257 e006 | | Load 0x0,0x6 0258 0334 | 4 | Declare_Variable Array,With_Constraint 0259 51c6 |Q | Indirect_Literal Any,0x420,{0x34000000, 0x00000000} 025a 4800 |H | Short_Literal 0x0 025b 480a |H | Short_Literal 0xa 025c e006 | | Load 0x0,0x6 025d 0334 | 4 | Declare_Variable Array,With_Constraint 025e 51c5 |Q | Indirect_Literal Any,0x424,{0x5850726f, 0x746f4572} 025f 820f | | Call 0x1,0xf 0260 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0261 4800 |H | Short_Literal 0x0 0262 4823 |H# | Short_Literal 0x23 0263 e006 | | Load 0x0,0x6 0264 0334 | 4 | Declare_Variable Array,With_Constraint 0265 51c6 |Q | Indirect_Literal Any,0x42c,{0x4261645f, 0x41746f6d} 0266 4800 |H | Short_Literal 0x0 0267 4800 |H | Short_Literal 0x0 0268 e006 | | Load 0x0,0x6 0269 0334 | 4 | Declare_Variable Array,With_Constraint 026a 51d5 |Q | Indirect_Literal Any,0x440,{0x35000000, 0x00000000} 026b 4800 |H | Short_Literal 0x0 026c 480a |H | Short_Literal 0xa 026d e006 | | Load 0x0,0x6 026e 0334 | 4 | Declare_Variable Array,With_Constraint 026f 51d4 |Q | Indirect_Literal Any,0x444,{0x5850726f, 0x746f4572} 0270 820f | | Call 0x1,0xf 0271 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0272 4800 |H | Short_Literal 0x0 0273 4827 |H' | Short_Literal 0x27 0274 e006 | | Load 0x0,0x6 0275 0334 | 4 | Declare_Variable Array,With_Constraint 0276 51d5 |Q | Indirect_Literal Any,0x44c,{0x4261645f, 0x43757273} 0277 4800 |H | Short_Literal 0x0 0278 4800 |H | Short_Literal 0x0 0279 e006 | | Load 0x0,0x6 027a 0334 | 4 | Declare_Variable Array,With_Constraint 027b 51e4 |Q | Indirect_Literal Any,0x460,{0x36000000, 0x00000000} 027c 4800 |H | Short_Literal 0x0 027d 480a |H | Short_Literal 0xa 027e e006 | | Load 0x0,0x6 027f 0334 | 4 | Declare_Variable Array,With_Constraint 0280 51e3 |Q | Indirect_Literal Any,0x464,{0x5850726f, 0x746f4572} 0281 820f | | Call 0x1,0xf 0282 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0283 4800 |H | Short_Literal 0x0 0284 4823 |H# | Short_Literal 0x23 0285 e006 | | Load 0x0,0x6 0286 0334 | 4 | Declare_Variable Array,With_Constraint 0287 51e4 |Q | Indirect_Literal Any,0x46c,{0x4261645f, 0x466f6e74} 0288 4800 |H | Short_Literal 0x0 0289 4800 |H | Short_Literal 0x0 028a e006 | | Load 0x0,0x6 028b 0334 | 4 | Declare_Variable Array,With_Constraint 028c 51f3 |Q | Indirect_Literal Any,0x480,{0x37000000, 0x00000000} 028d 4800 |H | Short_Literal 0x0 028e 480a |H | Short_Literal 0xa 028f e006 | | Load 0x0,0x6 0290 0334 | 4 | Declare_Variable Array,With_Constraint 0291 51f2 |Q | Indirect_Literal Any,0x484,{0x5850726f, 0x746f4572} 0292 820f | | Call 0x1,0xf 0293 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0294 4800 |H | Short_Literal 0x0 0295 482a |H* | Short_Literal 0x2a 0296 e006 | | Load 0x0,0x6 0297 0334 | 4 | Declare_Variable Array,With_Constraint 0298 51f3 |Q | Indirect_Literal Any,0x48c,{0x4261645f, 0x4d617463} 0299 4800 |H | Short_Literal 0x0 029a 4800 |H | Short_Literal 0x0 029b e006 | | Load 0x0,0x6 029c 0334 | 4 | Declare_Variable Array,With_Constraint 029d 5206 |R | Indirect_Literal Any,0x4a4,{0x38000000, 0x00000000} 029e 4800 |H | Short_Literal 0x0 029f 480a |H | Short_Literal 0xa 02a0 e006 | | Load 0x0,0x6 02a1 0334 | 4 | Declare_Variable Array,With_Constraint 02a2 5205 |R | Indirect_Literal Any,0x4a8,{0x5850726f, 0x746f4572} 02a3 820f | | Call 0x1,0xf 02a4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a5 4800 |H | Short_Literal 0x0 02a6 4833 |H3 | Short_Literal 0x33 02a7 e006 | | Load 0x0,0x6 02a8 0334 | 4 | Declare_Variable Array,With_Constraint 02a9 5206 |R | Indirect_Literal Any,0x4b0,{0x4261645f, 0x44726177} 02aa 4800 |H | Short_Literal 0x0 02ab 4800 |H | Short_Literal 0x0 02ac e006 | | Load 0x0,0x6 02ad 0334 | 4 | Declare_Variable Array,With_Constraint 02ae 521d |R | Indirect_Literal Any,0x4cc,{0x39000000, 0x00000000} 02af 4800 |H | Short_Literal 0x0 02b0 480a |H | Short_Literal 0xa 02b1 e006 | | Load 0x0,0x6 02b2 0334 | 4 | Declare_Variable Array,With_Constraint 02b3 521c |R | Indirect_Literal Any,0x4d0,{0x5850726f, 0x746f4572} 02b4 820f | | Call 0x1,0xf 02b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02b6 4800 |H | Short_Literal 0x0 02b7 4821 |H! | Short_Literal 0x21 02b8 e006 | | Load 0x0,0x6 02b9 0334 | 4 | Declare_Variable Array,With_Constraint 02ba 521d |R | Indirect_Literal Any,0x4d8,{0x4261645f, 0x41636365} 02bb 4800 |H | Short_Literal 0x0 02bc 4817 |H | Short_Literal 0x17 02bd e006 | | Load 0x0,0x6 02be 0334 | 4 | Declare_Variable Array,With_Constraint 02bf 522c |R, | Indirect_Literal Any,0x4ec,{0x70726976, 0x61746520} 02c0 01cc | | Execute Vector,Catenate 02c1 4800 |H | Short_Literal 0x0 02c2 4801 |H | Short_Literal 0x1 02c3 e006 | | Load 0x0,0x6 02c4 0334 | 4 | Declare_Variable Array,With_Constraint 02c5 5232 |R2 | Indirect_Literal Any,0x4f8,{0x31300000, 0x00000000} 02c6 4800 |H | Short_Literal 0x0 02c7 480a |H | Short_Literal 0xa 02c8 e006 | | Load 0x0,0x6 02c9 0334 | 4 | Declare_Variable Array,With_Constraint 02ca 5231 |R1 | Indirect_Literal Any,0x4fc,{0x5850726f, 0x746f4572} 02cb 820f | | Call 0x1,0xf 02cc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02cd 4800 |H | Short_Literal 0x0 02ce 4833 |H3 | Short_Literal 0x33 02cf e006 | | Load 0x0,0x6 02d0 0334 | 4 | Declare_Variable Array,With_Constraint 02d1 5232 |R2 | Indirect_Literal Any,0x504,{0x4261645f, 0x416c6c6f} 02d2 4800 |H | Short_Literal 0x0 02d3 4801 |H | Short_Literal 0x1 02d4 e006 | | Load 0x0,0x6 02d5 0334 | 4 | Declare_Variable Array,With_Constraint 02d6 5249 |RI | Indirect_Literal Any,0x520,{0x31310000, 0x00000000} 02d7 4800 |H | Short_Literal 0x0 02d8 480a |H | Short_Literal 0xa 02d9 e006 | | Load 0x0,0x6 02da 0334 | 4 | Declare_Variable Array,With_Constraint 02db 5248 |RH | Indirect_Literal Any,0x524,{0x5850726f, 0x746f4572} 02dc 820f | | Call 0x1,0xf 02dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02de 4800 |H | Short_Literal 0x0 02df 4829 |H) | Short_Literal 0x29 02e0 e006 | | Load 0x0,0x6 02e1 0334 | 4 | Declare_Variable Array,With_Constraint 02e2 5249 |RI | Indirect_Literal Any,0x52c,{0x4261645f, 0x436f6c6f} 02e3 4800 |H | Short_Literal 0x0 02e4 4801 |H | Short_Literal 0x1 02e5 e006 | | Load 0x0,0x6 02e6 0334 | 4 | Declare_Variable Array,With_Constraint 02e7 525c |R\ | Indirect_Literal Any,0x544,{0x31320000, 0x00000000} 02e8 4800 |H | Short_Literal 0x0 02e9 480a |H | Short_Literal 0xa 02ea e006 | | Load 0x0,0x6 02eb 0334 | 4 | Declare_Variable Array,With_Constraint 02ec 525b |R[ | Indirect_Literal Any,0x548,{0x5850726f, 0x746f4572} 02ed 820f | | Call 0x1,0xf 02ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ef 4800 |H | Short_Literal 0x0 02f0 4820 |H | Short_Literal 0x20 02f1 e006 | | Load 0x0,0x6 02f2 0334 | 4 | Declare_Variable Array,With_Constraint 02f3 525c |R\ | Indirect_Literal Any,0x550,{0x4261645f, 0x47632028} 02f4 4800 |H | Short_Literal 0x0 02f5 4801 |H | Short_Literal 0x1 02f6 e006 | | Load 0x0,0x6 02f7 0334 | 4 | Declare_Variable Array,With_Constraint 02f8 526b |Rk | Indirect_Literal Any,0x564,{0x31330000, 0x00000000} 02f9 4800 |H | Short_Literal 0x0 02fa 480a |H | Short_Literal 0xa 02fb e006 | | Load 0x0,0x6 02fc 0334 | 4 | Declare_Variable Array,With_Constraint 02fd 526a |Rj | Indirect_Literal Any,0x568,{0x5850726f, 0x746f4572} 02fe 820f | | Call 0x1,0xf 02ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0300 4800 |H | Short_Literal 0x0 0301 4826 |H& | Short_Literal 0x26 0302 e006 | | Load 0x0,0x6 0303 0334 | 4 | Declare_Variable Array,With_Constraint 0304 526b |Rk | Indirect_Literal Any,0x570,{0x4261645f, 0x49645f43} 0305 4800 |H | Short_Literal 0x0 0306 481a |H | Short_Literal 0x1a 0307 e006 | | Load 0x0,0x6 0308 0334 | 4 | Declare_Variable Array,With_Constraint 0309 527a |Rz | Indirect_Literal Any,0x584,{0x63686f73, 0x656e2066} 030a 01cc | | Execute Vector,Catenate 030b 4800 |H | Short_Literal 0x0 030c 4801 |H | Short_Literal 0x1 030d e006 | | Load 0x0,0x6 030e 0334 | 4 | Declare_Variable Array,With_Constraint 030f 5284 |R | Indirect_Literal Any,0x594,{0x31340000, 0x00000000} 0310 4800 |H | Short_Literal 0x0 0311 480a |H | Short_Literal 0xa 0312 e006 | | Load 0x0,0x6 0313 0334 | 4 | Declare_Variable Array,With_Constraint 0314 5283 |R | Indirect_Literal Any,0x598,{0x5850726f, 0x746f4572} 0315 820f | | Call 0x1,0xf 0316 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0317 4800 |H | Short_Literal 0x0 0318 4830 |H0 | Short_Literal 0x30 0319 e006 | | Load 0x0,0x6 031a 0334 | 4 | Declare_Variable Array,With_Constraint 031b 5284 |R | Indirect_Literal Any,0x5a0,{0x4261645f, 0x4e616d65} 031c 4800 |H | Short_Literal 0x0 031d 4801 |H | Short_Literal 0x1 031e e006 | | Load 0x0,0x6 031f 0334 | 4 | Declare_Variable Array,With_Constraint 0320 529b |R | Indirect_Literal Any,0x5bc,{0x31350000, 0x00000000} 0321 4800 |H | Short_Literal 0x0 0322 480a |H | Short_Literal 0xa 0323 e006 | | Load 0x0,0x6 0324 0334 | 4 | Declare_Variable Array,With_Constraint 0325 529a |R | Indirect_Literal Any,0x5c0,{0x5850726f, 0x746f4572} 0326 820f | | Call 0x1,0xf 0327 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0328 4800 |H | Short_Literal 0x0 0329 4828 |H( | Short_Literal 0x28 032a e006 | | Load 0x0,0x6 032b 0334 | 4 | Declare_Variable Array,With_Constraint 032c 529b |R | Indirect_Literal Any,0x5c8,{0x4261645f, 0x4c656e67} 032d 4800 |H | Short_Literal 0x0 032e 481b |H | Short_Literal 0x1b 032f e006 | | Load 0x0,0x6 0330 0334 | 4 | Declare_Variable Array,With_Constraint 0331 52ae |R | Indirect_Literal Any,0x5e0,{0x20696e74, 0x65726e61} 0332 01cc | | Execute Vector,Catenate 0333 4800 |H | Short_Literal 0x0 0334 4801 |H | Short_Literal 0x1 0335 e006 | | Load 0x0,0x6 0336 0334 | 4 | Declare_Variable Array,With_Constraint 0337 52b8 |R | Indirect_Literal Any,0x5f0,{0x31360000, 0x00000000} 0338 4800 |H | Short_Literal 0x0 0339 480a |H | Short_Literal 0xa 033a e006 | | Load 0x0,0x6 033b 0334 | 4 | Declare_Variable Array,With_Constraint 033c 52b7 |R | Indirect_Literal Any,0x5f4,{0x5850726f, 0x746f4572} 033d 820f | | Call 0x1,0xf 033e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 033f 0000 | | .XXX[0x1] 0340 4261 645f |Bad_| .LITERAL {0x4261645f, 0x496d706c} 0344 656d 656e |emen| .XXX[0x8] 0346 7461 7469 |tati| 0348 6f6e 2000 |on | 034a 0000 0000 | | 034c 2831 372c |(17,| .LITERAL {0x2831372c, 0x20736572} 0350 7665 7220 |ver | .XXX[0x14] 0352 646f 6573 |does| 0354 206e 6f74 | not| 0356 2069 6d70 | imp| 0358 6c65 6d65 |leme| 035a 6e74 206f |nt o| 035c 7065 7261 |pera| 035e 7469 6f6e |tion| 0360 2900 0000 |) | 0362 0000 0000 | | 0364 3137 0000 |17 | .LITERAL {0x31370000, 0x00000000} 0368 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 036c 726f 7200 |ror | .XXX[0x4] 036e 0000 0000 | | 0370 2a2a 556e |**Un| .LITERAL {0x2a2a556e, 0x6b6e6f77} 0374 6e20 4572 |n Er| .XXX[0x8] 0376 726f 7220 |ror | 0378 436f 6465 |Code| 037a 0000 0000 | | 037c 2a2a 2000 |** | .LITERAL {0x2a2a2000, 0x00000000} 0380 4e6f 7420 |Not | .LITERAL {0x4e6f7420, 0x416e2045} 0384 7272 6f72 |rror| .XXX[0x4] 0386 2028 3029 | (0)| 0388 3000 0000 |0 | .LITERAL {0x30000000, 0x00000000} 038c 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0390 726f 7200 |ror | .XXX[0x4] 0392 0000 0000 | | 0394 4261 645f |Bad_| .LITERAL {0x4261645f, 0x52657175} 0398 6573 7420 |est | .XXX[0x10] 039a 2831 2c20 |(1, | 039c 696e 7661 |inva| 039e 6c69 6420 |lid | 03a0 7265 7175 |requ| 03a2 6573 7420 |est | 03a4 636f 6465 |code| 03a6 206f 7220 | or | 03a8 6e6f 2073 |no s| .LITERAL {0x6e6f2073, 0x75636820} 03ac 6f70 6572 |oper| .XXX[0x8] 03ae 6174 696f |atio| 03b0 6e29 0000 |n) | 03b2 0000 0000 | | 03b4 3100 0000 |1 | .LITERAL {0x31000000, 0x00000000} 03b8 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 03bc 726f 7200 |ror | .XXX[0x4] 03be 0000 0000 | | 03c0 4261 645f |Bad_| .LITERAL {0x4261645f, 0x56616c75} 03c4 6520 2832 |e (2| .XXX[0x10] 03c6 2c20 696e |, in| 03c8 7465 6765 |tege| 03ca 7220 7061 |r pa| 03cc 7261 6d65 |rame| 03ce 7465 7220 |ter | 03d0 6f75 7420 |out | 03d2 0000 0000 | | 03d4 6f66 2072 |of r| .LITERAL {0x6f662072, 0x616e6765} 03d8 2066 6f72 | for| .XXX[0x8] 03da 206f 7065 | ope| 03dc 7261 7469 |rati| 03de 6f6e 2900 |on) | 03e0 3200 0000 |2 | .LITERAL {0x32000000, 0x00000000} 03e4 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 03e8 726f 7200 |ror | .XXX[0x4] 03ea 0000 0000 | | 03ec 4261 645f |Bad_| .LITERAL {0x4261645f, 0x57696e64} 03f0 6f77 2028 |ow (| .XXX[0x10] 03f2 332c 2069 |3, i| 03f4 6e76 616c |nval| 03f6 6964 2057 |id W| 03f8 696e 646f |indo| 03fa 7720 7061 |w pa| 03fc 7261 6d65 |rame| 03fe 7465 7229 |ter)| 0400 3300 0000 |3 | .LITERAL {0x33000000, 0x00000000} 0404 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0408 726f 7200 |ror | .XXX[0x4] 040a 0000 0000 | | 040c 4261 645f |Bad_| .LITERAL {0x4261645f, 0x5069786d} 0410 6170 2028 |ap (| .XXX[0x10] 0412 342c 2069 |4, i| 0414 6e76 616c |nval| 0416 6964 2050 |id P| 0418 6978 6d61 |ixma| 041a 7020 7061 |p pa| 041c 7261 6d65 |rame| 041e 7465 7229 |ter)| 0420 3400 0000 |4 | .LITERAL {0x34000000, 0x00000000} 0424 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0428 726f 7200 |ror | .XXX[0x4] 042a 0000 0000 | | 042c 4261 645f |Bad_| .LITERAL {0x4261645f, 0x41746f6d} 0430 2028 352c | (5,| .XXX[0x10] 0432 2069 6e76 | inv| 0434 616c 6964 |alid| 0436 2041 746f | Ato| 0438 6d20 7061 |m pa| 043a 7261 6d65 |rame| 043c 7465 7229 |ter)| 043e 0000 0000 | | 0440 3500 0000 |5 | .LITERAL {0x35000000, 0x00000000} 0444 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0448 726f 7200 |ror | .XXX[0x4] 044a 0000 0000 | | 044c 4261 645f |Bad_| .LITERAL {0x4261645f, 0x43757273} 0450 6f72 2028 |or (| .XXX[0x10] 0452 362c 2069 |6, i| 0454 6e76 616c |nval| 0456 6964 2043 |id C| 0458 7572 736f |urso| 045a 7220 7061 |r pa| 045c 7261 6d65 |rame| 045e 7465 7229 |ter)| 0460 3600 0000 |6 | .LITERAL {0x36000000, 0x00000000} 0464 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0468 726f 7200 |ror | .XXX[0x4] 046a 0000 0000 | | 046c 4261 645f |Bad_| .LITERAL {0x4261645f, 0x466f6e74} 0470 2028 372c | (7,| .XXX[0x10] 0472 2069 6e76 | inv| 0474 616c 6964 |alid| 0476 2046 6f6e | Fon| 0478 7420 7061 |t pa| 047a 7261 6d65 |rame| 047c 7465 7229 |ter)| 047e 0000 0000 | | 0480 3700 0000 |7 | .LITERAL {0x37000000, 0x00000000} 0484 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0488 726f 7200 |ror | .XXX[0x4] 048a 0000 0000 | | 048c 4261 645f |Bad_| .LITERAL {0x4261645f, 0x4d617463} 0490 6820 2838 |h (8| .XXX[0x14] 0492 2c20 696e |, in| 0494 7661 6c69 |vali| 0496 6420 7061 |d pa| 0498 7261 6d65 |rame| 049a 7465 7220 |ter | 049c 6174 7472 |attr| 049e 6962 7574 |ibut| 04a0 6573 2900 |es) | 04a2 0000 0000 | | 04a4 3800 0000 |8 | .LITERAL {0x38000000, 0x00000000} 04a8 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 04ac 726f 7200 |ror | .XXX[0x4] 04ae 0000 0000 | | 04b0 4261 645f |Bad_| .LITERAL {0x4261645f, 0x44726177} 04b4 6162 6c65 |able| .XXX[0x18] 04b6 2028 392c | (9,| 04b8 2069 6e76 | inv| 04ba 616c 6964 |alid| 04bc 2050 6978 | Pix| 04be 6d61 7020 |map | 04c0 6f72 2057 |or W| 04c2 696e 646f |indo| 04c4 7720 7061 |w pa| 04c6 7261 6d65 |rame| 04c8 7465 7229 |ter)| 04ca 0000 0000 | | 04cc 3900 0000 |9 | .LITERAL {0x39000000, 0x00000000} 04d0 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 04d4 726f 7200 |ror | .XXX[0x4] 04d6 0000 0000 | | 04d8 4261 645f |Bad_| .LITERAL {0x4261645f, 0x41636365} 04dc 7373 2028 |ss (| .XXX[0x10] 04de 3130 2c20 |10, | 04e0 6174 7465 |atte| 04e2 6d70 7420 |mpt | 04e4 746f 2061 |to a| 04e6 6363 6573 |cces| 04e8 7320 0000 |s | 04ea 0000 0000 | | 04ec 7072 6976 |priv| .LITERAL {0x70726976, 0x61746520} 04f0 7265 736f |reso| .XXX[0x8] 04f2 7572 6365 |urce| 04f4 2064 656e | den| 04f6 6965 6429 |ied)| 04f8 3130 0000 |10 | .LITERAL {0x31300000, 0x00000000} 04fc 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0500 726f 7200 |ror | .XXX[0x4] 0502 0000 0000 | | 0504 4261 645f |Bad_| .LITERAL {0x4261645f, 0x416c6c6f} 0508 6320 2831 |c (1| .XXX[0x18] 050a 312c 2069 |1, i| 050c 6e73 7566 |nsuf| 050e 6669 6369 |fici| 0510 656e 7420 |ent | 0512 7265 736f |reso| 0514 7572 6365 |urce| 0516 7320 666f |s fo| 0518 7220 6f70 |r op| 051a 6572 6174 |erat| 051c 696f 6e29 |ion)| 051e 0000 0000 | | 0520 3131 0000 |11 | .LITERAL {0x31310000, 0x00000000} 0524 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0528 726f 7200 |ror | .XXX[0x4] 052a 0000 0000 | | 052c 4261 645f |Bad_| .LITERAL {0x4261645f, 0x436f6c6f} 0530 7220 2831 |r (1| .XXX[0x14] 0532 322c 2069 |2, i| 0534 6e76 616c |nval| 0536 6964 2043 |id C| 0538 6f6c 6f72 |olor| 053a 6d61 7020 |map | 053c 7061 7261 |para| 053e 6d65 7465 |mete| 0540 7229 0000 |r) | 0542 0000 0000 | | 0544 3132 0000 |12 | .LITERAL {0x31320000, 0x00000000} 0548 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 054c 726f 7200 |ror | .XXX[0x4] 054e 0000 0000 | | 0550 4261 645f |Bad_| .LITERAL {0x4261645f, 0x47632028} 0554 3133 2c20 |13, | .XXX[0x10] 0556 696e 7661 |inva| 0558 6c69 6420 |lid | 055a 4743 2070 |GC p| 055c 6172 616d |aram| 055e 6574 6572 |eter| 0560 2900 0000 |) | 0562 0000 0000 | | 0564 3133 0000 |13 | .LITERAL {0x31330000, 0x00000000} 0568 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 056c 726f 7200 |ror | .XXX[0x4] 056e 0000 0000 | | 0570 4261 645f |Bad_| .LITERAL {0x4261645f, 0x49645f43} 0574 686f 6963 |hoic| .XXX[0x10] 0576 6520 2831 |e (1| 0578 342c 2069 |4, i| 057a 6e76 616c |nval| 057c 6964 2072 |id r| 057e 6573 6f75 |esou| 0580 7263 6520 |rce | 0582 4944 2000 |ID | 0584 6368 6f73 |chos| .LITERAL {0x63686f73, 0x656e2066} 0588 6f72 2074 |or t| .XXX[0xc] 058a 6869 7320 |his | 058c 636f 6e6e |conn| 058e 6563 7469 |ecti| 0590 6f6e 2900 |on) | 0592 0000 0000 | | 0594 3134 0000 |14 | .LITERAL {0x31340000, 0x00000000} 0598 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 059c 726f 7200 |ror | .XXX[0x4] 059e 0000 0000 | | 05a0 4261 645f |Bad_| .LITERAL {0x4261645f, 0x4e616d65} 05a4 2028 3135 | (15| .XXX[0x18] 05a6 2c20 6e61 |, na| 05a8 6d65 6420 |med | 05aa 636f 6c6f |colo| 05ac 7220 6f72 |r or| 05ae 2046 6f6e | Fon| 05b0 7420 646f |t do| 05b2 6573 206e |es n| 05b4 6f74 2065 |ot e| 05b6 7869 7374 |xist| 05b8 2900 0000 |) | 05ba 0000 0000 | | 05bc 3135 0000 |15 | .LITERAL {0x31350000, 0x00000000} 05c0 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 05c4 726f 7200 |ror | .XXX[0x4] 05c6 0000 0000 | | 05c8 4261 645f |Bad_| .LITERAL {0x4261645f, 0x4c656e67} 05cc 7468 2028 |th (| .XXX[0x14] 05ce 3136 2c20 |16, | 05d0 706f 6c79 |poly| 05d2 2072 6571 | req| 05d4 7565 7374 |uest| 05d6 2074 6f6f | too| 05d8 206c 6172 | lar| 05da 6765 206f |ge o| 05dc 7200 0000 |r | 05de 0000 0000 | | 05e0 2069 6e74 | int| .LITERAL {0x20696e74, 0x65726e61} 05e4 6c20 586c |l Xl| .XXX[0xc] 05e6 6962 206c |ib l| 05e8 656e 6774 |engt| 05ea 6820 6572 |h er| 05ec 726f 7229 |ror)| 05ee 0000 0000 | | 05f0 3136 0000 |16 | .LITERAL {0x31360000, 0x00000000} 05f4 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 05f8 726f 7200 |ror | .XXX[0x2] 05fa 0000 0000 | | .BLANK 0000[0x6] 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 0608 | | .CONST 0x0608 ; Address of begin 0601 060b | | .CONST 0x060b ; Address of exception handler 0602 0002 | | .CONST 0x0002 ; Number of locals 0603 INIT_0600: 0603 e403 | | Load 0x2,0x3 0604 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 0605 0227 | ' | Execute Access,All_Reference 0606 0335 | 5 | Declare_Variable Array,Duplicate 0607 00cd | | Action Spare6_Action 0608 BODY_0600: 0608 00d8 | | Load_Top At_Offset_0 0609 00cb | | Action Pop_Block_With_Result 060a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 060b TRAP_0600: 060b 010e | | Execute Exception,Is_Constraint_Error 060c 6802 |h | Jump_Zero 0x60f 060d 0008 | | Action Idle 060e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 060f 0100 | | Execute Exception,Raise 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 062f | / | .CONST 0x062f ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0005 | | .CONST 0x0005 ; Number of locals 0613 INIT_0610: 0613 e403 | | Load 0x2,0x3 0614 4800 |H | Short_Literal 0x0 0615 4802 |H | Short_Literal 0x2 0616 e006 | | Load 0x0,0x6 0617 0334 | 4 | Declare_Variable Array,With_Constraint 0618 503f |P? | Indirect_Literal Any,0x658,{0x203a2000, 0x00000000} 0619 01cc | | Execute Vector,Catenate 061a e5fe | | Load 0x2,-0x2 061b 8217 | | Call 0x1,0x17 061c e403 | | Load 0x2,0x3 061d 4800 |H | Short_Literal 0x0 061e 480a |H | Short_Literal 0xa 061f e006 | | Load 0x0,0x6 0620 0334 | 4 | Declare_Variable Array,With_Constraint 0621 503a |P: | Indirect_Literal Any,0x65c,{0x5850726f, 0x746f4572} 0622 e5ff | | Load 0x2,-0x1 0623 820d | | Call 0x1,0xd 0624 01cc | | Execute Vector,Catenate 0625 0007 | | Action Break_Optional 0626 4801 |H | Short_Literal 0x1 0627 602c |`, | Indirect_Literal Discrete,0x654,{0x00000000, 0x000007d0} 0628 e006 | | Load 0x0,0x6 0629 035b | [ | Declare_Type Array,Constrained 062a 0337 | 7 | Declare_Variable Array 062b e022 | " | Load 0x0,0x22 062c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 062d 029f 0753 | S| Declare_Subprogram INIT_0750,For_Call 062f BODY_0610: 062f e5ff | | Load 0x2,-0x1 0630 0227 | ' | Execute Access,All_Reference 0631 3c25 |<% | Execute Record,Field_Read,Field_Number 0x25 0632 a402 | | Store_Unchecked 0x2,0x2 0633 00cf | | Action Mark_Auxiliary 0634 780c |x | Jump 0x641 0635 e402 | | Load 0x2,0x2 0636 0227 | ' | Execute Access,All_Reference 0637 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0638 e014 | | Load 0x0,0x14 0639 022e | . | Execute Access,Not_Equal 063a 6801 |h | Jump_Zero 0x63c 063b 8605 | | Call 0x3,0x5 063c e402 | | Load 0x2,0x2 063d 0227 | ' | Execute Access,All_Reference 063e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 063f a402 | | Store_Unchecked 0x2,0x2 0640 00c9 | | Action Pop_Auxiliary_Loop 0641 e402 | | Load 0x2,0x2 0642 77f2 |w | Jump_Nonzero 0x635 0643 00ce | | Action Pop_Auxiliary 0644 00d9 | | Load_Top At_Offset_1 0645 7003 |p | Jump_Nonzero 0x649 0646 00db | | Load_Top At_Offset_3 0647 00cb | | Action Pop_Block_With_Result 0648 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0649 00db | | Load_Top At_Offset_3 064a 4801 |H | Short_Literal 0x1 064b 00db | | Load_Top At_Offset_3 064c e603 | | Load 0x3,0x3 064d 01cf | | Execute Vector,Slice_Read 064e 01cc | | Execute Vector,Catenate 064f e006 | | Load 0x0,0x6 0650 01c6 | | Execute Vector,Convert_To_Formal 0651 00cb | | Action Pop_Block_With_Result 0652 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0653 0000 | | .XXX[0x1] 0654 0000 0000 | | .LITERAL {0x00000000, 0x000007d0} 0658 203a 2000 | : | .LITERAL {0x203a2000, 0x00000000} 065c 5850 726f |XPro| .LITERAL {0x5850726f, 0x746f4572} 0660 726f 7200 |ror | .XXX[0x2] 0662 0000 0000 | | .BLANK 0000[0x6] 0668 ; -------------------------------------------------------------------------------------- 0668 ; SUBPROGRAM 0668 ; -------------------------------------------------------------------------------------- 0668 0677 | w | .CONST 0x0677 ; Address of begin 0669 0004 | | .CONST 0x0004 ; Address of exception handler 066a 0004 | | .CONST 0x0004 ; Number of locals 066b INIT_0668: 066b 00da | | Load_Top At_Offset_2 066c 00e0 | | Load_Encached Standard_Cache 066d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 066e 800b | | Call 0x0,0xb 066f e002 | | Load 0x0,0x2 0670 0322 | " | Declare_Variable Record 0671 00d8 | | Load_Top At_Offset_0 0672 1c00 | | Execute_Immediate Run_Utility,0x0 0673 e003 | | Load 0x0,0x3 0674 02ff | | Declare_Variable Variant_Record 0675 00d8 | | Load_Top At_Offset_0 0676 1c00 | | Execute_Immediate Run_Utility,0x0 0677 BODY_0668: 0677 4801 |H | Short_Literal 0x1 0678 00db | | Load_Top At_Offset_3 0679 01dd | | Execute Vector,First 067a 0a01 | | Execute_Immediate Plus,0x1 067b e602 | | Load 0x3,0x2 067c 01dc | | Execute Vector,Last 067d e602 | | Load 0x3,0x2 067e 01cf | | Execute Vector,Slice_Read 067f 800f | | Call 0x0,0xf 0680 4803 |H | Short_Literal 0x3 0681 e403 | | Load 0x2,0x3 0682 01d6 | | Execute Vector,Field_Write 0683 00d8 | | Load_Top At_Offset_0 0684 00da | | Load_Top At_Offset_2 0685 e404 | | Load 0x2,0x4 0686 e403 | | Load 0x2,0x3 0687 e407 | | Load 0x2,0x7 0688 8013 | | Call 0x0,0x13 0689 00d2 | | Pop_Control Pop_Count_2 068a 00d8 | | Load_Top At_Offset_0 068b e008 | | Load 0x0,0x8 068c 016f | o | Execute Variant_Record,Equal 068d 6807 |h | Jump_Zero 0x695 068e 4800 |H | Short_Literal 0x0 068f 00e5 | | Load_Encached Long_Integer_Cache 0690 00d9 | | Load_Top At_Offset_1 0691 0267 | g | Execute Discrete,Predecessor 0692 e006 | | Load 0x0,0x6 0693 0334 | 4 | Declare_Variable Array,With_Constraint 0694 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0695 480a |H | Short_Literal 0xa 0696 00d9 | | Load_Top At_Offset_1 0697 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 0698 0227 | ' | Execute Access,All_Reference 0699 01ca | | Execute Vector,Prepend 069a e7ff | | Load 0x3,-0x1 069b 0a01 | | Execute_Immediate Plus,0x1 069c 00d8 | | Load_Top At_Offset_0 069d e022 | " | Load 0x0,0x22 069e 0260 | ` | Execute Discrete,In_Type 069f 7001 |p | Jump_Nonzero 0x6a1 06a0 0801 | | Execute_Immediate Raise,0x1 06a1 8408 | | Call 0x2,0x8 06a2 01cc | | Execute Vector,Catenate 06a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06a4 0000 0000 | | .BLANK 0000[0x4] 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06b0 | | .CONST 0x06b0 ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0002 | | .CONST 0x0002 ; Number of locals 06ab INIT_06a8: 06ab e406 | | Load 0x2,0x6 06ac 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 06ad 0227 | ' | Execute Access,All_Reference 06ae 0335 | 5 | Declare_Variable Array,Duplicate 06af 00cd | | Action Spare6_Action 06b0 BODY_06a8: 06b0 00d8 | | Load_Top At_Offset_0 06b1 00cb | | Action Pop_Block_With_Result 06b2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 06b3 0000 0000 | | .BLANK 0000[0x5] 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; SUBPROGRAM 06b8 ; -------------------------------------------------------------------------------------- 06b8 06c2 | | .CONST 0x06c2 ; Address of begin 06b9 0004 | | .CONST 0x0004 ; Address of exception handler 06ba 0002 | | .CONST 0x0002 ; Number of locals 06bb INIT_06b8: 06bb e406 | | Load 0x2,0x6 06bc 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 06bd 0227 | ' | Execute Access,All_Reference 06be 4802 |H | Short_Literal 0x2 06bf 8408 | | Call 0x2,0x8 06c0 01cc | | Execute Vector,Catenate 06c1 0007 | | Action Break_Optional 06c2 BODY_06b8: 06c2 00d8 | | Load_Top At_Offset_0 06c3 00cb | | Action Pop_Block_With_Result 06c4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 06c5 0000 0000 | | .XXX[0x3] 06c7 0000 | | 06c8 ; -------------------------------------------------------------------------------------- 06c8 ; SUBPROGRAM 06c8 ; -------------------------------------------------------------------------------------- 06c8 06d2 | | .CONST 0x06d2 ; Address of begin 06c9 071c | | .CONST 0x071c ; Address of exception handler 06ca 0005 | | .CONST 0x0005 ; Number of locals 06cb INIT_06c8: 06cb e023 | # | Load 0x0,0x23 06cc 0007 | | Action Break_Optional 06cd e004 | | Load 0x0,0x4 06ce 0007 | | Action Break_Optional 06cf e004 | | Load 0x0,0x4 06d0 029f 0793 | | Declare_Subprogram INIT_0790,For_Call 06d2 BODY_06c8: 06d2 8605 | | Call 0x3,0x5 06d3 00da | | Load_Top At_Offset_2 06d4 c005 | | Store 0x0,0x5 06d5 e023 | # | Load 0x0,0x23 06d6 e004 | | Load 0x0,0x4 06d7 e024 | $ | Load 0x0,0x24 06d8 8025 | % | Call 0x0,0x25 06d9 003b | ; | Store_Top Access,At_Offset_3 06da c602 | | Store 0x3,0x2 06db 00d9 | | Load_Top At_Offset_1 06dc e004 | | Load 0x0,0x4 06dd 022e | . | Execute Access,Not_Equal 06de 6805 |h | Jump_Zero 0x6e4 06df 00d9 | | Load_Top At_Offset_1 06e0 c005 | | Store 0x0,0x5 06e1 00da | | Load_Top At_Offset_2 06e2 8026 | & | Call 0x0,0x26 06e3 003b | ; | Store_Top Access,At_Offset_3 06e4 00db | | Load_Top At_Offset_3 06e5 6835 |h5 | Jump_Zero 0x71b 06e6 e01f | | Load 0x0,0x1f 06e7 8021 | ! | Call 0x0,0x21 06e8 4802 |H | Short_Literal 0x2 06e9 4800 |H | Short_Literal 0x0 06ea 00e5 | | Load_Encached Long_Integer_Cache 06eb 00d9 | | Load_Top At_Offset_1 06ec 0267 | g | Execute Discrete,Predecessor 06ed e006 | | Load 0x0,0x6 06ee 0334 | 4 | Declare_Variable Array,With_Constraint 06ef 4800 |H | Short_Literal 0x0 06f0 00e5 | | Load_Encached Long_Integer_Cache 06f1 00d9 | | Load_Top At_Offset_1 06f2 0267 | g | Execute Discrete,Predecessor 06f3 e006 | | Load 0x0,0x6 06f4 0334 | 4 | Declare_Variable Array,With_Constraint 06f5 4800 |H | Short_Literal 0x0 06f6 00e5 | | Load_Encached Long_Integer_Cache 06f7 00d9 | | Load_Top At_Offset_1 06f8 0267 | g | Execute Discrete,Predecessor 06f9 e006 | | Load 0x0,0x6 06fa 0334 | 4 | Declare_Variable Array,With_Constraint 06fb 4800 |H | Short_Literal 0x0 06fc 00e5 | | Load_Encached Long_Integer_Cache 06fd 00d9 | | Load_Top At_Offset_1 06fe 0267 | g | Execute Discrete,Predecessor 06ff e006 | | Load 0x0,0x6 0700 0334 | 4 | Declare_Variable Array,With_Constraint 0701 4800 |H | Short_Literal 0x0 0702 00e5 | | Load_Encached Long_Integer_Cache 0703 00d9 | | Load_Top At_Offset_1 0704 0267 | g | Execute Discrete,Predecessor 0705 e006 | | Load 0x0,0x6 0706 0334 | 4 | Declare_Variable Array,With_Constraint 0707 e024 | $ | Load 0x0,0x24 0708 800b | | Call 0x0,0xb 0709 4800 |H | Short_Literal 0x0 070a 4824 |H$ | Short_Literal 0x24 070b e006 | | Load 0x0,0x6 070c 0334 | 4 | Declare_Variable Array,With_Constraint 070d 501e |P | Indirect_Literal Any,0x72c,{0x4572726f, 0x72207265} 070e 4800 |H | Short_Literal 0x0 070f 480a |H | Short_Literal 0xa 0710 e006 | | Load 0x0,0x6 0711 0334 | 4 | Declare_Variable Array,With_Constraint 0712 502d |P- | Indirect_Literal Any,0x740,{0x52656164, 0x4572726f} 0713 4800 |H | Short_Literal 0x0 0714 4808 |H | Short_Literal 0x8 0715 e006 | | Load 0x0,0x6 0716 0334 | 4 | Declare_Variable Array,With_Constraint 0717 5030 |P0 | Indirect_Literal Any,0x748,{0x586c6962, 0x4572726f} 0718 8027 | ' | Call 0x0,0x27 0719 00cc | | Action Pop_Block 071a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 071b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 071c TRAP_06c8: 071c 0007 | | Action Break_Optional 071d 00da | | Load_Top At_Offset_2 071e e004 | | Load 0x0,0x4 071f 022e | . | Execute Access,Not_Equal 0720 6805 |h | Jump_Zero 0x726 0721 00da | | Load_Top At_Offset_2 0722 c005 | | Store 0x0,0x5 0723 00db | | Load_Top At_Offset_3 0724 8026 | & | Call 0x0,0x26 0725 c603 | | Store 0x3,0x3 0726 e01f | | Load 0x0,0x1f 0727 8021 | ! | Call 0x0,0x21 0728 00d8 | | Load_Top At_Offset_0 0729 0101 | | Execute Exception,Reraise 072a 0000 0000 | | .XXX[0x2] 072c 4572 726f |Erro| .LITERAL {0x4572726f, 0x72207265} 0730 6164 696e |adin| .XXX[0x10] 0732 6720 6572 |g er| 0734 726f 7220 |ror | 0736 6461 7461 |data| 0738 6261 7365 |base| 073a 2066 696c | fil| 073c 653a 2025 |e: %| 073e 3100 0000 |1 | 0740 5265 6164 |Read| .LITERAL {0x52656164, 0x4572726f} 0744 7244 6200 |rDb | .XXX[0x4] 0746 0000 0000 | | 0748 586c 6962 |Xlib| .LITERAL {0x586c6962, 0x4572726f} 074c 7200 0000 |r | .XXX[0x4] 074e 0000 0000 | | 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0761 | a | .CONST 0x0761 ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 0003 | | .CONST 0x0003 ; Number of locals 0753 INIT_0750: 0753 e402 | | Load 0x2,0x2 0754 0227 | ' | Execute Access,All_Reference 0755 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0756 e5fe | | Load 0x2,-0x2 0757 e5ff | | Load 0x2,-0x1 0758 e402 | | Load 0x2,0x2 0759 0227 | ' | Execute Access,All_Reference 075a 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 075b 8028 | ( | Call 0x0,0x28 075c 8029 | ) | Call 0x0,0x29 075d 00d8 | | Load_Top At_Offset_0 075e 01db | | Execute Vector,Length 075f e022 | " | Load 0x0,0x22 0760 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0761 BODY_0750: 0761 00d8 | | Load_Top At_Offset_0 0762 0a02 | | Execute_Immediate Plus,0x2 0763 6028 |`( | Indirect_Literal Discrete,0x78c,{0x00000000, 0x000007d0} 0764 e604 | | Load 0x3,0x4 0765 0272 | r | Execute Discrete,Minus 0766 027d | } | Execute Discrete,Greater 0767 6805 |h | Jump_Zero 0x76d 0768 6023 |`# | Indirect_Literal Discrete,0x78c,{0x00000000, 0x000007d0} 0769 e604 | | Load 0x3,0x4 076a 0272 | r | Execute Discrete,Minus 076b 0afe | | Execute_Immediate Plus,-0x2 076c 0059 | Y | Store_Top Discrete,At_Offset_1 076d 485b |H[ | Short_Literal 0x5b 076e e604 | | Load 0x3,0x4 076f 0a01 | | Execute_Immediate Plus,0x1 0770 e603 | | Load 0x3,0x3 0771 01d6 | | Execute Vector,Field_Write 0772 00d9 | | Load_Top At_Offset_1 0773 e604 | | Load 0x3,0x4 0774 0a02 | | Execute_Immediate Plus,0x2 0775 e604 | | Load 0x3,0x4 0776 0a01 | | Execute_Immediate Plus,0x1 0777 00db | | Load_Top At_Offset_3 0778 0273 | s | Execute Discrete,Plus 0779 e603 | | Load 0x3,0x3 077a 01ce | | Execute Vector,Slice_Write 077b 485d |H] | Short_Literal 0x5d 077c e604 | | Load 0x3,0x4 077d 0a01 | | Execute_Immediate Plus,0x1 077e 00da | | Load_Top At_Offset_2 077f 0273 | s | Execute Discrete,Plus 0780 0a01 | | Execute_Immediate Plus,0x1 0781 e603 | | Load 0x3,0x3 0782 01d6 | | Execute Vector,Field_Write 0783 e604 | | Load 0x3,0x4 0784 0a02 | | Execute_Immediate Plus,0x2 0785 00d9 | | Load_Top At_Offset_1 0786 0273 | s | Execute Discrete,Plus 0787 c604 | | Store 0x3,0x4 0788 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0789 0000 0000 | | .XXX[0x3] 078b 0000 | | 078c 0000 0000 | | .LITERAL {0x00000000, 0x000007d0} 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 0793 | | .CONST 0x0793 ; Address of begin 0791 0797 | | .CONST 0x0797 ; Address of exception handler 0792 0001 | | .CONST 0x0001 ; Number of locals 0793 BODY_0790: 0793 INIT_0790: 0793 e004 | | Load 0x0,0x4 0794 03bc | | Declare_Variable Access,By_Allocation 0795 a603 | | Store_Unchecked 0x3,0x3 0796 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0797 TRAP_0790: 0797 0007 | | Action Break_Optional 0798 e01f | | Load 0x0,0x1f 0799 8021 | ! | Call 0x0,0x21 079a 00d8 | | Load_Top At_Offset_0 079b 0101 | | Execute Exception,Reraise 079c 0000 0000 | | .BLANK 0000[0x4] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; Debug Table 07a0 ; -------------------------------------------------------------------------------------- 07a0 0004 0000 | | .DEBUG4 0x0004,0x0000,0x68c7,0x0000,0x0001,0x0015 07a6 000b 07fa | | .DBG4T 0x000b,0x07fa,0x8000,0x0000 07aa 001e 0805 | | .DBG4T 0x001e,0x0805,0x8000,0x0000 07ae 003b 0812 | ; | .DBG4T 0x003b,0x0812,0x0002,0x0000 07b2 0073 081d | s | .DBG4T 0x0073,0x081d,0x0002,0x0000 07b6 0083 0822 | "| .DBG4T 0x0083,0x0822,0x0002,0x0000 07ba 011b 083d | =| .DBG4T 0x011b,0x083d,0x0002,0x0000 07be 0133 0842 | 3 B| .DBG4T 0x0133,0x0842,0x0002,0x0000 07c2 014b 0847 | K G| .DBG4T 0x014b,0x0847,0x0002,0x0000 07c6 0163 084c | c L| .DBG4T 0x0163,0x084c,0x0002,0x0000 07ca 017b 0851 | { Q| .DBG4T 0x017b,0x0851,0x0002,0x0000 07ce 0193 0856 | V| .DBG4T 0x0193,0x0856,0x0002,0x0000 07d2 01ab 085b | [| .DBG4T 0x01ab,0x085b,0x0001,0x0000 07d6 01bb 0862 | b| .DBG4T 0x01bb,0x0862,0x0002,0x4000 07da 0603 088c | | .DBG4T 0x0603,0x088c,0x0004,0x0000 07de 0613 0891 | | .DBG4T 0x0613,0x0891,0x0004,0x4000 07e2 066b 08a6 | k | .DBG4T 0x066b,0x08a6,0x0002,0x0000 07e6 06ab 08b0 | | .DBG4T 0x06ab,0x08b0,0x0004,0x0000 07ea 06bb 08b4 | | .DBG4T 0x06bb,0x08b4,0x0004,0x0000 07ee 06cb 08b8 | | .DBG4T 0x06cb,0x08b8,0x0004,0x0000 07f2 0753 08cc | S | .DBG4T 0x0753,0x08cc,0x0004,0x0000 07f6 0793 08d6 | | .DBG4T 0x0793,0x08d6,0x0004,0x0000 07fa ; -------------------------------------------------------------------------------------- 07fa ; Debug chain 07fa ; -------------------------------------------------------------------------------------- 07fa 0009 0000 | | .DBGLEN 0x0009,0x0000 07fc 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b 0805 ; -------------------------------------------------------------------------------------- 0805 ; Debug chain 0805 ; -------------------------------------------------------------------------------------- 0805 000b 0000 | | .DBGLEN 0x000b,0x0000 0807 001e 0020 | | .DBGLNO 0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032 0812 ; -------------------------------------------------------------------------------------- 0812 ; Debug chain 0812 ; -------------------------------------------------------------------------------------- 0812 0003 0006 | | .DBGLEN 0x0003,0x0006 0814 003b 003f | ; ?| .DBGLNO 0x003b,0x003f,0x0043,0x0046,0x004a,0x004b,0x005a,0x005e,0x005f 081d ; -------------------------------------------------------------------------------------- 081d ; Debug chain 081d ; -------------------------------------------------------------------------------------- 081d 0002 0001 | | .DBGLEN 0x0002,0x0001 081f 0073 0075 | s u| .DBGLNO 0x0073,0x0075,0x007c 0822 ; -------------------------------------------------------------------------------------- 0822 ; Debug chain 0822 ; -------------------------------------------------------------------------------------- 0822 0007 0012 | | .DBGLEN 0x0007,0x0012 0824 0083 0087 | | .DBGLNO 0x0083,0x0087,0x008e,0x0095,0x0099,0x009d,0x009f,0x00a5,0x00ab,0x00b1,0x00b5,0x00b9,0x00c3,0x00cd,0x00d1,0x00d5,0x00d9,0x00da,0x00e1,0x00e5,0x00e7,0x00f1,0x00f8,0x00fc,0x0100 083d ; -------------------------------------------------------------------------------------- 083d ; Debug chain 083d ; -------------------------------------------------------------------------------------- 083d 0001 0002 | | .DBGLEN 0x0001,0x0002 083f 011b 011d | | .DBGLNO 0x011b,0x011d,0x0127 0842 ; -------------------------------------------------------------------------------------- 0842 ; Debug chain 0842 ; -------------------------------------------------------------------------------------- 0842 0001 0002 | | .DBGLEN 0x0001,0x0002 0844 0133 0135 | 3 5| .DBGLNO 0x0133,0x0135,0x013f 0847 ; -------------------------------------------------------------------------------------- 0847 ; Debug chain 0847 ; -------------------------------------------------------------------------------------- 0847 0001 0002 | | .DBGLEN 0x0001,0x0002 0849 014b 014d | K M| .DBGLNO 0x014b,0x014d,0x0157 084c ; -------------------------------------------------------------------------------------- 084c ; Debug chain 084c ; -------------------------------------------------------------------------------------- 084c 0001 0002 | | .DBGLEN 0x0001,0x0002 084e 0163 0165 | c e| .DBGLNO 0x0163,0x0165,0x016f 0851 ; -------------------------------------------------------------------------------------- 0851 ; Debug chain 0851 ; -------------------------------------------------------------------------------------- 0851 0001 0002 | | .DBGLEN 0x0001,0x0002 0853 017b 017d | { }| .DBGLNO 0x017b,0x017d,0x0187 0856 ; -------------------------------------------------------------------------------------- 0856 ; Debug chain 0856 ; -------------------------------------------------------------------------------------- 0856 0001 0002 | | .DBGLEN 0x0001,0x0002 0858 0193 0195 | | .DBGLNO 0x0193,0x0195,0x019f 085b ; -------------------------------------------------------------------------------------- 085b ; Debug chain 085b ; -------------------------------------------------------------------------------------- 085b 0000 0005 | | .DBGLEN 0x0000,0x0005 085d 01ad 01af | | .DBGLNO 0x01ad,0x01af,0x01b3,0x01b5,0x01b6 0862 ; -------------------------------------------------------------------------------------- 0862 ; Debug chain 0862 ; -------------------------------------------------------------------------------------- 0862 0000 0014 | | .DBGLEN 0x0000,0x0014 0864 01bb 01d2 | | .DBGLNO 0x01bb,0x01d2,0x01ea,0x0200,0x0211,0x0228,0x023f,0x0250,0x0261,0x0272,0x0283,0x0294,0x02a5,0x02b6,0x02cd,0x02de,0x02ef,0x0300,0x0317,0x0328 0878 0001 0013 | | .XXX[0x14] 087a 0014 0002 | | 087c 0003 0004 | | 087e 0005 0006 | | 0880 0007 0008 | | 0882 0009 000a | | 0884 000b 000c | | 0886 000d 000e | | 0888 000f 0010 | | 088a 0011 0012 | | 088c ; -------------------------------------------------------------------------------------- 088c ; Debug chain 088c ; -------------------------------------------------------------------------------------- 088c 0001 0002 | | .DBGLEN 0x0001,0x0002 088e 0603 0608 | | .DBGLNO 0x0603,0x0608,0x060d 0891 ; -------------------------------------------------------------------------------------- 0891 ; Debug chain 0891 ; -------------------------------------------------------------------------------------- 0891 0003 0008 | | .DBGLEN 0x0003,0x0008 0893 0613 0626 | &| .DBGLNO 0x0613,0x0626,0x062b,0x062f,0x0635,0x063b,0x063c,0x0641,0x0644,0x0646,0x0649 089e 0001 0003 | | .XXX[0x8] 08a0 0004 0005 | | 08a2 0002 0006 | | 08a4 0007 0008 | | 08a6 ; -------------------------------------------------------------------------------------- 08a6 ; Debug chain 08a6 ; -------------------------------------------------------------------------------------- 08a6 0003 0005 | | .DBGLEN 0x0003,0x0005 08a8 066b 066f | k o| .DBGLNO 0x066b,0x066f,0x0673,0x0677,0x0683,0x068a,0x068e,0x0695 08b0 ; -------------------------------------------------------------------------------------- 08b0 ; Debug chain 08b0 ; -------------------------------------------------------------------------------------- 08b0 0001 0001 | | .DBGLEN 0x0001,0x0001 08b2 06ab 06b0 | | .DBGLNO 0x06ab,0x06b0 08b4 ; -------------------------------------------------------------------------------------- 08b4 ; Debug chain 08b4 ; -------------------------------------------------------------------------------------- 08b4 0001 0001 | | .DBGLEN 0x0001,0x0001 08b6 06bb 06c2 | | .DBGLNO 0x06bb,0x06c2 08b8 ; -------------------------------------------------------------------------------------- 08b8 ; Debug chain 08b8 ; -------------------------------------------------------------------------------------- 08b8 0003 000f | | .DBGLEN 0x0003,0x000f 08ba 06cb 06cd | | .DBGLNO 0x06cb,0x06cd,0x06cf,0x06d2,0x06d3,0x06d5,0x06db,0x06df,0x06e1,0x06e4,0x06e6,0x06e8,0x0719,0x071d,0x0721,0x0723,0x0726,0x0728 08cc ; -------------------------------------------------------------------------------------- 08cc ; Debug chain 08cc ; -------------------------------------------------------------------------------------- 08cc 0002 0006 | | .DBGLEN 0x0002,0x0006 08ce 0753 075d | S ]| .DBGLNO 0x0753,0x075d,0x0761,0x0768,0x076d,0x0772,0x077b,0x0783 08d6 ; -------------------------------------------------------------------------------------- 08d6 ; Debug chain 08d6 ; -------------------------------------------------------------------------------------- 08d6 0000 0003 | | .DBGLEN 0x0000,0x0003 08d8 0793 0798 | | .DBGLNO 0x0793,0x0798,0x079a 08db 0000 0000 | | .BLANK 0000[0x125]