|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_779ce4
└─⟦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 05e8 | | .CONST 0x05e8 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 014d | M | .CONST 0x014d ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0037 | 7 | .CONST 0x0037 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4805 |H | Short_Literal 0x5 000d 029f 015b | [| Declare_Subprogram INIT_0158,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 e003 | | Load 0x0,0x3 0017 0266 | f | Execute Discrete,Bounds 0018 00e1 | | Load_Encached Boolean_Cache 0019 02a0 | | Declare_Subprogram Null_Subprogram 001a 4801 |H | Short_Literal 0x1 001b 035e | ^ | Declare_Type Array,Defined,Visible 001c 4800 |H | Short_Literal 0x0 001d 4802 |H | Short_Literal 0x2 001e 029f 018b | | Declare_Subprogram INIT_0188,For_Call 0020 03fe | | Declare_Type Discrete,Defined,Visible 0021 e004 | | Load 0x0,0x4 0022 00d8 | | Load_Top At_Offset_0 0023 02a0 | | Declare_Subprogram Null_Subprogram 0024 4802 |H | Short_Literal 0x2 0025 032e | . | Declare_Type Record,Defined,Visible 0026 00d9 | | Load_Top At_Offset_1 0027 0266 | f | Execute Discrete,Bounds 0028 00da | | Load_Top At_Offset_2 0029 02a0 | | Declare_Subprogram Null_Subprogram 002a 4801 |H | Short_Literal 0x1 002b 035e | ^ | Declare_Type Array,Defined,Visible 002c e20e | | Load 0x1,0xe 002d e20f | | Load 0x1,0xf 002e 00da | | Load_Top At_Offset_2 002f e005 | | Load 0x0,0x5 0030 00e1 | | Load_Encached Boolean_Cache 0031 00e1 | | Load_Encached Boolean_Cache 0032 029f 0403 | | Declare_Subprogram INIT_0400,For_Call 0034 4806 |H | Short_Literal 0x6 0035 032e | . | Declare_Type Record,Defined,Visible 0036 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated 0038 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 003a 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 003c 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 003e 4800 |H | Short_Literal 0x0 003f 0093 0443 | C| push_full_address INIT_0440 0041 02a0 | | Declare_Subprogram Null_Subprogram 0042 038f | | Declare_Type Package,Defined,Visible 0043 0386 | | Declare_Variable Package,Visible 0044 4800 |H | Short_Literal 0x0 0045 480a |H | Short_Literal 0xa 0046 029f 01f3 | | Declare_Subprogram INIT_01f0,For_Call 0048 03fe | | Declare_Type Discrete,Defined,Visible 0049 00e1 | | Load_Encached Boolean_Cache 004a 00d9 | | Load_Top At_Offset_1 004b 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call 004d 4802 |H | Short_Literal 0x2 004e 032e | . | Declare_Type Record,Defined,Visible 004f 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 0051 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated 0053 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 0055 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated 0057 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 0059 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated 005b 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 005d 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 005f 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated 0061 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 0063 0093 0000 | | push_full_address 0x0 0065 611a |a | Indirect_Literal Discrete,0x180,{0x80000000, 0x00010000} 0066 0273 | s | Execute Discrete,Plus 0067 e006 | | Load 0x0,0x6 0068 0273 | s | Execute Discrete,Plus 0069 e007 | | Load 0x0,0x7 006a 0273 | s | Execute Discrete,Plus 006b e213 | | Load 0x1,0x13 006c e21a | | Load 0x1,0x1a 006d 4801 |H | Short_Literal 0x1 006e 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 006f 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0070 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0071 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0072 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0073 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0074 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0075 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0076 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0077 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0078 e008 | | Load 0x0,0x8 0079 480b |H | Short_Literal 0xb 007a e009 | | Load 0x0,0x9 007b 0386 | | Declare_Variable Package,Visible 007c 00d8 | | Load_Top At_Offset_0 007d 020f | | Execute Module,Activate 007e e00a | | Load 0x0,0xa 007f 00d9 | | Load_Top At_Offset_1 0080 0098 | | Execute Package,Field_Read_Dynamic 0081 0129 | ) | Execute Any,Make_Visible 0082 00bf | | Action Accept_Activation 0083 e00b | | Load 0x0,0xb 0084 e00c | | Load 0x0,0xc 0085 e219 | | Load 0x1,0x19 0086 4800 |H | Short_Literal 0x0 0087 4801 |H | Short_Literal 0x1 0088 480a |H | Short_Literal 0xa 0089 0092 051f | | Action Push_String_Extended,0x51f ; "others => Unspecified" 008b 00ea | | Load_Encached Null_String_Cache 008c 00ea | | Load_Encached Null_String_Cache 008d 4801 |H | Short_Literal 0x1 008e 480a |H | Short_Literal 0xa 008f e00d | | Load 0x0,0xd 0090 0387 | | Declare_Variable Package 0091 00d8 | | Load_Top At_Offset_0 0092 020f | | Execute Module,Activate 0093 e00e | | Load 0x0,0xe 0094 e00f | | Load 0x0,0xf 0095 e20d | | Load 0x1,0xd 0096 4800 |H | Short_Literal 0x0 0097 4801 |H | Short_Literal 0x1 0098 4805 |H | Short_Literal 0x5 0099 0092 051f | | Action Push_String_Extended,0x51f ; "others => Unspecified" 009b 00ea | | Load_Encached Null_String_Cache 009c 00ea | | Load_Encached Null_String_Cache 009d 4801 |H | Short_Literal 0x1 009e 4805 |H | Short_Literal 0x5 009f e00d | | Load 0x0,0xd 00a0 0387 | | Declare_Variable Package 00a1 00d8 | | Load_Top At_Offset_0 00a2 020f | | Execute Module,Activate 00a3 4800 |H | Short_Literal 0x0 00a4 4805 |H | Short_Literal 0x5 00a5 029f 02b3 | | Declare_Subprogram INIT_02b0,For_Call 00a7 03fd | | Declare_Type Discrete,Defined 00a8 e010 | | Load 0x0,0x10 00a9 e011 | | Load 0x0,0x11 00aa 00da | | Load_Top At_Offset_2 00ab 4800 |H | Short_Literal 0x0 00ac 4801 |H | Short_Literal 0x1 00ad 4805 |H | Short_Literal 0x5 00ae 0092 051f | | Action Push_String_Extended,0x51f ; "others => Unspecified" 00b0 00ea | | Load_Encached Null_String_Cache 00b1 00ea | | Load_Encached Null_String_Cache 00b2 4801 |H | Short_Literal 0x1 00b3 4805 |H | Short_Literal 0x5 00b4 e00d | | Load 0x0,0xd 00b5 0387 | | Declare_Variable Package 00b6 00d8 | | Load_Top At_Offset_0 00b7 020f | | Execute Module,Activate 00b8 00d9 | | Load_Top At_Offset_1 00b9 0266 | f | Execute Discrete,Bounds 00ba e003 | | Load 0x0,0x3 00bb 02a0 | | Declare_Subprogram Null_Subprogram 00bc 4801 |H | Short_Literal 0x1 00bd 035d | ] | Declare_Type Array,Defined 00be 00d8 | | Load_Top At_Offset_0 00bf 0337 | 7 | Declare_Variable Array 00c0 00d8 | | Load_Top At_Offset_0 00c1 0335 | 5 | Declare_Variable Array,Duplicate 00c2 00cd | | Action Spare6_Action 00c3 4800 |H | Short_Literal 0x0 00c4 4800 |H | Short_Literal 0x0 00c5 00da | | Load_Top At_Offset_2 00c6 01d6 | | Execute Vector,Field_Write 00c7 4800 |H | Short_Literal 0x0 00c8 4801 |H | Short_Literal 0x1 00c9 00da | | Load_Top At_Offset_2 00ca 01d6 | | Execute Vector,Field_Write 00cb 4801 |H | Short_Literal 0x1 00cc 4802 |H | Short_Literal 0x2 00cd 00da | | Load_Top At_Offset_2 00ce 01d6 | | Execute Vector,Field_Write 00cf 4802 |H | Short_Literal 0x2 00d0 4803 |H | Short_Literal 0x3 00d1 00da | | Load_Top At_Offset_2 00d2 01d6 | | Execute Vector,Field_Write 00d3 4803 |H | Short_Literal 0x3 00d4 4804 |H | Short_Literal 0x4 00d5 00da | | Load_Top At_Offset_2 00d6 01d6 | | Execute Vector,Field_Write 00d7 4804 |H | Short_Literal 0x4 00d8 4805 |H | Short_Literal 0x5 00d9 00da | | Load_Top At_Offset_2 00da 01d6 | | Execute Vector,Field_Write 00db 00d9 | | Load_Top At_Offset_1 00dc 01d4 | | Execute Vector,Structure_Write 00dd e226 | & | Load 0x1,0x26 00de 0007 | | Action Break_Optional 00df e213 | | Load 0x1,0x13 00e0 0322 | " | Declare_Variable Record 00e1 00d8 | | Load_Top At_Offset_0 00e2 1c00 | | Execute_Immediate Run_Utility,0x0 00e3 00e1 | | Load_Encached Boolean_Cache 00e4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00e5 00e1 | | Load_Encached Boolean_Cache 00e6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00e7 e012 | | Load 0x0,0x12 00e8 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 00e9 0092 0520 | | Action Push_String_Extended,0x520 ; "<default>" 00eb 029b 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Unelaborated 00ed 029d 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call 00ef 029d 030b | | Declare_Subprogram INIT_0308,For_Outer_Call 00f1 029d 031b | | Declare_Subprogram INIT_0318,For_Outer_Call 00f3 029d 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call 00f5 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00f6 00c7 | | Action Elaborate_Subprogram 00f7 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00f8 00c7 | | Action Elaborate_Subprogram 00f9 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00fa 00c7 | | Action Elaborate_Subprogram 00fb 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00fc 00c7 | | Action Elaborate_Subprogram 00fd 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00fe 00c7 | | Action Elaborate_Subprogram 00ff 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0100 00c7 | | Action Elaborate_Subprogram 0101 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0102 00c7 | | Action Elaborate_Subprogram 0103 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0104 00c7 | | Action Elaborate_Subprogram 0105 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0106 00c7 | | Action Elaborate_Subprogram 0107 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0108 00c7 | | Action Elaborate_Subprogram 0109 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 010a 00c7 | | Action Elaborate_Subprogram 010b 1d15 | | Execute_Immediate Reference_Lex_1,0x15 010c 00c7 | | Action Elaborate_Subprogram 010d 1d16 | | Execute_Immediate Reference_Lex_1,0x16 010e 00c7 | | Action Elaborate_Subprogram 010f 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0110 00c7 | | Action Elaborate_Subprogram 0111 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0112 e013 | | Load 0x0,0x13 0113 e014 | | Load 0x0,0x14 0114 e225 | % | Load 0x1,0x25 0115 0098 | | Execute Package,Field_Read_Dynamic 0116 0095 | | Execute Package,Field_Reference_Dynamic 0117 a015 | | Store_Unchecked 0x0,0x15 0118 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0119 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 011a 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 011b e00a | | Load 0x0,0xa 011c e225 | % | Load 0x1,0x25 011d 0098 | | Execute Package,Field_Read_Dynamic 011e e016 | | Load 0x0,0x16 011f e014 | | Load 0x0,0x14 0120 e225 | % | Load 0x1,0x25 0121 0098 | | Execute Package,Field_Read_Dynamic 0122 0095 | | Execute Package,Field_Reference_Dynamic 0123 e017 | | Load 0x0,0x17 0124 e014 | | Load 0x0,0x14 0125 e225 | % | Load 0x1,0x25 0126 0098 | | Execute Package,Field_Read_Dynamic 0127 0095 | | Execute Package,Field_Reference_Dynamic 0128 e018 | | Load 0x0,0x18 0129 e014 | | Load 0x0,0x14 012a e225 | % | Load 0x1,0x25 012b 0098 | | Execute Package,Field_Read_Dynamic 012c 0095 | | Execute Package,Field_Reference_Dynamic 012d e019 | | Load 0x0,0x19 012e e014 | | Load 0x0,0x14 012f e225 | % | Load 0x1,0x25 0130 0098 | | Execute Package,Field_Read_Dynamic 0131 0095 | | Execute Package,Field_Reference_Dynamic 0132 e01a | | Load 0x0,0x1a 0133 e014 | | Load 0x0,0x14 0134 e225 | % | Load 0x1,0x25 0135 0098 | | Execute Package,Field_Read_Dynamic 0136 0095 | | Execute Package,Field_Reference_Dynamic 0137 e01b | | Load 0x0,0x1b 0138 e014 | | Load 0x0,0x14 0139 e225 | % | Load 0x1,0x25 013a 0098 | | Execute Package,Field_Read_Dynamic 013b 0095 | | Execute Package,Field_Reference_Dynamic 013c e01c | | Load 0x0,0x1c 013d e014 | | Load 0x0,0x14 013e e225 | % | Load 0x1,0x25 013f 0098 | | Execute Package,Field_Read_Dynamic 0140 0095 | | Execute Package,Field_Reference_Dynamic 0141 e01d | | Load 0x0,0x1d 0142 e014 | | Load 0x0,0x14 0143 e225 | % | Load 0x1,0x25 0144 0098 | | Execute Package,Field_Read_Dynamic 0145 0095 | | Execute Package,Field_Reference_Dynamic 0146 480f |H | Short_Literal 0xf 0147 e218 | | Load 0x1,0x18 0148 020e | | Execute Module,Augment_Imports 0149 e218 | | Load 0x1,0x18 014a 020f | | Execute Module,Activate 014b 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 014c 00c7 | | Action Elaborate_Subprogram 014d BODY_0008: 014d e012 | | Load 0x0,0x12 014e 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 014f 4907 |I | Short_Literal 0x107 0150 e01e | | Load 0x0,0x1e 0151 180d | | Execute Package,Field_Execute,Field_Number 0xd 0152 c231 | 1 | Store 0x1,0x31 0153 00bc | | Action Signal_Activated 0154 00bb | | Action Signal_Completion 0155 0000 0000 | | .XXX[0x3] 0157 0000 | | 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b 4607 |F | Jump_Case 0x8 015c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 015d 7807 |x | Jump 0x165 ; case 0x1 015e 780a |x | Jump 0x169 ; case 0x2 015f 780e |x | Jump 0x16e ; case 0x3 0160 7811 |x | Jump 0x172 ; case 0x4 0161 7812 |x | Jump 0x174 ; case 0x5 0162 7813 |x | Jump 0x176 ; case 0x6 0163 7816 |x | Jump 0x17a ; case 0x7 0164 4302 |C | .XXX[0x1] 0165 00da | | Load_Top At_Offset_2 0166 0091 0505 | | Action Push_String_Extended_Indexed,0x505 ; "NONE" 0168 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0169 00db | | Load_Top At_Offset_3 016a 00db | | Load_Top At_Offset_3 016b 00e0 | | Load_Encached Standard_Cache 016c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 016d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 016e 00da | | Load_Top At_Offset_2 016f 00e0 | | Load_Encached Standard_Cache 0170 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0171 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0172 00db | | Load_Top At_Offset_3 0173 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0174 00db | | Load_Top At_Offset_3 0175 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0176 e20d | | Load 0x1,0xd 0177 00dc | | Load_Top At_Offset_4 0178 0267 | g | Execute Discrete,Predecessor 0179 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 017a e20d | | Load 0x1,0xd 017b 00dc | | Load_Top At_Offset_4 017c 0268 | h | Execute Discrete,Successor 017d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 017e 0000 0000 | | .XXX[0x2] 0180 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0184 0000 0000 | | .BLANK 0000[0x4] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 4607 |F | Jump_Case 0x8 018c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 018d 7807 |x | Jump 0x195 ; case 0x1 018e 780a |x | Jump 0x199 ; case 0x2 018f 780e |x | Jump 0x19e ; case 0x3 0190 7811 |x | Jump 0x1a2 ; case 0x4 0191 7812 |x | Jump 0x1a4 ; case 0x5 0192 7813 |x | Jump 0x1a6 ; case 0x6 0193 7816 |x | Jump 0x1aa ; case 0x7 0194 4302 |C | .XXX[0x1] 0195 00da | | Load_Top At_Offset_2 0196 0091 050b | | Action Push_String_Extended_Indexed,0x50b ; "EX_USER_SCRIPT_PROLOG" 0198 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0199 00db | | Load_Top At_Offset_3 019a 00db | | Load_Top At_Offset_3 019b 00e0 | | Load_Encached Standard_Cache 019c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 019d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 019e 00da | | Load_Top At_Offset_2 019f 00e0 | | Load_Encached Standard_Cache 01a0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01a1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01a2 00db | | Load_Top At_Offset_3 01a3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01a4 00db | | Load_Top At_Offset_3 01a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01a6 e210 | | Load 0x1,0x10 01a7 00dc | | Load_Top At_Offset_4 01a8 0267 | g | Execute Discrete,Predecessor 01a9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01aa e210 | | Load 0x1,0x10 01ab 00dc | | Load_Top At_Offset_4 01ac 0268 | h | Execute Discrete,Successor 01ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01ae 0000 0000 | | .XXX[0x2] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 00da | | Load_Top At_Offset_2 01b4 e01f | | Load 0x0,0x1f 01b5 e225 | % | Load 0x1,0x25 01b6 0096 | | Execute Package,Entry 01b7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01c1 | | .CONST 0x01c1 ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0003 | | .CONST 0x0003 ; Number of locals 01bb INIT_01b8: 01bb e226 | & | Load 0x1,0x26 01bc 0007 | | Action Break_Optional 01bd e213 | | Load 0x1,0x13 01be 0322 | " | Declare_Variable Record 01bf 00d8 | | Load_Top At_Offset_0 01c0 1c00 | | Execute_Immediate Run_Utility,0x0 01c1 BODY_01b8: 01c1 e5ff | | Load 0x2,-0x1 01c2 e020 | | Load 0x0,0x20 01c3 e225 | % | Load 0x1,0x25 01c4 0096 | | Execute Package,Entry 01c5 0032 | 2 | Store_Top Heap_Access,At_Offset_2 01c6 00d9 | | Load_Top At_Offset_1 01c7 e00a | | Load 0x0,0xa 01c8 e225 | % | Load 0x1,0x25 01c9 0098 | | Execute Package,Field_Read_Dynamic 01ca 0216 | | Execute Heap_Access,Convert 01cb 00d9 | | Load_Top At_Offset_1 01cc e021 | ! | Load 0x0,0x21 01cd e225 | % | Load 0x1,0x25 01ce 0096 | | Execute Package,Entry 01cf 0032 | 2 | Store_Top Heap_Access,At_Offset_2 01d0 00d9 | | Load_Top At_Offset_1 01d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d2 0000 0000 | | .BLANK 0000[0x6] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 01dc e00a | | Load 0x0,0xa 01dd e225 | % | Load 0x1,0x25 01de 0098 | | Execute Package,Field_Read_Dynamic 01df 0216 | | Execute Heap_Access,Convert 01e0 e022 | " | Load 0x0,0x22 01e1 e225 | % | Load 0x1,0x25 01e2 0096 | | Execute Package,Entry 01e3 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01e4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01e5 0000 0000 | | .XXX[0x3] 01e7 0000 | | 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 0833 | 3 | Execute_Immediate Raise,0x33 01ec 0000 0000 | | .BLANK 0000[0x4] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 4607 |F | Jump_Case 0x8 01f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01f5 7807 |x | Jump 0x1fd ; case 0x1 01f6 780a |x | Jump 0x201 ; case 0x2 01f7 780e |x | Jump 0x206 ; case 0x3 01f8 7811 |x | Jump 0x20a ; case 0x4 01f9 7812 |x | Jump 0x20c ; case 0x5 01fa 7813 |x | Jump 0x20e ; case 0x6 01fb 7816 |x | Jump 0x212 ; case 0x7 01fc 4302 |C | .XXX[0x1] 01fd 00da | | Load_Top At_Offset_2 01fe 0091 050e | | Action Push_String_Extended_Indexed,0x50e ; "NONE" 0200 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0201 00db | | Load_Top At_Offset_3 0202 00db | | Load_Top At_Offset_3 0203 00e0 | | Load_Encached Standard_Cache 0204 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0205 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0206 00da | | Load_Top At_Offset_2 0207 00e0 | | Load_Encached Standard_Cache 0208 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0209 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 020a 00db | | Load_Top At_Offset_3 020b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 020c 00db | | Load_Top At_Offset_3 020d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 020e e219 | | Load 0x1,0x19 020f 00dc | | Load_Top At_Offset_4 0210 0267 | g | Execute Discrete,Predecessor 0211 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0212 e219 | | Load 0x1,0x19 0213 00dc | | Load_Top At_Offset_4 0214 0268 | h | Execute Discrete,Successor 0215 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0216 0000 0000 | | .XXX[0x2] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0225 | % | .CONST 0x0225 ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0004 | | .CONST 0x0004 ; Number of locals 021b INIT_0218: 021b e213 | | Load 0x1,0x13 021c 0322 | " | Declare_Variable Record 021d 8234 | 4 | Call 0x1,0x34 021e 00d9 | | Load_Top At_Offset_1 021f 017d | } | Execute Record,Structure_Write 0220 00db | | Load_Top At_Offset_3 0221 e227 | ' | Load 0x1,0x27 0222 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0223 029f 037b | {| Declare_Subprogram INIT_0378,For_Call 0225 BODY_0218: 0225 00d9 | | Load_Top At_Offset_1 0226 e227 | ' | Load 0x1,0x27 0227 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0228 7002 |p | Jump_Nonzero 0x22b 0229 e023 | # | Load 0x0,0x23 022a 0257 | W | Execute Discrete,Raise 022b 4800 |H | Short_Literal 0x0 022c 00db | | Load_Top At_Offset_3 022d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 022e 00cf | | Action Mark_Auxiliary 022f 480a |H | Short_Literal 0xa 0230 4801 |H | Short_Literal 0x1 0231 0007 | | Action Break_Optional 0232 00d8 | | Load_Top At_Offset_0 0233 e403 | | Load 0x2,0x3 0234 e227 | ' | Load 0x1,0x27 0235 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0236 6802 |h | Jump_Zero 0x239 0237 8404 | | Call 0x2,0x4 0238 780b |x | Jump 0x244 0239 00d8 | | Load_Top At_Offset_0 023a 0f05 | | Execute_Immediate Equal,0x5 023b 6808 |h | Jump_Zero 0x244 023c e231 | 1 | Load 0x1,0x31 023d e232 | 2 | Load 0x1,0x32 023e 8024 | $ | Call 0x0,0x24 023f 4802 |H | Short_Literal 0x2 0240 e402 | | Load 0x2,0x2 0241 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0242 01d5 | | Execute Vector,Field_Reference 0243 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0244 00c8 | | Action Pop_Auxiliary_Range 0245 3fec |? | Loop_Increasing 0x232 0246 00ce | | Action Pop_Auxiliary 0247 00da | | Load_Top At_Offset_2 0248 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0249 0000 0000 | | .BLANK 0000[0x7] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0253 | S | .CONST 0x0253 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0001 | | .CONST 0x0001 ; Number of locals 0253 BODY_0250: 0253 INIT_0250: 0253 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0254 0000 0000 | | .BLANK 0000[0x4] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b 8234 | 4 | Call 0x1,0x34 025c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 0833 | 3 | Execute_Immediate Raise,0x33 0264 0000 0000 | | .BLANK 0000[0x4] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b 0833 | 3 | Execute_Immediate Raise,0x33 026c 0000 0000 | | .BLANK 0000[0x4] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0273 | s | .CONST 0x0273 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0001 | | .CONST 0x0001 ; Number of locals 0273 BODY_0270: 0273 INIT_0270: 0273 00da | | Load_Top At_Offset_2 0274 0335 | 5 | Declare_Variable Array,Duplicate 0275 00cd | | Action Spare6_Action 0276 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0277 0000 | | .XXX[0x1] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027b | { | .CONST 0x027b ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0001 | | .CONST 0x0001 ; Number of locals 027b BODY_0278: 027b INIT_0278: 027b e21a | | Load 0x1,0x1a 027c 0322 | " | Declare_Variable Record 027d 4800 |H | Short_Literal 0x0 027e 00d9 | | Load_Top At_Offset_1 027f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0280 4801 |H | Short_Literal 0x1 0281 00d9 | | Load_Top At_Offset_1 0282 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0283 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0284 0000 0000 | | .BLANK 0000[0x4] 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 00da | | Load_Top At_Offset_2 028c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 028d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 028e 0000 0000 | | .XXX[0x2] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 0833 | 3 | Execute_Immediate Raise,0x33 0294 0000 0000 | | .BLANK 0000[0x4] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 029b | | .CONST 0x029b ; Address of begin 0299 0004 | | .CONST 0x0004 ; Address of exception handler 029a 0001 | | .CONST 0x0001 ; Number of locals 029b BODY_0298: 029b INIT_0298: 029b 00da | | Load_Top At_Offset_2 029c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 029d 700e |p | Jump_Nonzero 0x2ac 029e 00da | | Load_Top At_Offset_2 029f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02a0 0f0a | | Execute_Immediate Equal,0xa 02a1 6804 |h | Jump_Zero 0x2a6 02a2 4801 |H | Short_Literal 0x1 02a3 00db | | Load_Top At_Offset_3 02a4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02a6 e219 | | Load 0x1,0x19 02a7 00db | | Load_Top At_Offset_3 02a8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02a9 0268 | h | Execute Discrete,Successor 02aa 00db | | Load_Top At_Offset_3 02ab 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02ac 4501 |E | Exit_Suprogram New_Top_Offset 0x1 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 7807 |x | Jump 0x2bd ; case 0x1 02b6 780a |x | Jump 0x2c1 ; case 0x2 02b7 780e |x | Jump 0x2c6 ; case 0x3 02b8 7811 |x | Jump 0x2ca ; case 0x4 02b9 7812 |x | Jump 0x2cc ; case 0x5 02ba 7813 |x | Jump 0x2ce ; case 0x6 02bb 7816 |x | Jump 0x2d2 ; case 0x7 02bc 4302 |C | .XXX[0x1] 02bd 00da | | Load_Top At_Offset_2 02be 0091 0519 | | Action Push_String_Extended_Indexed,0x519 ; "NONE" 02c0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02c1 00db | | Load_Top At_Offset_3 02c2 00db | | Load_Top At_Offset_3 02c3 00e0 | | Load_Encached Standard_Cache 02c4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02c5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02c6 00da | | Load_Top At_Offset_2 02c7 00e0 | | Load_Encached Standard_Cache 02c8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02c9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02ca 00db | | Load_Top At_Offset_3 02cb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02cc 00db | | Load_Top At_Offset_3 02cd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ce e229 | ) | Load 0x1,0x29 02cf 00dc | | Load_Top At_Offset_4 02d0 0267 | g | Execute Discrete,Predecessor 02d1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02d2 e229 | ) | Load 0x1,0x29 02d3 00dc | | Load_Top At_Offset_4 02d4 0268 | h | Execute Discrete,Successor 02d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02d6 0000 0000 | | .XXX[0x2] 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 e231 | 1 | Load 0x1,0x31 02dc 8215 | | Call 0x1,0x15 02dd a22d | - | Store_Unchecked 0x1,0x2d 02de e22d | - | Load 0x1,0x2d 02df e00a | | Load 0x0,0xa 02e0 e225 | % | Load 0x1,0x25 02e1 0098 | | Execute Package,Field_Read_Dynamic 02e2 0216 | | Execute Heap_Access,Convert 02e3 8234 | 4 | Call 0x1,0x34 02e4 e021 | ! | Load 0x0,0x21 02e5 e225 | % | Load 0x1,0x25 02e6 0096 | | Execute Package,Entry 02e7 c22d | - | Store 0x1,0x2d 02e8 4801 |H | Short_Literal 0x1 02e9 a22f | / | Store_Unchecked 0x1,0x2f 02ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02eb 0000 0000 | | .BLANK 0000[0x5] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 e230 | 0 | Load 0x1,0x30 02f4 700d |p | Jump_Nonzero 0x302 02f5 4801 |H | Short_Literal 0x1 02f6 a230 | 0 | Store_Unchecked 0x1,0x30 02f7 4801 |H | Short_Literal 0x1 02f8 e22e | . | Load 0x1,0x2e 02f9 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 02fa e231 | 1 | Load 0x1,0x31 02fb e232 | 2 | Load 0x1,0x32 02fc 8024 | $ | Call 0x0,0x24 02fd 4802 |H | Short_Literal 0x2 02fe e22e | . | Load 0x1,0x2e 02ff 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0300 01d5 | | Execute Vector,Field_Reference 0301 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0302 e22e | . | Load 0x1,0x2e 0303 0320 | | Declare_Variable Record,Duplicate 0304 00cd | | Action Spare6_Action 0305 00ca | | Action Exit_Nullary_Function 0306 0000 0000 | | .XXX[0x2] 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 030b | | .CONST 0x030b ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0001 | | .CONST 0x0001 ; Number of locals 030b BODY_0308: 030b INIT_0308: 030b 00da | | Load_Top At_Offset_2 030c e01f | | Load 0x0,0x1f 030d e225 | % | Load 0x1,0x25 030e 0096 | | Execute Package,Entry 030f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0310 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0311 0000 0000 | | .BLANK 0000[0x7] 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 0320 | | .CONST 0x0320 ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0003 | | .CONST 0x0003 ; Number of locals 031b INIT_0318: 031b e20e | | Load 0x1,0xe 031c 0337 | 7 | Declare_Variable Array 031d 00db | | Load_Top At_Offset_3 031e e228 | ( | Load 0x1,0x28 031f 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0320 BODY_0318: 0320 00d8 | | Load_Top At_Offset_0 0321 e228 | ( | Load 0x1,0x28 0322 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0323 7002 |p | Jump_Nonzero 0x326 0324 e023 | # | Load 0x0,0x23 0325 0257 | W | Execute Discrete,Raise 0326 4800 |H | Short_Literal 0x0 0327 4800 |H | Short_Literal 0x0 0328 00db | | Load_Top At_Offset_3 0329 01d6 | | Execute Vector,Field_Write 032a 00cf | | Action Mark_Auxiliary 032b 4805 |H | Short_Literal 0x5 032c 4801 |H | Short_Literal 0x1 032d 0007 | | Action Break_Optional 032e 00d8 | | Load_Top At_Offset_0 032f e403 | | Load 0x2,0x3 0330 e228 | ( | Load 0x1,0x28 0331 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0332 680b |h | Jump_Zero 0x33e 0333 00ea | | Load_Encached Null_String_Cache 0334 00d9 | | Load_Top At_Offset_1 0335 e403 | | Load 0x2,0x3 0336 e228 | ( | Load 0x1,0x28 0337 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0338 00e1 | | Load_Encached Boolean_Cache 0339 1c02 | | Execute_Immediate Run_Utility,0x2 033a 00d9 | | Load_Top At_Offset_1 033b e402 | | Load 0x2,0x2 033c 01d6 | | Execute Vector,Field_Write 033d 7804 |x | Jump 0x342 033e 4800 |H | Short_Literal 0x0 033f 00d9 | | Load_Top At_Offset_1 0340 e402 | | Load 0x2,0x2 0341 01d6 | | Execute Vector,Field_Write 0342 00c8 | | Action Pop_Auxiliary_Range 0343 3fea |? | Loop_Increasing 0x32e 0344 00ce | | Action Pop_Auxiliary 0345 00d9 | | Load_Top At_Offset_1 0346 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0347 0000 | | .XXX[0x1] 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 0350 | P | .CONST 0x0350 ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0003 | | .CONST 0x0003 ; Number of locals 034b INIT_0348: 034b e20f | | Load 0x1,0xf 034c 0337 | 7 | Declare_Variable Array 034d 00db | | Load_Top At_Offset_3 034e e22a | * | Load 0x1,0x2a 034f 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0350 BODY_0348: 0350 00d8 | | Load_Top At_Offset_0 0351 e22a | * | Load 0x1,0x2a 0352 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0353 7002 |p | Jump_Nonzero 0x356 0354 e023 | # | Load 0x0,0x23 0355 0257 | W | Execute Discrete,Raise 0356 00cf | | Action Mark_Auxiliary 0357 4805 |H | Short_Literal 0x5 0358 4800 |H | Short_Literal 0x0 0359 0007 | | Action Break_Optional 035a 00d8 | | Load_Top At_Offset_0 035b e403 | | Load 0x2,0x3 035c e22a | * | Load 0x1,0x2a 035d 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 035e 680d |h | Jump_Zero 0x36c 035f 00ea | | Load_Encached Null_String_Cache 0360 00d9 | | Load_Top At_Offset_1 0361 e403 | | Load 0x2,0x3 0362 e22a | * | Load 0x1,0x2a 0363 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0364 00e1 | | Load_Encached Boolean_Cache 0365 1c02 | | Execute_Immediate Run_Utility,0x2 0366 00d9 | | Load_Top At_Offset_1 0367 e22c | , | Load 0x1,0x2c 0368 01d7 | | Execute Vector,Field_Read 0369 e402 | | Load 0x2,0x2 036a 01d6 | | Execute Vector,Field_Write 036b 7806 |x | Jump 0x372 036c 4800 |H | Short_Literal 0x0 036d 00d9 | | Load_Top At_Offset_1 036e e22c | , | Load 0x1,0x2c 036f 01d7 | | Execute Vector,Field_Read 0370 e402 | | Load 0x2,0x2 0371 01d6 | | Execute Vector,Field_Write 0372 00c8 | | Action Pop_Auxiliary_Range 0373 3fe6 |? | Loop_Increasing 0x35a 0374 00ce | | Action Pop_Auxiliary 0375 00d9 | | Load_Top At_Offset_1 0376 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0377 0000 | | .XXX[0x1] 0378 ; -------------------------------------------------------------------------------------- 0378 ; SUBPROGRAM 0378 ; -------------------------------------------------------------------------------------- 0378 0382 | | .CONST 0x0382 ; Address of begin 0379 0004 | | .CONST 0x0004 ; Address of exception handler 037a 0003 | | .CONST 0x0003 ; Number of locals 037b INIT_0378: 037b 00ea | | Load_Encached Null_String_Cache 037c e407 | | Load 0x2,0x7 037d e403 | | Load 0x2,0x3 037e e227 | ' | Load 0x1,0x27 037f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0380 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call 0382 BODY_0378: 0382 e407 | | Load 0x2,0x7 0383 0aff | | Execute_Immediate Plus,-0x1 0384 4609 |F | Jump_Case 0xa 0385 780b |x | Jump 0x391 ; case 0x0 0386 7810 |x | Jump 0x397 ; case 0x1 0387 7815 |x | Jump 0x39d ; case 0x2 0388 781d |x | Jump 0x3a6 ; case 0x3 0389 7825 |x% | Jump 0x3af ; case 0x4 038a 782d |x- | Jump 0x3b8 ; case 0x5 038b 7835 |x5 | Jump 0x3c1 ; case 0x6 038c 783d |x= | Jump 0x3ca ; case 0x7 038d 7845 |xE | Jump 0x3d3 ; case 0x8 038e 7800 |x | Jump 0x38f ; case 0x9 038f 8603 | | Call 0x3,0x3 0390 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0391 e5fe | | Load 0x2,-0x2 0392 00da | | Load_Top At_Offset_2 0393 8236 | 6 | Call 0x1,0x36 0394 e402 | | Load 0x2,0x2 0395 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0396 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0397 e5fe | | Load 0x2,-0x2 0398 00da | | Load_Top At_Offset_2 0399 8237 | 7 | Call 0x1,0x37 039a e402 | | Load 0x2,0x2 039b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 039c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 039d e5fe | | Load 0x2,-0x2 039e 00da | | Load_Top At_Offset_2 039f 8024 | $ | Call 0x0,0x24 03a0 4800 |H | Short_Literal 0x0 03a1 e402 | | Load 0x2,0x2 03a2 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03a3 01d5 | | Execute Vector,Field_Reference 03a4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03a6 e5fe | | Load 0x2,-0x2 03a7 00da | | Load_Top At_Offset_2 03a8 8024 | $ | Call 0x0,0x24 03a9 4801 |H | Short_Literal 0x1 03aa e402 | | Load 0x2,0x2 03ab 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03ac 01d5 | | Execute Vector,Field_Reference 03ad 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03ae 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03af e5fe | | Load 0x2,-0x2 03b0 00da | | Load_Top At_Offset_2 03b1 8024 | $ | Call 0x0,0x24 03b2 4802 |H | Short_Literal 0x2 03b3 e402 | | Load 0x2,0x2 03b4 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03b5 01d5 | | Execute Vector,Field_Reference 03b6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03b8 e5fe | | Load 0x2,-0x2 03b9 00da | | Load_Top At_Offset_2 03ba 8024 | $ | Call 0x0,0x24 03bb 4800 |H | Short_Literal 0x0 03bc e402 | | Load 0x2,0x2 03bd 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03be 01d5 | | Execute Vector,Field_Reference 03bf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03c0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03c1 e5fe | | Load 0x2,-0x2 03c2 00da | | Load_Top At_Offset_2 03c3 8024 | $ | Call 0x0,0x24 03c4 4801 |H | Short_Literal 0x1 03c5 e402 | | Load 0x2,0x2 03c6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03c7 01d5 | | Execute Vector,Field_Reference 03c8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03c9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03ca e5fe | | Load 0x2,-0x2 03cb 00da | | Load_Top At_Offset_2 03cc 8024 | $ | Call 0x0,0x24 03cd 4802 |H | Short_Literal 0x2 03ce e402 | | Load 0x2,0x2 03cf 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 03d0 01d5 | | Execute Vector,Field_Reference 03d1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03d2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03d3 e5fe | | Load 0x2,-0x2 03d4 00da | | Load_Top At_Offset_2 03d5 8025 | % | Call 0x0,0x25 03d6 e402 | | Load 0x2,0x2 03d7 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 03d8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03d9 0000 0000 | | .BLANK 0000[0x7] 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03e3 | | .CONST 0x03e3 ; Address of begin 03e1 03e9 | | .CONST 0x03e9 ; Address of exception handler 03e2 0001 | | .CONST 0x0001 ; Number of locals 03e3 BODY_03e0: 03e3 INIT_03e0: 03e3 e602 | | Load 0x3,0x2 03e4 00e1 | | Load_Encached Boolean_Cache 03e5 1c02 | | Execute_Immediate Run_Utility,0x2 03e6 e402 | | Load 0x2,0x2 03e7 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 03e8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03e9 TRAP_03e0: 03e9 0007 | | Action Break_Optional 03ea 4800 |H | Short_Literal 0x0 03eb e402 | | Load 0x2,0x2 03ec 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 03ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03ee 0000 0000 | | .XXX[0x2] 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 4601 |F | Jump_Case 0x2 03f4 7801 |x | Jump 0x3f6 ; case 0x0 03f5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 03f6 4800 |H | Short_Literal 0x0 03f7 00db | | Load_Top At_Offset_3 03f8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03f9 4800 |H | Short_Literal 0x0 03fa 00db | | Load_Top At_Offset_3 03fb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03fd 0000 0000 | | .XXX[0x3] 03ff 0000 | | 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 4601 |F | Jump_Case 0x2 0404 7801 |x | Jump 0x406 ; case 0x0 0405 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0406 e213 | | Load 0x1,0x13 0407 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 0408 0337 | 7 | Declare_Variable Array 0409 4805 |H | Short_Literal 0x5 040a 4800 |H | Short_Literal 0x0 040b 4800 |H | Short_Literal 0x0 040c 00d9 | | Load_Top At_Offset_1 040d e402 | | Load 0x2,0x2 040e 01d6 | | Execute Vector,Field_Write 040f 3ffb |? | Loop_Increasing 0x40b 0410 00db | | Load_Top At_Offset_3 0411 00d9 | | Load_Top At_Offset_1 0412 00d9 | | Load_Top At_Offset_1 0413 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 0414 0119 | | Execute Any,Check_In_Formal_Type 0415 00d1 | | Pop_Control Pop_Count_1 0416 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0417 e213 | | Load 0x1,0x13 0418 3001 |0 | Execute Record,Field_Type,Field_Number 0x1 0419 0337 | 7 | Declare_Variable Array 041a 4800 |H | Short_Literal 0x0 041b 4800 |H | Short_Literal 0x0 041c 00da | | Load_Top At_Offset_2 041d 01d6 | | Execute Vector,Field_Write 041e 4800 |H | Short_Literal 0x0 041f 4801 |H | Short_Literal 0x1 0420 00da | | Load_Top At_Offset_2 0421 01d6 | | Execute Vector,Field_Write 0422 4804 |H | Short_Literal 0x4 0423 4802 |H | Short_Literal 0x2 0424 4801 |H | Short_Literal 0x1 0425 00d9 | | Load_Top At_Offset_1 0426 e402 | | Load 0x2,0x2 0427 01d6 | | Execute Vector,Field_Write 0428 3ffb |? | Loop_Increasing 0x424 0429 00db | | Load_Top At_Offset_3 042a 00d9 | | Load_Top At_Offset_1 042b 00d9 | | Load_Top At_Offset_1 042c 3001 |0 | Execute Record,Field_Type,Field_Number 0x1 042d 0119 | | Execute Any,Check_In_Formal_Type 042e 00d1 | | Pop_Control Pop_Count_1 042f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0430 8002 | | Call 0x0,0x2 0431 00db | | Load_Top At_Offset_3 0432 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0433 4800 |H | Short_Literal 0x0 0434 00db | | Load_Top At_Offset_3 0435 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0436 4800 |H | Short_Literal 0x0 0437 00db | | Load_Top At_Offset_3 0438 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0439 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 043a 0000 0000 | | .BLANK 0000[0x6] 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 0468 | h | .CONST 0x0468 ; Address of begin 0441 0004 | | .CONST 0x0004 ; Address of exception handler 0442 0015 | | .CONST 0x0015 ; Number of locals 0443 INIT_0440: 0443 029a 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Visible,Unelaborated 0445 029a 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call,Visible,Unelaborated 0447 029a 049b | | Declare_Subprogram INIT_0498,For_Outer_Call,Visible,Unelaborated 0449 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 044b 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated 044d 029a 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call,Visible,Unelaborated 044f 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated 0451 029a 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call,Visible,Unelaborated 0453 029a 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call,Visible,Unelaborated 0455 00bf | | Action Accept_Activation 0456 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0457 00c7 | | Action Elaborate_Subprogram 0458 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0459 00c7 | | Action Elaborate_Subprogram 045a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 045b 00c7 | | Action Elaborate_Subprogram 045c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 045d 00c7 | | Action Elaborate_Subprogram 045e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 045f 00c7 | | Action Elaborate_Subprogram 0460 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0461 00c7 | | Action Elaborate_Subprogram 0462 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0463 00c7 | | Action Elaborate_Subprogram 0464 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0465 00c7 | | Action Elaborate_Subprogram 0466 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0467 00c7 | | Action Elaborate_Subprogram 0468 BODY_0440: 0468 00bc | | Action Signal_Activated 0469 00bb | | Action Signal_Completion 046a 0000 0000 | | .BLANK 0000[0x6] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0473 | s | .CONST 0x0473 ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0001 | | .CONST 0x0001 ; Number of locals 0473 BODY_0470: 0473 INIT_0470: 0473 00da | | Load_Top At_Offset_2 0474 8001 | | Call 0x0,0x1 0475 7004 |p | Jump_Nonzero 0x47a 0476 00db | | Load_Top At_Offset_3 0477 00db | | Load_Top At_Offset_3 0478 8002 | | Call 0x0,0x2 0479 c5fe | | Store 0x2,-0x2 047a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 047b 0000 0000 | | .BLANK 0000[0x5] 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 0483 | | .CONST 0x0483 ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 0001 | | .CONST 0x0001 ; Number of locals 0483 BODY_0480: 0483 INIT_0480: 0483 00db | | Load_Top At_Offset_3 0484 8003 | | Call 0x0,0x3 0485 01db | | Execute Vector,Length 0486 7006 |p | Jump_Nonzero 0x48d 0487 e004 | | Load 0x0,0x4 0488 7001 |p | Jump_Nonzero 0x48a 0489 8005 | | Call 0x0,0x5 048a e006 | | Load 0x0,0x6 048b a5fd | | Store_Unchecked 0x2,-0x3 048c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 048d e5fd | | Load 0x2,-0x3 048e e007 | | Load 0x0,0x7 048f 0216 | | Execute Heap_Access,Convert 0490 e5fe | | Load 0x2,-0x2 0491 e5ff | | Load 0x2,-0x1 0492 8008 | | Call 0x0,0x8 0493 c5fd | | Store 0x2,-0x3 0494 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0495 0000 0000 | | .XXX[0x3] 0497 0000 | | 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 00db | | Load_Top At_Offset_3 049c e007 | | Load 0x0,0x7 049d 0216 | | Execute Heap_Access,Convert 049e 00db | | Load_Top At_Offset_3 049f 8009 | | Call 0x0,0x9 04a0 c5fe | | Store 0x2,-0x2 04a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04a2 0000 0000 | | .BLANK 0000[0x6] 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 8001 | | Call 0x0,0x1 04ad 6802 |h | Jump_Zero 0x4b0 04ae 00ea | | Load_Encached Null_String_Cache 04af 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04b0 0831 | 1 | Execute_Immediate Raise,0x31 04b1 0000 0000 | | .BLANK 0000[0x7] 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 8001 | | Call 0x0,0x1 04bd 7005 |p | Jump_Nonzero 0x4c3 04be 00da | | Load_Top At_Offset_2 04bf e007 | | Load 0x0,0x7 04c0 0216 | | Execute Heap_Access,Convert 04c1 800b | | Call 0x0,0xb 04c2 0033 | 3 | Store_Top Heap_Access,At_Offset_3 04c3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04c4 0000 0000 | | .BLANK 0000[0x4] 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 00db | | Load_Top At_Offset_3 04cc 8001 | | Call 0x0,0x1 04cd 7006 |p | Jump_Nonzero 0x4d4 04ce 00db | | Load_Top At_Offset_3 04cf e007 | | Load 0x0,0x7 04d0 0216 | | Execute Heap_Access,Convert 04d1 00db | | Load_Top At_Offset_3 04d2 800c | | Call 0x0,0xc 04d3 c5fe | | Store 0x2,-0x2 04d4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04d5 0000 0000 | | .XXX[0x3] 04d7 0000 | | 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 00db | | Load_Top At_Offset_3 04dc 8001 | | Call 0x0,0x1 04dd 7006 |p | Jump_Nonzero 0x4e4 04de 00db | | Load_Top At_Offset_3 04df e007 | | Load 0x0,0x7 04e0 0216 | | Execute Heap_Access,Convert 04e1 00db | | Load_Top At_Offset_3 04e2 800d | | Call 0x0,0xd 04e3 c5fe | | Store 0x2,-0x2 04e4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04e5 0000 0000 | | .XXX[0x3] 04e7 0000 | | 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 8001 | | Call 0x0,0x1 04ed 6802 |h | Jump_Zero 0x4f0 04ee 4800 |H | Short_Literal 0x0 04ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04f0 00da | | Load_Top At_Offset_2 04f1 800e | | Call 0x0,0xe 04f2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04f3 0000 0000 | | .BLANK 0000[0x5] 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 00db | | Load_Top At_Offset_3 04fc 8001 | | Call 0x0,0x1 04fd 7006 |p | Jump_Nonzero 0x504 04fe 00db | | Load_Top At_Offset_3 04ff e007 | | Load 0x0,0x7 0500 0216 | | Execute Heap_Access,Convert 0501 00db | | Load_Top At_Offset_3 0502 800f | | Call 0x0,0xf 0503 c5fe | | Store 0x2,-0x2 0504 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0505 ; -------------------------------------------------------------------------------------- 0505 ; STRING TABLE 0505 ; -------------------------------------------------------------------------------------- 0505 003a | : | .STRTAB 0x003a->0x0522 ; "NONE" 0506 003c | < | .STRTAB 0x003c->0x0524 ; "ELAPSED_TIME" 0507 0046 | F | .STRTAB 0x0046->0x052a ; "CPU_TIME" 0508 004c | L | .STRTAB 0x004c->0x052e ; "NUMBER_OF_FAILURES" 0509 005c | \ | .STRTAB 0x005c->0x0537 ; "UNHANDLED_EXCEPTION" 050a 006d | m | .STRTAB 0x006d->0x0540 ; "INTERACTIVE" 050b 0076 | v | .STRTAB 0x0076->0x0546 ; "EX_USER_SCRIPT_PROLOG" 050c 0089 | | .STRTAB 0x0089->0x0550 ; "EX_USER_SCRIPT_EPILOG" 050d 009c | | .STRTAB 0x009c->0x055b ; "EX_VERSION_SAVE" 050e 00a9 | | .STRTAB 0x00a9->0x0562 ; "NONE" 050f 00ab | | .STRTAB 0x00ab->0x0564 ; "HALT_CONDITIONS" 0510 00b8 | | .STRTAB 0x00b8->0x056c ; "FAILURE_STATUS_SET" 0511 00c8 | | .STRTAB 0x00c8->0x0575 ; "USER_SCRIPT_PROLOG" 0512 00d8 | | .STRTAB 0x00d8->0x057e ; "USER_SCRIPT_EPILOG" 0513 00e8 | | .STRTAB 0x00e8->0x0587 ; "VERSION_SAVE" 0514 00f2 | | .STRTAB 0x00f2->0x058d ; "USER_SCRIPT_PROLOG_PARAMS" 0515 0109 | | .STRTAB 0x0109->0x0599 ; "USER_SCRIPT_EPILOG_PARAMS" 0516 0120 | | .STRTAB 0x0120->0x05a6 ; "VERSION_SAVE_PARAMS" 0517 0131 | 1 | .STRTAB 0x0131->0x05af ; "TERMINATION_CONTROL" 0518 0142 | B | .STRTAB 0x0142->0x05b9 ; "RCI_TEST_SCRIPT" 0519 014f | O | .STRTAB 0x014f->0x05c0 ; "NONE" 051a 0151 | Q | .STRTAB 0x0151->0x05c2 ; "UNKNOWN" 051b 0156 | V | .STRTAB 0x0156->0x05c6 ; "PASS" 051c 0158 | X | .STRTAB 0x0158->0x05c8 ; "FAIL" 051d 015a | Z | .STRTAB 0x015a->0x05ca ; "FAIL_WITH_EXCEPTION" 051e 016b | k | .STRTAB 0x016b->0x05d3 ; "TIMEOUT" 051f 0170 | p | .STRTAB 0x0170->0x05d7 ; "others => Unspecified" 0520 0183 | | .STRTAB 0x0183->0x05e1 ; "<default>" 0521 018a | | .STREND 0x018a->0x05e6 0522 4e4f 4e45 |NONE| .STRTAB_STRINGS 05e6 0000 0000 | | .XXX[0x2] 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; Debug Table 05e8 ; -------------------------------------------------------------------------------------- 05e8 0004 000a | | .DEBUG4 0x0004,0x000a,0x84f8,0x0000,0x0001,0x0000 05ee 0000 0000 | | .BLANK 0000[0x12]