|
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: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6060f0
└─⟦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 0328 | ( | .CONST 0x0328 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00a0 | | .CONST 0x00a0 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0024 | $ | .CONST 0x0024 ; Number of locals 000b INIT_0008: 000b 00c4 | | Action Make_Default 000c 00c4 | | Action Make_Default 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 00c4 | | Action Make_Default 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 4800 |H | Short_Literal 0x0 0022 4801 |H | Short_Literal 0x1 0023 029f 00ab | | Declare_Subprogram INIT_00a8,For_Call 0025 03fe | | Declare_Type Discrete,Defined,Visible 0026 c20e | | Store 0x1,0xe 0027 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 0028 c20d | | Store 0x1,0xd 0029 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated 002b c20f | | Store 0x1,0xf 002c 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated 002e c210 | | Store 0x1,0x10 002f 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0031 c211 | | Store 0x1,0x11 0032 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 0034 c21a | | Store 0x1,0x1a 0035 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 0037 c213 | | Store 0x1,0x13 0038 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 003a c214 | | Store 0x1,0x14 003b 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated 003d c215 | | Store 0x1,0x15 003e 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated 0040 c216 | | Store 0x1,0x16 0041 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 0043 c217 | | Store 0x1,0x17 0044 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated 0046 c218 | | Store 0x1,0x18 0047 4800 |H | Short_Literal 0x0 0048 e001 | | Load 0x0,0x1 0049 02a0 | | Declare_Subprogram Null_Subprogram 004a 038e | | Declare_Type Package,Defined 004b e002 | | Load 0x0,0x2 004c 4801 |H | Short_Literal 0x1 004d 00da | | Load_Top At_Offset_2 004e 020e | | Execute Module,Augment_Imports 004f 0387 | | Declare_Variable Package 0050 c21c | | Store 0x1,0x1c 0051 e20e | | Load 0x1,0xe 0052 e003 | | Load 0x0,0x3 0053 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0054 e004 | | Load 0x0,0x4 0055 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0056 e005 | | Load 0x0,0x5 0057 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0058 00e1 | | Load_Encached Boolean_Cache 0059 e21c | | Load 0x1,0x1c 005a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 005b 4801 |H | Short_Literal 0x1 005c e21c | | Load 0x1,0x1c 005d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 005e 4802 |H | Short_Literal 0x2 005f 00e1 | | Load_Encached Boolean_Cache 0060 00e3 | | Load_Encached Natural_Cache 0061 029f 02db | | Declare_Subprogram INIT_02d8,For_Call 0063 4803 |H | Short_Literal 0x3 0064 4805 |H | Short_Literal 0x5 0065 4802 |H | Short_Literal 0x2 0066 4800 |H | Short_Literal 0x0 0067 4801 |H | Short_Literal 0x1 0068 031d | | Declare_Type Variant_Record,Defined 0069 c222 | " | Store 0x1,0x22 006a 00d8 | | Load_Top At_Offset_0 006b 02a0 | | Declare_Subprogram Null_Subprogram 006c e20d | | Load 0x1,0xd 006d 03a3 | | Complete_Type Heap_Access,By_Defining 006e 00bf | | Action Accept_Activation 006f 4800 |H | Short_Literal 0x0 0070 e006 | | Load 0x0,0x6 0071 02a0 | | Declare_Subprogram Null_Subprogram 0072 038e | | Declare_Type Package,Defined 0073 0387 | | Declare_Variable Package 0074 4800 |H | Short_Literal 0x0 0075 e007 | | Load 0x0,0x7 0076 02a0 | | Declare_Subprogram Null_Subprogram 0077 038e | | Declare_Type Package,Defined 0078 0387 | | Declare_Variable Package 0079 1d0f | | Execute_Immediate Reference_Lex_1,0xf 007a 00c7 | | Action Elaborate_Subprogram 007b 1d10 | | Execute_Immediate Reference_Lex_1,0x10 007c 00c7 | | Action Elaborate_Subprogram 007d 1d11 | | Execute_Immediate Reference_Lex_1,0x11 007e 00c7 | | Action Elaborate_Subprogram 007f 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0080 00c7 | | Action Elaborate_Subprogram 0081 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0082 00c7 | | Action Elaborate_Subprogram 0083 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0084 00c7 | | Action Elaborate_Subprogram 0085 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0086 00c7 | | Action Elaborate_Subprogram 0087 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0088 00c7 | | Action Elaborate_Subprogram 0089 1d17 | | Execute_Immediate Reference_Lex_1,0x17 008a 00c7 | | Action Elaborate_Subprogram 008b 1d18 | | Execute_Immediate Reference_Lex_1,0x18 008c 00c7 | | Action Elaborate_Subprogram 008d e21c | | Load 0x1,0x1c 008e 020f | | Execute Module,Activate 008f e005 | | Load 0x0,0x5 0090 e004 | | Load 0x0,0x4 0091 e002 | | Load 0x0,0x2 0092 e008 | | Load 0x0,0x8 0093 e009 | | Load 0x0,0x9 0094 4805 |H | Short_Literal 0x5 0095 e223 | # | Load 0x1,0x23 0096 020e | | Execute Module,Augment_Imports 0097 00d9 | | Load_Top At_Offset_1 0098 020f | | Execute Module,Activate 0099 e002 | | Load 0x0,0x2 009a e009 | | Load 0x0,0x9 009b 4802 |H | Short_Literal 0x2 009c 00db | | Load_Top At_Offset_3 009d 020e | | Execute Module,Augment_Imports 009e 00d8 | | Load_Top At_Offset_0 009f 020f | | Execute Module,Activate 00a0 BODY_0008: 00a0 00bc | | Action Signal_Activated 00a1 00bb | | Action Signal_Completion 00a2 0000 0000 | | .BLANK 0000[0x6] 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab 4607 |F | Jump_Case 0x8 00ac 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00ad 7806 |x | Jump 0xb4 ; case 0x1 00ae 7809 |x | Jump 0xb8 ; case 0x2 00af 780d |x | Jump 0xbd ; case 0x3 00b0 7810 |x | Jump 0xc1 ; case 0x4 00b1 7811 |x | Jump 0xc3 ; case 0x5 00b2 7812 |x | Jump 0xc5 ; case 0x6 00b3 7815 |x | Jump 0xc9 ; case 0x7 00b4 00da | | Load_Top At_Offset_2 00b5 0091 031a | | Action Push_String_Extended_Indexed,0x31a ; "RM_TCP_IP" 00b7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00b8 00db | | Load_Top At_Offset_3 00b9 00db | | Load_Top At_Offset_3 00ba 00e0 | | Load_Encached Standard_Cache 00bb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00bd 00da | | Load_Top At_Offset_2 00be 00e0 | | Load_Encached Standard_Cache 00bf 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00c0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00c1 00db | | Load_Top At_Offset_3 00c2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00c3 00db | | Load_Top At_Offset_3 00c4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00c5 e20e | | Load 0x1,0xe 00c6 00dc | | Load_Top At_Offset_4 00c7 0267 | g | Execute Discrete,Predecessor 00c8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00c9 e20e | | Load 0x1,0xe 00ca 00dc | | Load_Top At_Offset_4 00cb 0268 | h | Execute Discrete,Successor 00cc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00cd 0000 0000 | | .XXX[0x3] 00cf 0000 | | 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; SUBPROGRAM 00d0 ; -------------------------------------------------------------------------------------- 00d0 00e0 | | .CONST 0x00e0 ; Address of begin 00d1 0004 | | .CONST 0x0004 ; Address of exception handler 00d2 0005 | | .CONST 0x0005 ; Number of locals 00d3 INIT_00d0: 00d3 00da | | Load_Top At_Offset_2 00d4 e00a | | Load 0x0,0xa 00d5 180e | | Execute Package,Field_Execute,Field_Number 0xe 00d6 4804 |H | Short_Literal 0x4 00d7 e5fe | | Load 0x2,-0x2 00d8 e224 | $ | Load 0x1,0x24 00d9 180d | | Execute Package,Field_Execute,Field_Number 0xd 00da 00e1 | | Load_Encached Boolean_Cache 00db e5fd | | Load 0x2,-0x3 00dc e222 | " | Load 0x1,0x22 00dd 1c08 | | Execute_Immediate Run_Utility,0x8 00de 00d8 | | Load_Top At_Offset_0 00df 1c00 | | Execute_Immediate Run_Utility,0x0 00e0 BODY_00d0: 00e0 e5fd | | Load 0x2,-0x3 00e1 6817 |h | Jump_Zero 0xf9 00e2 00e1 | | Load_Encached Boolean_Cache 00e3 00d9 | | Load_Top At_Offset_1 00e4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 00e5 0120 | | Execute Any,Is_Value 00e6 6803 |h | Jump_Zero 0xea 00e7 e003 | | Load 0x0,0x3 00e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e9 7802 |x | Jump 0xec 00ea 00d9 | | Load_Top At_Offset_1 00eb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 00ec e403 | | Load 0x2,0x3 00ed e402 | | Load 0x2,0x2 00ee 4801 |H | Short_Literal 0x1 00ef 4806 |H | Short_Literal 0x6 00f0 00e9 | | Load_Encached String_Cache 00f1 0334 | 4 | Declare_Variable Array,With_Constraint 00f2 5035 |P5 | Indirect_Literal Any,0x128,{0x5544502f, 0x49502020} 00f3 e003 | | Load 0x0,0x3 00f4 180f | | Execute Package,Field_Execute,Field_Number 0xf 00f5 00da | | Load_Top At_Offset_2 00f6 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 00f7 005a | Z | Store_Top Discrete,At_Offset_2 00f8 7816 |x | Jump 0x10f 00f9 00e1 | | Load_Encached Boolean_Cache 00fa 00d9 | | Load_Top At_Offset_1 00fb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 00fc 0120 | | Execute Any,Is_Value 00fd 6803 |h | Jump_Zero 0x101 00fe e003 | | Load 0x0,0x3 00ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0100 7802 |x | Jump 0x103 0101 00d9 | | Load_Top At_Offset_1 0102 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0103 e403 | | Load 0x2,0x3 0104 e402 | | Load 0x2,0x2 0105 4801 |H | Short_Literal 0x1 0106 4806 |H | Short_Literal 0x6 0107 00e9 | | Load_Encached String_Cache 0108 0334 | 4 | Declare_Variable Array,With_Constraint 0109 5022 |P" | Indirect_Literal Any,0x12c,{0x5443502f, 0x49502020} 010a e003 | | Load 0x0,0x3 010b 180f | | Execute Package,Field_Execute,Field_Number 0xf 010c 00da | | Load_Top At_Offset_2 010d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 010e 005a | Z | Store_Top Discrete,At_Offset_2 010f 00d8 | | Load_Top At_Offset_0 0110 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0111 e003 | | Load 0x0,0x3 0112 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0113 00d9 | | Load_Top At_Offset_1 0114 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 0115 e5fc | | Load 0x2,-0x4 0116 00d9 | | Load_Top At_Offset_1 0117 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 0118 4800 |H | Short_Literal 0x0 0119 00d9 | | Load_Top At_Offset_1 011a 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 011b 00d8 | | Load_Top At_Offset_0 011c e20d | | Load 0x1,0xd 011d e00b | | Load 0x0,0xb 011e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 011f e00c | | Load 0x0,0xc 0120 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0121 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 0122 a5fb | | Store_Unchecked 0x2,-0x5 0123 4801 |H | Short_Literal 0x1 0124 a5fa | | Store_Unchecked 0x2,-0x6 0125 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0126 0000 0000 | | .XXX[0x2] 0128 5544 502f |UDP/| .LITERAL {0x5544502f, 0x49502020} 012c 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020} 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 013d | = | .CONST 0x013d ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0004 | | .CONST 0x0004 ; Number of locals 0133 INIT_0130: 0133 00db | | Load_Top At_Offset_3 0134 01db | | Execute Vector,Length 0135 00e3 | | Load_Encached Natural_Cache 0136 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0137 e5fe | | Load 0x2,-0x2 0138 01dd | | Execute Vector,First 0139 00e3 | | Load_Encached Natural_Cache 013a 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 013b 00e3 | | Load_Encached Natural_Cache 013c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 013d BODY_0130: 013d e5ff | | Load 0x2,-0x1 013e 0217 | | Execute Heap_Access,All_Reference 013f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0140 6809 |h | Jump_Zero 0x14a 0141 e5ff | | Load 0x2,-0x1 0142 0219 | | Execute Heap_Access,All_Read 0143 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 0144 00d8 | | Load_Top At_Offset_0 0145 e5fe | | Load 0x2,-0x2 0146 e21c | | Load 0x1,0x1c 0147 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0148 00d2 | | Pop_Control Pop_Count_2 0149 4503 |E | Exit_Suprogram New_Top_Offset 0x3 014a 00cf | | Action Mark_Auxiliary 014b 7832 |x2 | Jump 0x17e 014c 4bec |K | Short_Literal 0x3ec 014d e5ff | | Load 0x2,-0x1 014e 0217 | | Execute Heap_Access,All_Reference 014f 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6 0150 e21c | | Load 0x1,0x1c 0151 180e | | Execute Package,Field_Execute,Field_Number 0xe 0152 0272 | r | Execute Discrete,Minus 0153 005a | Z | Store_Top Discrete,At_Offset_2 0154 4800 |H | Short_Literal 0x0 0155 4bec |K | Short_Literal 0x3ec 0156 e224 | $ | Load 0x1,0x24 0157 180f | | Execute Package,Field_Execute,Field_Number 0xf 0158 e5ff | | Load 0x2,-0x1 0159 0217 | | Execute Heap_Access,All_Reference 015a 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6 015b e21c | | Load 0x1,0x1c 015c 180f | | Execute Package,Field_Execute,Field_Number 0xf 015d 01cc | | Execute Vector,Catenate 015e 00db | | Load_Top At_Offset_3 015f e403 | | Load 0x2,0x3 0160 e404 | | Load 0x2,0x4 0161 0273 | s | Execute Discrete,Plus 0162 0aff | | Execute_Immediate Plus,-0x1 0163 00d8 | | Load_Top At_Offset_0 0164 00e2 | | Load_Encached Integer_Cache 0165 0260 | ` | Execute Discrete,In_Type 0166 7001 |p | Jump_Nonzero 0x168 0167 0801 | | Execute_Immediate Raise,0x1 0168 e5fe | | Load 0x2,-0x2 0169 01cf | | Execute Vector,Slice_Read 016a 01cc | | Execute Vector,Catenate 016b e5ff | | Load 0x2,-0x1 016c e223 | # | Load 0x1,0x23 016d 180f | | Execute Package,Field_Execute,Field_Number 0xf 016e e5ff | | Load 0x2,-0x1 016f 0219 | | Execute Heap_Access,All_Read 0170 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 0171 00d8 | | Load_Top At_Offset_0 0172 e21c | | Load 0x1,0x1c 0173 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0174 00d2 | | Pop_Control Pop_Count_2 0175 00db | | Load_Top At_Offset_3 0176 00da | | Load_Top At_Offset_2 0177 0272 | r | Execute Discrete,Minus 0178 c402 | | Store 0x2,0x2 0179 00da | | Load_Top At_Offset_2 017a 00da | | Load_Top At_Offset_2 017b 0273 | s | Execute Discrete,Plus 017c 005b | [ | Store_Top Discrete,At_Offset_3 017d 00c9 | | Action Pop_Auxiliary_Loop 017e e5ff | | Load 0x2,-0x1 017f 0217 | | Execute Heap_Access,All_Reference 0180 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6 0181 e21c | | Load 0x1,0x1c 0182 180e | | Execute Package,Field_Execute,Field_Number 0xe 0183 e402 | | Load 0x2,0x2 0184 0273 | s | Execute Discrete,Plus 0185 4bec |K | Short_Literal 0x3ec 0186 027d | } | Execute Discrete,Greater 0187 77c4 |w | Jump_Nonzero 0x14c 0188 00ce | | Action Pop_Auxiliary 0189 e5ff | | Load 0x2,-0x1 018a 0219 | | Execute Heap_Access,All_Read 018b 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 018c 00d8 | | Load_Top At_Offset_0 018d 00db | | Load_Top At_Offset_3 018e e5fe | | Load 0x2,-0x2 018f 01dc | | Execute Vector,Last 0190 e5fe | | Load 0x2,-0x2 0191 01cf | | Execute Vector,Slice_Read 0192 e21c | | Load 0x1,0x1c 0193 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0194 00d2 | | Pop_Control Pop_Count_2 0195 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0196 0000 0000 | | .XXX[0x2] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 01a2 | | .CONST 0x01a2 ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0002 | | .CONST 0x0002 ; Number of locals 019b INIT_0198: 019b 00da | | Load_Top At_Offset_2 019c 0217 | | Execute Heap_Access,All_Reference 019d 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6 019e e21c | | Load 0x1,0x1c 019f 180e | | Execute Package,Field_Execute,Field_Number 0xe 01a0 00e3 | | Load_Encached Natural_Cache 01a1 03f1 | | Declare_Variable Discrete,With_Value 01a2 BODY_0198: 01a2 00d8 | | Load_Top At_Offset_0 01a3 0c01 | | Execute_Immediate Greater_Equal,0x1 01a4 681a |h | Jump_Zero 0x1bf 01a5 00db | | Load_Top At_Offset_3 01a6 0217 | | Execute Heap_Access,All_Reference 01a7 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 01a8 6809 |h | Jump_Zero 0x1b2 01a9 00db | | Load_Top At_Offset_3 01aa 0217 | | Execute Heap_Access,All_Reference 01ab 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6 01ac e21c | | Load 0x1,0x1c 01ad 180f | | Execute Package,Field_Execute,Field_Number 0xf 01ae e5ff | | Load 0x2,-0x1 01af e223 | # | Load 0x1,0x23 01b0 180f | | Execute Package,Field_Execute,Field_Number 0xf 01b1 780d |x | Jump 0x1bf 01b2 4801 |H | Short_Literal 0x1 01b3 00d9 | | Load_Top At_Offset_1 01b4 e224 | $ | Load 0x1,0x24 01b5 180f | | Execute Package,Field_Execute,Field_Number 0xf 01b6 e5ff | | Load 0x2,-0x1 01b7 0217 | | Execute Heap_Access,All_Reference 01b8 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6 01b9 e21c | | Load 0x1,0x1c 01ba 180f | | Execute Package,Field_Execute,Field_Number 0xf 01bb 01cc | | Execute Vector,Catenate 01bc e5ff | | Load 0x2,-0x1 01bd e223 | # | Load 0x1,0x23 01be 180f | | Execute Package,Field_Execute,Field_Number 0xf 01bf 00db | | Load_Top At_Offset_3 01c0 0219 | | Execute Heap_Access,All_Read 01c1 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 01c2 00d8 | | Load_Top At_Offset_0 01c3 e21c | | Load 0x1,0x1c 01c4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01c5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c6 0000 0000 | | .XXX[0x2] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01d9 | | .CONST 0x01d9 ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0004 | | .CONST 0x0004 ; Number of locals 01cb INIT_01c8: 01cb 4801 |H | Short_Literal 0x1 01cc 4804 |H | Short_Literal 0x4 01cd e002 | | Load 0x0,0x2 01ce 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01cf 035b | [ | Declare_Type Array,Constrained 01d0 0337 | 7 | Declare_Variable Array 01d1 e5fd | | Load 0x2,-0x3 01d2 01db | | Execute Vector,Length 01d3 00e3 | | Load_Encached Natural_Cache 01d4 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 01d5 e5fd | | Load 0x2,-0x3 01d6 01dd | | Execute Vector,First 01d7 00e3 | | Load_Encached Natural_Cache 01d8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 01d9 BODY_01c8: 01d9 e5ff | | Load 0x2,-0x1 01da 0217 | | Execute Heap_Access,All_Reference 01db 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 01dc 0f01 | | Execute_Immediate Equal,0x1 01dd 7084 |p | Jump_Nonzero 0x262 01de e5ff | | Load 0x2,-0x1 01df 8213 | | Call 0x1,0x13 01e0 681a |h | Jump_Zero 0x1fb 01e1 00da | | Load_Top At_Offset_2 01e2 4801 |H | Short_Literal 0x1 01e3 e5ff | | Load 0x2,-0x1 01e4 e223 | # | Load 0x1,0x23 01e5 180d | | Execute Package,Field_Execute,Field_Number 0xd 01e6 00d1 | | Pop_Control Pop_Count_1 01e7 e5ff | | Load 0x2,-0x1 01e8 0219 | | Execute Heap_Access,All_Read 01e9 e5ff | | Load 0x2,-0x1 01ea 0219 | | Execute Heap_Access,All_Read 01eb 00e3 | | Load_Encached Natural_Cache 01ec 00da | | Load_Top At_Offset_2 01ed 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 01ee 00d1 | | Pop_Control Pop_Count_1 01ef 00e1 | | Load_Encached Boolean_Cache 01f0 00da | | Load_Top At_Offset_2 01f1 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 01f2 00d1 | | Pop_Control Pop_Count_1 01f3 e402 | | Load 0x2,0x2 01f4 e224 | $ | Load 0x1,0x24 01f5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01f6 00da | | Load_Top At_Offset_2 01f7 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 01f8 00da | | Load_Top At_Offset_2 01f9 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 01fa 00d2 | | Pop_Control Pop_Count_2 01fb 00cf | | Action Mark_Auxiliary 01fc 7843 |xC | Jump 0x240 01fd e5ff | | Load 0x2,-0x1 01fe 0217 | | Execute Heap_Access,All_Reference 01ff 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0200 6801 |h | Jump_Zero 0x202 0201 08e0 | | Execute_Immediate Raise,0xe0 0202 e5fd | | Load 0x2,-0x3 0203 00da | | Load_Top At_Offset_2 0204 00db | | Load_Top At_Offset_3 0205 e5ff | | Load 0x2,-0x1 0206 0217 | | Execute Heap_Access,All_Reference 0207 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0208 0273 | s | Execute Discrete,Plus 0209 0aff | | Execute_Immediate Plus,-0x1 020a 00d8 | | Load_Top At_Offset_0 020b 00e2 | | Load_Encached Integer_Cache 020c 0260 | ` | Execute Discrete,In_Type 020d 7001 |p | Jump_Nonzero 0x20f 020e 0801 | | Execute_Immediate Raise,0x1 020f 00da | | Load_Top At_Offset_2 0210 035b | [ | Declare_Type Array,Constrained 0211 00d0 | | Action Swap_Control 0212 01cd | | Execute Vector,Slice_Reference 0213 00d8 | | Load_Top At_Offset_0 0214 4801 |H | Short_Literal 0x1 0215 e5ff | | Load 0x2,-0x1 0216 e223 | # | Load 0x1,0x23 0217 180d | | Execute Package,Field_Execute,Field_Number 0xd 0218 00d2 | | Pop_Control Pop_Count_2 0219 00d9 | | Load_Top At_Offset_1 021a e5ff | | Load 0x2,-0x1 021b 0217 | | Execute Heap_Access,All_Reference 021c 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 021d 0273 | s | Execute Discrete,Plus 021e 005a | Z | Store_Top Discrete,At_Offset_2 021f 00da | | Load_Top At_Offset_2 0220 e5ff | | Load 0x2,-0x1 0221 0217 | | Execute Heap_Access,All_Reference 0222 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0223 0272 | r | Execute Discrete,Minus 0224 005b | [ | Store_Top Discrete,At_Offset_3 0225 00db | | Load_Top At_Offset_3 0226 4801 |H | Short_Literal 0x1 0227 e5ff | | Load 0x2,-0x1 0228 e223 | # | Load 0x1,0x23 0229 180d | | Execute Package,Field_Execute,Field_Number 0xd 022a 00d1 | | Pop_Control Pop_Count_1 022b e5ff | | Load 0x2,-0x1 022c 0219 | | Execute Heap_Access,All_Read 022d e5ff | | Load 0x2,-0x1 022e 0219 | | Execute Heap_Access,All_Read 022f 00e3 | | Load_Encached Natural_Cache 0230 00da | | Load_Top At_Offset_2 0231 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0232 00d1 | | Pop_Control Pop_Count_1 0233 00e1 | | Load_Encached Boolean_Cache 0234 00da | | Load_Top At_Offset_2 0235 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 0236 00d1 | | Pop_Control Pop_Count_1 0237 e402 | | Load 0x2,0x2 0238 e224 | $ | Load 0x1,0x24 0239 1810 | | Execute Package,Field_Execute,Field_Number 0x10 023a 00da | | Load_Top At_Offset_2 023b 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 023c 00da | | Load_Top At_Offset_2 023d 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 023e 00d2 | | Pop_Control Pop_Count_2 023f 00c9 | | Action Pop_Auxiliary_Loop 0240 00da | | Load_Top At_Offset_2 0241 e5ff | | Load 0x2,-0x1 0242 0217 | | Execute Heap_Access,All_Reference 0243 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0244 027d | } | Execute Discrete,Greater 0245 77b7 |w | Jump_Nonzero 0x1fd 0246 00ce | | Action Pop_Auxiliary 0247 e5fd | | Load 0x2,-0x3 0248 00d9 | | Load_Top At_Offset_1 0249 e5fd | | Load 0x2,-0x3 024a 01dc | | Execute Vector,Last 024b 00da | | Load_Top At_Offset_2 024c 035b | [ | Declare_Type Array,Constrained 024d 00d0 | | Action Swap_Control 024e 01cd | | Execute Vector,Slice_Reference 024f 00d8 | | Load_Top At_Offset_0 0250 4801 |H | Short_Literal 0x1 0251 e5ff | | Load 0x2,-0x1 0252 e223 | # | Load 0x1,0x23 0253 180d | | Execute Package,Field_Execute,Field_Number 0xd 0254 00d2 | | Pop_Control Pop_Count_2 0255 e5ff | | Load 0x2,-0x1 0256 0217 | | Execute Heap_Access,All_Reference 0257 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 0258 e5fd | | Load 0x2,-0x3 0259 01dc | | Execute Vector,Last 025a 00da | | Load_Top At_Offset_2 025b 0272 | r | Execute Discrete,Minus 025c 0a01 | | Execute_Immediate Plus,0x1 025d 0272 | r | Execute Discrete,Minus 025e e5ff | | Load 0x2,-0x1 025f 0217 | | Execute Heap_Access,All_Reference 0260 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 0261 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0262 e5ff | | Load 0x2,-0x1 0263 8213 | | Call 0x1,0x13 0264 680b |h | Jump_Zero 0x270 0265 e5ff | | Load 0x2,-0x1 0266 0219 | | Execute Heap_Access,All_Read 0267 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7 0268 00d8 | | Load_Top At_Offset_0 0269 e5fe | | Load 0x2,-0x2 026a e5ff | | Load 0x2,-0x1 026b e223 | # | Load 0x1,0x23 026c 180e | | Execute Package,Field_Execute,Field_Number 0xe 026d e21c | | Load 0x1,0x1c 026e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 026f 00d2 | | Pop_Control Pop_Count_2 0270 e5ff | | Load 0x2,-0x1 0271 0219 | | Execute Heap_Access,All_Read 0272 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7 0273 e5fd | | Load 0x2,-0x3 0274 00d9 | | Load_Top At_Offset_1 0275 e5fe | | Load 0x2,-0x2 0276 e21c | | Load 0x1,0x1c 0277 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0278 00d3 | | Pop_Control Pop_Count_3 0279 4503 |E | Exit_Suprogram New_Top_Offset 0x3 027a 0000 0000 | | .BLANK 0000[0x6] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 00da | | Load_Top At_Offset_2 0284 0217 | | Execute Heap_Access,All_Reference 0285 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0286 0f01 | | Execute_Immediate Equal,0x1 0287 7009 |p | Jump_Nonzero 0x291 0288 00da | | Load_Top At_Offset_2 0289 0217 | | Execute Heap_Access,All_Reference 028a 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 028b 00db | | Load_Top At_Offset_3 028c 0217 | | Execute Heap_Access,All_Reference 028d 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 028e 0f00 | | Execute_Immediate Equal,0x0 028f 0279 | y | Execute Discrete,And 0290 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0291 00da | | Load_Top At_Offset_2 0292 0217 | | Execute Heap_Access,All_Reference 0293 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 0294 e21c | | Load 0x1,0x1c 0295 180e | | Execute Package,Field_Execute,Field_Number 0xe 0296 0d01 | | Execute_Immediate Less,0x1 0297 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 8211 | | Call 0x1,0x11 029d 00da | | Load_Top At_Offset_2 029e 0217 | | Execute Heap_Access,All_Reference 029f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 02a0 e003 | | Load 0x0,0x3 02a1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02a2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02a3 0000 0000 | | .BLANK 0000[0x5] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab 00da | | Load_Top At_Offset_2 02ac 8211 | | Call 0x1,0x11 02ad 00da | | Load_Top At_Offset_2 02ae 0217 | | Execute Heap_Access,All_Reference 02af 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 02b0 e003 | | Load 0x0,0x3 02b1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02b2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02b3 0000 0000 | | .BLANK 0000[0x5] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bb | | .CONST 0x02bb ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0001 | | .CONST 0x0001 ; Number of locals 02bb BODY_02b8: 02bb INIT_02b8: 02bb 00da | | Load_Top At_Offset_2 02bc 0217 | | Execute Heap_Access,All_Reference 02bd 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 02be e005 | | Load 0x0,0x5 02bf 181a | | Execute Package,Field_Execute,Field_Number 0x1a 02c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02c1 0000 0000 | | .BLANK 0000[0x7] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb 00da | | Load_Top At_Offset_2 02cc 0217 | | Execute Heap_Access,All_Reference 02cd 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02cf 0000 | | .XXX[0x1] 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d3 | | .CONST 0x02d3 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0001 | | .CONST 0x0001 ; Number of locals 02d3 BODY_02d0: 02d3 INIT_02d0: 02d3 00da | | Load_Top At_Offset_2 02d4 0217 | | Execute Heap_Access,All_Reference 02d5 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5 02d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d7 0000 | | .XXX[0x1] 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 4608 |F | Jump_Case 0x9 02dc 7808 |x | Jump 0x2e5 ; case 0x0 02dd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 02de 783a |x: | Jump 0x319 ; case 0x2 02df 7839 |x9 | Jump 0x319 ; case 0x3 02e0 7838 |x8 | Jump 0x319 ; case 0x4 02e1 7837 |x7 | Jump 0x319 ; case 0x5 02e2 781e |x | Jump 0x301 ; case 0x6 02e3 7824 |x$ | Jump 0x308 ; case 0x7 02e4 782d |x- | Jump 0x312 ; case 0x8 02e5 00da | | Load_Top At_Offset_2 02e6 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2 02e7 00da | | Load_Top At_Offset_2 02e8 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2 02e9 1c00 | | Execute_Immediate Run_Utility,0x0 02ea 00da | | Load_Top At_Offset_2 02eb 2203 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x3 02ec 00da | | Load_Top At_Offset_2 02ed 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 02ee 1c00 | | Execute_Immediate Run_Utility,0x0 02ef 00da | | Load_Top At_Offset_2 02f0 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6 02f1 1c00 | | Execute_Immediate Run_Utility,0x0 02f2 00da | | Load_Top At_Offset_2 02f3 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02f4 0f01 | | Execute_Immediate Equal,0x1 02f5 7007 |p | Jump_Nonzero 0x2fd 02f6 4801 |H | Short_Literal 0x1 02f7 00db | | Load_Top At_Offset_3 02f8 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 02f9 4800 |H | Short_Literal 0x0 02fa 00db | | Load_Top At_Offset_3 02fb 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 02fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 02fd 00da | | Load_Top At_Offset_2 02fe 2607 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7 02ff 1c00 | | Execute_Immediate Run_Utility,0x0 0300 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0301 00db | | Load_Top At_Offset_3 0302 0f01 | | Execute_Immediate Equal,0x1 0303 7002 |p | Jump_Nonzero 0x306 0304 4802 |H | Short_Literal 0x2 0305 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0306 4801 |H | Short_Literal 0x1 0307 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0308 00db | | Load_Top At_Offset_3 0309 e5fe | | Load 0x2,-0x2 030a 0f01 | | Execute_Immediate Equal,0x1 030b 7002 |p | Jump_Nonzero 0x30e 030c 4802 |H | Short_Literal 0x2 030d 7801 |x | Jump 0x30f 030e 4801 |H | Short_Literal 0x1 030f e5ff | | Load 0x2,-0x1 0310 031b | | Declare_Type Variant_Record,Constrained 0311 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0312 00db | | Load_Top At_Offset_3 0313 e5fe | | Load 0x2,-0x2 0314 e5ff | | Load 0x2,-0x1 0315 1c06 | | Execute_Immediate Run_Utility,0x6 0316 e5ff | | Load 0x2,-0x1 0317 02fc | | Declare_Variable Variant_Record,With_Constraint 0318 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0319 0869 | i | Execute_Immediate Raise,0x69 031a ; -------------------------------------------------------------------------------------- 031a ; STRING TABLE 031a ; -------------------------------------------------------------------------------------- 031a 0006 | | .STRTAB 0x0006->0x031d ; "RM_TCP_IP" 031b 000d | | .STRTAB 0x000d->0x0321 ; "UDP_IP" 031c 0011 | | .STREND 0x0011->0x0324 031d 524d 5f54 |RM_T| .STRTAB_STRINGS 0325 0000 0000 | | .XXX[0x3] 0327 0000 | | 0328 ; -------------------------------------------------------------------------------------- 0328 ; Debug Table 0328 ; -------------------------------------------------------------------------------------- 0328 0004 000e | | .DEBUG4 0x0004,0x000e,0xf428,0x0000,0x0001,0x0000 032e 0000 0675 | u| .XXX[0xe] 0330 0001 0404 | | 0332 0000 0700 | | 0334 0000 000b | | 0336 0000 1cab | | 0338 0776 a004 | v | 033a 0800 04b8 | | 033c 0000 0000 | | .BLANK 0000[0x4] 0340 0776 9404 | v | .XXX[0x24] 0342 0000 4c96 | L | 0344 000d 0c08 | | 0346 0000 4333 | C3| 0348 0776 a004 | v | 034a 0800 04b8 | | 034c 0011 13f3 | | 034e 00cc 0218 | | 0350 0776 9404 | v | 0352 0000 4cff | L | 0354 000d 0c08 | | 0356 0000 2cd3 | , | 0358 0776 a004 | v | 035a 0000 17bf | | 035c 0009 9086 | | 035e 0000 0675 | u| 0360 0776 a004 | v | 0362 0800 04b8 | | 0364 0000 0000 | | .BLANK 0000[0x4] 0368 0776 a004 | v | .XXX[0xe] 036a 0800 0600 | | 036c 0011 13f3 | | 036e 00cc 0218 | | 0370 0000 0480 | | 0372 0014 2600 | & | 0374 3023 ba00 |0# | 0376 0000 0000 | | .BLANK 0000[0x4] 037a 1815 f740 | @| .XXX[0x10] 037c 0003 2bc0 | + | 037e 0302 c0e8 | | 0380 0302 cb80 | | 0382 0002 84d0 | | 0384 011d 3b50 | ;P| 0386 0000 0000 | | 0388 0605 b0b0 | | 038a 0000 0000 | | .BLANK 0000[0x4] 038e 0007 8a20 | | .XXX[0x11] 0390 2800 0284 |( | 0392 c040 342a | @4*| 0394 0007 0060 | `| 0396 5ac3 0000 |Z | 0398 509a 0023 |P #| 039a a76a 0000 | j | 039c 0000 00c0 | | 039e b8a6 | | 039f 0000 0000 | | .BLANK 0000[0x5] 03a4 f144 0500 | D | .XXX[0x2e] 03a6 0050 9808 | P | 03a8 0685 4000 | @ | 03aa e00c 0b81 | | 03ac 7ff8 0002 | | 03ae 84c0 0005 | | 03b0 0a40 0c0b | @ | 03b2 7180 0000 |q | 03b4 0000 0000 | | 03b6 0040 0000 | @ | 03b8 0000 0000 | | 03ba 0020 000f | | 03bc 1440 0000 | @ | 03be 0000 0000 | | 03c0 001f f800 | | 03c2 0284 c000 | | 03c4 0000 000c | | 03c6 0b9a 8000 | | 03c8 0000 0000 | | 03ca 0000 4000 | @ | 03cc 0000 0000 | | 03ce 0000 2000 | | 03d0 0f14 4000 | @ | 03d2 0000 0000 | | .BLANK 0000[0x4] 03d6 0001 2000 | | .XXX[0x12] 03d8 0509 a00c | | 03da 0af3 4000 | @ | 03dc 0000 0000 | | 03de 0000 0006 | | 03e0 05e3 7000 | p | 03e2 00ca f200 | | 03e4 c0bc ee00 | | 03e6 c0bf 9400 | | 03e8 0000 0000 | | .BLANK 0000[0x4] 03ec 0011 13f3 | | .XXX[0x14] 03ee 00cc 0004 | | 03f0 0001 0404 | | 03f2 0000 0700 | | 03f4 0011 13f3 | | 03f6 00cc 1270 | p| 03f8 fffc 0023 | #| 03fa 5000 0001 |P | 03fc 0000 0000 | | 03fe 0000 0003 | |