|
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: 8192 (0x2000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦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 0f70 | p | .CONST 0x0f70 ; 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 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0208 | | .CONST 0x0208 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0070 | p | .CONST 0x0070 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4803 |H | Short_Literal 0x3 000d 029f 0213 | | Declare_Subprogram INIT_0210,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 00d8 | | Load_Top At_Offset_0 0011 0266 | f | Execute Discrete,Bounds 0012 00e1 | | Load_Encached Boolean_Cache 0013 02a0 | | Declare_Subprogram Null_Subprogram 0014 4801 |H | Short_Literal 0x1 0015 035e | ^ | Declare_Type Array,Defined,Visible 0016 4800 |H | Short_Literal 0x0 0017 4804 |H | Short_Literal 0x4 0018 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call 001a 03fe | | Declare_Type Discrete,Defined,Visible 001b 00d8 | | Load_Top At_Offset_0 001c 0266 | f | Execute Discrete,Bounds 001d 00e1 | | Load_Encached Boolean_Cache 001e 02a0 | | Declare_Subprogram Null_Subprogram 001f 4801 |H | Short_Literal 0x1 0020 035e | ^ | Declare_Type Array,Defined,Visible 0021 4800 |H | Short_Literal 0x0 0022 4802 |H | Short_Literal 0x2 0023 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call 0025 03fe | | Declare_Type Discrete,Defined,Visible 0026 4800 |H | Short_Literal 0x0 0027 4801 |H | Short_Literal 0x1 0028 029f 028b | | Declare_Subprogram INIT_0288,For_Call 002a 03fe | | Declare_Type Discrete,Defined,Visible 002b 4800 |H | Short_Literal 0x0 002c 4803 |H | Short_Literal 0x3 002d 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call 002f 03fe | | Declare_Type Discrete,Defined,Visible 0030 4800 |H | Short_Literal 0x0 0031 480b |H | Short_Literal 0xb 0032 029f 02db | | Declare_Subprogram INIT_02d8,For_Call 0034 03fe | | Declare_Type Discrete,Defined,Visible 0035 4800 |H | Short_Literal 0x0 0036 4803 |H | Short_Literal 0x3 0037 029f 0303 | | Declare_Subprogram INIT_0300,For_Call 0039 03fe | | Declare_Type Discrete,Defined,Visible 003a 4800 |H | Short_Literal 0x0 003b 4801 |H | Short_Literal 0x1 003c 029f 032b | +| Declare_Subprogram INIT_0328,For_Call 003e 03fe | | Declare_Type Discrete,Defined,Visible 003f e001 | | Load 0x0,0x1 0040 0129 | ) | Execute Any,Make_Visible 0041 e002 | | Load 0x0,0x2 0042 0129 | ) | Execute Any,Make_Visible 0043 e003 | | Load 0x0,0x3 0044 0129 | ) | Execute Any,Make_Visible 0045 e004 | | Load 0x0,0x4 0046 0129 | ) | Execute Any,Make_Visible 0047 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 0048 00c4 | | Action Make_Default 0049 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 004b 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated 004d 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated 004f 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated 0051 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 0053 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated 0055 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated 0057 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 0059 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 005b 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated 005d 00e3 | | Load_Encached Natural_Cache 005e 0266 | f | Execute Discrete,Bounds 005f e21b | | Load 0x1,0x1b 0060 02a0 | | Declare_Subprogram Null_Subprogram 0061 4801 |H | Short_Literal 0x1 0062 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0063 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 0064 00c4 | | Action Make_Default 0065 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated 0067 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 0069 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated 006b 029a 048b | | Declare_Subprogram INIT_0488,For_Outer_Call,Visible,Unelaborated 006d 029a 049b | | Declare_Subprogram INIT_0498,For_Outer_Call,Visible,Unelaborated 006f 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 0071 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated 0073 029a 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call,Visible,Unelaborated 0075 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated 0077 029a 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call,Visible,Unelaborated 0079 029a 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call,Visible,Unelaborated 007b 029a 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Visible,Unelaborated 007d 00e3 | | Load_Encached Natural_Cache 007e 0266 | f | Execute Discrete,Bounds 007f e228 | ( | Load 0x1,0x28 0080 02a0 | | Declare_Subprogram Null_Subprogram 0081 4801 |H | Short_Literal 0x1 0082 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0083 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 0084 00c4 | | Action Make_Default 0085 029a 051b | | Declare_Subprogram INIT_0518,For_Outer_Call,Visible,Unelaborated 0087 029a 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call,Visible,Unelaborated 0089 029a 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call,Visible,Unelaborated 008b 029a 062b | +| Declare_Subprogram INIT_0628,For_Outer_Call,Visible,Unelaborated 008d 029a 0773 | s| Declare_Subprogram INIT_0770,For_Outer_Call,Visible,Unelaborated 008f 029a 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call,Visible,Unelaborated 0091 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated 0093 029a 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call,Visible,Unelaborated 0095 029a 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call,Visible,Unelaborated 0097 029a 07c3 | | Declare_Subprogram INIT_07c0,For_Outer_Call,Visible,Unelaborated 0099 029a 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call,Visible,Unelaborated 009b 029a 07e3 | | Declare_Subprogram INIT_07e0,For_Outer_Call,Visible,Unelaborated 009d 029a 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call,Visible,Unelaborated 009f 029a 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call,Visible,Unelaborated 00a1 029a 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call,Visible,Unelaborated 00a3 029a 0823 | #| Declare_Subprogram INIT_0820,For_Outer_Call,Visible,Unelaborated 00a5 029a 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call,Visible,Unelaborated 00a7 029a 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call,Visible,Unelaborated 00a9 029a 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call,Visible,Unelaborated 00ab 029a 0863 | c| Declare_Subprogram INIT_0860,For_Outer_Call,Visible,Unelaborated 00ad 029a 0873 | s| Declare_Subprogram INIT_0870,For_Outer_Call,Visible,Unelaborated 00af 029a 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call,Visible,Unelaborated 00b1 029a 0893 | | Declare_Subprogram INIT_0890,For_Outer_Call,Visible,Unelaborated 00b3 029a 08a3 | | Declare_Subprogram INIT_08a0,For_Outer_Call,Visible,Unelaborated 00b5 029a 08b3 | | Declare_Subprogram INIT_08b0,For_Outer_Call,Visible,Unelaborated 00b7 029a 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call,Visible,Unelaborated 00b9 029a 08d3 | | Declare_Subprogram INIT_08d0,For_Outer_Call,Visible,Unelaborated 00bb 029a 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call,Visible,Unelaborated 00bd 029a 08f3 | | Declare_Subprogram INIT_08f0,For_Outer_Call,Visible,Unelaborated 00bf 029a 0903 | | Declare_Subprogram INIT_0900,For_Outer_Call,Visible,Unelaborated 00c1 029a 0913 | | Declare_Subprogram INIT_0910,For_Outer_Call,Visible,Unelaborated 00c3 029a 0923 | #| Declare_Subprogram INIT_0920,For_Outer_Call,Visible,Unelaborated 00c5 029a 0933 | 3| Declare_Subprogram INIT_0930,For_Outer_Call,Visible,Unelaborated 00c7 029a 0943 | C| Declare_Subprogram INIT_0940,For_Outer_Call,Visible,Unelaborated 00c9 029a 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call,Visible,Unelaborated 00cb 029a 0963 | c| Declare_Subprogram INIT_0960,For_Outer_Call,Visible,Unelaborated 00cd 029a 0973 | s| Declare_Subprogram INIT_0970,For_Outer_Call,Visible,Unelaborated 00cf 029a 0983 | | Declare_Subprogram INIT_0980,For_Outer_Call,Visible,Unelaborated 00d1 029a 0993 | | Declare_Subprogram INIT_0990,For_Outer_Call,Visible,Unelaborated 00d3 029a 09a3 | | Declare_Subprogram INIT_09a0,For_Outer_Call,Visible,Unelaborated 00d5 029a 09b3 | | Declare_Subprogram INIT_09b0,For_Outer_Call,Visible,Unelaborated 00d7 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative 00d8 00e9 | | Load_Encached String_Cache 00d9 02a0 | | Declare_Subprogram Null_Subprogram 00da 00da | | Load_Top At_Offset_2 00db 03a3 | | Complete_Type Heap_Access,By_Defining 00dc 00e1 | | Load_Encached Boolean_Cache 00dd e213 | | Load 0x1,0x13 00de 00e3 | | Load_Encached Natural_Cache 00df 029f 0aeb | | Declare_Subprogram INIT_0ae8,For_Call 00e1 4803 |H | Short_Literal 0x3 00e2 032d | - | Declare_Type Record,Defined 00e3 00d8 | | Load_Top At_Offset_0 00e4 0322 | " | Declare_Variable Record 00e5 4801 |H | Short_Literal 0x1 00e6 00d9 | | Load_Top At_Offset_1 00e7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00e8 4803 |H | Short_Literal 0x3 00e9 00d9 | | Load_Top At_Offset_1 00ea 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00eb 4800 |H | Short_Literal 0x0 00ec 00d9 | | Load_Top At_Offset_1 00ed 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 00ee 00da | | Load_Top At_Offset_2 00ef 00db | | Load_Top At_Offset_3 00f0 00e1 | | Load_Encached Boolean_Cache 00f1 00e1 | | Load_Encached Boolean_Cache 00f2 029f 0b03 | | Declare_Subprogram INIT_0b00,For_Call 00f4 4804 |H | Short_Literal 0x4 00f5 032d | - | Declare_Type Record,Defined 00f6 00d8 | | Load_Top At_Offset_0 00f7 0322 | " | Declare_Variable Record 00f8 e262 | b | Load 0x1,0x62 00f9 00d9 | | Load_Top At_Offset_1 00fa 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00fb e262 | b | Load 0x1,0x62 00fc 00d9 | | Load_Top At_Offset_1 00fd 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00fe 4800 |H | Short_Literal 0x0 00ff 00d9 | | Load_Top At_Offset_1 0100 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0101 4800 |H | Short_Literal 0x0 0102 00d9 | | Load_Top At_Offset_1 0103 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0104 e262 | b | Load 0x1,0x62 0105 00d8 | | Load_Top At_Offset_0 0106 e262 | b | Load 0x1,0x62 0107 00d8 | | Load_Top At_Offset_0 0108 02a0 | | Declare_Subprogram Null_Subprogram 0109 4804 |H | Short_Literal 0x4 010a 032d | - | Declare_Type Record,Defined 010b 00d8 | | Load_Top At_Offset_0 010c 0322 | " | Declare_Variable Record 010d e262 | b | Load 0x1,0x62 010e 00d9 | | Load_Top At_Offset_1 010f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0110 e262 | b | Load 0x1,0x62 0111 00d9 | | Load_Top At_Offset_1 0112 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0113 e262 | b | Load 0x1,0x62 0114 00d9 | | Load_Top At_Offset_1 0115 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0116 e262 | b | Load 0x1,0x62 0117 00d9 | | Load_Top At_Offset_1 0118 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0119 00e1 | | Load_Encached Boolean_Cache 011a 00e1 | | Load_Encached Boolean_Cache 011b e262 | b | Load 0x1,0x62 011c 02a0 | | Declare_Subprogram Null_Subprogram 011d 4803 |H | Short_Literal 0x3 011e 032d | - | Declare_Type Record,Defined 011f 00d8 | | Load_Top At_Offset_0 0120 0322 | " | Declare_Variable Record 0121 4800 |H | Short_Literal 0x0 0122 00d9 | | Load_Top At_Offset_1 0123 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0124 4800 |H | Short_Literal 0x0 0125 00d9 | | Load_Top At_Offset_1 0126 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0127 e262 | b | Load 0x1,0x62 0128 00d9 | | Load_Top At_Offset_1 0129 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 012a e262 | b | Load 0x1,0x62 012b e20e | | Load 0x1,0xe 012c 00e1 | | Load_Encached Boolean_Cache 012d e262 | b | Load 0x1,0x62 012e 00d8 | | Load_Top At_Offset_0 012f 00e1 | | Load_Encached Boolean_Cache 0130 00e1 | | Load_Encached Boolean_Cache 0131 e262 | b | Load 0x1,0x62 0132 02a0 | | Declare_Subprogram Null_Subprogram 0133 4808 |H | Short_Literal 0x8 0134 032d | - | Declare_Type Record,Defined 0135 00d8 | | Load_Top At_Offset_0 0136 02a0 | | Declare_Subprogram Null_Subprogram 0137 e21b | | Load 0x1,0x1b 0138 03a3 | | Complete_Type Heap_Access,By_Defining 0139 e21b | | Load 0x1,0x1b 013a 0129 | ) | Execute Any,Make_Visible 013b c21c | | Store 0x1,0x1c 013c 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative 013d e227 | ' | Load 0x1,0x27 013e 02a0 | | Declare_Subprogram Null_Subprogram 013f 00da | | Load_Top At_Offset_2 0140 03a3 | | Complete_Type Heap_Access,By_Defining 0141 e212 | | Load 0x1,0x12 0142 e215 | | Load 0x1,0x15 0143 e20d | | Load 0x1,0xd 0144 00d8 | | Load_Top At_Offset_0 0145 00e1 | | Load_Encached Boolean_Cache 0146 e262 | b | Load 0x1,0x62 0147 00d8 | | Load_Top At_Offset_0 0148 e211 | | Load 0x1,0x11 0149 00e1 | | Load_Encached Boolean_Cache 014a e262 | b | Load 0x1,0x62 014b 00d8 | | Load_Top At_Offset_0 014c 02a0 | | Declare_Subprogram Null_Subprogram 014d 480b |H | Short_Literal 0xb 014e 032d | - | Declare_Type Record,Defined 014f 00d8 | | Load_Top At_Offset_0 0150 02a0 | | Declare_Subprogram Null_Subprogram 0151 e228 | ( | Load 0x1,0x28 0152 03a3 | | Complete_Type Heap_Access,By_Defining 0153 e228 | ( | Load 0x1,0x28 0154 0129 | ) | Execute Any,Make_Visible 0155 c229 | ) | Store 0x1,0x29 0156 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative 0157 e236 | 6 | Load 0x1,0x36 0158 02a0 | | Declare_Subprogram Null_Subprogram 0159 00da | | Load_Top At_Offset_2 015a 03a3 | | Complete_Type Heap_Access,By_Defining 015b e210 | | Load 0x1,0x10 015c 00e3 | | Load_Encached Natural_Cache 015d 00e3 | | Load_Encached Natural_Cache 015e e262 | b | Load 0x1,0x62 015f 00d8 | | Load_Top At_Offset_0 0160 e262 | b | Load 0x1,0x62 0161 00d8 | | Load_Top At_Offset_0 0162 e262 | b | Load 0x1,0x62 0163 00d8 | | Load_Top At_Offset_0 0164 e262 | b | Load 0x1,0x62 0165 00d8 | | Load_Top At_Offset_0 0166 e262 | b | Load 0x1,0x62 0167 00d8 | | Load_Top At_Offset_0 0168 e262 | b | Load 0x1,0x62 0169 00d8 | | Load_Top At_Offset_0 016a e262 | b | Load 0x1,0x62 016b e263 | c | Load 0x1,0x63 016c e265 | e | Load 0x1,0x65 016d 00d8 | | Load_Top At_Offset_0 016e e265 | e | Load 0x1,0x65 016f 00d8 | | Load_Top At_Offset_0 0170 e262 | b | Load 0x1,0x62 0171 00d8 | | Load_Top At_Offset_0 0172 e262 | b | Load 0x1,0x62 0173 00e1 | | Load_Encached Boolean_Cache 0174 e262 | b | Load 0x1,0x62 0175 00d8 | | Load_Top At_Offset_0 0176 e262 | b | Load 0x1,0x62 0177 e269 | i | Load 0x1,0x69 0178 e214 | | Load 0x1,0x14 0179 e216 | | Load 0x1,0x16 017a e26c | l | Load 0x1,0x6c 017b e26e | n | Load 0x1,0x6e 017c 029f 0b1b | | Declare_Subprogram INIT_0b18,For_Call 017e 4821 |H! | Short_Literal 0x21 017f 032d | - | Declare_Type Record,Defined 0180 00d8 | | Load_Top At_Offset_0 0181 02a0 | | Declare_Subprogram Null_Subprogram 0182 e237 | 7 | Load 0x1,0x37 0183 03a3 | | Complete_Type Heap_Access,By_Defining 0184 e237 | 7 | Load 0x1,0x37 0185 0129 | ) | Execute Any,Make_Visible 0186 c238 | 8 | Store 0x1,0x38 0187 00bf | | Action Accept_Activation 0188 029d 09c3 | | Declare_Subprogram INIT_09c0,For_Outer_Call 018a 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 018b 00c7 | | Action Elaborate_Subprogram 018c 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 018d 00c7 | | Action Elaborate_Subprogram 018e 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 018f 00c7 | | Action Elaborate_Subprogram 0190 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0191 00c7 | | Action Elaborate_Subprogram 0192 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0193 00c7 | | Action Elaborate_Subprogram 0194 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0195 00c7 | | Action Elaborate_Subprogram 0196 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0197 00c7 | | Action Elaborate_Subprogram 0198 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0199 00c7 | | Action Elaborate_Subprogram 019a 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 019b 00c7 | | Action Elaborate_Subprogram 019c 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 019d 00c7 | | Action Elaborate_Subprogram 019e 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 019f 00c7 | | Action Elaborate_Subprogram 01a0 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 01a1 00c7 | | Action Elaborate_Subprogram 01a2 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 01a3 00c7 | | Action Elaborate_Subprogram 01a4 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 01a5 00c7 | | Action Elaborate_Subprogram 01a6 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 01a7 00c7 | | Action Elaborate_Subprogram 01a8 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 01a9 00c7 | | Action Elaborate_Subprogram 01aa 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 01ab 00c7 | | Action Elaborate_Subprogram 01ac 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 01ad 00c7 | | Action Elaborate_Subprogram 01ae 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 01af 00c7 | | Action Elaborate_Subprogram 01b0 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 01b1 00c7 | | Action Elaborate_Subprogram 01b2 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 01b3 00c7 | | Action Elaborate_Subprogram 01b4 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 01b5 00c7 | | Action Elaborate_Subprogram 01b6 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 01b7 00c7 | | Action Elaborate_Subprogram 01b8 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 01b9 00c7 | | Action Elaborate_Subprogram 01ba 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b 01bb 00c7 | | Action Elaborate_Subprogram 01bc 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 01bd 00c7 | | Action Elaborate_Subprogram 01be 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 01bf 00c7 | | Action Elaborate_Subprogram 01c0 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 01c1 00c7 | | Action Elaborate_Subprogram 01c2 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 01c3 00c7 | | Action Elaborate_Subprogram 01c4 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 01c5 00c7 | | Action Elaborate_Subprogram 01c6 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 01c7 00c7 | | Action Elaborate_Subprogram 01c8 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 01c9 00c7 | | Action Elaborate_Subprogram 01ca 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 01cb 00c7 | | Action Elaborate_Subprogram 01cc 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 01cd 00c7 | | Action Elaborate_Subprogram 01ce 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 01cf 00c7 | | Action Elaborate_Subprogram 01d0 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 01d1 00c7 | | Action Elaborate_Subprogram 01d2 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 01d3 00c7 | | Action Elaborate_Subprogram 01d4 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 01d5 00c7 | | Action Elaborate_Subprogram 01d6 1d49 | I | Execute_Immediate Reference_Lex_1,0x49 01d7 00c7 | | Action Elaborate_Subprogram 01d8 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a 01d9 00c7 | | Action Elaborate_Subprogram 01da 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b 01db 00c7 | | Action Elaborate_Subprogram 01dc 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c 01dd 00c7 | | Action Elaborate_Subprogram 01de 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d 01df 00c7 | | Action Elaborate_Subprogram 01e0 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e 01e1 00c7 | | Action Elaborate_Subprogram 01e2 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 01e3 00c7 | | Action Elaborate_Subprogram 01e4 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 01e5 00c7 | | Action Elaborate_Subprogram 01e6 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 01e7 00c7 | | Action Elaborate_Subprogram 01e8 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 01e9 00c7 | | Action Elaborate_Subprogram 01ea 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 01eb 00c7 | | Action Elaborate_Subprogram 01ec 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 01ed 00c7 | | Action Elaborate_Subprogram 01ee 1d55 | U | Execute_Immediate Reference_Lex_1,0x55 01ef 00c7 | | Action Elaborate_Subprogram 01f0 1d56 | V | Execute_Immediate Reference_Lex_1,0x56 01f1 00c7 | | Action Elaborate_Subprogram 01f2 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 01f3 00c7 | | Action Elaborate_Subprogram 01f4 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 01f5 00c7 | | Action Elaborate_Subprogram 01f6 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 01f7 00c7 | | Action Elaborate_Subprogram 01f8 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a 01f9 00c7 | | Action Elaborate_Subprogram 01fa 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b 01fb 00c7 | | Action Elaborate_Subprogram 01fc 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c 01fd 00c7 | | Action Elaborate_Subprogram 01fe 1d5d | ] | Execute_Immediate Reference_Lex_1,0x5d 01ff 00c7 | | Action Elaborate_Subprogram 0200 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e 0201 00c7 | | Action Elaborate_Subprogram 0202 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 0203 00c7 | | Action Elaborate_Subprogram 0204 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60 0205 00c7 | | Action Elaborate_Subprogram 0206 1d61 | a | Execute_Immediate Reference_Lex_1,0x61 0207 00c7 | | Action Elaborate_Subprogram 0208 BODY_0008: 0208 00bc | | Action Signal_Activated 0209 00bb | | Action Signal_Completion 020a 0000 0000 | | .BLANK 0000[0x6] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 4607 |F | Jump_Case 0x8 0214 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0215 7806 |x | Jump 0x21c ; case 0x1 0216 7809 |x | Jump 0x220 ; case 0x2 0217 780d |x | Jump 0x225 ; case 0x3 0218 7810 |x | Jump 0x229 ; case 0x4 0219 7811 |x | Jump 0x22b ; case 0x5 021a 7812 |x | Jump 0x22d ; case 0x6 021b 7815 |x | Jump 0x231 ; case 0x7 021c 00da | | Load_Top At_Offset_2 021d 0091 0b36 | 6| Action Push_String_Extended_Indexed,0xb36 ; "ASSEMBLE" 021f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0220 00db | | Load_Top At_Offset_3 0221 00db | | Load_Top At_Offset_3 0222 00e0 | | Load_Encached Standard_Cache 0223 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0224 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0225 00da | | Load_Top At_Offset_2 0226 00e0 | | Load_Encached Standard_Cache 0227 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0228 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0229 00db | | Load_Top At_Offset_3 022a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 022b 00db | | Load_Top At_Offset_3 022c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 022d e20d | | Load 0x1,0xd 022e 00dc | | Load_Top At_Offset_4 022f 0267 | g | Execute Discrete,Predecessor 0230 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0231 e20d | | Load 0x1,0xd 0232 00dc | | Load_Top At_Offset_4 0233 0268 | h | Execute Discrete,Successor 0234 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0235 0000 0000 | | .XXX[0x3] 0237 0000 | | 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023b | ; | .CONST 0x023b ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0001 | | .CONST 0x0001 ; Number of locals 023b BODY_0238: 023b INIT_0238: 023b 4607 |F | Jump_Case 0x8 023c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 023d 7806 |x | Jump 0x244 ; case 0x1 023e 7809 |x | Jump 0x248 ; case 0x2 023f 780d |x | Jump 0x24d ; case 0x3 0240 7810 |x | Jump 0x251 ; case 0x4 0241 7811 |x | Jump 0x253 ; case 0x5 0242 7812 |x | Jump 0x255 ; case 0x6 0243 7815 |x | Jump 0x259 ; case 0x7 0244 00da | | Load_Top At_Offset_2 0245 0091 0b3a | :| Action Push_String_Extended_Indexed,0xb3a ; "GENERICS_SHARE_CODE" 0247 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0248 00db | | Load_Top At_Offset_3 0249 00db | | Load_Top At_Offset_3 024a 00e0 | | Load_Encached Standard_Cache 024b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 024c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 024d 00da | | Load_Top At_Offset_2 024e 00e0 | | Load_Encached Standard_Cache 024f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0250 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0251 00db | | Load_Top At_Offset_3 0252 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0253 00db | | Load_Top At_Offset_3 0254 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0255 e20f | | Load 0x1,0xf 0256 00dc | | Load_Top At_Offset_4 0257 0267 | g | Execute Discrete,Predecessor 0258 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0259 e20f | | Load 0x1,0xf 025a 00dc | | Load_Top At_Offset_4 025b 0268 | h | Execute Discrete,Successor 025c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 025d 0000 0000 | | .XXX[0x3] 025f 0000 | | 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 4607 |F | Jump_Case 0x8 0264 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0265 7806 |x | Jump 0x26c ; case 0x1 0266 7809 |x | Jump 0x270 ; case 0x2 0267 780d |x | Jump 0x275 ; case 0x3 0268 7810 |x | Jump 0x279 ; case 0x4 0269 7811 |x | Jump 0x27b ; case 0x5 026a 7812 |x | Jump 0x27d ; case 0x6 026b 7815 |x | Jump 0x281 ; case 0x7 026c 00da | | Load_Top At_Offset_2 026d 0091 0b3f | ?| Action Push_String_Extended_Indexed,0xb3f ; "ADA_NAME" 026f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0270 00db | | Load_Top At_Offset_3 0271 00db | | Load_Top At_Offset_3 0272 00e0 | | Load_Encached Standard_Cache 0273 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0274 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0275 00da | | Load_Top At_Offset_2 0276 00e0 | | Load_Encached Standard_Cache 0277 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0278 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0279 00db | | Load_Top At_Offset_3 027a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 027b 00db | | Load_Top At_Offset_3 027c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 027d e211 | | Load 0x1,0x11 027e 00dc | | Load_Top At_Offset_4 027f 0267 | g | Execute Discrete,Predecessor 0280 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0281 e211 | | Load 0x1,0x11 0282 00dc | | Load_Top At_Offset_4 0283 0268 | h | Execute Discrete,Successor 0284 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0285 0000 0000 | | .XXX[0x3] 0287 0000 | | 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b 4607 |F | Jump_Case 0x8 028c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 028d 7806 |x | Jump 0x294 ; case 0x1 028e 7809 |x | Jump 0x298 ; case 0x2 028f 780d |x | Jump 0x29d ; case 0x3 0290 7810 |x | Jump 0x2a1 ; case 0x4 0291 7811 |x | Jump 0x2a3 ; case 0x5 0292 7812 |x | Jump 0x2a5 ; case 0x6 0293 7815 |x | Jump 0x2a9 ; case 0x7 0294 00da | | Load_Top At_Offset_2 0295 0091 0b42 | B| Action Push_String_Extended_Indexed,0xb42 ; "TEXT" 0297 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0298 00db | | Load_Top At_Offset_3 0299 00db | | Load_Top At_Offset_3 029a 00e0 | | Load_Encached Standard_Cache 029b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 029c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 029d 00da | | Load_Top At_Offset_2 029e 00e0 | | Load_Encached Standard_Cache 029f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02a0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02a1 00db | | Load_Top At_Offset_3 02a2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a3 00db | | Load_Top At_Offset_3 02a4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a5 e212 | | Load 0x1,0x12 02a6 00dc | | Load_Top At_Offset_4 02a7 0267 | g | Execute Discrete,Predecessor 02a8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a9 e212 | | Load 0x1,0x12 02aa 00dc | | Load_Top At_Offset_4 02ab 0268 | h | Execute Discrete,Successor 02ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ad 0000 0000 | | .XXX[0x3] 02af 0000 | | 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 4607 |F | Jump_Case 0x8 02b4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02b5 7806 |x | Jump 0x2bc ; case 0x1 02b6 7809 |x | Jump 0x2c0 ; case 0x2 02b7 780d |x | Jump 0x2c5 ; case 0x3 02b8 7810 |x | Jump 0x2c9 ; case 0x4 02b9 7811 |x | Jump 0x2cb ; case 0x5 02ba 7812 |x | Jump 0x2cd ; case 0x6 02bb 7815 |x | Jump 0x2d1 ; case 0x7 02bc 00da | | Load_Top At_Offset_2 02bd 0091 0b44 | D| Action Push_String_Extended_Indexed,0xb44 ; "UPPER" 02bf 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02c0 00db | | Load_Top At_Offset_3 02c1 00db | | Load_Top At_Offset_3 02c2 00e0 | | Load_Encached Standard_Cache 02c3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02c4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02c5 00da | | Load_Top At_Offset_2 02c6 00e0 | | Load_Encached Standard_Cache 02c7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02c8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02c9 00db | | Load_Top At_Offset_3 02ca 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02cb 00db | | Load_Top At_Offset_3 02cc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02cd e213 | | Load 0x1,0x13 02ce 00dc | | Load_Top At_Offset_4 02cf 0267 | g | Execute Discrete,Predecessor 02d0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02d1 e213 | | Load 0x1,0x13 02d2 00dc | | Load_Top At_Offset_4 02d3 0268 | h | Execute Discrete,Successor 02d4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02d5 0000 0000 | | .XXX[0x3] 02d7 0000 | | 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db 4607 |F | Jump_Case 0x8 02dc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02dd 7806 |x | Jump 0x2e4 ; case 0x1 02de 7809 |x | Jump 0x2e8 ; case 0x2 02df 780d |x | Jump 0x2ed ; case 0x3 02e0 7810 |x | Jump 0x2f1 ; case 0x4 02e1 7811 |x | Jump 0x2f3 ; case 0x5 02e2 7812 |x | Jump 0x2f5 ; case 0x6 02e3 7815 |x | Jump 0x2f9 ; case 0x7 02e4 00da | | Load_Top At_Offset_2 02e5 0091 0b48 | H| Action Push_String_Extended_Indexed,0xb48 ; "UNIX" 02e7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02e8 00db | | Load_Top At_Offset_3 02e9 00db | | Load_Top At_Offset_3 02ea 00e0 | | Load_Encached Standard_Cache 02eb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02ec 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ed 00da | | Load_Top At_Offset_2 02ee 00e0 | | Load_Encached Standard_Cache 02ef 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02f0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02f1 00db | | Load_Top At_Offset_3 02f2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02f3 00db | | Load_Top At_Offset_3 02f4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02f5 e214 | | Load 0x1,0x14 02f6 00dc | | Load_Top At_Offset_4 02f7 0267 | g | Execute Discrete,Predecessor 02f8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02f9 e214 | | Load 0x1,0x14 02fa 00dc | | Load_Top At_Offset_4 02fb 0268 | h | Execute Discrete,Successor 02fc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02fd 0000 0000 | | .XXX[0x3] 02ff 0000 | | 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0303 | | .CONST 0x0303 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0001 | | .CONST 0x0001 ; Number of locals 0303 BODY_0300: 0303 INIT_0300: 0303 4607 |F | Jump_Case 0x8 0304 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0305 7806 |x | Jump 0x30c ; case 0x1 0306 7809 |x | Jump 0x310 ; case 0x2 0307 780d |x | Jump 0x315 ; case 0x3 0308 7810 |x | Jump 0x319 ; case 0x4 0309 7811 |x | Jump 0x31b ; case 0x5 030a 7812 |x | Jump 0x31d ; case 0x6 030b 7815 |x | Jump 0x321 ; case 0x7 030c 00da | | Load_Top At_Offset_2 030d 0091 0b54 | T| Action Push_String_Extended_Indexed,0xb54 ; "ON_NORMAL" 030f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0310 00db | | Load_Top At_Offset_3 0311 00db | | Load_Top At_Offset_3 0312 00e0 | | Load_Encached Standard_Cache 0313 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0314 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0315 00da | | Load_Top At_Offset_2 0316 00e0 | | Load_Encached Standard_Cache 0317 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0318 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0319 00db | | Load_Top At_Offset_3 031a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 031b 00db | | Load_Top At_Offset_3 031c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 031d e215 | | Load 0x1,0x15 031e 00dc | | Load_Top At_Offset_4 031f 0267 | g | Execute Discrete,Predecessor 0320 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0321 e215 | | Load 0x1,0x15 0322 00dc | | Load_Top At_Offset_4 0323 0268 | h | Execute Discrete,Successor 0324 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0325 0000 0000 | | .XXX[0x3] 0327 0000 | | 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 032b | + | .CONST 0x032b ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0001 | | .CONST 0x0001 ; Number of locals 032b BODY_0328: 032b INIT_0328: 032b 4607 |F | Jump_Case 0x8 032c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 032d 7806 |x | Jump 0x334 ; case 0x1 032e 7809 |x | Jump 0x338 ; case 0x2 032f 780d |x | Jump 0x33d ; case 0x3 0330 7810 |x | Jump 0x341 ; case 0x4 0331 7811 |x | Jump 0x343 ; case 0x5 0332 7812 |x | Jump 0x345 ; case 0x6 0333 7815 |x | Jump 0x349 ; case 0x7 0334 00da | | Load_Top At_Offset_2 0335 0091 0b58 | X| Action Push_String_Extended_Indexed,0xb58 ; "DTIA" 0337 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0338 00db | | Load_Top At_Offset_3 0339 00db | | Load_Top At_Offset_3 033a 00e0 | | Load_Encached Standard_Cache 033b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 033c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 033d 00da | | Load_Top At_Offset_2 033e 00e0 | | Load_Encached Standard_Cache 033f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0340 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0341 00db | | Load_Top At_Offset_3 0342 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0343 00db | | Load_Top At_Offset_3 0344 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0345 e216 | | Load 0x1,0x16 0346 00dc | | Load_Top At_Offset_4 0347 0267 | g | Execute Discrete,Predecessor 0348 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0349 e216 | | Load 0x1,0x16 034a 00dc | | Load_Top At_Offset_4 034b 0268 | h | Execute Discrete,Successor 034c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 034d 0000 0000 | | .XXX[0x3] 034f 0000 | | 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0357 | W | .CONST 0x0357 ; Address of begin 0351 0389 | | .CONST 0x0389 ; Address of exception handler 0352 0003 | | .CONST 0x0003 ; Number of locals 0353 INIT_0350: 0353 e005 | | Load 0x0,0x5 0354 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0355 e21b | | Load 0x1,0x1b 0356 0007 | | Action Break_Optional 0357 BODY_0350: 0357 e5f7 | | Load 0x2,-0x9 0358 e006 | | Load 0x0,0x6 0359 180f | | Execute Package,Field_Execute,Field_Number 0xf 035a 0032 | 2 | Store_Top Heap_Access,At_Offset_2 035b e21b | | Load 0x1,0x1b 035c 00da | | Load_Top At_Offset_2 035d 039c | | Declare_Variable Heap_Access,By_Allocation 035e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 035f 00d9 | | Load_Top At_Offset_1 0360 e5ff | | Load 0x2,-0x1 0361 8270 | p | Call 0x1,0x70 0362 00d9 | | Load_Top At_Offset_1 0363 0217 | | Execute Heap_Access,All_Reference 0364 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0365 e5fe | | Load 0x2,-0x2 0366 00d9 | | Load_Top At_Offset_1 0367 0217 | | Execute Heap_Access,All_Reference 0368 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0369 e5fd | | Load 0x2,-0x3 036a 00d9 | | Load_Top At_Offset_1 036b 0217 | | Execute Heap_Access,All_Reference 036c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 036d 00d9 | | Load_Top At_Offset_1 036e e5fc | | Load 0x2,-0x4 036f 8270 | p | Call 0x1,0x70 0370 00d9 | | Load_Top At_Offset_1 0371 0217 | | Execute Heap_Access,All_Reference 0372 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0373 00d9 | | Load_Top At_Offset_1 0374 e5fb | | Load 0x2,-0x5 0375 8270 | p | Call 0x1,0x70 0376 00d9 | | Load_Top At_Offset_1 0377 0217 | | Execute Heap_Access,All_Reference 0378 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0379 e5fa | | Load 0x2,-0x6 037a 00d9 | | Load_Top At_Offset_1 037b 0217 | | Execute Heap_Access,All_Reference 037c 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 037d e5f9 | | Load 0x2,-0x7 037e 00d9 | | Load_Top At_Offset_1 037f 0217 | | Execute Heap_Access,All_Reference 0380 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0381 00d9 | | Load_Top At_Offset_1 0382 e5f8 | | Load 0x2,-0x8 0383 8270 | p | Call 0x1,0x70 0384 00d9 | | Load_Top At_Offset_1 0385 0217 | | Execute Heap_Access,All_Reference 0386 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0387 00d8 | | Load_Top At_Offset_0 0388 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9 0389 TRAP_0350: 0389 e006 | | Load 0x0,0x6 038a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 038b 010f | | Execute Exception,Equal 038c 6802 |h | Jump_Zero 0x38f 038d e21a | | Load 0x1,0x1a 038e 0257 | W | Execute Discrete,Raise 038f e006 | | Load 0x0,0x6 0390 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0391 010f | | Execute Exception,Equal 0392 6802 |h | Jump_Zero 0x395 0393 e219 | | Load 0x1,0x19 0394 0257 | W | Execute Discrete,Raise 0395 0100 | | Execute Exception,Raise 0396 0000 0000 | | .XXX[0x2] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039b | | .CONST 0x039b ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0001 | | .CONST 0x0001 ; Number of locals 039b BODY_0398: 039b INIT_0398: 039b 00da | | Load_Top At_Offset_2 039c e21b | | Load 0x1,0x1b 039d 021f | | Execute Heap_Access,Equal 039e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 039f 0000 | | .XXX[0x1] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a3 | | .CONST 0x03a3 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0001 | | .CONST 0x0001 ; Number of locals 03a3 BODY_03a0: 03a3 INIT_03a0: 03a3 00da | | Load_Top At_Offset_2 03a4 821e | | Call 0x1,0x1e 03a5 6802 |h | Jump_Zero 0x3a8 03a6 e217 | | Load 0x1,0x17 03a7 0257 | W | Execute Discrete,Raise 03a8 00da | | Load_Top At_Offset_2 03a9 0217 | | Execute Heap_Access,All_Reference 03aa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03ab 0217 | | Execute Heap_Access,All_Reference 03ac 0335 | 5 | Declare_Variable Array,Duplicate 03ad 00cd | | Action Spare6_Action 03ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03af 0000 | | .XXX[0x1] 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03b3 | | .CONST 0x03b3 ; Address of begin 03b1 0004 | | .CONST 0x0004 ; Address of exception handler 03b2 0001 | | .CONST 0x0001 ; Number of locals 03b3 BODY_03b0: 03b3 INIT_03b0: 03b3 00da | | Load_Top At_Offset_2 03b4 821e | | Call 0x1,0x1e 03b5 6802 |h | Jump_Zero 0x3b8 03b6 e217 | | Load 0x1,0x17 03b7 0257 | W | Execute Discrete,Raise 03b8 00da | | Load_Top At_Offset_2 03b9 0217 | | Execute Heap_Access,All_Reference 03ba 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03bb 0335 | 5 | Declare_Variable Array,Duplicate 03bc 00cd | | Action Spare6_Action 03bd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03be 0000 0000 | | .XXX[0x2] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c3 | | .CONST 0x03c3 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0001 | | .CONST 0x0001 ; Number of locals 03c3 BODY_03c0: 03c3 INIT_03c0: 03c3 00da | | Load_Top At_Offset_2 03c4 821e | | Call 0x1,0x1e 03c5 6802 |h | Jump_Zero 0x3c8 03c6 e217 | | Load 0x1,0x17 03c7 0257 | W | Execute Discrete,Raise 03c8 00da | | Load_Top At_Offset_2 03c9 0217 | | Execute Heap_Access,All_Reference 03ca 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03cc 0000 0000 | | .BLANK 0000[0x4] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03d3 | | .CONST 0x03d3 ; Address of begin 03d1 0004 | | .CONST 0x0004 ; Address of exception handler 03d2 0001 | | .CONST 0x0001 ; Number of locals 03d3 BODY_03d0: 03d3 INIT_03d0: 03d3 00da | | Load_Top At_Offset_2 03d4 821e | | Call 0x1,0x1e 03d5 6802 |h | Jump_Zero 0x3d8 03d6 e217 | | Load 0x1,0x17 03d7 0257 | W | Execute Discrete,Raise 03d8 00da | | Load_Top At_Offset_2 03d9 0217 | | Execute Heap_Access,All_Reference 03da 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 03db 0217 | | Execute Heap_Access,All_Reference 03dc 0335 | 5 | Declare_Variable Array,Duplicate 03dd 00cd | | Action Spare6_Action 03de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03df 0000 | | .XXX[0x1] 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03e3 | | .CONST 0x03e3 ; Address of begin 03e1 0004 | | .CONST 0x0004 ; Address of exception handler 03e2 0001 | | .CONST 0x0001 ; Number of locals 03e3 BODY_03e0: 03e3 INIT_03e0: 03e3 00da | | Load_Top At_Offset_2 03e4 821e | | Call 0x1,0x1e 03e5 6802 |h | Jump_Zero 0x3e8 03e6 e217 | | Load 0x1,0x17 03e7 0257 | W | Execute Discrete,Raise 03e8 00da | | Load_Top At_Offset_2 03e9 0217 | | Execute Heap_Access,All_Reference 03ea 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 03eb 0217 | | Execute Heap_Access,All_Reference 03ec 0335 | 5 | Declare_Variable Array,Duplicate 03ed 00cd | | Action Spare6_Action 03ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ef 0000 | | .XXX[0x1] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00da | | Load_Top At_Offset_2 03f4 821e | | Call 0x1,0x1e 03f5 6802 |h | Jump_Zero 0x3f8 03f6 e217 | | Load 0x1,0x17 03f7 0257 | W | Execute Discrete,Raise 03f8 00da | | Load_Top At_Offset_2 03f9 0217 | | Execute Heap_Access,All_Reference 03fa 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 03fb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03fc 0000 0000 | | .BLANK 0000[0x4] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 0403 | | .CONST 0x0403 ; Address of begin 0401 0004 | | .CONST 0x0004 ; Address of exception handler 0402 0001 | | .CONST 0x0001 ; Number of locals 0403 BODY_0400: 0403 INIT_0400: 0403 00da | | Load_Top At_Offset_2 0404 821e | | Call 0x1,0x1e 0405 6802 |h | Jump_Zero 0x408 0406 e217 | | Load 0x1,0x17 0407 0257 | W | Execute Discrete,Raise 0408 00da | | Load_Top At_Offset_2 0409 0217 | | Execute Heap_Access,All_Reference 040a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 040b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 040c 0000 0000 | | .BLANK 0000[0x4] 0410 ; -------------------------------------------------------------------------------------- 0410 ; SUBPROGRAM 0410 ; -------------------------------------------------------------------------------------- 0410 0413 | | .CONST 0x0413 ; Address of begin 0411 0004 | | .CONST 0x0004 ; Address of exception handler 0412 0001 | | .CONST 0x0001 ; Number of locals 0413 BODY_0410: 0413 INIT_0410: 0413 00da | | Load_Top At_Offset_2 0414 821e | | Call 0x1,0x1e 0415 6802 |h | Jump_Zero 0x418 0416 e217 | | Load 0x1,0x17 0417 0257 | W | Execute Discrete,Raise 0418 00da | | Load_Top At_Offset_2 0419 0217 | | Execute Heap_Access,All_Reference 041a 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 041b 0217 | | Execute Heap_Access,All_Reference 041c 0335 | 5 | Declare_Variable Array,Duplicate 041d 00cd | | Action Spare6_Action 041e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 041f 0000 | | .XXX[0x1] 0420 ; -------------------------------------------------------------------------------------- 0420 ; SUBPROGRAM 0420 ; -------------------------------------------------------------------------------------- 0420 0423 | # | .CONST 0x0423 ; Address of begin 0421 0004 | | .CONST 0x0004 ; Address of exception handler 0422 0001 | | .CONST 0x0001 ; Number of locals 0423 BODY_0420: 0423 INIT_0420: 0423 00da | | Load_Top At_Offset_2 0424 021d | | Execute Heap_Access,Is_Null 0425 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0426 0000 0000 | | .XXX[0x2] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042f | / | .CONST 0x042f ; Address of begin 0429 0469 | i | .CONST 0x0469 ; Address of exception handler 042a 0003 | | .CONST 0x0003 ; Number of locals 042b INIT_0428: 042b e005 | | Load 0x0,0x5 042c 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 042d e228 | ( | Load 0x1,0x28 042e 0007 | | Action Break_Optional 042f BODY_0428: 042f e5f5 | | Load 0x2,-0xb 0430 e006 | | Load 0x0,0x6 0431 180f | | Execute Package,Field_Execute,Field_Number 0xf 0432 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0433 e228 | ( | Load 0x1,0x28 0434 00da | | Load_Top At_Offset_2 0435 039c | | Declare_Variable Heap_Access,By_Allocation 0436 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0437 e5ff | | Load 0x2,-0x1 0438 00d9 | | Load_Top At_Offset_1 0439 0217 | | Execute Heap_Access,All_Reference 043a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 043b e5fe | | Load 0x2,-0x2 043c 00d9 | | Load_Top At_Offset_1 043d 0217 | | Execute Heap_Access,All_Reference 043e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 043f e5fd | | Load 0x2,-0x3 0440 00d9 | | Load_Top At_Offset_1 0441 0217 | | Execute Heap_Access,All_Reference 0442 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0443 e5fc | | Load 0x2,-0x4 0444 00d9 | | Load_Top At_Offset_1 0445 0217 | | Execute Heap_Access,All_Reference 0446 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0447 00d9 | | Load_Top At_Offset_1 0448 e5fb | | Load 0x2,-0x5 0449 8270 | p | Call 0x1,0x70 044a 00d9 | | Load_Top At_Offset_1 044b 0217 | | Execute Heap_Access,All_Reference 044c 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 044d 00d9 | | Load_Top At_Offset_1 044e e5fa | | Load 0x2,-0x6 044f 8270 | p | Call 0x1,0x70 0450 00d9 | | Load_Top At_Offset_1 0451 0217 | | Execute Heap_Access,All_Reference 0452 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0453 e5f9 | | Load 0x2,-0x7 0454 00d9 | | Load_Top At_Offset_1 0455 0217 | | Execute Heap_Access,All_Reference 0456 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0457 e5f8 | | Load 0x2,-0x8 0458 00d9 | | Load_Top At_Offset_1 0459 0217 | | Execute Heap_Access,All_Reference 045a 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 045b 00d9 | | Load_Top At_Offset_1 045c e5f7 | | Load 0x2,-0x9 045d 8270 | p | Call 0x1,0x70 045e 00d9 | | Load_Top At_Offset_1 045f 0217 | | Execute Heap_Access,All_Reference 0460 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0461 00d9 | | Load_Top At_Offset_1 0462 e5f6 | | Load 0x2,-0xa 0463 8270 | p | Call 0x1,0x70 0464 00d9 | | Load_Top At_Offset_1 0465 0217 | | Execute Heap_Access,All_Reference 0466 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0467 00d8 | | Load_Top At_Offset_0 0468 440b |D | Exit_Subprogram With_Value,New_Top_Offset 0xb 0469 TRAP_0428: 0469 e006 | | Load 0x0,0x6 046a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 046b 010f | | Execute Exception,Equal 046c 6802 |h | Jump_Zero 0x46f 046d e21a | | Load 0x1,0x1a 046e 0257 | W | Execute Discrete,Raise 046f e006 | | Load 0x0,0x6 0470 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0471 010f | | Execute Exception,Equal 0472 6802 |h | Jump_Zero 0x475 0473 e219 | | Load 0x1,0x19 0474 0257 | W | Execute Discrete,Raise 0475 0100 | | Execute Exception,Raise 0476 0000 0000 | | .XXX[0x2] 0478 ; -------------------------------------------------------------------------------------- 0478 ; SUBPROGRAM 0478 ; -------------------------------------------------------------------------------------- 0478 047b | { | .CONST 0x047b ; Address of begin 0479 0004 | | .CONST 0x0004 ; Address of exception handler 047a 0001 | | .CONST 0x0001 ; Number of locals 047b BODY_0478: 047b INIT_0478: 047b 00da | | Load_Top At_Offset_2 047c 822a | * | Call 0x1,0x2a 047d 6802 |h | Jump_Zero 0x480 047e e217 | | Load 0x1,0x17 047f 0257 | W | Execute Discrete,Raise 0480 00da | | Load_Top At_Offset_2 0481 0217 | | Execute Heap_Access,All_Reference 0482 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0483 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0484 0000 0000 | | .BLANK 0000[0x4] 0488 ; -------------------------------------------------------------------------------------- 0488 ; SUBPROGRAM 0488 ; -------------------------------------------------------------------------------------- 0488 048b | | .CONST 0x048b ; Address of begin 0489 0004 | | .CONST 0x0004 ; Address of exception handler 048a 0001 | | .CONST 0x0001 ; Number of locals 048b BODY_0488: 048b INIT_0488: 048b 00da | | Load_Top At_Offset_2 048c 822a | * | Call 0x1,0x2a 048d 6802 |h | Jump_Zero 0x490 048e e217 | | Load 0x1,0x17 048f 0257 | W | Execute Discrete,Raise 0490 00da | | Load_Top At_Offset_2 0491 0217 | | Execute Heap_Access,All_Reference 0492 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0493 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0494 0000 0000 | | .BLANK 0000[0x4] 0498 ; -------------------------------------------------------------------------------------- 0498 ; SUBPROGRAM 0498 ; -------------------------------------------------------------------------------------- 0498 049b | | .CONST 0x049b ; Address of begin 0499 0004 | | .CONST 0x0004 ; Address of exception handler 049a 0001 | | .CONST 0x0001 ; Number of locals 049b BODY_0498: 049b INIT_0498: 049b 00da | | Load_Top At_Offset_2 049c 822a | * | Call 0x1,0x2a 049d 6802 |h | Jump_Zero 0x4a0 049e e217 | | Load 0x1,0x17 049f 0257 | W | Execute Discrete,Raise 04a0 00da | | Load_Top At_Offset_2 04a1 0217 | | Execute Heap_Access,All_Reference 04a2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04a4 0000 0000 | | .BLANK 0000[0x4] 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04ab | | .CONST 0x04ab ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0001 | | .CONST 0x0001 ; Number of locals 04ab BODY_04a8: 04ab INIT_04a8: 04ab 00da | | Load_Top At_Offset_2 04ac 822a | * | Call 0x1,0x2a 04ad 6802 |h | Jump_Zero 0x4b0 04ae e217 | | Load 0x1,0x17 04af 0257 | W | Execute Discrete,Raise 04b0 00da | | Load_Top At_Offset_2 04b1 0217 | | Execute Heap_Access,All_Reference 04b2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 04b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04b4 0000 0000 | | .BLANK 0000[0x4] 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04bb | | .CONST 0x04bb ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0001 | | .CONST 0x0001 ; Number of locals 04bb BODY_04b8: 04bb INIT_04b8: 04bb 00da | | Load_Top At_Offset_2 04bc 822a | * | Call 0x1,0x2a 04bd 6802 |h | Jump_Zero 0x4c0 04be e217 | | Load 0x1,0x17 04bf 0257 | W | Execute Discrete,Raise 04c0 00da | | Load_Top At_Offset_2 04c1 0217 | | Execute Heap_Access,All_Reference 04c2 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 04c3 0217 | | Execute Heap_Access,All_Reference 04c4 0335 | 5 | Declare_Variable Array,Duplicate 04c5 00cd | | Action Spare6_Action 04c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04c7 0000 | | .XXX[0x1] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cb | | .CONST 0x04cb ; Address of begin 04c9 0004 | | .CONST 0x0004 ; Address of exception handler 04ca 0001 | | .CONST 0x0001 ; Number of locals 04cb BODY_04c8: 04cb INIT_04c8: 04cb 00da | | Load_Top At_Offset_2 04cc 822a | * | Call 0x1,0x2a 04cd 6802 |h | Jump_Zero 0x4d0 04ce e217 | | Load 0x1,0x17 04cf 0257 | W | Execute Discrete,Raise 04d0 00da | | Load_Top At_Offset_2 04d1 0217 | | Execute Heap_Access,All_Reference 04d2 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 04d3 0217 | | Execute Heap_Access,All_Reference 04d4 0335 | 5 | Declare_Variable Array,Duplicate 04d5 00cd | | Action Spare6_Action 04d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04d7 0000 | | .XXX[0x1] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04db | | .CONST 0x04db ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0001 | | .CONST 0x0001 ; Number of locals 04db BODY_04d8: 04db INIT_04d8: 04db 00da | | Load_Top At_Offset_2 04dc 822a | * | Call 0x1,0x2a 04dd 6802 |h | Jump_Zero 0x4e0 04de e217 | | Load 0x1,0x17 04df 0257 | W | Execute Discrete,Raise 04e0 00da | | Load_Top At_Offset_2 04e1 0217 | | Execute Heap_Access,All_Reference 04e2 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 04e3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04e4 0000 0000 | | .BLANK 0000[0x4] 04e8 ; -------------------------------------------------------------------------------------- 04e8 ; SUBPROGRAM 04e8 ; -------------------------------------------------------------------------------------- 04e8 04eb | | .CONST 0x04eb ; Address of begin 04e9 0004 | | .CONST 0x0004 ; Address of exception handler 04ea 0001 | | .CONST 0x0001 ; Number of locals 04eb BODY_04e8: 04eb INIT_04e8: 04eb 00da | | Load_Top At_Offset_2 04ec 822a | * | Call 0x1,0x2a 04ed 6802 |h | Jump_Zero 0x4f0 04ee e217 | | Load 0x1,0x17 04ef 0257 | W | Execute Discrete,Raise 04f0 00da | | Load_Top At_Offset_2 04f1 0217 | | Execute Heap_Access,All_Reference 04f2 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 04f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04f4 0000 0000 | | .BLANK 0000[0x4] 04f8 ; -------------------------------------------------------------------------------------- 04f8 ; SUBPROGRAM 04f8 ; -------------------------------------------------------------------------------------- 04f8 04fb | | .CONST 0x04fb ; Address of begin 04f9 0004 | | .CONST 0x0004 ; Address of exception handler 04fa 0001 | | .CONST 0x0001 ; Number of locals 04fb BODY_04f8: 04fb INIT_04f8: 04fb 00da | | Load_Top At_Offset_2 04fc 822a | * | Call 0x1,0x2a 04fd 6802 |h | Jump_Zero 0x500 04fe e217 | | Load 0x1,0x17 04ff 0257 | W | Execute Discrete,Raise 0500 00da | | Load_Top At_Offset_2 0501 0217 | | Execute Heap_Access,All_Reference 0502 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0503 0217 | | Execute Heap_Access,All_Reference 0504 0335 | 5 | Declare_Variable Array,Duplicate 0505 00cd | | Action Spare6_Action 0506 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0507 0000 | | .XXX[0x1] 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 050b | | .CONST 0x050b ; Address of begin 0509 0004 | | .CONST 0x0004 ; Address of exception handler 050a 0001 | | .CONST 0x0001 ; Number of locals 050b BODY_0508: 050b INIT_0508: 050b 00da | | Load_Top At_Offset_2 050c 822a | * | Call 0x1,0x2a 050d 6802 |h | Jump_Zero 0x510 050e e217 | | Load 0x1,0x17 050f 0257 | W | Execute Discrete,Raise 0510 00da | | Load_Top At_Offset_2 0511 0217 | | Execute Heap_Access,All_Reference 0512 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 0513 0217 | | Execute Heap_Access,All_Reference 0514 0335 | 5 | Declare_Variable Array,Duplicate 0515 00cd | | Action Spare6_Action 0516 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0517 0000 | | .XXX[0x1] 0518 ; -------------------------------------------------------------------------------------- 0518 ; SUBPROGRAM 0518 ; -------------------------------------------------------------------------------------- 0518 051b | | .CONST 0x051b ; Address of begin 0519 0004 | | .CONST 0x0004 ; Address of exception handler 051a 0001 | | .CONST 0x0001 ; Number of locals 051b BODY_0518: 051b INIT_0518: 051b 00da | | Load_Top At_Offset_2 051c 021d | | Execute Heap_Access,Is_Null 051d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 051e 0000 0000 | | .XXX[0x2] 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 052b | + | .CONST 0x052b ; Address of begin 0521 0610 | | .CONST 0x0610 ; Address of exception handler 0522 0005 | | .CONST 0x0005 ; Number of locals 0523 INIT_0520: 0523 e005 | | Load 0x0,0x5 0524 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0525 e26c | l | Load 0x1,0x6c 0526 0007 | | Action Break_Optional 0527 e26e | n | Load 0x1,0x6e 0528 0007 | | Action Break_Optional 0529 e237 | 7 | Load 0x1,0x37 052a 0007 | | Action Break_Optional 052b BODY_0520: 052b e5da | | Load 0x2,-0x26 052c e006 | | Load 0x0,0x6 052d 180f | | Execute Package,Field_Execute,Field_Number 0xf 052e a402 | | Store_Unchecked 0x2,0x2 052f e5df | | Load 0x2,-0x21 0530 e26c | l | Load 0x1,0x6c 0531 e402 | | Load 0x2,0x2 0532 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 0533 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0534 e5db | | Load 0x2,-0x25 0535 e26e | n | Load 0x1,0x6e 0536 e402 | | Load 0x2,0x2 0537 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 0538 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0539 e237 | 7 | Load 0x1,0x37 053a e402 | | Load 0x2,0x2 053b 039c | | Declare_Variable Heap_Access,By_Allocation 053c 00d8 | | Load_Top At_Offset_0 053d 0217 | | Execute Heap_Access,All_Reference 053e 1c00 | | Execute_Immediate Run_Utility,0x0 053f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0540 e5ff | | Load 0x2,-0x1 0541 00d9 | | Load_Top At_Offset_1 0542 0217 | | Execute Heap_Access,All_Reference 0543 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0544 e5fe | | Load 0x2,-0x2 0545 00d9 | | Load_Top At_Offset_1 0546 0217 | | Execute Heap_Access,All_Reference 0547 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0548 e5fd | | Load 0x2,-0x3 0549 00d9 | | Load_Top At_Offset_1 054a 0217 | | Execute Heap_Access,All_Reference 054b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 054c 00db | | Load_Top At_Offset_3 054d e5fc | | Load 0x2,-0x4 054e 8270 | p | Call 0x1,0x70 054f 00d9 | | Load_Top At_Offset_1 0550 0217 | | Execute Heap_Access,All_Reference 0551 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0552 00db | | Load_Top At_Offset_3 0553 e5fb | | Load 0x2,-0x5 0554 8270 | p | Call 0x1,0x70 0555 00d9 | | Load_Top At_Offset_1 0556 0217 | | Execute Heap_Access,All_Reference 0557 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0558 00db | | Load_Top At_Offset_3 0559 e5fa | | Load 0x2,-0x6 055a 8270 | p | Call 0x1,0x70 055b 00d9 | | Load_Top At_Offset_1 055c 0217 | | Execute Heap_Access,All_Reference 055d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 055e 00db | | Load_Top At_Offset_3 055f e5e2 | | Load 0x2,-0x1e 0560 8270 | p | Call 0x1,0x70 0561 00d9 | | Load_Top At_Offset_1 0562 0217 | | Execute Heap_Access,All_Reference 0563 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0564 00db | | Load_Top At_Offset_3 0565 e5e1 | | Load 0x2,-0x1f 0566 8270 | p | Call 0x1,0x70 0567 00d9 | | Load_Top At_Offset_1 0568 0217 | | Execute Heap_Access,All_Reference 0569 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 056a 00db | | Load_Top At_Offset_3 056b e5e0 | | Load 0x2,-0x20 056c 8270 | p | Call 0x1,0x70 056d 00d9 | | Load_Top At_Offset_1 056e 0217 | | Execute Heap_Access,All_Reference 056f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0570 00db | | Load_Top At_Offset_3 0571 e5de | | Load 0x2,-0x22 0572 8270 | p | Call 0x1,0x70 0573 00d9 | | Load_Top At_Offset_1 0574 0217 | | Execute Heap_Access,All_Reference 0575 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0576 00db | | Load_Top At_Offset_3 0577 e5dd | | Load 0x2,-0x23 0578 8270 | p | Call 0x1,0x70 0579 00d9 | | Load_Top At_Offset_1 057a 0217 | | Execute Heap_Access,All_Reference 057b 380a |8 | Execute Record,Field_Write,Field_Number 0xa 057c 00db | | Load_Top At_Offset_3 057d e5dc | | Load 0x2,-0x24 057e 8270 | p | Call 0x1,0x70 057f 00d9 | | Load_Top At_Offset_1 0580 0217 | | Execute Heap_Access,All_Reference 0581 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0582 00db | | Load_Top At_Offset_3 0583 e5f9 | | Load 0x2,-0x7 0584 8270 | p | Call 0x1,0x70 0585 00d9 | | Load_Top At_Offset_1 0586 0217 | | Execute Heap_Access,All_Reference 0587 380c |8 | Execute Record,Field_Write,Field_Number 0xc 0588 00db | | Load_Top At_Offset_3 0589 e5f8 | | Load 0x2,-0x8 058a 8270 | p | Call 0x1,0x70 058b 00d9 | | Load_Top At_Offset_1 058c 0217 | | Execute Heap_Access,All_Reference 058d 380d |8 | Execute Record,Field_Write,Field_Number 0xd 058e 00db | | Load_Top At_Offset_3 058f e5f7 | | Load 0x2,-0x9 0590 8270 | p | Call 0x1,0x70 0591 00d9 | | Load_Top At_Offset_1 0592 0217 | | Execute Heap_Access,All_Reference 0593 380e |8 | Execute Record,Field_Write,Field_Number 0xe 0594 00db | | Load_Top At_Offset_3 0595 e5f6 | | Load 0x2,-0xa 0596 8270 | p | Call 0x1,0x70 0597 00d9 | | Load_Top At_Offset_1 0598 0217 | | Execute Heap_Access,All_Reference 0599 380f |8 | Execute Record,Field_Write,Field_Number 0xf 059a e5f5 | | Load 0x2,-0xb 059b 00d9 | | Load_Top At_Offset_1 059c 0217 | | Execute Heap_Access,All_Reference 059d 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 059e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 059f e5f4 | | Load 0x2,-0xc 05a0 00d9 | | Load_Top At_Offset_1 05a1 0217 | | Execute Heap_Access,All_Reference 05a2 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 05a3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 05a4 e5f3 | | Load 0x2,-0xd 05a5 00d9 | | Load_Top At_Offset_1 05a6 0217 | | Execute Heap_Access,All_Reference 05a7 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 05a8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 05a9 00db | | Load_Top At_Offset_3 05aa e5f2 | | Load 0x2,-0xe 05ab 8270 | p | Call 0x1,0x70 05ac 00d9 | | Load_Top At_Offset_1 05ad 0217 | | Execute Heap_Access,All_Reference 05ae 3411 |4 | Execute Record,Field_Reference,Field_Number 0x11 05af 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05b0 00db | | Load_Top At_Offset_3 05b1 e5f1 | | Load 0x2,-0xf 05b2 8270 | p | Call 0x1,0x70 05b3 00d9 | | Load_Top At_Offset_1 05b4 0217 | | Execute Heap_Access,All_Reference 05b5 3819 |8 | Execute Record,Field_Write,Field_Number 0x19 05b6 00db | | Load_Top At_Offset_3 05b7 e5f0 | | Load 0x2,-0x10 05b8 8270 | p | Call 0x1,0x70 05b9 00d9 | | Load_Top At_Offset_1 05ba 0217 | | Execute Heap_Access,All_Reference 05bb 381a |8 | Execute Record,Field_Write,Field_Number 0x1a 05bc 00db | | Load_Top At_Offset_3 05bd e5ef | | Load 0x2,-0x11 05be 8270 | p | Call 0x1,0x70 05bf 00d9 | | Load_Top At_Offset_1 05c0 0217 | | Execute Heap_Access,All_Reference 05c1 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12 05c2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05c3 00db | | Load_Top At_Offset_3 05c4 e5ee | | Load 0x2,-0x12 05c5 8270 | p | Call 0x1,0x70 05c6 00d9 | | Load_Top At_Offset_1 05c7 0217 | | Execute Heap_Access,All_Reference 05c8 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 05c9 00db | | Load_Top At_Offset_3 05ca e5ed | | Load 0x2,-0x13 05cb 8270 | p | Call 0x1,0x70 05cc 00d9 | | Load_Top At_Offset_1 05cd 0217 | | Execute Heap_Access,All_Reference 05ce 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 05cf 00db | | Load_Top At_Offset_3 05d0 e5ec | | Load 0x2,-0x14 05d1 8270 | p | Call 0x1,0x70 05d2 00d9 | | Load_Top At_Offset_1 05d3 0217 | | Execute Heap_Access,All_Reference 05d4 3817 |8 | Execute Record,Field_Write,Field_Number 0x17 05d5 e5eb | | Load 0x2,-0x15 05d6 00d9 | | Load_Top At_Offset_1 05d7 0217 | | Execute Heap_Access,All_Reference 05d8 3818 |8 | Execute Record,Field_Write,Field_Number 0x18 05d9 00db | | Load_Top At_Offset_3 05da e5ea | | Load 0x2,-0x16 05db 8270 | p | Call 0x1,0x70 05dc 00d9 | | Load_Top At_Offset_1 05dd 0217 | | Execute Heap_Access,All_Reference 05de 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13 05df 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05e0 00db | | Load_Top At_Offset_3 05e1 e5e9 | | Load 0x2,-0x17 05e2 8270 | p | Call 0x1,0x70 05e3 00d9 | | Load_Top At_Offset_1 05e4 0217 | | Execute Heap_Access,All_Reference 05e5 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14 05e6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05e7 00db | | Load_Top At_Offset_3 05e8 e5e8 | | Load 0x2,-0x18 05e9 8270 | p | Call 0x1,0x70 05ea 00d9 | | Load_Top At_Offset_1 05eb 0217 | | Execute Heap_Access,All_Reference 05ec 381b |8 | Execute Record,Field_Write,Field_Number 0x1b 05ed e5e7 | | Load 0x2,-0x19 05ee 00d9 | | Load_Top At_Offset_1 05ef 0217 | | Execute Heap_Access,All_Reference 05f0 341c |4 | Execute Record,Field_Reference,Field_Number 0x1c 05f1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 05f2 e5e6 | | Load 0x2,-0x1a 05f3 00d9 | | Load_Top At_Offset_1 05f4 0217 | | Execute Heap_Access,All_Reference 05f5 341c |4 | Execute Record,Field_Reference,Field_Number 0x1c 05f6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 05f7 00db | | Load_Top At_Offset_3 05f8 e5e5 | | Load 0x2,-0x1b 05f9 8270 | p | Call 0x1,0x70 05fa 00d9 | | Load_Top At_Offset_1 05fb 0217 | | Execute Heap_Access,All_Reference 05fc 341c |4 | Execute Record,Field_Reference,Field_Number 0x1c 05fd 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 05fe e5e4 | | Load 0x2,-0x1c 05ff 00d9 | | Load_Top At_Offset_1 0600 0217 | | Execute Heap_Access,All_Reference 0601 381d |8 | Execute Record,Field_Write,Field_Number 0x1d 0602 e5e3 | | Load 0x2,-0x1d 0603 00d9 | | Load_Top At_Offset_1 0604 0217 | | Execute Heap_Access,All_Reference 0605 381e |8 | Execute Record,Field_Write,Field_Number 0x1e 0606 00da | | Load_Top At_Offset_2 0607 00d9 | | Load_Top At_Offset_1 0608 0217 | | Execute Heap_Access,All_Reference 0609 381f |8 | Execute Record,Field_Write,Field_Number 0x1f 060a 00d9 | | Load_Top At_Offset_1 060b 00d9 | | Load_Top At_Offset_1 060c 0217 | | Execute Heap_Access,All_Reference 060d 3820 |8 | Execute Record,Field_Write,Field_Number 0x20 060e 00d8 | | Load_Top At_Offset_0 060f 4426 |D& | Exit_Subprogram With_Value,New_Top_Offset 0x26 0610 TRAP_0520: 0610 e006 | | Load 0x0,0x6 0611 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0612 010f | | Execute Exception,Equal 0613 6802 |h | Jump_Zero 0x616 0614 e21a | | Load 0x1,0x1a 0615 0257 | W | Execute Discrete,Raise 0616 e006 | | Load 0x0,0x6 0617 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0618 010f | | Execute Exception,Equal 0619 6802 |h | Jump_Zero 0x61c 061a e219 | | Load 0x1,0x19 061b 0257 | W | Execute Discrete,Raise 061c 0100 | | Execute Exception,Raise 061d 0000 0000 | | .XXX[0x3] 061f 0000 | | 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 00db | | Load_Top At_Offset_3 0624 e007 | | Load 0x0,0x7 0625 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0626 c5fe | | Store 0x2,-0x2 0627 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 0633 | 3 | .CONST 0x0633 ; Address of begin 0629 0004 | | .CONST 0x0004 ; Address of exception handler 062a 0005 | | .CONST 0x0005 ; Number of locals 062b INIT_0628: 062b 029f 09cb | | Declare_Subprogram INIT_09c8,For_Call 062d 029f 0a2b | +| Declare_Subprogram INIT_0a28,For_Call 062f 029f 0a8b | | Declare_Subprogram INIT_0a88,For_Call 0631 029f 0abb | | Declare_Subprogram INIT_0ab8,For_Call 0633 BODY_0628: 0633 e5ff | | Load 0x2,-0x1 0634 8239 | 9 | Call 0x1,0x39 0635 6805 |h | Jump_Zero 0x63b 0636 0092 0b5a | Z| Action Push_String_Extended,0xb5a ; "No Operational Characteristics Customizations." 0638 e008 | | Load 0x0,0x8 0639 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 063a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 063b 0092 0b5b | [| Action Push_String_Extended,0xb5b ; "Operational Characteristics Customizations: " 063d e008 | | Load 0x0,0x8 063e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 063f 0092 0b5c | \| Action Push_String_Extended,0xb5c ; " Properties => " 0641 e008 | | Load 0x0,0x8 0642 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0643 00cf | | Action Mark_Auxiliary 0644 e20f | | Load 0x1,0xf 0645 0265 | e | Execute Discrete,Reverse_Bounds 0646 0007 | | Action Break_Optional 0647 0092 0b5d | ]| Action Push_String_Extended,0xb5d ; " " 0649 00d9 | | Load_Top At_Offset_1 064a e20f | | Load 0x1,0xf 064b 011c | | Execute Any,Convert_Unchecked 064c 1c01 | | Execute_Immediate Run_Utility,0x1 064d 01cc | | Execute Vector,Catenate 064e 0092 0b5e | ^| Action Push_String_Extended,0xb5e ; " => " 0650 01cc | | Execute Vector,Catenate 0651 00d9 | | Load_Top At_Offset_1 0652 e5ff | | Load 0x2,-0x1 0653 0217 | | Execute Heap_Access,All_Reference 0654 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0655 01d7 | | Execute Vector,Field_Read 0656 00e1 | | Load_Encached Boolean_Cache 0657 011c | | Execute Any,Convert_Unchecked 0658 1c01 | | Execute_Immediate Run_Utility,0x1 0659 01cc | | Execute Vector,Catenate 065a e008 | | Load 0x0,0x8 065b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 065c 00c8 | | Action Pop_Auxiliary_Range 065d 3fe9 |? | Loop_Increasing 0x647 065e 00ce | | Action Pop_Auxiliary 065f 0092 0b5f | _| Action Push_String_Extended,0xb5f ; " Maximum Filename Length => " 0661 e5ff | | Load 0x2,-0x1 0662 823e | > | Call 0x1,0x3e 0663 00e0 | | Load_Encached Standard_Cache 0664 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0665 01cc | | Execute Vector,Catenate 0666 e008 | | Load 0x0,0x8 0667 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0668 0092 0b60 | `| Action Push_String_Extended,0xb60 ; " Full Pathname Length => " 066a e5ff | | Load 0x2,-0x1 066b 823f | ? | Call 0x1,0x3f 066c 00e0 | | Load_Encached Standard_Cache 066d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 066e 01cc | | Execute Vector,Catenate 066f e008 | | Load 0x0,0x8 0670 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0671 0092 0b61 | a| Action Push_String_Extended,0xb61 ; " Spec Filename Extension => " 0673 e5ff | | Load 0x2,-0x1 0674 8240 | @ | Call 0x1,0x40 0675 01cc | | Execute Vector,Catenate 0676 e008 | | Load 0x0,0x8 0677 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0678 0092 0b62 | b| Action Push_String_Extended,0xb62 ; " Body Filename Extension => " 067a e5ff | | Load 0x2,-0x1 067b 8241 | A | Call 0x1,0x41 067c 01cc | | Execute Vector,Catenate 067d e008 | | Load 0x0,0x8 067e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 067f 0092 0b63 | c| Action Push_String_Extended,0xb63 ; " Extension Separator => " 0681 e5ff | | Load 0x2,-0x1 0682 8242 | B | Call 0x1,0x42 0683 01cc | | Execute Vector,Catenate 0684 e008 | | Load 0x0,0x8 0685 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0686 0092 0b64 | d| Action Push_String_Extended,0xb64 ; " Option Separator => " 0688 e5ff | | Load 0x2,-0x1 0689 8243 | C | Call 0x1,0x43 068a 01cc | | Execute Vector,Catenate 068b e008 | | Load 0x0,0x8 068c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 068d 0092 0b65 | e| Action Push_String_Extended,0xb65 ; " Option Header => " 068f e5ff | | Load 0x2,-0x1 0690 8244 | D | Call 0x1,0x44 0691 01cc | | Execute Vector,Catenate 0692 e008 | | Load 0x0,0x8 0693 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0694 0092 0b66 | f| Action Push_String_Extended,0xb66 ; " Option Argument Separator => " 0696 e5ff | | Load 0x2,-0x1 0697 8245 | E | Call 0x1,0x45 0698 01cc | | Execute Vector,Catenate 0699 e008 | | Load 0x0,0x8 069a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 069b 0092 0b67 | g| Action Push_String_Extended,0xb67 ; " Ada-Name Subunit Separator => " 069d e5ff | | Load 0x2,-0x1 069e 8246 | F | Call 0x1,0x46 069f 01cc | | Execute Vector,Catenate 06a0 e008 | | Load 0x0,0x8 06a1 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06a2 0092 0b68 | h| Action Push_String_Extended,0xb68 ; " Ada-Name Spec Suffix => " 06a4 e5ff | | Load 0x2,-0x1 06a5 8247 | G | Call 0x1,0x47 06a6 01cc | | Execute Vector,Catenate 06a7 e008 | | Load 0x0,0x8 06a8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06a9 0092 0b69 | i| Action Push_String_Extended,0xb69 ; " Ada-Name Body Suffix => " 06ab e5ff | | Load 0x2,-0x1 06ac 8248 | H | Call 0x1,0x48 06ad 01cc | | Execute Vector,Catenate 06ae e008 | | Load 0x0,0x8 06af 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06b0 0092 0b6a | j| Action Push_String_Extended,0xb6a ; " Directory Separator => " 06b2 e5ff | | Load 0x2,-0x1 06b3 8249 | I | Call 0x1,0x49 06b4 01cc | | Execute Vector,Catenate 06b5 e008 | | Load 0x0,0x8 06b6 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06b7 0092 0b6b | k| Action Push_String_Extended,0xb6b ; " Directory Prefix => " 06b9 e5ff | | Load 0x2,-0x1 06ba 824a | J | Call 0x1,0x4a 06bb 01cc | | Execute Vector,Catenate 06bc e008 | | Load 0x0,0x8 06bd 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06be 0092 0b6c | l| Action Push_String_Extended,0xb6c ; " Directory Suffix => " 06c0 e5ff | | Load 0x2,-0x1 06c1 824b | K | Call 0x1,0x4b 06c2 01cc | | Execute Vector,Catenate 06c3 e008 | | Load 0x0,0x8 06c4 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06c5 0092 0b6d | m| Action Push_String_Extended,0xb6d ; " Directory-Unit Separator => " 06c7 e5ff | | Load 0x2,-0x1 06c8 824c | L | Call 0x1,0x4c 06c9 01cc | | Execute Vector,Catenate 06ca e008 | | Load 0x0,0x8 06cb 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06cc 0092 0b6e | n| Action Push_String_Extended,0xb6e ; " Case Sensitive => " 06ce e5ff | | Load 0x2,-0x1 06cf 824d | M | Call 0x1,0x4d 06d0 00e1 | | Load_Encached Boolean_Cache 06d1 011c | | Execute Any,Convert_Unchecked 06d2 1c01 | | Execute_Immediate Run_Utility,0x1 06d3 01cc | | Execute Vector,Catenate 06d4 e008 | | Load 0x0,0x8 06d5 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06d6 0092 0b6f | o| Action Push_String_Extended,0xb6f ; " Command Line Case => " 06d8 e5ff | | Load 0x2,-0x1 06d9 824e | N | Call 0x1,0x4e 06da e213 | | Load 0x1,0x13 06db 011c | | Execute Any,Convert_Unchecked 06dc 1c01 | | Execute_Immediate Run_Utility,0x1 06dd 01cc | | Execute Vector,Catenate 06de e008 | | Load 0x0,0x8 06df 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06e0 0092 0b70 | p| Action Push_String_Extended,0xb70 ; " Maximum Command Line Length => " 06e2 e5ff | | Load 0x2,-0x1 06e3 824f | O | Call 0x1,0x4f 06e4 00e0 | | Load_Encached Standard_Cache 06e5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06e6 01cc | | Execute Vector,Catenate 06e7 e008 | | Load 0x0,0x8 06e8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06e9 0092 0b71 | q| Action Push_String_Extended,0xb71 ; " Compiler Command => " 06eb e5ff | | Load 0x2,-0x1 06ec 8250 | P | Call 0x1,0x50 06ed 01cc | | Execute Vector,Catenate 06ee e008 | | Load 0x0,0x8 06ef 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06f0 0092 0b72 | r| Action Push_String_Extended,0xb72 ; " Compiler Pre-Command => " 06f2 e5ff | | Load 0x2,-0x1 06f3 8251 | Q | Call 0x1,0x51 06f4 01cc | | Execute Vector,Catenate 06f5 e008 | | Load 0x0,0x8 06f6 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06f7 0092 0b73 | s| Action Push_String_Extended,0xb73 ; " Compiler Post-Command => " 06f9 e5ff | | Load 0x2,-0x1 06fa 8252 | R | Call 0x1,0x52 06fb 01cc | | Execute Vector,Catenate 06fc e008 | | Load 0x0,0x8 06fd 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06fe 0092 0b74 | t| Action Push_String_Extended,0xb74 ; " Linker Command => " 0700 e5ff | | Load 0x2,-0x1 0701 8253 | S | Call 0x1,0x53 0702 01cc | | Execute Vector,Catenate 0703 e008 | | Load 0x0,0x8 0704 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0705 0092 0b75 | u| Action Push_String_Extended,0xb75 ; " Linker Pre-Command => " 0707 e5ff | | Load 0x2,-0x1 0708 8254 | T | Call 0x1,0x54 0709 01cc | | Execute Vector,Catenate 070a e008 | | Load 0x0,0x8 070b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 070c 0092 0b76 | v| Action Push_String_Extended,0xb76 ; " Linker Post-Command => " 070e e5ff | | Load 0x2,-0x1 070f 8255 | U | Call 0x1,0x55 0710 01cc | | Execute Vector,Catenate 0711 e008 | | Load 0x0,0x8 0712 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0713 0092 0b77 | w| Action Push_String_Extended,0xb77 ; " Executable Option => " 0715 e5ff | | Load 0x2,-0x1 0716 8256 | V | Call 0x1,0x56 0717 01cc | | Execute Vector,Catenate 0718 e008 | | Load 0x0,0x8 0719 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 071a 0092 0b78 | x| Action Push_String_Extended,0xb78 ; " Executable Option Is Pre-Option => " 071c e5ff | | Load 0x2,-0x1 071d 8257 | W | Call 0x1,0x57 071e 00e1 | | Load_Encached Boolean_Cache 071f 011c | | Execute Any,Convert_Unchecked 0720 1c01 | | Execute_Immediate Run_Utility,0x1 0721 01cc | | Execute Vector,Catenate 0722 e008 | | Load 0x0,0x8 0723 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0724 0092 0b79 | y| Action Push_String_Extended,0xb79 ; " Context Command => " 0726 e5ff | | Load 0x2,-0x1 0727 8258 | X | Call 0x1,0x58 0728 01cc | | Execute Vector,Catenate 0729 e008 | | Load 0x0,0x8 072a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 072b 0092 0b7a | z| Action Push_String_Extended,0xb7a ; " Library Command => " 072d e5ff | | Load 0x2,-0x1 072e 8259 | Y | Call 0x1,0x59 072f 01cc | | Execute Vector,Catenate 0730 e008 | | Load 0x0,0x8 0731 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0732 0092 0b7b | {| Action Push_String_Extended,0xb7b ; " Default Program Library Name => " 0734 e5ff | | Load 0x2,-0x1 0735 825a | Z | Call 0x1,0x5a 0736 01cc | | Execute Vector,Catenate 0737 e008 | | Load 0x0,0x8 0738 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0739 0092 0b7c | || Action Push_String_Extended,0xb7c ; " Parse Standard Output => " 073b e5ff | | Load 0x2,-0x1 073c 825b | [ | Call 0x1,0x5b 073d 00e1 | | Load_Encached Boolean_Cache 073e 011c | | Execute Any,Convert_Unchecked 073f 1c01 | | Execute_Immediate Run_Utility,0x1 0740 01cc | | Execute Vector,Catenate 0741 e008 | | Load 0x0,0x8 0742 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0743 0092 0b7d | }| Action Push_String_Extended,0xb7d ; " Parse Standard Error => " 0745 e5ff | | Load 0x2,-0x1 0746 825c | \ | Call 0x1,0x5c 0747 00e1 | | Load_Encached Boolean_Cache 0748 011c | | Execute Any,Convert_Unchecked 0749 1c01 | | Execute_Immediate Run_Utility,0x1 074a 01cc | | Execute Vector,Catenate 074b e008 | | Load 0x0,0x8 074c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 074d 0092 0b7e | ~| Action Push_String_Extended,0xb7e ; " Error Pattern => " 074f e5ff | | Load 0x2,-0x1 0750 825d | ] | Call 0x1,0x5d 0751 01cc | | Execute Vector,Catenate 0752 e008 | | Load 0x0,0x8 0753 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0754 0092 0b7f | | Action Push_String_Extended,0xb7f ; " Remote Operating System => " 0756 e5ff | | Load 0x2,-0x1 0757 825e | ^ | Call 0x1,0x5e 0758 e214 | | Load 0x1,0x14 0759 011c | | Execute Any,Convert_Unchecked 075a 1c01 | | Execute_Immediate Run_Utility,0x1 075b 01cc | | Execute Vector,Catenate 075c e008 | | Load 0x0,0x8 075d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 075e 0092 0b80 | | Action Push_String_Extended,0xb80 ; " Transfer Type => " 0760 e5ff | | Load 0x2,-0x1 0761 825f | _ | Call 0x1,0x5f 0762 e216 | | Load 0x1,0x16 0763 011c | | Execute Any,Convert_Unchecked 0764 1c01 | | Execute_Immediate Run_Utility,0x1 0765 01cc | | Execute Vector,Catenate 0766 e008 | | Load 0x0,0x8 0767 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0768 8404 | | Call 0x2,0x4 0769 8405 | | Call 0x2,0x5 076a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 076b 0000 0000 | | .BLANK 0000[0x5] 0770 ; -------------------------------------------------------------------------------------- 0770 ; SUBPROGRAM 0770 ; -------------------------------------------------------------------------------------- 0770 0773 | s | .CONST 0x0773 ; Address of begin 0771 0004 | | .CONST 0x0004 ; Address of exception handler 0772 0001 | | .CONST 0x0001 ; Number of locals 0773 BODY_0770: 0773 INIT_0770: 0773 00da | | Load_Top At_Offset_2 0774 8239 | 9 | Call 0x1,0x39 0775 6802 |h | Jump_Zero 0x778 0776 e217 | | Load 0x1,0x17 0777 0257 | W | Execute Discrete,Raise 0778 00da | | Load_Top At_Offset_2 0779 0217 | | Execute Heap_Access,All_Reference 077a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 077b 0335 | 5 | Declare_Variable Array,Duplicate 077c 00cd | | Action Spare6_Action 077d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 077e 0000 0000 | | .XXX[0x2] 0780 ; -------------------------------------------------------------------------------------- 0780 ; SUBPROGRAM 0780 ; -------------------------------------------------------------------------------------- 0780 0783 | | .CONST 0x0783 ; Address of begin 0781 0004 | | .CONST 0x0004 ; Address of exception handler 0782 0001 | | .CONST 0x0001 ; Number of locals 0783 BODY_0780: 0783 INIT_0780: 0783 00da | | Load_Top At_Offset_2 0784 8239 | 9 | Call 0x1,0x39 0785 6802 |h | Jump_Zero 0x788 0786 e217 | | Load 0x1,0x17 0787 0257 | W | Execute Discrete,Raise 0788 00da | | Load_Top At_Offset_2 0789 0217 | | Execute Heap_Access,All_Reference 078a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 078b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 078c 0000 0000 | | .BLANK 0000[0x4] 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 0793 | | .CONST 0x0793 ; Address of begin 0791 0004 | | .CONST 0x0004 ; Address of exception handler 0792 0001 | | .CONST 0x0001 ; Number of locals 0793 BODY_0790: 0793 INIT_0790: 0793 00da | | Load_Top At_Offset_2 0794 8239 | 9 | Call 0x1,0x39 0795 6802 |h | Jump_Zero 0x798 0796 e217 | | Load 0x1,0x17 0797 0257 | W | Execute Discrete,Raise 0798 00da | | Load_Top At_Offset_2 0799 0217 | | Execute Heap_Access,All_Reference 079a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 079b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 079c 0000 0000 | | .BLANK 0000[0x4] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a3 | | .CONST 0x07a3 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0001 | | .CONST 0x0001 ; Number of locals 07a3 BODY_07a0: 07a3 INIT_07a0: 07a3 00da | | Load_Top At_Offset_2 07a4 8239 | 9 | Call 0x1,0x39 07a5 6802 |h | Jump_Zero 0x7a8 07a6 e217 | | Load 0x1,0x17 07a7 0257 | W | Execute Discrete,Raise 07a8 00da | | Load_Top At_Offset_2 07a9 0217 | | Execute Heap_Access,All_Reference 07aa 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 07ab 0217 | | Execute Heap_Access,All_Reference 07ac 0335 | 5 | Declare_Variable Array,Duplicate 07ad 00cd | | Action Spare6_Action 07ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 00da | | Load_Top At_Offset_2 07b4 8239 | 9 | Call 0x1,0x39 07b5 6802 |h | Jump_Zero 0x7b8 07b6 e217 | | Load 0x1,0x17 07b7 0257 | W | Execute Discrete,Raise 07b8 00da | | Load_Top At_Offset_2 07b9 0217 | | Execute Heap_Access,All_Reference 07ba 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 07bb 0217 | | Execute Heap_Access,All_Reference 07bc 0335 | 5 | Declare_Variable Array,Duplicate 07bd 00cd | | Action Spare6_Action 07be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07bf 0000 | | .XXX[0x1] 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; SUBPROGRAM 07c0 ; -------------------------------------------------------------------------------------- 07c0 07c3 | | .CONST 0x07c3 ; Address of begin 07c1 0004 | | .CONST 0x0004 ; Address of exception handler 07c2 0001 | | .CONST 0x0001 ; Number of locals 07c3 BODY_07c0: 07c3 INIT_07c0: 07c3 00da | | Load_Top At_Offset_2 07c4 8239 | 9 | Call 0x1,0x39 07c5 6802 |h | Jump_Zero 0x7c8 07c6 e217 | | Load 0x1,0x17 07c7 0257 | W | Execute Discrete,Raise 07c8 00da | | Load_Top At_Offset_2 07c9 0217 | | Execute Heap_Access,All_Reference 07ca 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 07cb 0217 | | Execute Heap_Access,All_Reference 07cc 0335 | 5 | Declare_Variable Array,Duplicate 07cd 00cd | | Action Spare6_Action 07ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07cf 0000 | | .XXX[0x1] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07d3 | | .CONST 0x07d3 ; Address of begin 07d1 0004 | | .CONST 0x0004 ; Address of exception handler 07d2 0001 | | .CONST 0x0001 ; Number of locals 07d3 BODY_07d0: 07d3 INIT_07d0: 07d3 00da | | Load_Top At_Offset_2 07d4 8239 | 9 | Call 0x1,0x39 07d5 6802 |h | Jump_Zero 0x7d8 07d6 e217 | | Load 0x1,0x17 07d7 0257 | W | Execute Discrete,Raise 07d8 00da | | Load_Top At_Offset_2 07d9 0217 | | Execute Heap_Access,All_Reference 07da 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 07db 0217 | | Execute Heap_Access,All_Reference 07dc 0335 | 5 | Declare_Variable Array,Duplicate 07dd 00cd | | Action Spare6_Action 07de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07df 0000 | | .XXX[0x1] 07e0 ; -------------------------------------------------------------------------------------- 07e0 ; SUBPROGRAM 07e0 ; -------------------------------------------------------------------------------------- 07e0 07e3 | | .CONST 0x07e3 ; Address of begin 07e1 0004 | | .CONST 0x0004 ; Address of exception handler 07e2 0001 | | .CONST 0x0001 ; Number of locals 07e3 BODY_07e0: 07e3 INIT_07e0: 07e3 00da | | Load_Top At_Offset_2 07e4 8239 | 9 | Call 0x1,0x39 07e5 6802 |h | Jump_Zero 0x7e8 07e6 e217 | | Load 0x1,0x17 07e7 0257 | W | Execute Discrete,Raise 07e8 00da | | Load_Top At_Offset_2 07e9 0217 | | Execute Heap_Access,All_Reference 07ea 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 07eb 0217 | | Execute Heap_Access,All_Reference 07ec 0335 | 5 | Declare_Variable Array,Duplicate 07ed 00cd | | Action Spare6_Action 07ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ef 0000 | | .XXX[0x1] 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 07f3 | | .CONST 0x07f3 ; Address of begin 07f1 0004 | | .CONST 0x0004 ; Address of exception handler 07f2 0001 | | .CONST 0x0001 ; Number of locals 07f3 BODY_07f0: 07f3 INIT_07f0: 07f3 00da | | Load_Top At_Offset_2 07f4 8239 | 9 | Call 0x1,0x39 07f5 6802 |h | Jump_Zero 0x7f8 07f6 e217 | | Load 0x1,0x17 07f7 0257 | W | Execute Discrete,Raise 07f8 00da | | Load_Top At_Offset_2 07f9 0217 | | Execute Heap_Access,All_Reference 07fa 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 07fb 0217 | | Execute Heap_Access,All_Reference 07fc 0335 | 5 | Declare_Variable Array,Duplicate 07fd 00cd | | Action Spare6_Action 07fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ff 0000 | | .XXX[0x1] 0800 ; -------------------------------------------------------------------------------------- 0800 ; SUBPROGRAM 0800 ; -------------------------------------------------------------------------------------- 0800 0803 | | .CONST 0x0803 ; Address of begin 0801 0004 | | .CONST 0x0004 ; Address of exception handler 0802 0001 | | .CONST 0x0001 ; Number of locals 0803 BODY_0800: 0803 INIT_0800: 0803 00da | | Load_Top At_Offset_2 0804 8239 | 9 | Call 0x1,0x39 0805 6802 |h | Jump_Zero 0x808 0806 e217 | | Load 0x1,0x17 0807 0257 | W | Execute Discrete,Raise 0808 00da | | Load_Top At_Offset_2 0809 0217 | | Execute Heap_Access,All_Reference 080a 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 080b 0217 | | Execute Heap_Access,All_Reference 080c 0335 | 5 | Declare_Variable Array,Duplicate 080d 00cd | | Action Spare6_Action 080e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 080f 0000 | | .XXX[0x1] 0810 ; -------------------------------------------------------------------------------------- 0810 ; SUBPROGRAM 0810 ; -------------------------------------------------------------------------------------- 0810 0813 | | .CONST 0x0813 ; Address of begin 0811 0004 | | .CONST 0x0004 ; Address of exception handler 0812 0001 | | .CONST 0x0001 ; Number of locals 0813 BODY_0810: 0813 INIT_0810: 0813 00da | | Load_Top At_Offset_2 0814 8239 | 9 | Call 0x1,0x39 0815 6802 |h | Jump_Zero 0x818 0816 e217 | | Load 0x1,0x17 0817 0257 | W | Execute Discrete,Raise 0818 00da | | Load_Top At_Offset_2 0819 0217 | | Execute Heap_Access,All_Reference 081a 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 081b 0217 | | Execute Heap_Access,All_Reference 081c 0335 | 5 | Declare_Variable Array,Duplicate 081d 00cd | | Action Spare6_Action 081e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 081f 0000 | | .XXX[0x1] 0820 ; -------------------------------------------------------------------------------------- 0820 ; SUBPROGRAM 0820 ; -------------------------------------------------------------------------------------- 0820 0823 | # | .CONST 0x0823 ; Address of begin 0821 0004 | | .CONST 0x0004 ; Address of exception handler 0822 0001 | | .CONST 0x0001 ; Number of locals 0823 BODY_0820: 0823 INIT_0820: 0823 00da | | Load_Top At_Offset_2 0824 8239 | 9 | Call 0x1,0x39 0825 6802 |h | Jump_Zero 0x828 0826 e217 | | Load 0x1,0x17 0827 0257 | W | Execute Discrete,Raise 0828 00da | | Load_Top At_Offset_2 0829 0217 | | Execute Heap_Access,All_Reference 082a 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 082b 0217 | | Execute Heap_Access,All_Reference 082c 0335 | 5 | Declare_Variable Array,Duplicate 082d 00cd | | Action Spare6_Action 082e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 082f 0000 | | .XXX[0x1] 0830 ; -------------------------------------------------------------------------------------- 0830 ; SUBPROGRAM 0830 ; -------------------------------------------------------------------------------------- 0830 0833 | 3 | .CONST 0x0833 ; Address of begin 0831 0004 | | .CONST 0x0004 ; Address of exception handler 0832 0001 | | .CONST 0x0001 ; Number of locals 0833 BODY_0830: 0833 INIT_0830: 0833 00da | | Load_Top At_Offset_2 0834 8239 | 9 | Call 0x1,0x39 0835 6802 |h | Jump_Zero 0x838 0836 e217 | | Load 0x1,0x17 0837 0257 | W | Execute Discrete,Raise 0838 00da | | Load_Top At_Offset_2 0839 0217 | | Execute Heap_Access,All_Reference 083a 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 083b 0217 | | Execute Heap_Access,All_Reference 083c 0335 | 5 | Declare_Variable Array,Duplicate 083d 00cd | | Action Spare6_Action 083e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 083f 0000 | | .XXX[0x1] 0840 ; -------------------------------------------------------------------------------------- 0840 ; SUBPROGRAM 0840 ; -------------------------------------------------------------------------------------- 0840 0843 | C | .CONST 0x0843 ; Address of begin 0841 0004 | | .CONST 0x0004 ; Address of exception handler 0842 0001 | | .CONST 0x0001 ; Number of locals 0843 BODY_0840: 0843 INIT_0840: 0843 00da | | Load_Top At_Offset_2 0844 8239 | 9 | Call 0x1,0x39 0845 6802 |h | Jump_Zero 0x848 0846 e217 | | Load 0x1,0x17 0847 0257 | W | Execute Discrete,Raise 0848 00da | | Load_Top At_Offset_2 0849 0217 | | Execute Heap_Access,All_Reference 084a 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 084b 0217 | | Execute Heap_Access,All_Reference 084c 0335 | 5 | Declare_Variable Array,Duplicate 084d 00cd | | Action Spare6_Action 084e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 084f 0000 | | .XXX[0x1] 0850 ; -------------------------------------------------------------------------------------- 0850 ; SUBPROGRAM 0850 ; -------------------------------------------------------------------------------------- 0850 0853 | S | .CONST 0x0853 ; Address of begin 0851 0004 | | .CONST 0x0004 ; Address of exception handler 0852 0001 | | .CONST 0x0001 ; Number of locals 0853 BODY_0850: 0853 INIT_0850: 0853 00da | | Load_Top At_Offset_2 0854 8239 | 9 | Call 0x1,0x39 0855 6802 |h | Jump_Zero 0x858 0856 e217 | | Load 0x1,0x17 0857 0257 | W | Execute Discrete,Raise 0858 00da | | Load_Top At_Offset_2 0859 0217 | | Execute Heap_Access,All_Reference 085a 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 085b 0217 | | Execute Heap_Access,All_Reference 085c 0335 | 5 | Declare_Variable Array,Duplicate 085d 00cd | | Action Spare6_Action 085e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 085f 0000 | | .XXX[0x1] 0860 ; -------------------------------------------------------------------------------------- 0860 ; SUBPROGRAM 0860 ; -------------------------------------------------------------------------------------- 0860 0863 | c | .CONST 0x0863 ; Address of begin 0861 0004 | | .CONST 0x0004 ; Address of exception handler 0862 0001 | | .CONST 0x0001 ; Number of locals 0863 BODY_0860: 0863 INIT_0860: 0863 00da | | Load_Top At_Offset_2 0864 8239 | 9 | Call 0x1,0x39 0865 6802 |h | Jump_Zero 0x868 0866 e217 | | Load 0x1,0x17 0867 0257 | W | Execute Discrete,Raise 0868 00da | | Load_Top At_Offset_2 0869 0217 | | Execute Heap_Access,All_Reference 086a 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 086b 0217 | | Execute Heap_Access,All_Reference 086c 0335 | 5 | Declare_Variable Array,Duplicate 086d 00cd | | Action Spare6_Action 086e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 086f 0000 | | .XXX[0x1] 0870 ; -------------------------------------------------------------------------------------- 0870 ; SUBPROGRAM 0870 ; -------------------------------------------------------------------------------------- 0870 0873 | s | .CONST 0x0873 ; Address of begin 0871 0004 | | .CONST 0x0004 ; Address of exception handler 0872 0001 | | .CONST 0x0001 ; Number of locals 0873 BODY_0870: 0873 INIT_0870: 0873 00da | | Load_Top At_Offset_2 0874 8239 | 9 | Call 0x1,0x39 0875 6802 |h | Jump_Zero 0x878 0876 e217 | | Load 0x1,0x17 0877 0257 | W | Execute Discrete,Raise 0878 00da | | Load_Top At_Offset_2 0879 0217 | | Execute Heap_Access,All_Reference 087a 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 087b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 087c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 087d 0000 0000 | | .XXX[0x3] 087f 0000 | | 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 0883 | | .CONST 0x0883 ; Address of begin 0881 0004 | | .CONST 0x0004 ; Address of exception handler 0882 0001 | | .CONST 0x0001 ; Number of locals 0883 BODY_0880: 0883 INIT_0880: 0883 00da | | Load_Top At_Offset_2 0884 8239 | 9 | Call 0x1,0x39 0885 6802 |h | Jump_Zero 0x888 0886 e217 | | Load 0x1,0x17 0887 0257 | W | Execute Discrete,Raise 0888 00da | | Load_Top At_Offset_2 0889 0217 | | Execute Heap_Access,All_Reference 088a 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 088b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 088c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 088d 0000 0000 | | .XXX[0x3] 088f 0000 | | 0890 ; -------------------------------------------------------------------------------------- 0890 ; SUBPROGRAM 0890 ; -------------------------------------------------------------------------------------- 0890 0893 | | .CONST 0x0893 ; Address of begin 0891 0004 | | .CONST 0x0004 ; Address of exception handler 0892 0001 | | .CONST 0x0001 ; Number of locals 0893 BODY_0890: 0893 INIT_0890: 0893 00da | | Load_Top At_Offset_2 0894 8239 | 9 | Call 0x1,0x39 0895 6802 |h | Jump_Zero 0x898 0896 e217 | | Load 0x1,0x17 0897 0257 | W | Execute Discrete,Raise 0898 00da | | Load_Top At_Offset_2 0899 0217 | | Execute Heap_Access,All_Reference 089a 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 089b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 089c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 089d 0000 0000 | | .XXX[0x3] 089f 0000 | | 08a0 ; -------------------------------------------------------------------------------------- 08a0 ; SUBPROGRAM 08a0 ; -------------------------------------------------------------------------------------- 08a0 08a3 | | .CONST 0x08a3 ; Address of begin 08a1 0004 | | .CONST 0x0004 ; Address of exception handler 08a2 0001 | | .CONST 0x0001 ; Number of locals 08a3 BODY_08a0: 08a3 INIT_08a0: 08a3 00da | | Load_Top At_Offset_2 08a4 8239 | 9 | Call 0x1,0x39 08a5 6802 |h | Jump_Zero 0x8a8 08a6 e217 | | Load 0x1,0x17 08a7 0257 | W | Execute Discrete,Raise 08a8 00da | | Load_Top At_Offset_2 08a9 0217 | | Execute Heap_Access,All_Reference 08aa 3411 |4 | Execute Record,Field_Reference,Field_Number 0x11 08ab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08ac 0217 | | Execute Heap_Access,All_Reference 08ad 0335 | 5 | Declare_Variable Array,Duplicate 08ae 00cd | | Action Spare6_Action 08af 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08b0 ; -------------------------------------------------------------------------------------- 08b0 ; SUBPROGRAM 08b0 ; -------------------------------------------------------------------------------------- 08b0 08b3 | | .CONST 0x08b3 ; Address of begin 08b1 0004 | | .CONST 0x0004 ; Address of exception handler 08b2 0001 | | .CONST 0x0001 ; Number of locals 08b3 BODY_08b0: 08b3 INIT_08b0: 08b3 00da | | Load_Top At_Offset_2 08b4 8239 | 9 | Call 0x1,0x39 08b5 6802 |h | Jump_Zero 0x8b8 08b6 e217 | | Load 0x1,0x17 08b7 0257 | W | Execute Discrete,Raise 08b8 00da | | Load_Top At_Offset_2 08b9 0217 | | Execute Heap_Access,All_Reference 08ba 3c19 |< | Execute Record,Field_Read,Field_Number 0x19 08bb 0217 | | Execute Heap_Access,All_Reference 08bc 0335 | 5 | Declare_Variable Array,Duplicate 08bd 00cd | | Action Spare6_Action 08be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08bf 0000 | | .XXX[0x1] 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08c3 | | .CONST 0x08c3 ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0001 | | .CONST 0x0001 ; Number of locals 08c3 BODY_08c0: 08c3 INIT_08c0: 08c3 00da | | Load_Top At_Offset_2 08c4 8239 | 9 | Call 0x1,0x39 08c5 6802 |h | Jump_Zero 0x8c8 08c6 e217 | | Load 0x1,0x17 08c7 0257 | W | Execute Discrete,Raise 08c8 00da | | Load_Top At_Offset_2 08c9 0217 | | Execute Heap_Access,All_Reference 08ca 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a 08cb 0217 | | Execute Heap_Access,All_Reference 08cc 0335 | 5 | Declare_Variable Array,Duplicate 08cd 00cd | | Action Spare6_Action 08ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08cf 0000 | | .XXX[0x1] 08d0 ; -------------------------------------------------------------------------------------- 08d0 ; SUBPROGRAM 08d0 ; -------------------------------------------------------------------------------------- 08d0 08d3 | | .CONST 0x08d3 ; Address of begin 08d1 0004 | | .CONST 0x0004 ; Address of exception handler 08d2 0001 | | .CONST 0x0001 ; Number of locals 08d3 BODY_08d0: 08d3 INIT_08d0: 08d3 00da | | Load_Top At_Offset_2 08d4 8239 | 9 | Call 0x1,0x39 08d5 6802 |h | Jump_Zero 0x8d8 08d6 e217 | | Load 0x1,0x17 08d7 0257 | W | Execute Discrete,Raise 08d8 00da | | Load_Top At_Offset_2 08d9 0217 | | Execute Heap_Access,All_Reference 08da 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12 08db 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 08dc 0217 | | Execute Heap_Access,All_Reference 08dd 0335 | 5 | Declare_Variable Array,Duplicate 08de 00cd | | Action Spare6_Action 08df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08e0 ; -------------------------------------------------------------------------------------- 08e0 ; SUBPROGRAM 08e0 ; -------------------------------------------------------------------------------------- 08e0 08e3 | | .CONST 0x08e3 ; Address of begin 08e1 0004 | | .CONST 0x0004 ; Address of exception handler 08e2 0001 | | .CONST 0x0001 ; Number of locals 08e3 BODY_08e0: 08e3 INIT_08e0: 08e3 00da | | Load_Top At_Offset_2 08e4 8239 | 9 | Call 0x1,0x39 08e5 6802 |h | Jump_Zero 0x8e8 08e6 e217 | | Load 0x1,0x17 08e7 0257 | W | Execute Discrete,Raise 08e8 00da | | Load_Top At_Offset_2 08e9 0217 | | Execute Heap_Access,All_Reference 08ea 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 08eb 0217 | | Execute Heap_Access,All_Reference 08ec 0335 | 5 | Declare_Variable Array,Duplicate 08ed 00cd | | Action Spare6_Action 08ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ef 0000 | | .XXX[0x1] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08f3 | | .CONST 0x08f3 ; Address of begin 08f1 0004 | | .CONST 0x0004 ; Address of exception handler 08f2 0001 | | .CONST 0x0001 ; Number of locals 08f3 BODY_08f0: 08f3 INIT_08f0: 08f3 00da | | Load_Top At_Offset_2 08f4 8239 | 9 | Call 0x1,0x39 08f5 6802 |h | Jump_Zero 0x8f8 08f6 e217 | | Load 0x1,0x17 08f7 0257 | W | Execute Discrete,Raise 08f8 00da | | Load_Top At_Offset_2 08f9 0217 | | Execute Heap_Access,All_Reference 08fa 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 08fb 0217 | | Execute Heap_Access,All_Reference 08fc 0335 | 5 | Declare_Variable Array,Duplicate 08fd 00cd | | Action Spare6_Action 08fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ff 0000 | | .XXX[0x1] 0900 ; -------------------------------------------------------------------------------------- 0900 ; SUBPROGRAM 0900 ; -------------------------------------------------------------------------------------- 0900 0903 | | .CONST 0x0903 ; Address of begin 0901 0004 | | .CONST 0x0004 ; Address of exception handler 0902 0001 | | .CONST 0x0001 ; Number of locals 0903 BODY_0900: 0903 INIT_0900: 0903 00da | | Load_Top At_Offset_2 0904 8239 | 9 | Call 0x1,0x39 0905 6802 |h | Jump_Zero 0x908 0906 e217 | | Load 0x1,0x17 0907 0257 | W | Execute Discrete,Raise 0908 00da | | Load_Top At_Offset_2 0909 0217 | | Execute Heap_Access,All_Reference 090a 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 090b 0217 | | Execute Heap_Access,All_Reference 090c 0335 | 5 | Declare_Variable Array,Duplicate 090d 00cd | | Action Spare6_Action 090e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 090f 0000 | | .XXX[0x1] 0910 ; -------------------------------------------------------------------------------------- 0910 ; SUBPROGRAM 0910 ; -------------------------------------------------------------------------------------- 0910 0913 | | .CONST 0x0913 ; Address of begin 0911 0004 | | .CONST 0x0004 ; Address of exception handler 0912 0001 | | .CONST 0x0001 ; Number of locals 0913 BODY_0910: 0913 INIT_0910: 0913 00da | | Load_Top At_Offset_2 0914 8239 | 9 | Call 0x1,0x39 0915 6802 |h | Jump_Zero 0x918 0916 e217 | | Load 0x1,0x17 0917 0257 | W | Execute Discrete,Raise 0918 00da | | Load_Top At_Offset_2 0919 0217 | | Execute Heap_Access,All_Reference 091a 3c18 |< | Execute Record,Field_Read,Field_Number 0x18 091b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 091c 0000 0000 | | .BLANK 0000[0x4] 0920 ; -------------------------------------------------------------------------------------- 0920 ; SUBPROGRAM 0920 ; -------------------------------------------------------------------------------------- 0920 0923 | # | .CONST 0x0923 ; Address of begin 0921 0004 | | .CONST 0x0004 ; Address of exception handler 0922 0001 | | .CONST 0x0001 ; Number of locals 0923 BODY_0920: 0923 INIT_0920: 0923 00da | | Load_Top At_Offset_2 0924 8239 | 9 | Call 0x1,0x39 0925 6802 |h | Jump_Zero 0x928 0926 e217 | | Load 0x1,0x17 0927 0257 | W | Execute Discrete,Raise 0928 00da | | Load_Top At_Offset_2 0929 0217 | | Execute Heap_Access,All_Reference 092a 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13 092b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 092c 0217 | | Execute Heap_Access,All_Reference 092d 0335 | 5 | Declare_Variable Array,Duplicate 092e 00cd | | Action Spare6_Action 092f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0930 ; -------------------------------------------------------------------------------------- 0930 ; SUBPROGRAM 0930 ; -------------------------------------------------------------------------------------- 0930 0933 | 3 | .CONST 0x0933 ; Address of begin 0931 0004 | | .CONST 0x0004 ; Address of exception handler 0932 0001 | | .CONST 0x0001 ; Number of locals 0933 BODY_0930: 0933 INIT_0930: 0933 00da | | Load_Top At_Offset_2 0934 8239 | 9 | Call 0x1,0x39 0935 6802 |h | Jump_Zero 0x938 0936 e217 | | Load 0x1,0x17 0937 0257 | W | Execute Discrete,Raise 0938 00da | | Load_Top At_Offset_2 0939 0217 | | Execute Heap_Access,All_Reference 093a 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14 093b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 093c 0217 | | Execute Heap_Access,All_Reference 093d 0335 | 5 | Declare_Variable Array,Duplicate 093e 00cd | | Action Spare6_Action 093f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0940 ; -------------------------------------------------------------------------------------- 0940 ; SUBPROGRAM 0940 ; -------------------------------------------------------------------------------------- 0940 0943 | C | .CONST 0x0943 ; Address of begin 0941 0004 | | .CONST 0x0004 ; Address of exception handler 0942 0001 | | .CONST 0x0001 ; Number of locals 0943 BODY_0940: 0943 INIT_0940: 0943 00da | | Load_Top At_Offset_2 0944 8239 | 9 | Call 0x1,0x39 0945 6802 |h | Jump_Zero 0x948 0946 e217 | | Load 0x1,0x17 0947 0257 | W | Execute Discrete,Raise 0948 00da | | Load_Top At_Offset_2 0949 0217 | | Execute Heap_Access,All_Reference 094a 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b 094b 0217 | | Execute Heap_Access,All_Reference 094c 0335 | 5 | Declare_Variable Array,Duplicate 094d 00cd | | Action Spare6_Action 094e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 094f 0000 | | .XXX[0x1] 0950 ; -------------------------------------------------------------------------------------- 0950 ; SUBPROGRAM 0950 ; -------------------------------------------------------------------------------------- 0950 0953 | S | .CONST 0x0953 ; Address of begin 0951 0004 | | .CONST 0x0004 ; Address of exception handler 0952 0001 | | .CONST 0x0001 ; Number of locals 0953 BODY_0950: 0953 INIT_0950: 0953 00da | | Load_Top At_Offset_2 0954 8239 | 9 | Call 0x1,0x39 0955 6802 |h | Jump_Zero 0x958 0956 e217 | | Load 0x1,0x17 0957 0257 | W | Execute Discrete,Raise 0958 00da | | Load_Top At_Offset_2 0959 0217 | | Execute Heap_Access,All_Reference 095a 341c |4 | Execute Record,Field_Reference,Field_Number 0x1c 095b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 095c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 095d 0000 0000 | | .XXX[0x3] 095f 0000 | | 0960 ; -------------------------------------------------------------------------------------- 0960 ; SUBPROGRAM 0960 ; -------------------------------------------------------------------------------------- 0960 0963 | c | .CONST 0x0963 ; Address of begin 0961 0004 | | .CONST 0x0004 ; Address of exception handler 0962 0001 | | .CONST 0x0001 ; Number of locals 0963 BODY_0960: 0963 INIT_0960: 0963 00da | | Load_Top At_Offset_2 0964 8239 | 9 | Call 0x1,0x39 0965 6802 |h | Jump_Zero 0x968 0966 e217 | | Load 0x1,0x17 0967 0257 | W | Execute Discrete,Raise 0968 00da | | Load_Top At_Offset_2 0969 0217 | | Execute Heap_Access,All_Reference 096a 341c |4 | Execute Record,Field_Reference,Field_Number 0x1c 096b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 096c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 096d 0000 0000 | | .XXX[0x3] 096f 0000 | | 0970 ; -------------------------------------------------------------------------------------- 0970 ; SUBPROGRAM 0970 ; -------------------------------------------------------------------------------------- 0970 0973 | s | .CONST 0x0973 ; Address of begin 0971 0004 | | .CONST 0x0004 ; Address of exception handler 0972 0001 | | .CONST 0x0001 ; Number of locals 0973 BODY_0970: 0973 INIT_0970: 0973 00da | | Load_Top At_Offset_2 0974 8239 | 9 | Call 0x1,0x39 0975 6802 |h | Jump_Zero 0x978 0976 e217 | | Load 0x1,0x17 0977 0257 | W | Execute Discrete,Raise 0978 00da | | Load_Top At_Offset_2 0979 0217 | | Execute Heap_Access,All_Reference 097a 341c |4 | Execute Record,Field_Reference,Field_Number 0x1c 097b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 097c 0217 | | Execute Heap_Access,All_Reference 097d 0335 | 5 | Declare_Variable Array,Duplicate 097e 00cd | | Action Spare6_Action 097f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0980 ; -------------------------------------------------------------------------------------- 0980 ; SUBPROGRAM 0980 ; -------------------------------------------------------------------------------------- 0980 0983 | | .CONST 0x0983 ; Address of begin 0981 0004 | | .CONST 0x0004 ; Address of exception handler 0982 0001 | | .CONST 0x0001 ; Number of locals 0983 BODY_0980: 0983 INIT_0980: 0983 00da | | Load_Top At_Offset_2 0984 8239 | 9 | Call 0x1,0x39 0985 6802 |h | Jump_Zero 0x988 0986 e217 | | Load 0x1,0x17 0987 0257 | W | Execute Discrete,Raise 0988 00da | | Load_Top At_Offset_2 0989 0217 | | Execute Heap_Access,All_Reference 098a 3c1d |< | Execute Record,Field_Read,Field_Number 0x1d 098b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 098c 0000 0000 | | .BLANK 0000[0x4] 0990 ; -------------------------------------------------------------------------------------- 0990 ; SUBPROGRAM 0990 ; -------------------------------------------------------------------------------------- 0990 0993 | | .CONST 0x0993 ; Address of begin 0991 0004 | | .CONST 0x0004 ; Address of exception handler 0992 0001 | | .CONST 0x0001 ; Number of locals 0993 BODY_0990: 0993 INIT_0990: 0993 00da | | Load_Top At_Offset_2 0994 8239 | 9 | Call 0x1,0x39 0995 6802 |h | Jump_Zero 0x998 0996 e217 | | Load 0x1,0x17 0997 0257 | W | Execute Discrete,Raise 0998 00da | | Load_Top At_Offset_2 0999 0217 | | Execute Heap_Access,All_Reference 099a 3c1e |< | Execute Record,Field_Read,Field_Number 0x1e 099b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 099c 0000 0000 | | .BLANK 0000[0x4] 09a0 ; -------------------------------------------------------------------------------------- 09a0 ; SUBPROGRAM 09a0 ; -------------------------------------------------------------------------------------- 09a0 09a3 | | .CONST 0x09a3 ; Address of begin 09a1 0004 | | .CONST 0x0004 ; Address of exception handler 09a2 0001 | | .CONST 0x0001 ; Number of locals 09a3 BODY_09a0: 09a3 INIT_09a0: 09a3 00da | | Load_Top At_Offset_2 09a4 8239 | 9 | Call 0x1,0x39 09a5 6802 |h | Jump_Zero 0x9a8 09a6 e217 | | Load 0x1,0x17 09a7 0257 | W | Execute Discrete,Raise 09a8 00da | | Load_Top At_Offset_2 09a9 0217 | | Execute Heap_Access,All_Reference 09aa 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f 09ab 0217 | | Execute Heap_Access,All_Reference 09ac 0335 | 5 | Declare_Variable Array,Duplicate 09ad 00cd | | Action Spare6_Action 09ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09af 0000 | | .XXX[0x1] 09b0 ; -------------------------------------------------------------------------------------- 09b0 ; SUBPROGRAM 09b0 ; -------------------------------------------------------------------------------------- 09b0 09b3 | | .CONST 0x09b3 ; Address of begin 09b1 0004 | | .CONST 0x0004 ; Address of exception handler 09b2 0001 | | .CONST 0x0001 ; Number of locals 09b3 BODY_09b0: 09b3 INIT_09b0: 09b3 00da | | Load_Top At_Offset_2 09b4 8239 | 9 | Call 0x1,0x39 09b5 6802 |h | Jump_Zero 0x9b8 09b6 e217 | | Load 0x1,0x17 09b7 0257 | W | Execute Discrete,Raise 09b8 00da | | Load_Top At_Offset_2 09b9 0217 | | Execute Heap_Access,All_Reference 09ba 3c20 |< | Execute Record,Field_Read,Field_Number 0x20 09bb 0217 | | Execute Heap_Access,All_Reference 09bc 0335 | 5 | Declare_Variable Array,Duplicate 09bd 00cd | | Action Spare6_Action 09be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09bf 0000 | | .XXX[0x1] 09c0 ; -------------------------------------------------------------------------------------- 09c0 ; SUBPROGRAM 09c0 ; -------------------------------------------------------------------------------------- 09c0 09c3 | | .CONST 0x09c3 ; Address of begin 09c1 0004 | | .CONST 0x0004 ; Address of exception handler 09c2 0001 | | .CONST 0x0001 ; Number of locals 09c3 BODY_09c0: 09c3 INIT_09c0: 09c3 00da | | Load_Top At_Offset_2 09c4 e262 | b | Load 0x1,0x62 09c5 e5fe | | Load 0x2,-0x2 09c6 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 09c7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09c8 ; -------------------------------------------------------------------------------------- 09c8 ; SUBPROGRAM 09c8 ; -------------------------------------------------------------------------------------- 09c8 09cb | | .CONST 0x09cb ; Address of begin 09c9 0004 | | .CONST 0x0004 ; Address of exception handler 09ca 0001 | | .CONST 0x0001 ; Number of locals 09cb BODY_09c8: 09cb INIT_09c8: 09cb 0092 0b81 | | Action Push_String_Extended,0xb81 ; " Option Name => " 09cd 00db | | Load_Top At_Offset_3 09ce 821f | | Call 0x1,0x1f 09cf 01cc | | Execute Vector,Catenate 09d0 e008 | | Load 0x0,0x8 09d1 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 09d2 0092 0b82 | | Action Push_String_Extended,0xb82 ; " Active Phases => " 09d4 e008 | | Load 0x0,0x8 09d5 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 09d6 00cf | | Action Mark_Auxiliary 09d7 e20d | | Load 0x1,0xd 09d8 0265 | e | Execute Discrete,Reverse_Bounds 09d9 0007 | | Action Break_Optional 09da 0092 0b83 | | Action Push_String_Extended,0xb83 ; " " 09dc 00d9 | | Load_Top At_Offset_1 09dd e20d | | Load 0x1,0xd 09de 011c | | Execute Any,Convert_Unchecked 09df 1c01 | | Execute_Immediate Run_Utility,0x1 09e0 01cc | | Execute Vector,Catenate 09e1 0092 0b5e | ^| Action Push_String_Extended,0xb5e ; " => " 09e3 01cc | | Execute Vector,Catenate 09e4 00d9 | | Load_Top At_Offset_1 09e5 e7ff | | Load 0x3,-0x1 09e6 0217 | | Execute Heap_Access,All_Reference 09e7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 09e8 01d7 | | Execute Vector,Field_Read 09e9 00e1 | | Load_Encached Boolean_Cache 09ea 011c | | Execute Any,Convert_Unchecked 09eb 1c01 | | Execute_Immediate Run_Utility,0x1 09ec 01cc | | Execute Vector,Catenate 09ed e008 | | Load 0x0,0x8 09ee 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 09ef 00c8 | | Action Pop_Auxiliary_Range 09f0 3fe9 |? | Loop_Increasing 0x9da 09f1 00ce | | Action Pop_Auxiliary 09f2 0092 0b84 | | Action Push_String_Extended,0xb84 ; " Switch Independent => " 09f4 00db | | Load_Top At_Offset_3 09f5 8221 | ! | Call 0x1,0x21 09f6 00e1 | | Load_Encached Boolean_Cache 09f7 011c | | Execute Any,Convert_Unchecked 09f8 1c01 | | Execute_Immediate Run_Utility,0x1 09f9 01cc | | Execute Vector,Catenate 09fa e008 | | Load 0x0,0x8 09fb 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 09fc 0092 0b85 | | Action Push_String_Extended,0xb85 ; " Switch Name => " 09fe 00db | | Load_Top At_Offset_3 09ff 8222 | " | Call 0x1,0x22 0a00 01cc | | Execute Vector,Catenate 0a01 e008 | | Load 0x0,0x8 0a02 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a03 0092 0b86 | | Action Push_String_Extended,0xb86 ; " Default Value => " 0a05 00db | | Load_Top At_Offset_3 0a06 8223 | # | Call 0x1,0x23 0a07 01cc | | Execute Vector,Catenate 0a08 e008 | | Load 0x0,0x8 0a09 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a0a 0092 0b87 | | Action Push_String_Extended,0xb87 ; " Option Takes Argument => " 0a0c 00db | | Load_Top At_Offset_3 0a0d 8224 | $ | Call 0x1,0x24 0a0e 00e1 | | Load_Encached Boolean_Cache 0a0f 011c | | Execute Any,Convert_Unchecked 0a10 1c01 | | Execute_Immediate Run_Utility,0x1 0a11 01cc | | Execute Vector,Catenate 0a12 e008 | | Load 0x0,0x8 0a13 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a14 0092 0b88 | | Action Push_String_Extended,0xb88 ; " Is Pre-Option => " 0a16 00db | | Load_Top At_Offset_3 0a17 8225 | % | Call 0x1,0x25 0a18 00e1 | | Load_Encached Boolean_Cache 0a19 011c | | Execute Any,Convert_Unchecked 0a1a 1c01 | | Execute_Immediate Run_Utility,0x1 0a1b 01cc | | Execute Vector,Catenate 0a1c e008 | | Load 0x0,0x8 0a1d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a1e 0092 0b89 | | Action Push_String_Extended,0xb89 ; " " 0a20 e008 | | Load 0x0,0x8 0a21 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a22 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a23 0000 0000 | | .BLANK 0000[0x5] 0a28 ; -------------------------------------------------------------------------------------- 0a28 ; SUBPROGRAM 0a28 ; -------------------------------------------------------------------------------------- 0a28 0a2b | + | .CONST 0x0a2b ; Address of begin 0a29 0004 | | .CONST 0x0004 ; Address of exception handler 0a2a 0001 | | .CONST 0x0001 ; Number of locals 0a2b BODY_0a28: 0a2b INIT_0a28: 0a2b 0092 0b8a | | Action Push_String_Extended,0xb8a ; " File Type => " 0a2d 00db | | Load_Top At_Offset_3 0a2e 822c | , | Call 0x1,0x2c 0a2f e212 | | Load 0x1,0x12 0a30 011c | | Execute Any,Convert_Unchecked 0a31 1c01 | | Execute_Immediate Run_Utility,0x1 0a32 01cc | | Execute Vector,Catenate 0a33 e008 | | Load 0x0,0x8 0a34 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a35 0092 0b8b | | Action Push_String_Extended,0xb8b ; " Retrieve Condition => " 0a37 00db | | Load_Top At_Offset_3 0a38 822d | - | Call 0x1,0x2d 0a39 e215 | | Load 0x1,0x15 0a3a 011c | | Execute Any,Convert_Unchecked 0a3b 1c01 | | Execute_Immediate Run_Utility,0x1 0a3c 01cc | | Execute Vector,Catenate 0a3d e008 | | Load 0x0,0x8 0a3e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a3f 0092 0b8c | | Action Push_String_Extended,0xb8c ; " Retrieve Phase => " 0a41 00db | | Load_Top At_Offset_3 0a42 822e | . | Call 0x1,0x2e 0a43 e20d | | Load 0x1,0xd 0a44 011c | | Execute Any,Convert_Unchecked 0a45 1c01 | | Execute_Immediate Run_Utility,0x1 0a46 01cc | | Execute Vector,Catenate 0a47 e008 | | Load 0x0,0x8 0a48 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a49 0092 0b8d | | Action Push_String_Extended,0xb8d ; " Option Dependent => " 0a4b 00db | | Load_Top At_Offset_3 0a4c 822f | / | Call 0x1,0x2f 0a4d 00e1 | | Load_Encached Boolean_Cache 0a4e 011c | | Execute Any,Convert_Unchecked 0a4f 1c01 | | Execute_Immediate Run_Utility,0x1 0a50 01cc | | Execute Vector,Catenate 0a51 e008 | | Load 0x0,0x8 0a52 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a53 0092 0b8e | | Action Push_String_Extended,0xb8e ; " Associated Option Switch => " 0a55 00db | | Load_Top At_Offset_3 0a56 8230 | 0 | Call 0x1,0x30 0a57 01cc | | Execute Vector,Catenate 0a58 e008 | | Load 0x0,0x8 0a59 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a5a 0092 0b8f | | Action Push_String_Extended,0xb8f ; " Host Filename Extension => " 0a5c 00db | | Load_Top At_Offset_3 0a5d 8231 | 1 | Call 0x1,0x31 0a5e 01cc | | Execute Vector,Catenate 0a5f e008 | | Load 0x0,0x8 0a60 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a61 0092 0b90 | | Action Push_String_Extended,0xb90 ; " Remote Filename Type => " 0a63 00db | | Load_Top At_Offset_3 0a64 8232 | 2 | Call 0x1,0x32 0a65 e211 | | Load 0x1,0x11 0a66 011c | | Execute Any,Convert_Unchecked 0a67 1c01 | | Execute_Immediate Run_Utility,0x1 0a68 01cc | | Execute Vector,Catenate 0a69 e008 | | Load 0x0,0x8 0a6a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a6b 0092 0b91 | | Action Push_String_Extended,0xb91 ; " Argument Overrides Fixed Name => " 0a6d 00db | | Load_Top At_Offset_3 0a6e 8233 | 3 | Call 0x1,0x33 0a6f 00e1 | | Load_Encached Boolean_Cache 0a70 011c | | Execute Any,Convert_Unchecked 0a71 1c01 | | Execute_Immediate Run_Utility,0x1 0a72 01cc | | Execute Vector,Catenate 0a73 e008 | | Load 0x0,0x8 0a74 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a75 0092 0b92 | | Action Push_String_Extended,0xb92 ; " Get Fixed Remote Filename=> " 0a77 00db | | Load_Top At_Offset_3 0a78 8234 | 4 | Call 0x1,0x34 0a79 01cc | | Execute Vector,Catenate 0a7a e008 | | Load 0x0,0x8 0a7b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a7c 0092 0b93 | | Action Push_String_Extended,0xb93 ; " Get Remote Filename Extension => " 0a7e 00db | | Load_Top At_Offset_3 0a7f 8235 | 5 | Call 0x1,0x35 0a80 01cc | | Execute Vector,Catenate 0a81 e008 | | Load 0x0,0x8 0a82 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a83 0092 0b94 | | Action Push_String_Extended,0xb94 ; " " 0a85 e008 | | Load 0x0,0x8 0a86 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a87 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a88 ; -------------------------------------------------------------------------------------- 0a88 ; SUBPROGRAM 0a88 ; -------------------------------------------------------------------------------------- 0a88 0a8d | | .CONST 0x0a8d ; Address of begin 0a89 0004 | | .CONST 0x0004 ; Address of exception handler 0a8a 0002 | | .CONST 0x0002 ; Number of locals 0a8b INIT_0a88: 0a8b e5ff | | Load 0x2,-0x1 0a8c 8260 | ` | Call 0x1,0x60 0a8d BODY_0a88: 0a8d 00d8 | | Load_Top At_Offset_0 0a8e 01db | | Execute Vector,Length 0a8f 7005 |p | Jump_Nonzero 0xa95 0a90 0092 0b95 | | Action Push_String_Extended,0xb95 ; " No Options." 0a92 e008 | | Load 0x0,0x8 0a93 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a94 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a95 0092 0b96 | | Action Push_String_Extended,0xb96 ; " Options => " 0a97 e008 | | Load 0x0,0x8 0a98 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0a99 00cf | | Action Mark_Auxiliary 0a9a 00d9 | | Load_Top At_Offset_1 0a9b 01d9 | | Execute Vector,Reverse_Bounds 0a9c 0263 | c | Execute Discrete,Above_Bound 0a9d 7016 |p | Jump_Nonzero 0xab4 0a9e 0092 0b97 | | Action Push_String_Extended,0xb97 ; " (" 0aa0 00d9 | | Load_Top At_Offset_1 0aa1 00e0 | | Load_Encached Standard_Cache 0aa2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0aa3 01cc | | Execute Vector,Catenate 0aa4 0092 0b98 | | Action Push_String_Extended,0xb98 ; "):" 0aa6 01cc | | Execute Vector,Catenate 0aa7 e008 | | Load 0x0,0x8 0aa8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0aa9 00d8 | | Load_Top At_Offset_0 0aaa e602 | | Load 0x3,0x2 0aab 01d7 | | Execute Vector,Field_Read 0aac 821e | | Call 0x1,0x1e 0aad 7004 |p | Jump_Nonzero 0xab2 0aae 00d8 | | Load_Top At_Offset_0 0aaf e602 | | Load 0x3,0x2 0ab0 01d7 | | Execute Vector,Field_Read 0ab1 8402 | | Call 0x2,0x2 0ab2 00c8 | | Action Pop_Auxiliary_Range 0ab3 3fea |? | Loop_Increasing 0xa9e 0ab4 00ce | | Action Pop_Auxiliary 0ab5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ab6 0000 0000 | | .XXX[0x2] 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 ; SUBPROGRAM 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 0abd | | .CONST 0x0abd ; Address of begin 0ab9 0004 | | .CONST 0x0004 ; Address of exception handler 0aba 0002 | | .CONST 0x0002 ; Number of locals 0abb INIT_0ab8: 0abb e5ff | | Load 0x2,-0x1 0abc 8261 | a | Call 0x1,0x61 0abd BODY_0ab8: 0abd 00d8 | | Load_Top At_Offset_0 0abe 01db | | Execute Vector,Length 0abf 7005 |p | Jump_Nonzero 0xac5 0ac0 0092 0b99 | | Action Push_String_Extended,0xb99 ; " No Associated Files." 0ac2 e008 | | Load 0x0,0x8 0ac3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0ac4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ac5 0092 0b9a | | Action Push_String_Extended,0xb9a ; " Associated Files => " 0ac7 e008 | | Load 0x0,0x8 0ac8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0ac9 00cf | | Action Mark_Auxiliary 0aca 00d9 | | Load_Top At_Offset_1 0acb 01d9 | | Execute Vector,Reverse_Bounds 0acc 0263 | c | Execute Discrete,Above_Bound 0acd 7016 |p | Jump_Nonzero 0xae4 0ace 0092 0b97 | | Action Push_String_Extended,0xb97 ; " (" 0ad0 00d9 | | Load_Top At_Offset_1 0ad1 00e0 | | Load_Encached Standard_Cache 0ad2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ad3 01cc | | Execute Vector,Catenate 0ad4 0092 0b98 | | Action Push_String_Extended,0xb98 ; "):" 0ad6 01cc | | Execute Vector,Catenate 0ad7 e008 | | Load 0x0,0x8 0ad8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0ad9 00d8 | | Load_Top At_Offset_0 0ada e602 | | Load 0x3,0x2 0adb 01d7 | | Execute Vector,Field_Read 0adc 822a | * | Call 0x1,0x2a 0add 7004 |p | Jump_Nonzero 0xae2 0ade 00d8 | | Load_Top At_Offset_0 0adf e602 | | Load 0x3,0x2 0ae0 01d7 | | Execute Vector,Field_Read 0ae1 8403 | | Call 0x2,0x3 0ae2 00c8 | | Action Pop_Auxiliary_Range 0ae3 3fea |? | Loop_Increasing 0xace 0ae4 00ce | | Action Pop_Auxiliary 0ae5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ae6 0000 0000 | | .XXX[0x2] 0ae8 ; -------------------------------------------------------------------------------------- 0ae8 ; SUBPROGRAM 0ae8 ; -------------------------------------------------------------------------------------- 0ae8 0aeb | | .CONST 0x0aeb ; Address of begin 0ae9 0004 | | .CONST 0x0004 ; Address of exception handler 0aea 0001 | | .CONST 0x0001 ; Number of locals 0aeb BODY_0ae8: 0aeb INIT_0ae8: 0aeb 4608 |F | Jump_Case 0x9 0aec 7808 |x | Jump 0xaf5 ; case 0x0 0aed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0aee 780d |x | Jump 0xafc ; case 0x2 0aef 780c |x | Jump 0xafc ; case 0x3 0af0 780b |x | Jump 0xafc ; case 0x4 0af1 780a |x | Jump 0xafc ; case 0x5 0af2 7809 |x | Jump 0xafc ; case 0x6 0af3 7808 |x | Jump 0xafc ; case 0x7 0af4 7807 |x | Jump 0xafc ; case 0x8 0af5 4801 |H | Short_Literal 0x1 0af6 00db | | Load_Top At_Offset_3 0af7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0af8 4803 |H | Short_Literal 0x3 0af9 00db | | Load_Top At_Offset_3 0afa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0afb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0afc 0869 | i | Execute_Immediate Raise,0x69 0afd 0000 0000 | | .XXX[0x3] 0aff 0000 | | 0b00 ; -------------------------------------------------------------------------------------- 0b00 ; SUBPROGRAM 0b00 ; -------------------------------------------------------------------------------------- 0b00 0b03 | | .CONST 0x0b03 ; Address of begin 0b01 0004 | | .CONST 0x0004 ; Address of exception handler 0b02 0001 | | .CONST 0x0001 ; Number of locals 0b03 BODY_0b00: 0b03 INIT_0b00: 0b03 4608 |F | Jump_Case 0x9 0b04 7808 |x | Jump 0xb0d ; case 0x0 0b05 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0b06 780d |x | Jump 0xb14 ; case 0x2 0b07 780c |x | Jump 0xb14 ; case 0x3 0b08 780b |x | Jump 0xb14 ; case 0x4 0b09 780a |x | Jump 0xb14 ; case 0x5 0b0a 7809 |x | Jump 0xb14 ; case 0x6 0b0b 7808 |x | Jump 0xb14 ; case 0x7 0b0c 7807 |x | Jump 0xb14 ; case 0x8 0b0d 4800 |H | Short_Literal 0x0 0b0e 00db | | Load_Top At_Offset_3 0b0f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0b10 4801 |H | Short_Literal 0x1 0b11 00db | | Load_Top At_Offset_3 0b12 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0b13 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0b14 0869 | i | Execute_Immediate Raise,0x69 0b15 0000 0000 | | .XXX[0x3] 0b17 0000 | | 0b18 ; -------------------------------------------------------------------------------------- 0b18 ; SUBPROGRAM 0b18 ; -------------------------------------------------------------------------------------- 0b18 0b1b | | .CONST 0x0b1b ; Address of begin 0b19 0004 | | .CONST 0x0004 ; Address of exception handler 0b1a 0001 | | .CONST 0x0001 ; Number of locals 0b1b BODY_0b18: 0b1b INIT_0b18: 0b1b 4608 |F | Jump_Case 0x9 0b1c 7808 |x | Jump 0xb25 ; case 0x0 0b1d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0b1e 7816 |x | Jump 0xb35 ; case 0x2 0b1f 7815 |x | Jump 0xb35 ; case 0x3 0b20 7814 |x | Jump 0xb35 ; case 0x4 0b21 7813 |x | Jump 0xb35 ; case 0x5 0b22 7812 |x | Jump 0xb35 ; case 0x6 0b23 7811 |x | Jump 0xb35 ; case 0x7 0b24 7810 |x | Jump 0xb35 ; case 0x8 0b25 00da | | Load_Top At_Offset_2 0b26 3410 |4 | Execute Record,Field_Reference,Field_Number 0x10 0b27 1c00 | | Execute_Immediate Run_Utility,0x0 0b28 00da | | Load_Top At_Offset_2 0b29 3411 |4 | Execute Record,Field_Reference,Field_Number 0x11 0b2a 1c00 | | Execute_Immediate Run_Utility,0x0 0b2b 00da | | Load_Top At_Offset_2 0b2c 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12 0b2d 1c00 | | Execute_Immediate Run_Utility,0x0 0b2e 00da | | Load_Top At_Offset_2 0b2f 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13 0b30 1c00 | | Execute_Immediate Run_Utility,0x0 0b31 00da | | Load_Top At_Offset_2 0b32 3414 |4 | Execute Record,Field_Reference,Field_Number 0x14 0b33 1c00 | | Execute_Immediate Run_Utility,0x0 0b34 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0b35 0869 | i | Execute_Immediate Raise,0x69 0b36 ; -------------------------------------------------------------------------------------- 0b36 ; STRING TABLE 0b36 ; -------------------------------------------------------------------------------------- 0b36 00cc | | .STRTAB 0x00cc->0x0b9c ; "ASSEMBLE" 0b37 00d2 | | .STRTAB 0x00d2->0x0ba0 ; "PROMOTE" 0b38 00d7 | | .STRTAB 0x00d7->0x0ba3 ; "DEMOTE" 0b39 00db | | .STRTAB 0x00db->0x0ba6 ; "LINK" 0b3a 00dd | | .STRTAB 0x00dd->0x0ba8 ; "GENERICS_SHARE_CODE" 0b3b 00ee | | .STRTAB 0x00ee->0x0bb2 ; "REQUIRE_BODY_AND_GENERIC_IN_SAME_COMPILATION" 0b3c 0118 | | .STRTAB 0x0118->0x0bc8 ; "REQUIRES_SUBUNITS_AND_GENERIC_IN_SAME_COMPILATION" 0b3d 0147 | G | .STRTAB 0x0147->0x0be0 ; "IMPLEMENTS_PRAGMA_INLINE" 0b3e 015d | ] | .STRTAB 0x015d->0x0bec ; "SEPARATE_SUBUNITS_ARE_INEFFICIENT" 0b3f 017c | | | .STRTAB 0x017c->0x0bfd ; "ADA_NAME" 0b40 0182 | | .STRTAB 0x0182->0x0c01 ; "FILE_NAME" 0b41 0189 | | .STRTAB 0x0189->0x0c05 ; "FIXED_NAME" 0b42 0191 | | .STRTAB 0x0191->0x0c0a ; "TEXT" 0b43 0193 | | .STRTAB 0x0193->0x0c0c ; "BINARY" 0b44 0197 | | .STRTAB 0x0197->0x0c0f ; "UPPER" 0b45 019a | | .STRTAB 0x019a->0x0c12 ; "LOWER" 0b46 019d | | .STRTAB 0x019d->0x0c14 ; "CAPITALIZE" 0b47 01a5 | | .STRTAB 0x01a5->0x0c19 ; "DONT_CARE" 0b48 01ac | | .STRTAB 0x01ac->0x0c1e ; "UNIX" 0b49 01ae | | .STRTAB 0x01ae->0x0c20 ; "VMS" 0b4a 01af | | .STRTAB 0x01af->0x0c21 ; "ULTRIX" 0b4b 01b3 | | .STRTAB 0x01b3->0x0c24 ; "VM" 0b4c 01b3 | | .STRTAB 0x01b3->0x0c25 ; "MVS" 0b4d 01b4 | | .STRTAB 0x01b4->0x0c27 ; "OS2" 0b4e 01b5 | | .STRTAB 0x01b5->0x0c28 ; "DOS" 0b4f 01b6 | | .STRTAB 0x01b6->0x0c2a ; "SPARE1" 0b50 01ba | | .STRTAB 0x01ba->0x0c2d ; "SPARE2" 0b51 01be | | .STRTAB 0x01be->0x0c30 ; "SPARE3" 0b52 01c2 | | .STRTAB 0x01c2->0x0c33 ; "SPARE4" 0b53 01c6 | | .STRTAB 0x01c6->0x0c36 ; "UNKNOWN" 0b54 01cb | | .STRTAB 0x01cb->0x0c39 ; "ON_NORMAL" 0b55 01d2 | | .STRTAB 0x01d2->0x0c3e ; "ON_ERROR" 0b56 01d8 | | .STRTAB 0x01d8->0x0c42 ; "ON_WARNING" 0b57 01e0 | | .STRTAB 0x01e0->0x0c47 ; "ALWAYS" 0b58 01e4 | | .STRTAB 0x01e4->0x0c4a ; "DTIA" 0b59 01e6 | | .STRTAB 0x01e6->0x0c4c ; "FTP" 0b5a 01e7 | | .STRTAB 0x01e7->0x0c4d ; "No Operational Characteristics Customizations." 0b5b 0213 | | .STRTAB 0x0213->0x0c64 ; "Operational Characteristics Customizations: " 0b5c 023d | = | .STRTAB 0x023d->0x0c7a ; " Properties => " 0b5d 024c | L | .STRTAB 0x024c->0x0c83 ; " " 0b5e 0250 | P | .STRTAB 0x0250->0x0c86 ; " => " 0b5f 0252 | R | .STRTAB 0x0252->0x0c88 ; " Maximum Filename Length => " 0b60 026e | n | .STRTAB 0x026e->0x0c97 ; " Full Pathname Length => " 0b61 0287 | | .STRTAB 0x0287->0x0ca4 ; " Spec Filename Extension => " 0b62 02a3 | | .STRTAB 0x02a3->0x0cb3 ; " Body Filename Extension => " 0b63 02bf | | .STRTAB 0x02bf->0x0cc2 ; " Extension Separator => " 0b64 02d7 | | .STRTAB 0x02d7->0x0ccf ; " Option Separator => " 0b65 02ec | | .STRTAB 0x02ec->0x0cdb ; " Option Header => " 0b66 02fe | | .STRTAB 0x02fe->0x0ce5 ; " Option Argument Separator => " 0b67 031c | | .STRTAB 0x031c->0x0cf5 ; " Ada-Name Subunit Separator => " 0b68 033b | ; | .STRTAB 0x033b->0x0d05 ; " Ada-Name Spec Suffix => " 0b69 0354 | T | .STRTAB 0x0354->0x0d13 ; " Ada-Name Body Suffix => " 0b6a 036d | m | .STRTAB 0x036d->0x0d20 ; " Directory Separator => " 0b6b 0385 | | .STRTAB 0x0385->0x0d2d ; " Directory Prefix => " 0b6c 039a | | .STRTAB 0x039a->0x0d39 ; " Directory Suffix => " 0b6d 03af | | .STRTAB 0x03af->0x0d44 ; " Directory-Unit Separator => " 0b6e 03cc | | .STRTAB 0x03cc->0x0d54 ; " Case Sensitive => " 0b6f 03df | | .STRTAB 0x03df->0x0d5e ; " Command Line Case => " 0b70 03f5 | | .STRTAB 0x03f5->0x0d6a ; " Maximum Command Line Length => " 0b71 0415 | | .STRTAB 0x0415->0x0d7b ; " Compiler Command => " 0b72 042a | * | .STRTAB 0x042a->0x0d87 ; " Compiler Pre-Command => " 0b73 0443 | C | .STRTAB 0x0443->0x0d94 ; " Compiler Post-Command => " 0b74 045d | ] | .STRTAB 0x045d->0x0da2 ; " Linker Command => " 0b75 0470 | p | .STRTAB 0x0470->0x0dad ; " Linker Pre-Command => " 0b76 0487 | | .STRTAB 0x0487->0x0db9 ; " Linker Post-Command => " 0b77 049f | | .STRTAB 0x049f->0x0dc6 ; " Executable Option => " 0b78 04b5 | | .STRTAB 0x04b5->0x0dd2 ; " Executable Option Is Pre-Option => " 0b79 04d9 | | .STRTAB 0x04d9->0x0de5 ; " Context Command => " 0b7a 04ed | | .STRTAB 0x04ed->0x0df0 ; " Library Command => " 0b7b 0501 | | .STRTAB 0x0501->0x0dfb ; " Default Program Library Name => " 0b7c 0522 | " | .STRTAB 0x0522->0x0e0d ; " Parse Standard Output => " 0b7d 053c | < | .STRTAB 0x053c->0x0e1b ; " Parse Standard Error => " 0b7e 0555 | U | .STRTAB 0x0555->0x0e28 ; " Error Pattern => " 0b7f 0567 | g | .STRTAB 0x0567->0x0e32 ; " Remote Operating System => " 0b80 0583 | | .STRTAB 0x0583->0x0e41 ; " Transfer Type => " 0b81 0595 | | .STRTAB 0x0595->0x0e4b ; " Option Name => " 0b82 05a8 | | .STRTAB 0x05a8->0x0e56 ; " Active Phases => " 0b83 05bd | | .STRTAB 0x05bd->0x0e61 ; " " 0b84 05c4 | | .STRTAB 0x05c4->0x0e66 ; " Switch Independent => " 0b85 05de | | .STRTAB 0x05de->0x0e74 ; " Switch Name => " 0b86 05f1 | | .STRTAB 0x05f1->0x0e7e ; " Default Value => " 0b87 0606 | | .STRTAB 0x0606->0x0e8a ; " Option Takes Argument => " 0b88 0623 | # | .STRTAB 0x0623->0x0e99 ; " Is Pre-Option => " 0b89 0638 | 8 | .STRTAB 0x0638->0x0ea5 ; " " 0b8a 0639 | 9 | .STRTAB 0x0639->0x0ea6 ; " File Type => " 0b8b 064a | J | .STRTAB 0x064a->0x0eb0 ; " Retrieve Condition => " 0b8c 0664 | d | .STRTAB 0x0664->0x0ebe ; " Retrieve Phase => " 0b8d 067a | z | .STRTAB 0x067a->0x0eca ; " Option Dependent => " 0b8e 0692 | | .STRTAB 0x0692->0x0ed7 ; " Associated Option Switch => " 0b8f 06b2 | | .STRTAB 0x06b2->0x0ee8 ; " Host Filename Extension => " 0b90 06d1 | | .STRTAB 0x06d1->0x0ef8 ; " Remote Filename Type => " 0b91 06ed | | .STRTAB 0x06ed->0x0f07 ; " Argument Overrides Fixed Name => " 0b92 0712 | | .STRTAB 0x0712->0x0f1b ; " Get Fixed Remote Filename=> " 0b93 0732 | 2 | .STRTAB 0x0732->0x0f2c ; " Get Remote Filename Extension => " 0b94 0757 | W | .STRTAB 0x0757->0x0f3f ; " " 0b95 0757 | W | .STRTAB 0x0757->0x0f40 ; " No Options." 0b96 0763 | c | .STRTAB 0x0763->0x0f47 ; " Options => " 0b97 076f | o | .STRTAB 0x076f->0x0f4e ; " (" 0b98 0771 | q | .STRTAB 0x0771->0x0f50 ; "):" 0b99 0771 | q | .STRTAB 0x0771->0x0f51 ; " No Associated Files." 0b9a 0786 | | .STRTAB 0x0786->0x0f5d ; " Associated Files => " 0b9b 079b | | .STREND 0x079b->0x0f68 0b9c 4153 5345 |ASSE| .STRTAB_STRINGS 0f69 0000 0000 | | .BLANK 0000[0x7] 0f70 ; -------------------------------------------------------------------------------------- 0f70 ; Debug Table 0f70 ; -------------------------------------------------------------------------------------- 0f70 0004 000c | | .DEBUG4 0x0004,0x000c,0x2e67,0x0000,0x0001,0x0000 0f76 0000 0000 | | .BLANK 0000[0x8a]