|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 5120 (0x1400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 08d0 | | .CONST 0x08d0 ; 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 8005 | | .CONST 0x8005 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0085 | | .CONST 0x0085 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0017 | | .CONST 0x0017 ; Number of locals 000b INIT_0008: 000b 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated 000d 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 000f 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 0011 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated 0013 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 0015 00bf | | Action Accept_Activation 0016 00e3 | | Load_Encached Natural_Cache 0017 0266 | f | Execute Discrete,Bounds 0018 4820 |H | Short_Literal 0x20 0019 e001 | | Load 0x0,0x1 001a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 001b 1c07 | | Execute_Immediate Run_Utility,0x7 001c 029f 0493 | | Declare_Subprogram INIT_0490,For_Call 001e 4801 |H | Short_Literal 0x1 001f 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0020 4801 |H | Short_Literal 0x1 0021 4840 |H@ | Short_Literal 0x40 0022 00da | | Load_Top At_Offset_2 0023 035b | [ | Declare_Type Array,Constrained 0024 0337 | 7 | Declare_Variable Array 0025 00d8 | | Load_Top At_Offset_0 0026 1c00 | | Execute_Immediate Run_Utility,0x0 0027 4801 |H | Short_Literal 0x1 0028 4808 |H | Short_Literal 0x8 0029 4801 |H | Short_Literal 0x1 002a 4810 |H | Short_Literal 0x10 002b 00e9 | | Load_Encached String_Cache 002c 035b | [ | Declare_Type Array,Constrained 002d 02a0 | | Declare_Subprogram Null_Subprogram 002e 4801 |H | Short_Literal 0x1 002f 035d | ] | Declare_Type Array,Defined 0030 00d8 | | Load_Top At_Offset_0 0031 0337 | 7 | Declare_Variable Array 0032 00d8 | | Load_Top At_Offset_0 0033 0335 | 5 | Declare_Variable Array,Duplicate 0034 00cd | | Action Spare6_Action 0035 0092 06c6 | | Action Push_String_Extended,0x6c6 ; "Rs6000_Aix_Ibm " 0037 00da | | Load_Top At_Offset_2 0038 01d8 | | Execute Vector,Element_Type 0039 0119 | | Execute Any,Check_In_Formal_Type 003a 4801 |H | Short_Literal 0x1 003b 00da | | Load_Top At_Offset_2 003c 01d6 | | Execute Vector,Field_Write 003d 0092 06c7 | | Action Push_String_Extended,0x6c7 ; "Vax_Vms_Dec_Xt " 003f 00da | | Load_Top At_Offset_2 0040 01d8 | | Execute Vector,Element_Type 0041 0119 | | Execute Any,Check_In_Formal_Type 0042 4802 |H | Short_Literal 0x2 0043 00da | | Load_Top At_Offset_2 0044 01d6 | | Execute Vector,Field_Write 0045 0092 06c8 | | Action Push_String_Extended,0x6c8 ; "I386_Lynx_Als_Xt" 0047 00da | | Load_Top At_Offset_2 0048 01d8 | | Execute Vector,Element_Type 0049 0119 | | Execute Any,Check_In_Formal_Type 004a 4803 |H | Short_Literal 0x3 004b 00da | | Load_Top At_Offset_2 004c 01d6 | | Execute Vector,Field_Write 004d 0092 06c9 | | Action Push_String_Extended,0x6c9 ; "I486_Iux_Als_Xt " 004f 00da | | Load_Top At_Offset_2 0050 01d8 | | Execute Vector,Element_Type 0051 0119 | | Execute Any,Check_In_Formal_Type 0052 4804 |H | Short_Literal 0x4 0053 00da | | Load_Top At_Offset_2 0054 01d6 | | Execute Vector,Field_Write 0055 0092 06ca | | Action Push_String_Extended,0x6ca ; "I960_Vms_Tar_Xt " 0057 00da | | Load_Top At_Offset_2 0058 01d8 | | Execute Vector,Element_Type 0059 0119 | | Execute Any,Check_In_Formal_Type 005a 4805 |H | Short_Literal 0x5 005b 00da | | Load_Top At_Offset_2 005c 01d6 | | Execute Vector,Field_Write 005d 0092 06cb | | Action Push_String_Extended,0x6cb ; "IC30_Vms_Tar_Xt " 005f 00da | | Load_Top At_Offset_2 0060 01d8 | | Execute Vector,Element_Type 0061 0119 | | Execute Any,Check_In_Formal_Type 0062 4806 |H | Short_Literal 0x6 0063 00da | | Load_Top At_Offset_2 0064 01d6 | | Execute Vector,Field_Write 0065 0092 06cc | | Action Push_String_Extended,0x6cc ; "Sparc_Sun_Xt " 0067 00da | | Load_Top At_Offset_2 0068 01d8 | | Execute Vector,Element_Type 0069 0119 | | Execute Any,Check_In_Formal_Type 006a 4807 |H | Short_Literal 0x7 006b 00da | | Load_Top At_Offset_2 006c 01d6 | | Execute Vector,Field_Write 006d 0092 06cd | | Action Push_String_Extended,0x6cd ; "Ix86_Unix_Als_Xt" 006f 00da | | Load_Top At_Offset_2 0070 01d8 | | Execute Vector,Element_Type 0071 0119 | | Execute Any,Check_In_Formal_Type 0072 4808 |H | Short_Literal 0x8 0073 00da | | Load_Top At_Offset_2 0074 01d6 | | Execute Vector,Field_Write 0075 00d9 | | Load_Top At_Offset_1 0076 01d4 | | Execute Vector,Structure_Write 0077 029d 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call 0079 1d0d | | Execute_Immediate Reference_Lex_1,0xd 007a 00c7 | | Action Elaborate_Subprogram 007b 1d0e | | Execute_Immediate Reference_Lex_1,0xe 007c 00c7 | | Action Elaborate_Subprogram 007d 1d0f | | Execute_Immediate Reference_Lex_1,0xf 007e 00c7 | | Action Elaborate_Subprogram 007f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0080 00c7 | | Action Elaborate_Subprogram 0081 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0082 00c7 | | Action Elaborate_Subprogram 0083 029d 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call 0085 BODY_0008: 0085 00bc | | Action Signal_Activated 0086 00bb | | Action Signal_Completion 0087 0000 | | .XXX[0x1] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 00c4 | | .CONST 0x00c4 ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 000e | | .CONST 0x000e ; Number of locals 008b INIT_0088: 008b 0092 06ce | | Action Push_String_Extended,0x6ce ; "Build_Predefined_World" 008d e002 | | Load 0x0,0x2 008e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 008f 02c7 | | Declare_Variable Any 0090 00d8 | | Load_Top At_Offset_0 0091 1c00 | | Execute_Immediate Run_Utility,0x0 0092 e002 | | Load 0x0,0x2 0093 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0094 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0095 02c7 | | Declare_Variable Any 0096 00d8 | | Load_Top At_Offset_0 0097 1c00 | | Execute_Immediate Run_Utility,0x0 0098 e002 | | Load 0x0,0x2 0099 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 009a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009b 02c7 | | Declare_Variable Any 009c 00d8 | | Load_Top At_Offset_0 009d 1c00 | | Execute_Immediate Run_Utility,0x0 009e e002 | | Load 0x0,0x2 009f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a0 e002 | | Load 0x0,0x2 00a1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00a2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00a3 e003 | | Load 0x0,0x3 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 02c7 | | Declare_Variable Any 00a6 e003 | | Load 0x0,0x3 00a7 180e | | Execute Package,Field_Execute,Field_Number 0xe 00a8 a408 | | Store_Unchecked 0x2,0x8 00a9 e002 | | Load 0x0,0x2 00aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ab 02c7 | | Declare_Variable Any 00ac 00d8 | | Load_Top At_Offset_0 00ad 1c00 | | Execute_Immediate Run_Utility,0x0 00ae e002 | | Load 0x0,0x2 00af 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 00b0 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00b1 02c7 | | Declare_Variable Any 00b2 00d8 | | Load_Top At_Offset_0 00b3 1c00 | | Execute_Immediate Run_Utility,0x0 00b4 00f1 | | Load_Encached Diana_Temp_Seq 00b5 02c7 | | Declare_Variable Any 00b6 00d8 | | Load_Top At_Offset_0 00b7 1c00 | | Execute_Immediate Run_Utility,0x0 00b8 e002 | | Load 0x0,0x2 00b9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00ba 02ff | | Declare_Variable Variant_Record 00bb 00d8 | | Load_Top At_Offset_0 00bc 1c00 | | Execute_Immediate Run_Utility,0x0 00bd e004 | | Load 0x0,0x4 00be 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00bf 02c7 | | Declare_Variable Any 00c0 00d8 | | Load_Top At_Offset_0 00c1 1c00 | | Execute_Immediate Run_Utility,0x0 00c2 029f 0543 | C| Declare_Subprogram INIT_0540,For_Call 00c4 BODY_0088: 00c4 e5ff | | Load 0x2,-0x1 00c5 01db | | Execute Vector,Length 00c6 0c11 | | Execute_Immediate Greater_Equal,0x11 00c7 681e |h | Jump_Zero 0xe6 00c8 e003 | | Load 0x0,0x3 00c9 180e | | Execute Package,Field_Execute,Field_Number 0xe 00ca 4801 |H | Short_Literal 0x1 00cb 4802 |H | Short_Literal 0x2 00cc e005 | | Load 0x0,0x5 00cd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ce 035b | [ | Declare_Type Array,Constrained 00cf 0337 | 7 | Declare_Variable Array 00d0 e5ff | | Load 0x2,-0x1 00d1 e005 | | Load 0x0,0x5 00d2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00d3 e005 | | Load 0x0,0x5 00d4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00d5 0119 | | Execute Any,Check_In_Formal_Type 00d6 4801 |H | Short_Literal 0x1 00d7 00da | | Load_Top At_Offset_2 00d8 01d6 | | Execute Vector,Field_Write 00d9 4810 |H | Short_Literal 0x10 00da e005 | | Load 0x0,0x5 00db 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00dc e005 | | Load 0x0,0x5 00dd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00de 0119 | | Execute Any,Check_In_Formal_Type 00df 4802 |H | Short_Literal 0x2 00e0 00da | | Load_Top At_Offset_2 00e1 01d6 | | Execute Vector,Field_Write 00e2 61ad |a | Indirect_Literal Discrete,0x290,{0x00000000, 0x00008899} 00e3 e006 | | Load 0x0,0x6 00e4 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 00e5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00e6 e002 | | Load 0x0,0x2 00e7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00e8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00e9 e403 | | Load 0x2,0x3 00ea 0120 | | Execute Any,Is_Value 00eb 6803 |h | Jump_Zero 0xef 00ec e002 | | Load 0x0,0x2 00ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ee 7801 |x | Jump 0xf0 00ef e403 | | Load 0x2,0x3 00f0 619b |a | Indirect_Literal Discrete,0x28c,{0x00000000, 0x00004000} 00f1 e007 | | Load 0x0,0x7 00f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00f3 e008 | | Load 0x0,0x8 00f4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00f5 e002 | | Load 0x0,0x2 00f6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00f8 0092 06cf | | Action Push_String_Extended,0x6cf ; "!targets." 00fa e5ff | | Load 0x2,-0x1 00fb 01cc | | Execute Vector,Catenate 00fc e002 | | Load 0x0,0x2 00fd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00fe 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 00ff c403 | | Store 0x2,0x3 0100 c407 | | Store 0x2,0x7 0101 e407 | | Load 0x2,0x7 0102 702f |p/ | Jump_Nonzero 0x132 0103 e003 | | Load 0x0,0x3 0104 180e | | Execute Package,Field_Execute,Field_Number 0xe 0105 4801 |H | Short_Literal 0x1 0106 4801 |H | Short_Literal 0x1 0107 e005 | | Load 0x0,0x5 0108 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0109 035b | [ | Declare_Type Array,Constrained 010a 0337 | 7 | Declare_Variable Array 010b 0092 06d0 | | Action Push_String_Extended,0x6d0 ; "!Targets." 010d e5ff | | Load 0x2,-0x1 010e e009 | | Load 0x0,0x9 010f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0110 01cc | | Execute Vector,Catenate 0111 e005 | | Load 0x0,0x5 0112 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0113 e005 | | Load 0x0,0x5 0114 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0115 0119 | | Execute Any,Check_In_Formal_Type 0116 4801 |H | Short_Literal 0x1 0117 00da | | Load_Top At_Offset_2 0118 01d6 | | Execute Vector,Field_Write 0119 616e |an | Indirect_Literal Discrete,0x288,{0x00000000, 0x00008898} 011a e006 | | Load 0x0,0x6 011b 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 011c e003 | | Load 0x0,0x3 011d 180e | | Execute Package,Field_Execute,Field_Number 0xe 011e 4801 |H | Short_Literal 0x1 011f 4801 |H | Short_Literal 0x1 0120 e005 | | Load 0x0,0x5 0121 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0122 035b | [ | Declare_Type Array,Constrained 0123 0337 | 7 | Declare_Variable Array 0124 0092 06d1 | | Action Push_String_Extended,0x6d1 ; "Create_Predefined_Library completed" 0126 e005 | | Load 0x0,0x5 0127 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0128 e005 | | Load 0x0,0x5 0129 1b0e | | Execute Package,Field_Read,Field_Number 0xe 012a 0119 | | Execute Any,Check_In_Formal_Type 012b 4801 |H | Short_Literal 0x1 012c 00da | | Load_Top At_Offset_2 012d 01d6 | | Execute Vector,Field_Write 012e 6155 |aU | Indirect_Literal Discrete,0x284,{0x00000000, 0x00008821} 012f e006 | | Load 0x0,0x6 0130 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0131 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0132 e002 | | Load 0x0,0x2 0133 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0134 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0135 e403 | | Load 0x2,0x3 0136 0120 | | Execute Any,Is_Value 0137 6803 |h | Jump_Zero 0x13b 0138 e002 | | Load 0x0,0x2 0139 1b0f | | Execute Package,Field_Read,Field_Number 0xf 013a 7801 |x | Jump 0x13c 013b e403 | | Load 0x2,0x3 013c 614f |aO | Indirect_Literal Discrete,0x28c,{0x00000000, 0x00004000} 013d e007 | | Load 0x0,0x7 013e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 013f e008 | | Load 0x0,0x8 0140 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0141 e002 | | Load 0x0,0x2 0142 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0143 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0144 0092 06d2 | | Action Push_String_Extended,0x6d2 ; "!targets" 0146 e002 | | Load 0x0,0x2 0147 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0148 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0149 c403 | | Store 0x2,0x3 014a c407 | | Store 0x2,0x7 014b e407 | | Load 0x2,0x7 014c 683a |h: | Jump_Zero 0x187 014d e003 | | Load 0x0,0x3 014e 180e | | Execute Package,Field_Execute,Field_Number 0xe 014f 4801 |H | Short_Literal 0x1 0150 4802 |H | Short_Literal 0x2 0151 e005 | | Load 0x0,0x5 0152 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0153 035b | [ | Declare_Type Array,Constrained 0154 0337 | 7 | Declare_Variable Array 0155 0092 06d3 | | Action Push_String_Extended,0x6d3 ; "!Targets" 0157 e005 | | Load 0x0,0x5 0158 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0159 e005 | | Load 0x0,0x5 015a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 015b 0119 | | Execute Any,Check_In_Formal_Type 015c 4801 |H | Short_Literal 0x1 015d 00da | | Load_Top At_Offset_2 015e 01d6 | | Execute Vector,Field_Write 015f e407 | | Load 0x2,0x7 0160 e002 | | Load 0x0,0x2 0161 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0162 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0163 011c | | Execute Any,Convert_Unchecked 0164 1c01 | | Execute_Immediate Run_Utility,0x1 0165 e005 | | Load 0x0,0x5 0166 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0167 e005 | | Load 0x0,0x5 0168 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0169 0119 | | Execute Any,Check_In_Formal_Type 016a 4802 |H | Short_Literal 0x2 016b 00da | | Load_Top At_Offset_2 016c 01d6 | | Execute Vector,Field_Write 016d 6112 |a | Indirect_Literal Discrete,0x280,{0x00000000, 0x00008814} 016e e006 | | Load 0x0,0x6 016f 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0170 e003 | | Load 0x0,0x3 0171 180e | | Execute Package,Field_Execute,Field_Number 0xe 0172 4801 |H | Short_Literal 0x1 0173 4801 |H | Short_Literal 0x1 0174 e005 | | Load 0x0,0x5 0175 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0176 035b | [ | Declare_Type Array,Constrained 0177 0337 | 7 | Declare_Variable Array 0178 0092 06d4 | | Action Push_String_Extended,0x6d4 ; "Create_Predefined_Library failed" 017a e005 | | Load 0x0,0x5 017b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 017c e005 | | Load 0x0,0x5 017d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 017e 0119 | | Execute Any,Check_In_Formal_Type 017f 4801 |H | Short_Literal 0x1 0180 00da | | Load_Top At_Offset_2 0181 01d6 | | Execute Vector,Field_Write 0182 4805 |H | Short_Literal 0x5 0183 6100 |a | Indirect_Literal Discrete,0x284,{0x00000000, 0x00008821} 0184 e006 | | Load 0x0,0x6 0185 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0186 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0187 e403 | | Load 0x2,0x3 0188 e002 | | Load 0x0,0x2 0189 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 018a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 018b c404 | | Store 0x2,0x4 018c e002 | | Load 0x0,0x2 018d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 018e e405 | | Load 0x2,0x5 018f 0120 | | Execute Any,Is_Value 0190 6804 |h | Jump_Zero 0x195 0191 e002 | | Load 0x0,0x2 0192 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0193 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0194 7801 |x | Jump 0x196 0195 e405 | | Load 0x2,0x5 0196 60f5 |` | Indirect_Literal Discrete,0x28c,{0x00000000, 0x00004000} 0197 e007 | | Load 0x0,0x7 0198 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0199 e002 | | Load 0x0,0x2 019a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 019b 4802 |H | Short_Literal 0x2 019c 60df |` | Indirect_Literal Discrete,0x27c,{0x00000000, 0x7fffffff} 019d 60de |` | Indirect_Literal Discrete,0x27c,{0x00000000, 0x7fffffff} 019e e002 | | Load 0x0,0x2 019f 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 01a0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01a1 e00a | | Load 0x0,0xa 01a2 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01a3 e404 | | Load 0x2,0x4 01a4 4800 |H | Short_Literal 0x0 01a5 e5ff | | Load 0x2,-0x1 01a6 e002 | | Load 0x0,0x2 01a7 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 01a8 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01a9 c405 | | Store 0x2,0x5 01aa c406 | | Store 0x2,0x6 01ab e406 | | Load 0x2,0x6 01ac 683b |h; | Jump_Zero 0x1e8 01ad e003 | | Load 0x0,0x3 01ae 180e | | Execute Package,Field_Execute,Field_Number 0xe 01af 4801 |H | Short_Literal 0x1 01b0 4802 |H | Short_Literal 0x2 01b1 e005 | | Load 0x0,0x5 01b2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01b3 035b | [ | Declare_Type Array,Constrained 01b4 0337 | 7 | Declare_Variable Array 01b5 0092 06d0 | | Action Push_String_Extended,0x6d0 ; "!Targets." 01b7 e5ff | | Load 0x2,-0x1 01b8 01cc | | Execute Vector,Catenate 01b9 e005 | | Load 0x0,0x5 01ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01bb e005 | | Load 0x0,0x5 01bc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01bd 0119 | | Execute Any,Check_In_Formal_Type 01be 4801 |H | Short_Literal 0x1 01bf 00da | | Load_Top At_Offset_2 01c0 01d6 | | Execute Vector,Field_Write 01c1 e406 | | Load 0x2,0x6 01c2 e002 | | Load 0x0,0x2 01c3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01c4 011c | | Execute Any,Convert_Unchecked 01c5 1c01 | | Execute_Immediate Run_Utility,0x1 01c6 e005 | | Load 0x0,0x5 01c7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01c8 e005 | | Load 0x0,0x5 01c9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01ca 0119 | | Execute Any,Check_In_Formal_Type 01cb 4802 |H | Short_Literal 0x2 01cc 00da | | Load_Top At_Offset_2 01cd 01d6 | | Execute Vector,Field_Write 01ce 60a9 |` | Indirect_Literal Discrete,0x278,{0x00000000, 0x00008894} 01cf e006 | | Load 0x0,0x6 01d0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 01d1 e003 | | Load 0x0,0x3 01d2 180e | | Execute Package,Field_Execute,Field_Number 0xe 01d3 4801 |H | Short_Literal 0x1 01d4 4801 |H | Short_Literal 0x1 01d5 e005 | | Load 0x0,0x5 01d6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01d7 035b | [ | Declare_Type Array,Constrained 01d8 0337 | 7 | Declare_Variable Array 01d9 0092 06d4 | | Action Push_String_Extended,0x6d4 ; "Create_Predefined_Library failed" 01db e005 | | Load 0x0,0x5 01dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01dd e005 | | Load 0x0,0x5 01de 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01df 0119 | | Execute Any,Check_In_Formal_Type 01e0 4801 |H | Short_Literal 0x1 01e1 00da | | Load_Top At_Offset_2 01e2 01d6 | | Execute Vector,Field_Write 01e3 4805 |H | Short_Literal 0x5 01e4 609f |` | Indirect_Literal Discrete,0x284,{0x00000000, 0x00008821} 01e5 e006 | | Load 0x0,0x6 01e6 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 01e7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01e8 e405 | | Load 0x2,0x5 01e9 e002 | | Load 0x0,0x2 01ea 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 01eb 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01ec c409 | | Store 0x2,0x9 01ed e002 | | Load 0x0,0x2 01ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ef e40b | | Load 0x2,0xb 01f0 0120 | | Execute Any,Is_Value 01f1 6802 |h | Jump_Zero 0x1f4 01f2 00f1 | | Load_Encached Diana_Temp_Seq 01f3 7801 |x | Jump 0x1f5 01f4 e40b | | Load 0x2,0xb 01f5 e40a | | Load 0x2,0xa 01f6 0120 | | Execute Any,Is_Value 01f7 6804 |h | Jump_Zero 0x1fc 01f8 e002 | | Load 0x0,0x2 01f9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 01fa 1b17 | | Execute Package,Field_Read,Field_Number 0x17 01fb 7801 |x | Jump 0x1fd 01fc e40a | | Load 0x2,0xa 01fd e40d | | Load 0x2,0xd 01fe 0120 | | Execute Any,Is_Value 01ff 6803 |h | Jump_Zero 0x203 0200 e004 | | Load 0x0,0x4 0201 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0202 7801 |x | Jump 0x204 0203 e40d | | Load 0x2,0xd 0204 e40c | | Load 0x2,0xc 0205 6086 |` | Indirect_Literal Discrete,0x28c,{0x00000000, 0x00004000} 0206 e007 | | Load 0x0,0x7 0207 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0208 4800 |H | Short_Literal 0x0 0209 e002 | | Load 0x0,0x2 020a 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 020b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 020c e002 | | Load 0x0,0x2 020d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 020e 4ffc |O | Short_Literal -0x4 020f 4ffd |O | Short_Literal -0x3 0210 e409 | | Load 0x2,0x9 0211 e002 | | Load 0x0,0x2 0212 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 0213 180d | | Execute Package,Field_Execute,Field_Number 0xd 0214 00d1 | | Pop_Control Pop_Count_1 0215 c40d | | Store 0x2,0xd 0216 c40a | | Store 0x2,0xa 0217 c40b | | Store 0x2,0xb 0218 c406 | | Store 0x2,0x6 0219 e406 | | Load 0x2,0x6 021a 683b |h; | Jump_Zero 0x256 021b e003 | | Load 0x0,0x3 021c 180e | | Execute Package,Field_Execute,Field_Number 0xe 021d 4801 |H | Short_Literal 0x1 021e 4802 |H | Short_Literal 0x2 021f e005 | | Load 0x0,0x5 0220 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0221 035b | [ | Declare_Type Array,Constrained 0222 0337 | 7 | Declare_Variable Array 0223 0092 06d0 | | Action Push_String_Extended,0x6d0 ; "!Targets." 0225 e5ff | | Load 0x2,-0x1 0226 01cc | | Execute Vector,Catenate 0227 e005 | | Load 0x0,0x5 0228 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0229 e005 | | Load 0x0,0x5 022a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 022b 0119 | | Execute Any,Check_In_Formal_Type 022c 4801 |H | Short_Literal 0x1 022d 00da | | Load_Top At_Offset_2 022e 01d6 | | Execute Vector,Field_Write 022f e406 | | Load 0x2,0x6 0230 e002 | | Load 0x0,0x2 0231 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0232 011c | | Execute Any,Convert_Unchecked 0233 1c01 | | Execute_Immediate Run_Utility,0x1 0234 e005 | | Load 0x0,0x5 0235 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0236 e005 | | Load 0x0,0x5 0237 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0238 0119 | | Execute Any,Check_In_Formal_Type 0239 4802 |H | Short_Literal 0x2 023a 00da | | Load_Top At_Offset_2 023b 01d6 | | Execute Vector,Field_Write 023c 603b |`; | Indirect_Literal Discrete,0x278,{0x00000000, 0x00008894} 023d e006 | | Load 0x0,0x6 023e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 023f e003 | | Load 0x0,0x3 0240 180e | | Execute Package,Field_Execute,Field_Number 0xe 0241 4801 |H | Short_Literal 0x1 0242 4801 |H | Short_Literal 0x1 0243 e005 | | Load 0x0,0x5 0244 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0245 035b | [ | Declare_Type Array,Constrained 0246 0337 | 7 | Declare_Variable Array 0247 0092 06d4 | | Action Push_String_Extended,0x6d4 ; "Create_Predefined_Library failed" 0249 e005 | | Load 0x0,0x5 024a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 024b e005 | | Load 0x0,0x5 024c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 024d 0119 | | Execute Any,Check_In_Formal_Type 024e 4801 |H | Short_Literal 0x1 024f 00da | | Load_Top At_Offset_2 0250 01d6 | | Execute Vector,Field_Write 0251 4805 |H | Short_Literal 0x5 0252 6031 |`1 | Indirect_Literal Discrete,0x284,{0x00000000, 0x00008821} 0253 e006 | | Load 0x0,0x6 0254 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0255 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0256 0092 06d5 | | Action Push_String_Extended,0x6d5 ; "Io" 0258 840e | | Call 0x2,0xe 0259 0092 06d6 | | Action Push_String_Extended,0x6d6 ; "Lrm" 025b 840e | | Call 0x2,0xe 025c 0092 06d7 | | Action Push_String_Extended,0x6d7 ; "Reusable_Components" 025e 840e | | Call 0x2,0xe 025f 0092 06d8 | | Action Push_String_Extended,0x6d8 ; "Target_Interface" 0261 840e | | Call 0x2,0xe 0262 e003 | | Load 0x0,0x3 0263 180e | | Execute Package,Field_Execute,Field_Number 0xe 0264 4801 |H | Short_Literal 0x1 0265 4801 |H | Short_Literal 0x1 0266 e005 | | Load 0x0,0x5 0267 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0268 035b | [ | Declare_Type Array,Constrained 0269 0337 | 7 | Declare_Variable Array 026a 0092 06d1 | | Action Push_String_Extended,0x6d1 ; "Create_Predefined_Library completed" 026c e005 | | Load 0x0,0x5 026d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 026e e005 | | Load 0x0,0x5 026f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0270 0119 | | Execute Any,Check_In_Formal_Type 0271 4801 |H | Short_Literal 0x1 0272 00da | | Load_Top At_Offset_2 0273 01d6 | | Execute Vector,Field_Write 0274 600f |` | Indirect_Literal Discrete,0x284,{0x00000000, 0x00008821} 0275 e006 | | Load 0x0,0x6 0276 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0277 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0278 0000 0000 | | .LITERAL {0x00000000, 0x00008894} 027c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0280 0000 0000 | | .LITERAL {0x00000000, 0x00008814} 0284 0000 0000 | | .LITERAL {0x00000000, 0x00008821} 0288 0000 0000 | | .LITERAL {0x00000000, 0x00008898} 028c 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0290 0000 0000 | | .LITERAL {0x00000000, 0x00008899} 0294 0000 0000 | | .BLANK 0000[0x4] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 02a0 | | .CONST 0x02a0 ; Address of begin 0299 0313 | | .CONST 0x0313 ; Address of exception handler 029a 0002 | | .CONST 0x0002 ; Number of locals 029b INIT_0298: 029b e00b | | Load 0x0,0xb 029c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 029d 02c7 | | Declare_Variable Any 029e 00d8 | | Load_Top At_Offset_0 029f 1c00 | | Execute_Immediate Run_Utility,0x0 02a0 BODY_0298: 02a0 00db | | Load_Top At_Offset_3 02a1 01db | | Execute Vector,Length 02a2 0c11 | | Execute_Immediate Greater_Equal,0x11 02a3 681e |h | Jump_Zero 0x2c2 02a4 e003 | | Load 0x0,0x3 02a5 180e | | Execute Package,Field_Execute,Field_Number 0xe 02a6 4801 |H | Short_Literal 0x1 02a7 4802 |H | Short_Literal 0x2 02a8 e005 | | Load 0x0,0x5 02a9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02aa 035b | [ | Declare_Type Array,Constrained 02ab 0337 | 7 | Declare_Variable Array 02ac e5ff | | Load 0x2,-0x1 02ad e005 | | Load 0x0,0x5 02ae 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02af e005 | | Load 0x0,0x5 02b0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02b1 0119 | | Execute Any,Check_In_Formal_Type 02b2 4801 |H | Short_Literal 0x1 02b3 00da | | Load_Top At_Offset_2 02b4 01d6 | | Execute Vector,Field_Write 02b5 4810 |H | Short_Literal 0x10 02b6 e005 | | Load 0x0,0x5 02b7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02b8 e005 | | Load 0x0,0x5 02b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ba 0119 | | Execute Any,Check_In_Formal_Type 02bb 4802 |H | Short_Literal 0x2 02bc 00da | | Load_Top At_Offset_2 02bd 01d6 | | Execute Vector,Field_Write 02be 67d1 |g | Indirect_Literal Discrete,0x290,{0x00000000, 0x00008899} 02bf e006 | | Load 0x0,0x6 02c0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 02c1 4508 |E | Exit_Suprogram New_Top_Offset 0x8 02c2 00db | | Load_Top At_Offset_3 02c3 8216 | | Call 0x1,0x16 02c4 7019 |p | Jump_Nonzero 0x2de 02c5 e003 | | Load 0x0,0x3 02c6 180e | | Execute Package,Field_Execute,Field_Number 0xe 02c7 4807 |H | Short_Literal 0x7 02c8 0092 06d9 | | Action Push_String_Extended,0x6d9 ; "The " 02ca e5ff | | Load 0x2,-0x1 02cb 01cc | | Execute Vector,Catenate 02cc 0092 06da | | Action Push_String_Extended,0x6da ; " target is not authorized for this machine." 02ce 01cc | | Execute Vector,Catenate 02cf e00c | | Load 0x0,0xc 02d0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02d1 e003 | | Load 0x0,0x3 02d2 180e | | Execute Package,Field_Execute,Field_Number 0xe 02d3 4803 |H | Short_Literal 0x3 02d4 0092 06db | | Action Push_String_Extended,0x6db ; "Registration of " 02d6 e5ff | | Load 0x2,-0x1 02d7 01cc | | Execute Vector,Catenate 02d8 0092 06dc | | Action Push_String_Extended,0x6dc ; " has failed. " 02da 01cc | | Execute Vector,Catenate 02db e00c | | Load 0x0,0xc 02dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02dd 4508 |E | Exit_Suprogram New_Top_Offset 0x8 02de 00d8 | | Load_Top At_Offset_0 02df e5f9 | | Load 0x2,-0x7 02e0 e5fa | | Load 0x2,-0x6 02e1 e5fb | | Load 0x2,-0x5 02e2 e5fc | | Load 0x2,-0x4 02e3 e5fd | | Load 0x2,-0x3 02e4 e5fe | | Load 0x2,-0x2 02e5 e5ff | | Load 0x2,-0x1 02e6 e00d | | Load 0x0,0xd 02e7 180e | | Execute Package,Field_Execute,Field_Number 0xe 02e8 c402 | | Store 0x2,0x2 02e9 4801 |H | Short_Literal 0x1 02ea 00d9 | | Load_Top At_Offset_1 02eb e00b | | Load 0x0,0xb 02ec 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02ed 6806 |h | Jump_Zero 0x2f4 02ee e003 | | Load 0x0,0x3 02ef 180e | | Execute Package,Field_Execute,Field_Number 0xe 02f0 00d9 | | Load_Top At_Offset_1 02f1 e00c | | Load 0x0,0xc 02f2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02f3 4508 |E | Exit_Suprogram New_Top_Offset 0x8 02f4 0092 06dd | | Action Push_String_Extended,0x6dd ; "<PROFILE>" 02f6 4801 |H | Short_Literal 0x1 02f7 4801 |H | Short_Literal 0x1 02f8 00ea | | Load_Encached Null_String_Cache 02f9 00ea | | Load_Encached Null_String_Cache 02fa 00ea | | Load_Encached Null_String_Cache 02fb 4800 |H | Short_Literal 0x0 02fc 4800 |H | Short_Literal 0x0 02fd 4801 |H | Short_Literal 0x1 02fe 00ea | | Load_Encached Null_String_Cache 02ff 00ea | | Load_Encached Null_String_Cache 0300 e5ff | | Load 0x2,-0x1 0301 e00e | | Load 0x0,0xe 0302 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0303 00db | | Load_Top At_Offset_3 0304 e00f | | Load 0x0,0xf 0305 189e | | Execute Package,Field_Execute,Field_Number 0x9e 0306 e003 | | Load 0x0,0x3 0307 180e | | Execute Package,Field_Execute,Field_Number 0xe 0308 4803 |H | Short_Literal 0x3 0309 0092 06db | | Action Push_String_Extended,0x6db ; "Registration of " 030b e5ff | | Load 0x2,-0x1 030c 01cc | | Execute Vector,Catenate 030d 0092 06de | | Action Push_String_Extended,0x6de ; " has completed. " 030f 01cc | | Execute Vector,Catenate 0310 e00c | | Load 0x0,0xc 0311 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0312 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0313 TRAP_0298: 0313 0007 | | Action Break_Optional 0314 e003 | | Load 0x0,0x3 0315 180e | | Execute Package,Field_Execute,Field_Number 0xe 0316 4807 |H | Short_Literal 0x7 0317 0092 06df | | Action Push_String_Extended,0x6df ; "Exception " 0319 4800 |H | Short_Literal 0x0 031a 4801 |H | Short_Literal 0x1 031b e010 | | Load 0x0,0x10 031c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 031d 01cc | | Execute Vector,Catenate 031e 0092 06e0 | | Action Push_String_Extended,0x6e0 ; " caught in Register." 0320 01cc | | Execute Vector,Catenate 0321 e00c | | Load 0x0,0xc 0322 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0323 e003 | | Load 0x0,0x3 0324 180e | | Execute Package,Field_Execute,Field_Number 0xe 0325 4807 |H | Short_Literal 0x7 0326 4800 |H | Short_Literal 0x0 0327 4801 |H | Short_Literal 0x1 0328 e010 | | Load 0x0,0x10 0329 1815 | | Execute Package,Field_Execute,Field_Number 0x15 032a 0092 06e1 | | Action Push_String_Extended,0x6e1 ; " was raised in " 032c 01cc | | Execute Vector,Catenate 032d 4800 |H | Short_Literal 0x0 032e 4801 |H | Short_Literal 0x1 032f e010 | | Load 0x0,0x10 0330 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0331 01cc | | Execute Vector,Catenate 0332 0092 06e2 | | Action Push_String_Extended,0x6e2 ; ". " 0334 01cc | | Execute Vector,Catenate 0335 e00c | | Load 0x0,0xc 0336 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0337 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 0340 | @ | .CONST 0x0340 ; Address of begin 0339 0372 | r | .CONST 0x0372 ; Address of exception handler 033a 0002 | | .CONST 0x0002 ; Number of locals 033b INIT_0338: 033b e00b | | Load 0x0,0xb 033c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 033d 02c7 | | Declare_Variable Any 033e 00d8 | | Load_Top At_Offset_0 033f 1c00 | | Execute_Immediate Run_Utility,0x0 0340 BODY_0338: 0340 00db | | Load_Top At_Offset_3 0341 e00f | | Load 0x0,0xf 0342 18a0 | | Execute Package,Field_Execute,Field_Number 0xa0 0343 00db | | Load_Top At_Offset_3 0344 e00e | | Load 0x0,0xe 0345 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0346 00d8 | | Load_Top At_Offset_0 0347 e5fe | | Load 0x2,-0x2 0348 e5ff | | Load 0x2,-0x1 0349 e00d | | Load 0x0,0xd 034a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 034b c402 | | Store 0x2,0x2 034c 4801 |H | Short_Literal 0x1 034d 00d9 | | Load_Top At_Offset_1 034e e00b | | Load 0x0,0xb 034f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0350 6806 |h | Jump_Zero 0x357 0351 e003 | | Load 0x0,0x3 0352 180e | | Execute Package,Field_Execute,Field_Number 0xe 0353 00d9 | | Load_Top At_Offset_1 0354 e00c | | Load 0x0,0xc 0355 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0356 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0357 e003 | | Load 0x0,0x3 0358 180e | | Execute Package,Field_Execute,Field_Number 0xe 0359 4803 |H | Short_Literal 0x3 035a 0092 06e3 | | Action Push_String_Extended,0x6e3 ; "Unregistered " 035c e5ff | | Load 0x2,-0x1 035d 01cc | | Execute Vector,Catenate 035e 0092 06e4 | | Action Push_String_Extended,0x6e4 ; " RCF." 0360 01cc | | Execute Vector,Catenate 0361 e00c | | Load 0x0,0xc 0362 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0363 e5fe | | Load 0x2,-0x2 0364 680c |h | Jump_Zero 0x371 0365 e003 | | Load 0x0,0x3 0366 180e | | Execute Package,Field_Execute,Field_Number 0xe 0367 4803 |H | Short_Literal 0x3 0368 0092 06e5 | | Action Push_String_Extended,0x6e5 ; "Destroyed " 036a e5ff | | Load 0x2,-0x1 036b 01cc | | Execute Vector,Catenate 036c 0092 06e6 | | Action Push_String_Extended,0x6e6 ; "RCF ." 036e 01cc | | Execute Vector,Catenate 036f e00c | | Load 0x0,0xc 0370 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0371 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0372 TRAP_0338: 0372 0007 | | Action Break_Optional 0373 e003 | | Load 0x0,0x3 0374 180e | | Execute Package,Field_Execute,Field_Number 0xe 0375 4807 |H | Short_Literal 0x7 0376 0092 06df | | Action Push_String_Extended,0x6df ; "Exception " 0378 4800 |H | Short_Literal 0x0 0379 4801 |H | Short_Literal 0x1 037a e010 | | Load 0x0,0x10 037b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 037c 01cc | | Execute Vector,Catenate 037d 0092 06e7 | | Action Push_String_Extended,0x6e7 ; " caught in UnRegister." 037f 01cc | | Execute Vector,Catenate 0380 e00c | | Load 0x0,0xc 0381 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0382 e003 | | Load 0x0,0x3 0383 180e | | Execute Package,Field_Execute,Field_Number 0xe 0384 4807 |H | Short_Literal 0x7 0385 4800 |H | Short_Literal 0x0 0386 4801 |H | Short_Literal 0x1 0387 e010 | | Load 0x0,0x10 0388 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0389 0092 06e1 | | Action Push_String_Extended,0x6e1 ; " was raised in " 038b 01cc | | Execute Vector,Catenate 038c 4800 |H | Short_Literal 0x0 038d 4801 |H | Short_Literal 0x1 038e e010 | | Load 0x0,0x10 038f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0390 01cc | | Execute Vector,Catenate 0391 0092 06e2 | | Action Push_String_Extended,0x6e2 ; ". " 0393 01cc | | Execute Vector,Catenate 0394 e00c | | Load 0x0,0xc 0395 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0396 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0397 0000 | | .XXX[0x1] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 03b1 | | .CONST 0x03b1 ; Address of begin 0399 0402 | | .CONST 0x0402 ; Address of exception handler 039a 0009 | | .CONST 0x0009 ; Number of locals 039b INIT_0398: 039b e011 | | Load 0x0,0x11 039c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 039d 0322 | " | Declare_Variable Record 039e 00d8 | | Load_Top At_Offset_0 039f 1c00 | | Execute_Immediate Run_Utility,0x0 03a0 e00b | | Load 0x0,0xb 03a1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03a2 02c7 | | Declare_Variable Any 03a3 00d8 | | Load_Top At_Offset_0 03a4 1c00 | | Execute_Immediate Run_Utility,0x0 03a5 029f 061b | | Declare_Subprogram INIT_0618,For_Call 03a7 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call 03a9 029f 064b | K| Declare_Subprogram INIT_0648,For_Call 03ab 029f 0663 | c| Declare_Subprogram INIT_0660,For_Call 03ad 029f 067b | {| Declare_Subprogram INIT_0678,For_Call 03af 029f 0693 | | Declare_Subprogram INIT_0690,For_Call 03b1 BODY_0398: 03b1 e403 | | Load 0x2,0x3 03b2 0120 | | Execute Any,Is_Value 03b3 6803 |h | Jump_Zero 0x3b7 03b4 e00b | | Load 0x0,0xb 03b5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03b6 7801 |x | Jump 0x3b8 03b7 e403 | | Load 0x2,0x3 03b8 e402 | | Load 0x2,0x2 03b9 e5ff | | Load 0x2,-0x1 03ba e011 | | Load 0x0,0x11 03bb 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 03bc 00d1 | | Pop_Control Pop_Count_1 03bd c403 | | Store 0x2,0x3 03be 4802 |H | Short_Literal 0x2 03bf e403 | | Load 0x2,0x3 03c0 e00b | | Load 0x0,0xb 03c1 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03c2 6806 |h | Jump_Zero 0x3c9 03c3 e003 | | Load 0x0,0x3 03c4 180e | | Execute Package,Field_Execute,Field_Number 0xe 03c5 e403 | | Load 0x2,0x3 03c6 e00c | | Load 0x0,0xc 03c7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03c8 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03c9 e5ff | | Load 0x2,-0x1 03ca e00d | | Load 0x0,0xd 03cb 180f | | Execute Package,Field_Execute,Field_Number 0xf 03cc 700a |p | Jump_Nonzero 0x3d7 03cd e003 | | Load 0x0,0x3 03ce 180e | | Execute Package,Field_Execute,Field_Number 0xe 03cf 4806 |H | Short_Literal 0x6 03d0 e5ff | | Load 0x2,-0x1 03d1 0092 06e8 | | Action Push_String_Extended,0x6e8 ; " is not registered" 03d3 01cc | | Execute Vector,Catenate 03d4 e00c | | Load 0x0,0xc 03d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03d6 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03d7 0092 06e9 | | Action Push_String_Extended,0x6e9 ; "Information on RCF customization for " 03d9 e5ff | | Load 0x2,-0x1 03da 01cc | | Execute Vector,Catenate 03db e012 | | Load 0x0,0x12 03dc 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 03dd e5fe | | Load 0x2,-0x2 03de 6804 |h | Jump_Zero 0x3e3 03df e402 | | Load 0x2,0x2 03e0 e00d | | Load 0x0,0xd 03e1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03e2 8404 | | Call 0x2,0x4 03e3 e5fc | | Load 0x2,-0x4 03e4 6804 |h | Jump_Zero 0x3e9 03e5 e402 | | Load 0x2,0x2 03e6 e00d | | Load 0x0,0xd 03e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03e8 8405 | | Call 0x2,0x5 03e9 e5fa | | Load 0x2,-0x6 03ea 6804 |h | Jump_Zero 0x3ef 03eb e402 | | Load 0x2,0x2 03ec e00d | | Load 0x0,0xd 03ed 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03ee 8408 | | Call 0x2,0x8 03ef e5fb | | Load 0x2,-0x5 03f0 6804 |h | Jump_Zero 0x3f5 03f1 e402 | | Load 0x2,0x2 03f2 e00d | | Load 0x0,0xd 03f3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03f4 8406 | | Call 0x2,0x6 03f5 e5fd | | Load 0x2,-0x3 03f6 6804 |h | Jump_Zero 0x3fb 03f7 e402 | | Load 0x2,0x2 03f8 e00d | | Load 0x0,0xd 03f9 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03fa 8407 | | Call 0x2,0x7 03fb e5f9 | | Load 0x2,-0x7 03fc 6804 |h | Jump_Zero 0x401 03fd e402 | | Load 0x2,0x2 03fe e00d | | Load 0x0,0xd 03ff 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0400 8409 | | Call 0x2,0x9 0401 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0402 TRAP_0398: 0402 0007 | | Action Break_Optional 0403 e003 | | Load 0x0,0x3 0404 180e | | Execute Package,Field_Execute,Field_Number 0xe 0405 4807 |H | Short_Literal 0x7 0406 0092 06df | | Action Push_String_Extended,0x6df ; "Exception " 0408 4800 |H | Short_Literal 0x0 0409 4801 |H | Short_Literal 0x1 040a e010 | | Load 0x0,0x10 040b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 040c 01cc | | Execute Vector,Catenate 040d 0092 06ea | | Action Push_String_Extended,0x6ea ; " caught in Information." 040f 01cc | | Execute Vector,Catenate 0410 e00c | | Load 0x0,0xc 0411 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0412 e003 | | Load 0x0,0x3 0413 180e | | Execute Package,Field_Execute,Field_Number 0xe 0414 4807 |H | Short_Literal 0x7 0415 4800 |H | Short_Literal 0x0 0416 4801 |H | Short_Literal 0x1 0417 e010 | | Load 0x0,0x10 0418 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0419 0092 06e1 | | Action Push_String_Extended,0x6e1 ; " was raised in " 041b 01cc | | Execute Vector,Catenate 041c 4800 |H | Short_Literal 0x0 041d 4801 |H | Short_Literal 0x1 041e e010 | | Load 0x0,0x10 041f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0420 01cc | | Execute Vector,Catenate 0421 0092 06e2 | | Action Push_String_Extended,0x6e2 ; ". " 0423 01cc | | Execute Vector,Catenate 0424 e00c | | Load 0x0,0xc 0425 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0426 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0427 0000 | | .XXX[0x1] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 0432 | 2 | .CONST 0x0432 ; Address of begin 0429 0468 | h | .CONST 0x0468 ; Address of exception handler 042a 0003 | | .CONST 0x0003 ; Number of locals 042b INIT_0428: 042b e00d | | Load 0x0,0xd 042c 1b18 | | Execute Package,Field_Read,Field_Number 0x18 042d 02c7 | | Declare_Variable Any 042e 00d8 | | Load_Top At_Offset_0 042f 1c00 | | Execute_Immediate Run_Utility,0x0 0430 00e1 | | Load_Encached Boolean_Cache 0431 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0432 BODY_0428: 0432 00d9 | | Load_Top At_Offset_1 0433 0120 | | Execute Any,Is_Value 0434 6803 |h | Jump_Zero 0x438 0435 e00d | | Load 0x0,0xd 0436 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0437 7801 |x | Jump 0x439 0438 00d9 | | Load_Top At_Offset_1 0439 e00d | | Load 0x0,0xd 043a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 043b c402 | | Store 0x2,0x2 043c 00cf | | Action Mark_Auxiliary 043d 781b |x | Jump 0x459 043e 00da | | Load_Top At_Offset_2 043f e00d | | Load 0x0,0xd 0440 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0441 e00d | | Load 0x0,0xd 0442 180f | | Execute Package,Field_Execute,Field_Number 0xf 0443 6810 |h | Jump_Zero 0x454 0444 00d9 | | Load_Top At_Offset_1 0445 7004 |p | Jump_Nonzero 0x44a 0446 0092 06eb | | Action Push_String_Extended,0x6eb ; "Registered RCF Customizations: " 0448 e012 | | Load 0x0,0x12 0449 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 044a 4801 |H | Short_Literal 0x1 044b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 044c 0092 06ec | | Action Push_String_Extended,0x6ec ; " " 044e 00db | | Load_Top At_Offset_3 044f e00d | | Load 0x0,0xd 0450 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0451 01cc | | Execute Vector,Catenate 0452 e012 | | Load 0x0,0x12 0453 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0454 00da | | Load_Top At_Offset_2 0455 e00d | | Load 0x0,0xd 0456 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0457 c402 | | Store 0x2,0x2 0458 00c9 | | Action Pop_Auxiliary_Loop 0459 00da | | Load_Top At_Offset_2 045a e00d | | Load 0x0,0xd 045b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 045c 6fe1 |o | Jump_Zero 0x43e 045d 00ce | | Action Pop_Auxiliary 045e 00d8 | | Load_Top At_Offset_0 045f 7007 |p | Jump_Nonzero 0x467 0460 e003 | | Load 0x0,0x3 0461 180e | | Execute Package,Field_Execute,Field_Number 0xe 0462 4806 |H | Short_Literal 0x6 0463 0092 06ed | | Action Push_String_Extended,0x6ed ; "No registered RCF Customizations" 0465 e00c | | Load 0x0,0xc 0466 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0467 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0468 TRAP_0428: 0468 0007 | | Action Break_Optional 0469 e003 | | Load 0x0,0x3 046a 180e | | Execute Package,Field_Execute,Field_Number 0xe 046b 4807 |H | Short_Literal 0x7 046c 0092 06df | | Action Push_String_Extended,0x6df ; "Exception " 046e 4800 |H | Short_Literal 0x0 046f 4801 |H | Short_Literal 0x1 0470 e010 | | Load 0x0,0x10 0471 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0472 01cc | | Execute Vector,Catenate 0473 0092 06ee | | Action Push_String_Extended,0x6ee ; " caught in Display_All_Registered_Targets." 0475 01cc | | Execute Vector,Catenate 0476 e00c | | Load 0x0,0xc 0477 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0478 e003 | | Load 0x0,0x3 0479 180e | | Execute Package,Field_Execute,Field_Number 0xe 047a 4807 |H | Short_Literal 0x7 047b 4800 |H | Short_Literal 0x0 047c 4801 |H | Short_Literal 0x1 047d e010 | | Load 0x0,0x10 047e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 047f 0092 06e1 | | Action Push_String_Extended,0x6e1 ; " was raised in " 0481 01cc | | Execute Vector,Catenate 0482 4800 |H | Short_Literal 0x0 0483 4801 |H | Short_Literal 0x1 0484 e010 | | Load 0x0,0x10 0485 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0486 01cc | | Execute Vector,Catenate 0487 0092 06e2 | | Action Push_String_Extended,0x6e2 ; ". " 0489 01cc | | Execute Vector,Catenate 048a e00c | | Load 0x0,0xc 048b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 048c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 048d 0000 0000 | | .XXX[0x3] 048f 0000 | | 0490 ; -------------------------------------------------------------------------------------- 0490 ; SUBPROGRAM 0490 ; -------------------------------------------------------------------------------------- 0490 0493 | | .CONST 0x0493 ; Address of begin 0491 0004 | | .CONST 0x0004 ; Address of exception handler 0492 0001 | | .CONST 0x0001 ; Number of locals 0493 BODY_0490: 0493 INIT_0490: 0493 4605 |F | Jump_Case 0x6 0494 7804 |x | Jump 0x499 ; case 0x0 0495 7814 |x | Jump 0x4aa ; case 0x1 0496 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0497 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0498 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0499 00da | | Load_Top At_Offset_2 ; case 0x5 049a 01dc | | Execute Vector,Last 049b 00db | | Load_Top At_Offset_3 049c 01dd | | Execute Vector,First 049d 0263 | c | Execute Discrete,Above_Bound 049e 700a |p | Jump_Nonzero 0x4a9 049f 00d8 | | Load_Top At_Offset_0 04a0 e5ff | | Load 0x2,-0x1 04a1 01d5 | | Execute Vector,Field_Reference 04a2 0125 | % | Execute Any,Set_Constraint 04a3 00d8 | | Load_Top At_Offset_0 04a4 e5ff | | Load 0x2,-0x1 04a5 01d5 | | Execute Vector,Field_Reference 04a6 1c00 | | Execute_Immediate Run_Utility,0x0 04a7 0a01 | | Execute_Immediate Plus,0x1 04a8 7ff4 | | Jump 0x49d 04a9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 04aa 00da | | Load_Top At_Offset_2 04ab 01dc | | Execute Vector,Last 04ac 00db | | Load_Top At_Offset_3 04ad 01dd | | Execute Vector,First 04ae 0263 | c | Execute Discrete,Above_Bound 04af 700a |p | Jump_Nonzero 0x4ba 04b0 00d8 | | Load_Top At_Offset_0 04b1 e5ff | | Load 0x2,-0x1 04b2 01d5 | | Execute Vector,Field_Reference 04b3 0125 | % | Execute Any,Set_Constraint 04b4 00d8 | | Load_Top At_Offset_0 04b5 e5ff | | Load 0x2,-0x1 04b6 01d7 | | Execute Vector,Field_Read 04b7 1c00 | | Execute_Immediate Run_Utility,0x0 04b8 0a01 | | Execute_Immediate Plus,0x1 04b9 7ff4 | | Jump 0x4ae 04ba 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 04bb 0000 0000 | | .BLANK 0000[0x5] 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; SUBPROGRAM 04c0 ; -------------------------------------------------------------------------------------- 04c0 04c3 | | .CONST 0x04c3 ; Address of begin 04c1 0004 | | .CONST 0x0004 ; Address of exception handler 04c2 0001 | | .CONST 0x0001 ; Number of locals 04c3 BODY_04c0: 04c3 INIT_04c0: 04c3 00cf | | Action Mark_Auxiliary 04c4 4808 |H | Short_Literal 0x8 04c5 4801 |H | Short_Literal 0x1 04c6 0007 | | Action Break_Optional 04c7 4801 |H | Short_Literal 0x1 04c8 4820 |H | Short_Literal 0x20 04c9 00da | | Load_Top At_Offset_2 04ca e215 | | Load 0x1,0x15 04cb 01d5 | | Execute Vector,Field_Reference 04cc e009 | | Load 0x0,0x9 04cd 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04ce 4820 |H | Short_Literal 0x20 04cf e5ff | | Load 0x2,-0x1 04d0 e009 | | Load 0x0,0x9 04d1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04d2 e009 | | Load 0x0,0x9 04d3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04d4 6804 |h | Jump_Zero 0x4d9 04d5 e5ff | | Load 0x2,-0x1 04d6 e013 | | Load 0x0,0x13 04d7 180e | | Execute Package,Field_Execute,Field_Number 0xe 04d8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04d9 00c8 | | Action Pop_Auxiliary_Range 04da 3fec |? | Loop_Increasing 0x4c7 04db 00ce | | Action Pop_Auxiliary 04dc 4801 |H | Short_Literal 0x1 04dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04de 0000 0000 | | .XXX[0x2] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04f7 | | .CONST 0x04f7 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0007 | | .CONST 0x0007 ; Number of locals 04e3 INIT_04e0: 04e3 e002 | | Load 0x0,0x2 04e4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04e5 1b18 | | Execute Package,Field_Read,Field_Number 0x18 04e6 02c7 | | Declare_Variable Any 04e7 00d8 | | Load_Top At_Offset_0 04e8 1c00 | | Execute_Immediate Run_Utility,0x0 04e9 e002 | | Load 0x0,0x2 04ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04eb e002 | | Load 0x0,0x2 04ec 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04ee e002 | | Load 0x0,0x2 04ef 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04f0 02c7 | | Declare_Variable Any 04f1 00d8 | | Load_Top At_Offset_0 04f2 1c00 | | Execute_Immediate Run_Utility,0x0 04f3 00e3 | | Load_Encached Natural_Cache 04f4 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 04f5 029f 06ab | | Declare_Subprogram INIT_06a8,For_Call 04f7 BODY_04e0: 04f7 e002 | | Load 0x0,0x2 04f8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04fa e402 | | Load 0x2,0x2 04fb 6040 |`@ | Indirect_Literal Discrete,0x53c,{0x00000000, 0x00004000} 04fc e007 | | Load 0x0,0x7 04fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04fe e008 | | Load 0x0,0x8 04ff 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0500 e014 | | Load 0x0,0x14 0501 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0502 4801 |H | Short_Literal 0x1 0503 4800 |H | Short_Literal 0x0 0504 e008 | | Load 0x0,0x8 0505 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0506 e002 | | Load 0x0,0x2 0507 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0508 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0509 0092 06ef | | Action Push_String_Extended,0x6ef ; "!machine.rcf.@_defs" 050b e002 | | Load 0x0,0x2 050c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 050d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 050e c402 | | Store 0x2,0x2 050f c404 | | Store 0x2,0x4 0510 00cf | | Action Mark_Auxiliary 0511 781a |x | Jump 0x52c 0512 e002 | | Load 0x0,0x2 0513 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0514 e405 | | Load 0x2,0x5 0515 0120 | | Execute Any,Is_Value 0516 6803 |h | Jump_Zero 0x51a 0517 e002 | | Load 0x0,0x2 0518 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0519 7801 |x | Jump 0x51b 051a e405 | | Load 0x2,0x5 051b e402 | | Load 0x2,0x2 051c e002 | | Load 0x0,0x2 051d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 051e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 051f c405 | | Store 0x2,0x5 0520 c403 | | Store 0x2,0x3 0521 00db | | Load_Top At_Offset_3 0522 e002 | | Load 0x0,0x2 0523 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0524 7001 |p | Jump_Nonzero 0x526 0525 8407 | | Call 0x2,0x7 0526 e402 | | Load 0x2,0x2 0527 e002 | | Load 0x0,0x2 0528 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0529 181d | | Execute Package,Field_Execute,Field_Number 0x1d 052a c402 | | Store 0x2,0x2 052b 00c9 | | Action Pop_Auxiliary_Loop 052c e402 | | Load 0x2,0x2 052d e002 | | Load 0x0,0x2 052e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 052f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0530 6fe1 |o | Jump_Zero 0x512 0531 00ce | | Action Pop_Auxiliary 0532 4801 |H | Short_Literal 0x1 0533 00da | | Load_Top At_Offset_2 0534 0aff | | Execute_Immediate Plus,-0x1 0535 e213 | | Load 0x1,0x13 0536 01cf | | Execute Vector,Slice_Read 0537 0335 | 5 | Declare_Variable Array,Duplicate 0538 00cd | | Action Spare6_Action 0539 00ca | | Action Exit_Nullary_Function 053a 0000 0000 | | .XXX[0x2] 053c 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0540 ; -------------------------------------------------------------------------------------- 0540 ; SUBPROGRAM 0540 ; -------------------------------------------------------------------------------------- 0540 0562 | b | .CONST 0x0562 ; Address of begin 0541 0004 | | .CONST 0x0004 ; Address of exception handler 0542 0007 | | .CONST 0x0007 ; Number of locals 0543 INIT_0540: 0543 e002 | | Load 0x0,0x2 0544 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0545 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0546 02c7 | | Declare_Variable Any 0547 00d8 | | Load_Top At_Offset_0 0548 1c00 | | Execute_Immediate Run_Utility,0x0 0549 e002 | | Load 0x0,0x2 054a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 054b 02c7 | | Declare_Variable Any 054c 00d8 | | Load_Top At_Offset_0 054d 1c00 | | Execute_Immediate Run_Utility,0x0 054e e002 | | Load 0x0,0x2 054f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0550 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0551 02c7 | | Declare_Variable Any 0552 00d8 | | Load_Top At_Offset_0 0553 1c00 | | Execute_Immediate Run_Utility,0x0 0554 00f1 | | Load_Encached Diana_Temp_Seq 0555 02c7 | | Declare_Variable Any 0556 00d8 | | Load_Top At_Offset_0 0557 1c00 | | Execute_Immediate Run_Utility,0x0 0558 e002 | | Load 0x0,0x2 0559 1b14 | | Execute Package,Field_Read,Field_Number 0x14 055a 02ff | | Declare_Variable Variant_Record 055b 00d8 | | Load_Top At_Offset_0 055c 1c00 | | Execute_Immediate Run_Utility,0x0 055d e004 | | Load 0x0,0x4 055e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 055f 02c7 | | Declare_Variable Any 0560 00d8 | | Load_Top At_Offset_0 0561 1c00 | | Execute_Immediate Run_Utility,0x0 0562 BODY_0540: 0562 e002 | | Load 0x0,0x2 0563 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0564 e602 | | Load 0x3,0x2 0565 0120 | | Execute Any,Is_Value 0566 6804 |h | Jump_Zero 0x56b 0567 e002 | | Load 0x0,0x2 0568 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0569 1b0d | | Execute Package,Field_Read,Field_Number 0xd 056a 7801 |x | Jump 0x56c 056b e602 | | Load 0x3,0x2 056c 67cf |g | Indirect_Literal Discrete,0x53c,{0x00000000, 0x00004000} 056d e007 | | Load 0x0,0x7 056e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 056f e002 | | Load 0x0,0x2 0570 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0571 4802 |H | Short_Literal 0x2 0572 609d |` | Indirect_Literal Discrete,0x610,{0x00000000, 0x7fffffff} 0573 609c |` | Indirect_Literal Discrete,0x610,{0x00000000, 0x7fffffff} 0574 e002 | | Load 0x0,0x2 0575 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0576 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0577 e00a | | Load 0x0,0xa 0578 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0579 e405 | | Load 0x2,0x5 057a 4801 |H | Short_Literal 0x1 057b e7ff | | Load 0x3,-0x1 057c e002 | | Load 0x0,0x2 057d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 057e 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 057f c602 | | Store 0x3,0x2 0580 c406 | | Store 0x2,0x6 0581 e406 | | Load 0x2,0x6 0582 682a |h* | Jump_Zero 0x5ad 0583 e003 | | Load 0x0,0x3 0584 180e | | Execute Package,Field_Execute,Field_Number 0xe 0585 4801 |H | Short_Literal 0x1 0586 4802 |H | Short_Literal 0x2 0587 e005 | | Load 0x0,0x5 0588 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0589 035b | [ | Declare_Type Array,Constrained 058a 0337 | 7 | Declare_Variable Array 058b 0092 06d0 | | Action Push_String_Extended,0x6d0 ; "!Targets." 058d e5ff | | Load 0x2,-0x1 058e 01cc | | Execute Vector,Catenate 058f 0092 06f0 | | Action Push_String_Extended,0x6f0 ; "." 0591 01cc | | Execute Vector,Catenate 0592 e7ff | | Load 0x3,-0x1 0593 01cc | | Execute Vector,Catenate 0594 e005 | | Load 0x0,0x5 0595 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0596 e005 | | Load 0x0,0x5 0597 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0598 0119 | | Execute Any,Check_In_Formal_Type 0599 4801 |H | Short_Literal 0x1 059a 00da | | Load_Top At_Offset_2 059b 01d6 | | Execute Vector,Field_Write 059c e406 | | Load 0x2,0x6 059d e002 | | Load 0x0,0x2 059e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 059f 011c | | Execute Any,Convert_Unchecked 05a0 1c01 | | Execute_Immediate Run_Utility,0x1 05a1 e005 | | Load 0x0,0x5 05a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05a3 e005 | | Load 0x0,0x5 05a4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05a5 0119 | | Execute Any,Check_In_Formal_Type 05a6 4802 |H | Short_Literal 0x2 05a7 00da | | Load_Top At_Offset_2 05a8 01d6 | | Execute Vector,Field_Write 05a9 6062 |`b | Indirect_Literal Discrete,0x60c,{0x00000000, 0x00008895} 05aa e006 | | Load 0x0,0x6 05ab 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 05ac 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05ad e602 | | Load 0x3,0x2 05ae e002 | | Load 0x0,0x2 05af 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 05b0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05b1 c603 | | Store 0x3,0x3 05b2 e002 | | Load 0x0,0x2 05b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05b4 00db | | Load_Top At_Offset_3 05b5 0120 | | Execute Any,Is_Value 05b6 6802 |h | Jump_Zero 0x5b9 05b7 00f1 | | Load_Encached Diana_Temp_Seq 05b8 7801 |x | Jump 0x5ba 05b9 00db | | Load_Top At_Offset_3 05ba e604 | | Load 0x3,0x4 05bb 0120 | | Execute Any,Is_Value 05bc 6804 |h | Jump_Zero 0x5c1 05bd e002 | | Load 0x0,0x2 05be 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 05bf 1b17 | | Execute Package,Field_Read,Field_Number 0x17 05c0 7801 |x | Jump 0x5c2 05c1 e604 | | Load 0x3,0x4 05c2 00db | | Load_Top At_Offset_3 05c3 0120 | | Execute Any,Is_Value 05c4 6803 |h | Jump_Zero 0x5c8 05c5 e004 | | Load 0x0,0x4 05c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05c7 7801 |x | Jump 0x5c9 05c8 00db | | Load_Top At_Offset_3 05c9 e606 | | Load 0x3,0x6 05ca 6771 |gq | Indirect_Literal Discrete,0x53c,{0x00000000, 0x00004000} 05cb e007 | | Load 0x0,0x7 05cc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05cd 4800 |H | Short_Literal 0x0 05ce e002 | | Load 0x0,0x2 05cf 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 05d0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05d1 e002 | | Load 0x0,0x2 05d2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 05d3 4ffc |O | Short_Literal -0x4 05d4 4ffd |O | Short_Literal -0x3 05d5 e603 | | Load 0x3,0x3 05d6 e002 | | Load 0x0,0x2 05d7 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 05d8 180d | | Execute Package,Field_Execute,Field_Number 0xd 05d9 00d1 | | Pop_Control Pop_Count_1 05da c607 | | Store 0x3,0x7 05db c604 | | Store 0x3,0x4 05dc c605 | | Store 0x3,0x5 05dd c406 | | Store 0x2,0x6 05de e406 | | Load 0x2,0x6 05df 682a |h* | Jump_Zero 0x60a 05e0 e003 | | Load 0x0,0x3 05e1 180e | | Execute Package,Field_Execute,Field_Number 0xe 05e2 4801 |H | Short_Literal 0x1 05e3 4802 |H | Short_Literal 0x2 05e4 e005 | | Load 0x0,0x5 05e5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05e6 035b | [ | Declare_Type Array,Constrained 05e7 0337 | 7 | Declare_Variable Array 05e8 0092 06d0 | | Action Push_String_Extended,0x6d0 ; "!Targets." 05ea e5ff | | Load 0x2,-0x1 05eb 01cc | | Execute Vector,Catenate 05ec 0092 06f0 | | Action Push_String_Extended,0x6f0 ; "." 05ee 01cc | | Execute Vector,Catenate 05ef e7ff | | Load 0x3,-0x1 05f0 01cc | | Execute Vector,Catenate 05f1 e005 | | Load 0x0,0x5 05f2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05f3 e005 | | Load 0x0,0x5 05f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05f5 0119 | | Execute Any,Check_In_Formal_Type 05f6 4801 |H | Short_Literal 0x1 05f7 00da | | Load_Top At_Offset_2 05f8 01d6 | | Execute Vector,Field_Write 05f9 e406 | | Load 0x2,0x6 05fa e002 | | Load 0x0,0x2 05fb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05fc 011c | | Execute Any,Convert_Unchecked 05fd 1c01 | | Execute_Immediate Run_Utility,0x1 05fe e005 | | Load 0x0,0x5 05ff 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0600 e005 | | Load 0x0,0x5 0601 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0602 0119 | | Execute Any,Check_In_Formal_Type 0603 4802 |H | Short_Literal 0x2 0604 00da | | Load_Top At_Offset_2 0605 01d6 | | Execute Vector,Field_Write 0606 6005 |` | Indirect_Literal Discrete,0x60c,{0x00000000, 0x00008895} 0607 e006 | | Load 0x0,0x6 0608 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0609 4502 |E | Exit_Suprogram New_Top_Offset 0x2 060a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 060b 0000 | | .XXX[0x1] 060c 0000 0000 | | .LITERAL {0x00000000, 0x00008895} 0610 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0614 0000 0000 | | .BLANK 0000[0x4] 0618 ; -------------------------------------------------------------------------------------- 0618 ; SUBPROGRAM 0618 ; -------------------------------------------------------------------------------------- 0618 061b | | .CONST 0x061b ; Address of begin 0619 0004 | | .CONST 0x0004 ; Address of exception handler 061a 0001 | | .CONST 0x0001 ; Number of locals 061b BODY_0618: 061b INIT_0618: 061b 00da | | Load_Top At_Offset_2 061c e015 | | Load 0x0,0x15 061d 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 061e 6805 |h | Jump_Zero 0x624 061f 0092 06f1 | | Action Push_String_Extended,0x6f1 ; "No Operational Customizations Defined." 0621 e012 | | Load 0x0,0x12 0622 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0623 7803 |x | Jump 0x627 0624 00da | | Load_Top At_Offset_2 0625 e015 | | Load 0x0,0x15 0626 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 0627 0092 06ec | | Action Push_String_Extended,0x6ec ; " " 0629 e012 | | Load 0x0,0x12 062a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 062b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 062c 0000 0000 | | .BLANK 0000[0x4] 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0633 | 3 | .CONST 0x0633 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0001 | | .CONST 0x0001 ; Number of locals 0633 BODY_0630: 0633 INIT_0630: 0633 00da | | Load_Top At_Offset_2 0634 e016 | | Load 0x0,0x16 0635 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0636 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0637 6805 |h | Jump_Zero 0x63d 0638 0092 06f2 | | Action Push_String_Extended,0x6f2 ; "No Pragma Customizations Defined." 063a e012 | | Load 0x0,0x12 063b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 063c 7804 |x | Jump 0x641 063d 00da | | Load_Top At_Offset_2 063e e016 | | Load 0x0,0x16 063f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0640 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0641 0092 06ec | | Action Push_String_Extended,0x6ec ; " " 0643 e012 | | Load 0x0,0x12 0644 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0645 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0646 0000 0000 | | .XXX[0x2] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b 00da | | Load_Top At_Offset_2 064c e016 | | Load 0x0,0x16 064d 1b15 | | Execute Package,Field_Read,Field_Number 0x15 064e 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 064f 6805 |h | Jump_Zero 0x655 0650 0092 06f3 | | Action Push_String_Extended,0x6f3 ; "No Attribute Customizations Defined." 0652 e012 | | Load 0x0,0x12 0653 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0654 7804 |x | Jump 0x659 0655 00da | | Load_Top At_Offset_2 0656 e016 | | Load 0x0,0x16 0657 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0658 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0659 0092 06ec | | Action Push_String_Extended,0x6ec ; " " 065b e012 | | Load 0x0,0x12 065c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 065d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 065e 0000 0000 | | .XXX[0x2] 0660 ; -------------------------------------------------------------------------------------- 0660 ; SUBPROGRAM 0660 ; -------------------------------------------------------------------------------------- 0660 0663 | c | .CONST 0x0663 ; Address of begin 0661 0004 | | .CONST 0x0004 ; Address of exception handler 0662 0001 | | .CONST 0x0001 ; Number of locals 0663 BODY_0660: 0663 INIT_0660: 0663 00da | | Load_Top At_Offset_2 0664 e016 | | Load 0x0,0x16 0665 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0666 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0667 6805 |h | Jump_Zero 0x66d 0668 0092 06f4 | | Action Push_String_Extended,0x6f4 ; "No Predefined Environment Customizations Defined." 066a e012 | | Load 0x0,0x12 066b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 066c 7804 |x | Jump 0x671 066d 00da | | Load_Top At_Offset_2 066e e016 | | Load 0x0,0x16 066f 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0670 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0671 0092 06ec | | Action Push_String_Extended,0x6ec ; " " 0673 e012 | | Load 0x0,0x12 0674 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0675 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0676 0000 0000 | | .XXX[0x2] 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 067b | { | .CONST 0x067b ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0001 | | .CONST 0x0001 ; Number of locals 067b BODY_0678: 067b INIT_0678: 067b 00da | | Load_Top At_Offset_2 067c e016 | | Load 0x0,0x16 067d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 067e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 067f 6805 |h | Jump_Zero 0x685 0680 0092 06f5 | | Action Push_String_Extended,0x6f5 ; "No Rep Spec Customizations Defined." 0682 e012 | | Load 0x0,0x12 0683 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0684 7804 |x | Jump 0x689 0685 00da | | Load_Top At_Offset_2 0686 e016 | | Load 0x0,0x16 0687 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0688 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0689 0092 06ec | | Action Push_String_Extended,0x6ec ; " " 068b e012 | | Load 0x0,0x12 068c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 068d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 068e 0000 0000 | | .XXX[0x2] 0690 ; -------------------------------------------------------------------------------------- 0690 ; SUBPROGRAM 0690 ; -------------------------------------------------------------------------------------- 0690 0693 | | .CONST 0x0693 ; Address of begin 0691 0004 | | .CONST 0x0004 ; Address of exception handler 0692 0001 | | .CONST 0x0001 ; Number of locals 0693 BODY_0690: 0693 INIT_0690: 0693 00da | | Load_Top At_Offset_2 0694 e017 | | Load 0x0,0x17 0695 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0696 012f | / | Execute Any,Equal 0697 6805 |h | Jump_Zero 0x69d 0698 0092 06f6 | | Action Push_String_Extended,0x6f6 ; "No telnet Customizations Defined." 069a e012 | | Load 0x0,0x12 069b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 069c 7803 |x | Jump 0x6a0 069d 00da | | Load_Top At_Offset_2 069e e017 | | Load 0x0,0x17 069f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 06a0 0092 06ec | | Action Push_String_Extended,0x6ec ; " " 06a2 e012 | | Load 0x0,0x12 06a3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06a4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06a5 0000 0000 | | .XXX[0x3] 06a7 0000 | | 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06af | | .CONST 0x06af ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0002 | | .CONST 0x0002 ; Number of locals 06ab INIT_06a8: 06ab e405 | | Load 0x2,0x5 06ac e002 | | Load 0x0,0x2 06ad 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06ae 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 06af BODY_06a8: 06af e406 | | Load 0x2,0x6 06b0 e213 | | Load 0x1,0x13 06b1 01d5 | | Execute Vector,Field_Reference 06b2 00d8 | | Load_Top At_Offset_0 06b3 00da | | Load_Top At_Offset_2 06b4 01dd | | Execute Vector,First 06b5 00db | | Load_Top At_Offset_3 06b6 01dc | | Execute Vector,Last 06b7 0afb | | Execute_Immediate Plus,-0x5 06b8 00d8 | | Load_Top At_Offset_0 06b9 00e2 | | Load_Encached Integer_Cache 06ba 0260 | ` | Execute Discrete,In_Type 06bb 7001 |p | Jump_Nonzero 0x6bd 06bc 0801 | | Execute_Immediate Raise,0x1 06bd e602 | | Load 0x3,0x2 06be 01cf | | Execute Vector,Slice_Read 06bf e001 | | Load 0x0,0x1 06c0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06c1 00d2 | | Pop_Control Pop_Count_2 06c2 e406 | | Load 0x2,0x6 06c3 0a01 | | Execute_Immediate Plus,0x1 06c4 c406 | | Store 0x2,0x6 06c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06c6 ; -------------------------------------------------------------------------------------- 06c6 ; STRING TABLE 06c6 ; -------------------------------------------------------------------------------------- 06c6 0064 | d | .STRTAB 0x0064->0x06f8 ; "Rs6000_Aix_Ibm " 06c7 0072 | r | .STRTAB 0x0072->0x0700 ; "Vax_Vms_Dec_Xt " 06c8 0080 | | .STRTAB 0x0080->0x0708 ; "I386_Lynx_Als_Xt" 06c9 008e | | .STRTAB 0x008e->0x0710 ; "I486_Iux_Als_Xt " 06ca 009c | | .STRTAB 0x009c->0x0718 ; "I960_Vms_Tar_Xt " 06cb 00aa | | .STRTAB 0x00aa->0x0720 ; "IC30_Vms_Tar_Xt " 06cc 00b8 | | .STRTAB 0x00b8->0x0728 ; "Sparc_Sun_Xt " 06cd 00c6 | | .STRTAB 0x00c6->0x0730 ; "Ix86_Unix_Als_Xt" 06ce 00d4 | | .STRTAB 0x00d4->0x0738 ; "Build_Predefined_World" 06cf 00e8 | | .STRTAB 0x00e8->0x0743 ; "!targets." 06d0 00ef | | .STRTAB 0x00ef->0x0747 ; "!Targets." 06d1 00f6 | | .STRTAB 0x00f6->0x074c ; "Create_Predefined_Library completed" 06d2 0117 | | .STRTAB 0x0117->0x075d ; "!targets" 06d3 011d | | .STRTAB 0x011d->0x0761 ; "!Targets" 06d4 0123 | # | .STRTAB 0x0123->0x0765 ; "Create_Predefined_Library failed" 06d5 0141 | A | .STRTAB 0x0141->0x0775 ; "Io" 06d6 0141 | A | .STRTAB 0x0141->0x0776 ; "Lrm" 06d7 0142 | B | .STRTAB 0x0142->0x0778 ; "Reusable_Components" 06d8 0153 | S | .STRTAB 0x0153->0x0781 ; "Target_Interface" 06d9 0161 | a | .STRTAB 0x0161->0x0789 ; "The " 06da 0163 | c | .STRTAB 0x0163->0x078b ; " target is not authorized for this machine." 06db 018c | | .STRTAB 0x018c->0x07a1 ; "Registration of " 06dc 019b | | .STRTAB 0x019b->0x07a9 ; " has failed. " 06dd 01a7 | | .STRTAB 0x01a7->0x07b0 ; "<PROFILE>" 06de 01ae | | .STRTAB 0x01ae->0x07b5 ; " has completed. " 06df 01bd | | .STRTAB 0x01bd->0x07bd ; "Exception " 06e0 01c5 | | .STRTAB 0x01c5->0x07c2 ; " caught in Register." 06e1 01d7 | | .STRTAB 0x01d7->0x07cc ; " was raised in " 06e2 01e4 | | .STRTAB 0x01e4->0x07d4 ; ". " 06e3 01e5 | | .STRTAB 0x01e5->0x07d5 ; "Unregistered " 06e4 01f0 | | .STRTAB 0x01f0->0x07dc ; " RCF." 06e5 01f3 | | .STRTAB 0x01f3->0x07de ; "Destroyed " 06e6 01fb | | .STRTAB 0x01fb->0x07e3 ; "RCF ." 06e7 01fe | | .STRTAB 0x01fe->0x07e6 ; " caught in UnRegister." 06e8 0212 | | .STRTAB 0x0212->0x07f1 ; " is not registered" 06e9 0222 | " | .STRTAB 0x0222->0x07fa ; "Information on RCF customization for " 06ea 0245 | E | .STRTAB 0x0245->0x080c ; " caught in Information." 06eb 025a | Z | .STRTAB 0x025a->0x0818 ; "Registered RCF Customizations: " 06ec 0278 | x | .STRTAB 0x0278->0x0828 ; " " 06ed 0279 | y | .STRTAB 0x0279->0x0829 ; "No registered RCF Customizations" 06ee 0297 | | .STRTAB 0x0297->0x0839 ; " caught in Display_All_Registered_Targets." 06ef 02bf | | .STRTAB 0x02bf->0x084e ; "!machine.rcf.@_defs" 06f0 02d0 | | .STRTAB 0x02d0->0x0858 ; "." 06f1 02cf | | .STRTAB 0x02cf->0x0858 ; "No Operational Customizations Defined." 06f2 02f3 | | .STRTAB 0x02f3->0x086b ; "No Pragma Customizations Defined." 06f3 0312 | | .STRTAB 0x0312->0x087c ; "No Attribute Customizations Defined." 06f4 0334 | 4 | .STRTAB 0x0334->0x088e ; "No Predefined Environment Customizations Defined." 06f5 0363 | c | .STRTAB 0x0363->0x08a6 ; "No Rep Spec Customizations Defined." 06f6 0384 | | .STRTAB 0x0384->0x08b8 ; "No telnet Customizations Defined." 06f7 03a3 | | .STREND 0x03a3->0x08c8 06f8 5273 3630 |Rs60| .STRTAB_STRINGS 08c9 0000 0000 | | .BLANK 0000[0x7] 08d0 ; -------------------------------------------------------------------------------------- 08d0 ; Debug Table 08d0 ; -------------------------------------------------------------------------------------- 08d0 0004 000d | | .DEBUG4 0x0004,0x000d,0x6df7,0x0000,0x0001,0x0000 08d6 0000 0000 | | .BLANK 0000[0x12a]