|
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_ccb0b3
└─⟦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 08e0 | | .CONST 0x08e0 ; 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 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 0011 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated 0013 029a 0443 | C| Declare_Subprogram INIT_0440,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 04ab | | Declare_Subprogram INIT_04a8,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 06de | | Action Push_String_Extended,0x6de ; "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 06df | | Action Push_String_Extended,0x6df ; "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 06e0 | | Action Push_String_Extended,0x6e0 ; "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 06e1 | | Action Push_String_Extended,0x6e1 ; "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 06e2 | | Action Push_String_Extended,0x6e2 ; "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 06e3 | | Action Push_String_Extended,0x6e3 ; "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 06e4 | | Action Push_String_Extended,0x6e4 ; "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 06e5 | | Action Push_String_Extended,0x6e5 ; "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 04db | | Declare_Subprogram INIT_04d8,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 04fb | | Declare_Subprogram INIT_04f8,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 06e6 | | Action Push_String_Extended,0x6e6 ; "Create_Predefined_Library" 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 055b | [| Declare_Subprogram INIT_0558,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 06e7 | | Action Push_String_Extended,0x6e7 ; "!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 06e8 | | Action Push_String_Extended,0x6e8 ; "!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 06e9 | | Action Push_String_Extended,0x6e9 ; "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 06ea | | Action Push_String_Extended,0x6ea ; "!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 06eb | | Action Push_String_Extended,0x6eb ; "!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 06ec | | Action Push_String_Extended,0x6ec ; "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 06e8 | | Action Push_String_Extended,0x6e8 ; "!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 06ec | | Action Push_String_Extended,0x6ec ; "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 06e8 | | Action Push_String_Extended,0x6e8 ; "!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 06ec | | Action Push_String_Extended,0x6ec ; "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 06ed | | Action Push_String_Extended,0x6ed ; "Io" 0258 840e | | Call 0x2,0xe 0259 0092 06ee | | Action Push_String_Extended,0x6ee ; "Lrm" 025b 840e | | Call 0x2,0xe 025c 0092 06ef | | Action Push_String_Extended,0x6ef ; "Reusable_Components" 025e 840e | | Call 0x2,0xe 025f 0092 06f0 | | Action Push_String_Extended,0x6f0 ; "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 06e9 | | Action Push_String_Extended,0x6e9 ; "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 02a1 | | .CONST 0x02a1 ; Address of begin 0299 0325 | % | .CONST 0x0325 ; Address of exception handler 029a 0003 | | .CONST 0x0003 ; 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 00e1 | | Load_Encached Boolean_Cache 02a1 BODY_0298: 02a1 e5ff | | Load 0x2,-0x1 02a2 01db | | Execute Vector,Length 02a3 0c11 | | Execute_Immediate Greater_Equal,0x11 02a4 681e |h | Jump_Zero 0x2c3 02a5 e003 | | Load 0x0,0x3 02a6 180e | | Execute Package,Field_Execute,Field_Number 0xe 02a7 4801 |H | Short_Literal 0x1 02a8 4802 |H | Short_Literal 0x2 02a9 e005 | | Load 0x0,0x5 02aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02ab 035b | [ | Declare_Type Array,Constrained 02ac 0337 | 7 | Declare_Variable Array 02ad e5ff | | Load 0x2,-0x1 02ae e005 | | Load 0x0,0x5 02af 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02b0 e005 | | Load 0x0,0x5 02b1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02b2 0119 | | Execute Any,Check_In_Formal_Type 02b3 4801 |H | Short_Literal 0x1 02b4 00da | | Load_Top At_Offset_2 02b5 01d6 | | Execute Vector,Field_Write 02b6 4810 |H | Short_Literal 0x10 02b7 e005 | | Load 0x0,0x5 02b8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02b9 e005 | | Load 0x0,0x5 02ba 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02bb 0119 | | Execute Any,Check_In_Formal_Type 02bc 4802 |H | Short_Literal 0x2 02bd 00da | | Load_Top At_Offset_2 02be 01d6 | | Execute Vector,Field_Write 02bf 67d0 |g | Indirect_Literal Discrete,0x290,{0x00000000, 0x00008899} 02c0 e006 | | Load 0x0,0x6 02c1 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 02c2 4509 |E | Exit_Suprogram New_Top_Offset 0x9 02c3 e5ff | | Load 0x2,-0x1 02c4 8216 | | Call 0x1,0x16 02c5 7019 |p | Jump_Nonzero 0x2df 02c6 e003 | | Load 0x0,0x3 02c7 180e | | Execute Package,Field_Execute,Field_Number 0xe 02c8 4807 |H | Short_Literal 0x7 02c9 0092 06f1 | | Action Push_String_Extended,0x6f1 ; "The " 02cb e5ff | | Load 0x2,-0x1 02cc 01cc | | Execute Vector,Catenate 02cd 0092 06f2 | | Action Push_String_Extended,0x6f2 ; " target is not authorized for this machine." 02cf 01cc | | Execute Vector,Catenate 02d0 e00c | | Load 0x0,0xc 02d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02d2 e003 | | Load 0x0,0x3 02d3 180e | | Execute Package,Field_Execute,Field_Number 0xe 02d4 4803 |H | Short_Literal 0x3 02d5 0092 06f3 | | Action Push_String_Extended,0x6f3 ; "Registration of " 02d7 e5ff | | Load 0x2,-0x1 02d8 01cc | | Execute Vector,Catenate 02d9 0092 06f4 | | Action Push_String_Extended,0x6f4 ; " has failed." 02db 01cc | | Execute Vector,Catenate 02dc e00c | | Load 0x0,0xc 02dd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02de 4509 |E | Exit_Suprogram New_Top_Offset 0x9 02df 00d9 | | Load_Top At_Offset_1 02e0 e5f9 | | Load 0x2,-0x7 02e1 e5fa | | Load 0x2,-0x6 02e2 e5fb | | Load 0x2,-0x5 02e3 e5fc | | Load 0x2,-0x4 02e4 e5fd | | Load 0x2,-0x3 02e5 e5fe | | Load 0x2,-0x2 02e6 e5ff | | Load 0x2,-0x1 02e7 e00d | | Load 0x0,0xd 02e8 180e | | Execute Package,Field_Execute,Field_Number 0xe 02e9 c402 | | Store 0x2,0x2 02ea 4801 |H | Short_Literal 0x1 02eb 00da | | Load_Top At_Offset_2 02ec e00b | | Load 0x0,0xb 02ed 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02ee 6806 |h | Jump_Zero 0x2f5 02ef e003 | | Load 0x0,0x3 02f0 180e | | Execute Package,Field_Execute,Field_Number 0xe 02f1 00da | | Load_Top At_Offset_2 02f2 e00c | | Load 0x0,0xc 02f3 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02f4 4509 |E | Exit_Suprogram New_Top_Offset 0x9 02f5 00e1 | | Load_Encached Boolean_Cache 02f6 0092 06f5 | | Action Push_String_Extended,0x6f5 ; "<PROFILE>" 02f8 4801 |H | Short_Literal 0x1 02f9 4801 |H | Short_Literal 0x1 02fa 00ea | | Load_Encached Null_String_Cache 02fb 00ea | | Load_Encached Null_String_Cache 02fc 00ea | | Load_Encached Null_String_Cache 02fd 4800 |H | Short_Literal 0x0 02fe 4800 |H | Short_Literal 0x0 02ff e5f8 | | Load 0x2,-0x8 0300 00ea | | Load_Encached Null_String_Cache 0301 00ea | | Load_Encached Null_String_Cache 0302 e5ff | | Load 0x2,-0x1 0303 e00e | | Load 0x0,0xe 0304 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0305 0059 | Y | Store_Top Discrete,At_Offset_1 0306 00d8 | | Load_Top At_Offset_0 0307 6810 |h | Jump_Zero 0x318 0308 e5ff | | Load 0x2,-0x1 0309 e00f | | Load 0x0,0xf 030a 189e | | Execute Package,Field_Execute,Field_Number 0x9e 030b e003 | | Load 0x0,0x3 030c 180e | | Execute Package,Field_Execute,Field_Number 0xe 030d 4803 |H | Short_Literal 0x3 030e 0092 06f3 | | Action Push_String_Extended,0x6f3 ; "Registration of " 0310 e5ff | | Load 0x2,-0x1 0311 01cc | | Execute Vector,Catenate 0312 0092 06f6 | | Action Push_String_Extended,0x6f6 ; " has completed." 0314 01cc | | Execute Vector,Catenate 0315 e00c | | Load 0x0,0xc 0316 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0317 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0318 e003 | | Load 0x0,0x3 0319 180e | | Execute Package,Field_Execute,Field_Number 0xe 031a 4805 |H | Short_Literal 0x5 031b 0092 06f3 | | Action Push_String_Extended,0x6f3 ; "Registration of " 031d e5ff | | Load 0x2,-0x1 031e 01cc | | Execute Vector,Catenate 031f 0092 06f7 | | Action Push_String_Extended,0x6f7 ; " failed." 0321 01cc | | Execute Vector,Catenate 0322 e00c | | Load 0x0,0xc 0323 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0324 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0325 TRAP_0298: 0325 0007 | | Action Break_Optional 0326 e003 | | Load 0x0,0x3 0327 180e | | Execute Package,Field_Execute,Field_Number 0xe 0328 4807 |H | Short_Literal 0x7 0329 0092 06f8 | | Action Push_String_Extended,0x6f8 ; "Exception " 032b 4800 |H | Short_Literal 0x0 032c 4801 |H | Short_Literal 0x1 032d e010 | | Load 0x0,0x10 032e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 032f 01cc | | Execute Vector,Catenate 0330 0092 06f9 | | Action Push_String_Extended,0x6f9 ; " caught in Register." 0332 01cc | | Execute Vector,Catenate 0333 e00c | | Load 0x0,0xc 0334 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0335 e003 | | Load 0x0,0x3 0336 180e | | Execute Package,Field_Execute,Field_Number 0xe 0337 4807 |H | Short_Literal 0x7 0338 4800 |H | Short_Literal 0x0 0339 4801 |H | Short_Literal 0x1 033a e010 | | Load 0x0,0x10 033b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 033c 0092 06fa | | Action Push_String_Extended,0x6fa ; " was raised in " 033e 01cc | | Execute Vector,Catenate 033f 4800 |H | Short_Literal 0x0 0340 4801 |H | Short_Literal 0x1 0341 e010 | | Load 0x0,0x10 0342 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0343 01cc | | Execute Vector,Catenate 0344 0092 06fb | | Action Push_String_Extended,0x6fb ; "." 0346 01cc | | Execute Vector,Catenate 0347 e00c | | Load 0x0,0xc 0348 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0349 4509 |E | Exit_Suprogram New_Top_Offset 0x9 034a 0000 0000 | | .BLANK 0000[0x6] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0358 | X | .CONST 0x0358 ; Address of begin 0351 038a | | .CONST 0x038a ; Address of exception handler 0352 0002 | | .CONST 0x0002 ; Number of locals 0353 INIT_0350: 0353 e00b | | Load 0x0,0xb 0354 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0355 02c7 | | Declare_Variable Any 0356 00d8 | | Load_Top At_Offset_0 0357 1c00 | | Execute_Immediate Run_Utility,0x0 0358 BODY_0350: 0358 00db | | Load_Top At_Offset_3 0359 e00f | | Load 0x0,0xf 035a 18a0 | | Execute Package,Field_Execute,Field_Number 0xa0 035b 00db | | Load_Top At_Offset_3 035c e00e | | Load 0x0,0xe 035d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 035e 00d8 | | Load_Top At_Offset_0 035f e5fe | | Load 0x2,-0x2 0360 e5ff | | Load 0x2,-0x1 0361 e00d | | Load 0x0,0xd 0362 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0363 c402 | | Store 0x2,0x2 0364 4801 |H | Short_Literal 0x1 0365 00d9 | | Load_Top At_Offset_1 0366 e00b | | Load 0x0,0xb 0367 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0368 6806 |h | Jump_Zero 0x36f 0369 e003 | | Load 0x0,0x3 036a 180e | | Execute Package,Field_Execute,Field_Number 0xe 036b 00d9 | | Load_Top At_Offset_1 036c e00c | | Load 0x0,0xc 036d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 036e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 036f e003 | | Load 0x0,0x3 0370 180e | | Execute Package,Field_Execute,Field_Number 0xe 0371 4803 |H | Short_Literal 0x3 0372 0092 06fc | | Action Push_String_Extended,0x6fc ; "Unregistered " 0374 e5ff | | Load 0x2,-0x1 0375 01cc | | Execute Vector,Catenate 0376 0092 06fd | | Action Push_String_Extended,0x6fd ; " RCI." 0378 01cc | | Execute Vector,Catenate 0379 e00c | | Load 0x0,0xc 037a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 037b e5fe | | Load 0x2,-0x2 037c 680c |h | Jump_Zero 0x389 037d e003 | | Load 0x0,0x3 037e 180e | | Execute Package,Field_Execute,Field_Number 0xe 037f 4803 |H | Short_Literal 0x3 0380 0092 06fe | | Action Push_String_Extended,0x6fe ; "Destroyed " 0382 e5ff | | Load 0x2,-0x1 0383 01cc | | Execute Vector,Catenate 0384 0092 06fd | | Action Push_String_Extended,0x6fd ; " RCI." 0386 01cc | | Execute Vector,Catenate 0387 e00c | | Load 0x0,0xc 0388 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0389 4503 |E | Exit_Suprogram New_Top_Offset 0x3 038a TRAP_0350: 038a 0007 | | Action Break_Optional 038b e003 | | Load 0x0,0x3 038c 180e | | Execute Package,Field_Execute,Field_Number 0xe 038d 4807 |H | Short_Literal 0x7 038e 0092 06f8 | | Action Push_String_Extended,0x6f8 ; "Exception " 0390 4800 |H | Short_Literal 0x0 0391 4801 |H | Short_Literal 0x1 0392 e010 | | Load 0x0,0x10 0393 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0394 01cc | | Execute Vector,Catenate 0395 0092 06ff | | Action Push_String_Extended,0x6ff ; " caught in UnRegister." 0397 01cc | | Execute Vector,Catenate 0398 e00c | | Load 0x0,0xc 0399 1813 | | Execute Package,Field_Execute,Field_Number 0x13 039a e003 | | Load 0x0,0x3 039b 180e | | Execute Package,Field_Execute,Field_Number 0xe 039c 4807 |H | Short_Literal 0x7 039d 4800 |H | Short_Literal 0x0 039e 4801 |H | Short_Literal 0x1 039f e010 | | Load 0x0,0x10 03a0 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03a1 0092 06fa | | Action Push_String_Extended,0x6fa ; " was raised in " 03a3 01cc | | Execute Vector,Catenate 03a4 4800 |H | Short_Literal 0x0 03a5 4801 |H | Short_Literal 0x1 03a6 e010 | | Load 0x0,0x10 03a7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 03a8 01cc | | Execute Vector,Catenate 03a9 0092 06fb | | Action Push_String_Extended,0x6fb ; "." 03ab 01cc | | Execute Vector,Catenate 03ac e00c | | Load 0x0,0xc 03ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03ae 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03af 0000 | | .XXX[0x1] 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03c9 | | .CONST 0x03c9 ; Address of begin 03b1 041a | | .CONST 0x041a ; Address of exception handler 03b2 0009 | | .CONST 0x0009 ; Number of locals 03b3 INIT_03b0: 03b3 e011 | | Load 0x0,0x11 03b4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03b5 0322 | " | Declare_Variable Record 03b6 00d8 | | Load_Top At_Offset_0 03b7 1c00 | | Execute_Immediate Run_Utility,0x0 03b8 e00b | | Load 0x0,0xb 03b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03ba 02c7 | | Declare_Variable Any 03bb 00d8 | | Load_Top At_Offset_0 03bc 1c00 | | Execute_Immediate Run_Utility,0x0 03bd 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call 03bf 029f 064b | K| Declare_Subprogram INIT_0648,For_Call 03c1 029f 0663 | c| Declare_Subprogram INIT_0660,For_Call 03c3 029f 067b | {| Declare_Subprogram INIT_0678,For_Call 03c5 029f 0693 | | Declare_Subprogram INIT_0690,For_Call 03c7 029f 06ab | | Declare_Subprogram INIT_06a8,For_Call 03c9 BODY_03b0: 03c9 e403 | | Load 0x2,0x3 03ca 0120 | | Execute Any,Is_Value 03cb 6803 |h | Jump_Zero 0x3cf 03cc e00b | | Load 0x0,0xb 03cd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03ce 7801 |x | Jump 0x3d0 03cf e403 | | Load 0x2,0x3 03d0 e402 | | Load 0x2,0x2 03d1 e5ff | | Load 0x2,-0x1 03d2 e011 | | Load 0x0,0x11 03d3 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 03d4 00d1 | | Pop_Control Pop_Count_1 03d5 c403 | | Store 0x2,0x3 03d6 4802 |H | Short_Literal 0x2 03d7 e403 | | Load 0x2,0x3 03d8 e00b | | Load 0x0,0xb 03d9 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03da 6806 |h | Jump_Zero 0x3e1 03db e003 | | Load 0x0,0x3 03dc 180e | | Execute Package,Field_Execute,Field_Number 0xe 03dd e403 | | Load 0x2,0x3 03de e00c | | Load 0x0,0xc 03df 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03e0 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03e1 e5ff | | Load 0x2,-0x1 03e2 e00d | | Load 0x0,0xd 03e3 180f | | Execute Package,Field_Execute,Field_Number 0xf 03e4 700a |p | Jump_Nonzero 0x3ef 03e5 e003 | | Load 0x0,0x3 03e6 180e | | Execute Package,Field_Execute,Field_Number 0xe 03e7 4806 |H | Short_Literal 0x6 03e8 e5ff | | Load 0x2,-0x1 03e9 0092 0700 | | Action Push_String_Extended,0x700 ; " is not registered" 03eb 01cc | | Execute Vector,Catenate 03ec e00c | | Load 0x0,0xc 03ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03ee 4508 |E | Exit_Suprogram New_Top_Offset 0x8 03ef 0092 0701 | | Action Push_String_Extended,0x701 ; "Information on RCI customization for " 03f1 e5ff | | Load 0x2,-0x1 03f2 01cc | | Execute Vector,Catenate 03f3 e012 | | Load 0x0,0x12 03f4 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 03f5 e5fe | | Load 0x2,-0x2 03f6 6804 |h | Jump_Zero 0x3fb 03f7 e402 | | Load 0x2,0x2 03f8 e00d | | Load 0x0,0xd 03f9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03fa 8404 | | Call 0x2,0x4 03fb e5fc | | Load 0x2,-0x4 03fc 6804 |h | Jump_Zero 0x401 03fd e402 | | Load 0x2,0x2 03fe e00d | | Load 0x0,0xd 03ff 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0400 8405 | | Call 0x2,0x5 0401 e5fa | | Load 0x2,-0x6 0402 6804 |h | Jump_Zero 0x407 0403 e402 | | Load 0x2,0x2 0404 e00d | | Load 0x0,0xd 0405 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0406 8408 | | Call 0x2,0x8 0407 e5fb | | Load 0x2,-0x5 0408 6804 |h | Jump_Zero 0x40d 0409 e402 | | Load 0x2,0x2 040a e00d | | Load 0x0,0xd 040b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 040c 8406 | | Call 0x2,0x6 040d e5fd | | Load 0x2,-0x3 040e 6804 |h | Jump_Zero 0x413 040f e402 | | Load 0x2,0x2 0410 e00d | | Load 0x0,0xd 0411 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0412 8407 | | Call 0x2,0x7 0413 e5f9 | | Load 0x2,-0x7 0414 6804 |h | Jump_Zero 0x419 0415 e402 | | Load 0x2,0x2 0416 e00d | | Load 0x0,0xd 0417 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0418 8409 | | Call 0x2,0x9 0419 4508 |E | Exit_Suprogram New_Top_Offset 0x8 041a TRAP_03b0: 041a 0007 | | Action Break_Optional 041b e003 | | Load 0x0,0x3 041c 180e | | Execute Package,Field_Execute,Field_Number 0xe 041d 4807 |H | Short_Literal 0x7 041e 0092 06f8 | | Action Push_String_Extended,0x6f8 ; "Exception " 0420 4800 |H | Short_Literal 0x0 0421 4801 |H | Short_Literal 0x1 0422 e010 | | Load 0x0,0x10 0423 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0424 01cc | | Execute Vector,Catenate 0425 0092 0702 | | Action Push_String_Extended,0x702 ; " caught in Information." 0427 01cc | | Execute Vector,Catenate 0428 e00c | | Load 0x0,0xc 0429 1813 | | Execute Package,Field_Execute,Field_Number 0x13 042a e003 | | Load 0x0,0x3 042b 180e | | Execute Package,Field_Execute,Field_Number 0xe 042c 4807 |H | Short_Literal 0x7 042d 4800 |H | Short_Literal 0x0 042e 4801 |H | Short_Literal 0x1 042f e010 | | Load 0x0,0x10 0430 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0431 0092 06fa | | Action Push_String_Extended,0x6fa ; " was raised in " 0433 01cc | | Execute Vector,Catenate 0434 4800 |H | Short_Literal 0x0 0435 4801 |H | Short_Literal 0x1 0436 e010 | | Load 0x0,0x10 0437 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0438 01cc | | Execute Vector,Catenate 0439 0092 06fb | | Action Push_String_Extended,0x6fb ; "." 043b 01cc | | Execute Vector,Catenate 043c e00c | | Load 0x0,0xc 043d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 043e 4508 |E | Exit_Suprogram New_Top_Offset 0x8 043f 0000 | | .XXX[0x1] 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 044a | J | .CONST 0x044a ; Address of begin 0441 0480 | | .CONST 0x0480 ; Address of exception handler 0442 0003 | | .CONST 0x0003 ; Number of locals 0443 INIT_0440: 0443 e00d | | Load 0x0,0xd 0444 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0445 02c7 | | Declare_Variable Any 0446 00d8 | | Load_Top At_Offset_0 0447 1c00 | | Execute_Immediate Run_Utility,0x0 0448 00e1 | | Load_Encached Boolean_Cache 0449 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 044a BODY_0440: 044a 00d9 | | Load_Top At_Offset_1 044b 0120 | | Execute Any,Is_Value 044c 6803 |h | Jump_Zero 0x450 044d e00d | | Load 0x0,0xd 044e 1b18 | | Execute Package,Field_Read,Field_Number 0x18 044f 7801 |x | Jump 0x451 0450 00d9 | | Load_Top At_Offset_1 0451 e00d | | Load 0x0,0xd 0452 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0453 c402 | | Store 0x2,0x2 0454 00cf | | Action Mark_Auxiliary 0455 781b |x | Jump 0x471 0456 00da | | Load_Top At_Offset_2 0457 e00d | | Load 0x0,0xd 0458 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0459 e00d | | Load 0x0,0xd 045a 180f | | Execute Package,Field_Execute,Field_Number 0xf 045b 6810 |h | Jump_Zero 0x46c 045c 00d9 | | Load_Top At_Offset_1 045d 7004 |p | Jump_Nonzero 0x462 045e 0092 0703 | | Action Push_String_Extended,0x703 ; "Registered RCI Customizations: " 0460 e012 | | Load 0x0,0x12 0461 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0462 4801 |H | Short_Literal 0x1 0463 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0464 0092 0704 | | Action Push_String_Extended,0x704 ; " " 0466 00db | | Load_Top At_Offset_3 0467 e00d | | Load 0x0,0xd 0468 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0469 01cc | | Execute Vector,Catenate 046a e012 | | Load 0x0,0x12 046b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 046c 00da | | Load_Top At_Offset_2 046d e00d | | Load 0x0,0xd 046e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 046f c402 | | Store 0x2,0x2 0470 00c9 | | Action Pop_Auxiliary_Loop 0471 00da | | Load_Top At_Offset_2 0472 e00d | | Load 0x0,0xd 0473 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0474 6fe1 |o | Jump_Zero 0x456 0475 00ce | | Action Pop_Auxiliary 0476 00d8 | | Load_Top At_Offset_0 0477 7007 |p | Jump_Nonzero 0x47f 0478 e003 | | Load 0x0,0x3 0479 180e | | Execute Package,Field_Execute,Field_Number 0xe 047a 4806 |H | Short_Literal 0x6 047b 0092 0705 | | Action Push_String_Extended,0x705 ; "No registered RCI Customizations" 047d e00c | | Load 0x0,0xc 047e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 047f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0480 TRAP_0440: 0480 0007 | | Action Break_Optional 0481 e003 | | Load 0x0,0x3 0482 180e | | Execute Package,Field_Execute,Field_Number 0xe 0483 4807 |H | Short_Literal 0x7 0484 0092 06f8 | | Action Push_String_Extended,0x6f8 ; "Exception " 0486 4800 |H | Short_Literal 0x0 0487 4801 |H | Short_Literal 0x1 0488 e010 | | Load 0x0,0x10 0489 1815 | | Execute Package,Field_Execute,Field_Number 0x15 048a 01cc | | Execute Vector,Catenate 048b 0092 0706 | | Action Push_String_Extended,0x706 ; " caught in Display_All_Registered_Targets." 048d 01cc | | Execute Vector,Catenate 048e e00c | | Load 0x0,0xc 048f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0490 e003 | | Load 0x0,0x3 0491 180e | | Execute Package,Field_Execute,Field_Number 0xe 0492 4807 |H | Short_Literal 0x7 0493 4800 |H | Short_Literal 0x0 0494 4801 |H | Short_Literal 0x1 0495 e010 | | Load 0x0,0x10 0496 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0497 0092 06fa | | Action Push_String_Extended,0x6fa ; " was raised in " 0499 01cc | | Execute Vector,Catenate 049a 4800 |H | Short_Literal 0x0 049b 4801 |H | Short_Literal 0x1 049c e010 | | Load 0x0,0x10 049d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 049e 01cc | | Execute Vector,Catenate 049f 0092 06fb | | Action Push_String_Extended,0x6fb ; "." 04a1 01cc | | Execute Vector,Catenate 04a2 e00c | | Load 0x0,0xc 04a3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04a4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04a5 0000 0000 | | .XXX[0x3] 04a7 0000 | | 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04ab | | .CONST 0x04ab ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0001 | | .CONST 0x0001 ; Number of locals 04ab BODY_04a8: 04ab INIT_04a8: 04ab 4605 |F | Jump_Case 0x6 04ac 7804 |x | Jump 0x4b1 ; case 0x0 04ad 7814 |x | Jump 0x4c2 ; case 0x1 04ae 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 04af 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 04b0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 04b1 00da | | Load_Top At_Offset_2 ; case 0x5 04b2 01dc | | Execute Vector,Last 04b3 00db | | Load_Top At_Offset_3 04b4 01dd | | Execute Vector,First 04b5 0263 | c | Execute Discrete,Above_Bound 04b6 700a |p | Jump_Nonzero 0x4c1 04b7 00d8 | | Load_Top At_Offset_0 04b8 e5ff | | Load 0x2,-0x1 04b9 01d5 | | Execute Vector,Field_Reference 04ba 0125 | % | Execute Any,Set_Constraint 04bb 00d8 | | Load_Top At_Offset_0 04bc e5ff | | Load 0x2,-0x1 04bd 01d5 | | Execute Vector,Field_Reference 04be 1c00 | | Execute_Immediate Run_Utility,0x0 04bf 0a01 | | Execute_Immediate Plus,0x1 04c0 7ff4 | | Jump 0x4b5 04c1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 04c2 00da | | Load_Top At_Offset_2 04c3 01dc | | Execute Vector,Last 04c4 00db | | Load_Top At_Offset_3 04c5 01dd | | Execute Vector,First 04c6 0263 | c | Execute Discrete,Above_Bound 04c7 700a |p | Jump_Nonzero 0x4d2 04c8 00d8 | | Load_Top At_Offset_0 04c9 e5ff | | Load 0x2,-0x1 04ca 01d5 | | Execute Vector,Field_Reference 04cb 0125 | % | Execute Any,Set_Constraint 04cc 00d8 | | Load_Top At_Offset_0 04cd e5ff | | Load 0x2,-0x1 04ce 01d7 | | Execute Vector,Field_Read 04cf 1c00 | | Execute_Immediate Run_Utility,0x0 04d0 0a01 | | Execute_Immediate Plus,0x1 04d1 7ff4 | | Jump 0x4c6 04d2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 04d3 0000 0000 | | .BLANK 0000[0x5] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04db | | .CONST 0x04db ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0001 | | .CONST 0x0001 ; Number of locals 04db BODY_04d8: 04db INIT_04d8: 04db 00cf | | Action Mark_Auxiliary 04dc 4808 |H | Short_Literal 0x8 04dd 4801 |H | Short_Literal 0x1 04de 0007 | | Action Break_Optional 04df 4801 |H | Short_Literal 0x1 04e0 4820 |H | Short_Literal 0x20 04e1 00da | | Load_Top At_Offset_2 04e2 e215 | | Load 0x1,0x15 04e3 01d5 | | Execute Vector,Field_Reference 04e4 e009 | | Load 0x0,0x9 04e5 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04e6 4820 |H | Short_Literal 0x20 04e7 e5ff | | Load 0x2,-0x1 04e8 e009 | | Load 0x0,0x9 04e9 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04ea e009 | | Load 0x0,0x9 04eb 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04ec 6804 |h | Jump_Zero 0x4f1 04ed e5ff | | Load 0x2,-0x1 04ee e013 | | Load 0x0,0x13 04ef 180e | | Execute Package,Field_Execute,Field_Number 0xe 04f0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04f1 00c8 | | Action Pop_Auxiliary_Range 04f2 3fec |? | Loop_Increasing 0x4df 04f3 00ce | | Action Pop_Auxiliary 04f4 4801 |H | Short_Literal 0x1 04f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04f6 0000 0000 | | .XXX[0x2] 04f8 ; -------------------------------------------------------------------------------------- 04f8 ; SUBPROGRAM 04f8 ; -------------------------------------------------------------------------------------- 04f8 050f | | .CONST 0x050f ; Address of begin 04f9 0004 | | .CONST 0x0004 ; Address of exception handler 04fa 0007 | | .CONST 0x0007 ; Number of locals 04fb INIT_04f8: 04fb e002 | | Load 0x0,0x2 04fc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04fd 1b18 | | Execute Package,Field_Read,Field_Number 0x18 04fe 02c7 | | Declare_Variable Any 04ff 00d8 | | Load_Top At_Offset_0 0500 1c00 | | Execute_Immediate Run_Utility,0x0 0501 e002 | | Load 0x0,0x2 0502 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0503 e002 | | Load 0x0,0x2 0504 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0505 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0506 e002 | | Load 0x0,0x2 0507 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0508 02c7 | | Declare_Variable Any 0509 00d8 | | Load_Top At_Offset_0 050a 1c00 | | Execute_Immediate Run_Utility,0x0 050b 00e3 | | Load_Encached Natural_Cache 050c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 050d 029f 06c3 | | Declare_Subprogram INIT_06c0,For_Call 050f BODY_04f8: 050f e002 | | Load 0x0,0x2 0510 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0511 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0512 e402 | | Load 0x2,0x2 0513 6040 |`@ | Indirect_Literal Discrete,0x554,{0x00000000, 0x00004000} 0514 e007 | | Load 0x0,0x7 0515 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0516 e008 | | Load 0x0,0x8 0517 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0518 e014 | | Load 0x0,0x14 0519 1811 | | Execute Package,Field_Execute,Field_Number 0x11 051a 4801 |H | Short_Literal 0x1 051b 4800 |H | Short_Literal 0x0 051c e008 | | Load 0x0,0x8 051d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 051e e002 | | Load 0x0,0x2 051f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0520 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0521 0092 0707 | | Action Push_String_Extended,0x707 ; "!machine.rci.@_defs" 0523 e002 | | Load 0x0,0x2 0524 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0525 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0526 c402 | | Store 0x2,0x2 0527 c404 | | Store 0x2,0x4 0528 00cf | | Action Mark_Auxiliary 0529 781a |x | Jump 0x544 052a e002 | | Load 0x0,0x2 052b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 052c e405 | | Load 0x2,0x5 052d 0120 | | Execute Any,Is_Value 052e 6803 |h | Jump_Zero 0x532 052f e002 | | Load 0x0,0x2 0530 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0531 7801 |x | Jump 0x533 0532 e405 | | Load 0x2,0x5 0533 e402 | | Load 0x2,0x2 0534 e002 | | Load 0x0,0x2 0535 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0536 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0537 c405 | | Store 0x2,0x5 0538 c403 | | Store 0x2,0x3 0539 00db | | Load_Top At_Offset_3 053a e002 | | Load 0x0,0x2 053b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 053c 7001 |p | Jump_Nonzero 0x53e 053d 8407 | | Call 0x2,0x7 053e e402 | | Load 0x2,0x2 053f e002 | | Load 0x0,0x2 0540 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0541 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0542 c402 | | Store 0x2,0x2 0543 00c9 | | Action Pop_Auxiliary_Loop 0544 e402 | | Load 0x2,0x2 0545 e002 | | Load 0x0,0x2 0546 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0547 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0548 6fe1 |o | Jump_Zero 0x52a 0549 00ce | | Action Pop_Auxiliary 054a 4801 |H | Short_Literal 0x1 054b 00da | | Load_Top At_Offset_2 054c 0aff | | Execute_Immediate Plus,-0x1 054d e213 | | Load 0x1,0x13 054e 01cf | | Execute Vector,Slice_Read 054f 0335 | 5 | Declare_Variable Array,Duplicate 0550 00cd | | Action Spare6_Action 0551 00ca | | Action Exit_Nullary_Function 0552 0000 0000 | | .XXX[0x2] 0554 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 057a | z | .CONST 0x057a ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0007 | | .CONST 0x0007 ; Number of locals 055b INIT_0558: 055b e002 | | Load 0x0,0x2 055c 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 055d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 055e 02c7 | | Declare_Variable Any 055f 00d8 | | Load_Top At_Offset_0 0560 1c00 | | Execute_Immediate Run_Utility,0x0 0561 e002 | | Load 0x0,0x2 0562 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0563 02c7 | | Declare_Variable Any 0564 00d8 | | Load_Top At_Offset_0 0565 1c00 | | Execute_Immediate Run_Utility,0x0 0566 e002 | | Load 0x0,0x2 0567 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0568 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0569 02c7 | | Declare_Variable Any 056a 00d8 | | Load_Top At_Offset_0 056b 1c00 | | Execute_Immediate Run_Utility,0x0 056c 00f1 | | Load_Encached Diana_Temp_Seq 056d 02c7 | | Declare_Variable Any 056e 00d8 | | Load_Top At_Offset_0 056f 1c00 | | Execute_Immediate Run_Utility,0x0 0570 e002 | | Load 0x0,0x2 0571 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0572 02ff | | Declare_Variable Variant_Record 0573 00d8 | | Load_Top At_Offset_0 0574 1c00 | | Execute_Immediate Run_Utility,0x0 0575 e004 | | Load 0x0,0x4 0576 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0577 02c7 | | Declare_Variable Any 0578 00d8 | | Load_Top At_Offset_0 0579 1c00 | | Execute_Immediate Run_Utility,0x0 057a BODY_0558: 057a e002 | | Load 0x0,0x2 057b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 057c e602 | | Load 0x3,0x2 057d 0120 | | Execute Any,Is_Value 057e 6804 |h | Jump_Zero 0x583 057f e002 | | Load 0x0,0x2 0580 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0581 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0582 7801 |x | Jump 0x584 0583 e602 | | Load 0x3,0x2 0584 67cf |g | Indirect_Literal Discrete,0x554,{0x00000000, 0x00004000} 0585 e007 | | Load 0x0,0x7 0586 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0587 e002 | | Load 0x0,0x2 0588 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0589 4802 |H | Short_Literal 0x2 058a 609d |` | Indirect_Literal Discrete,0x628,{0x00000000, 0x7fffffff} 058b 609c |` | Indirect_Literal Discrete,0x628,{0x00000000, 0x7fffffff} 058c e002 | | Load 0x0,0x2 058d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 058e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 058f e00a | | Load 0x0,0xa 0590 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0591 e405 | | Load 0x2,0x5 0592 4801 |H | Short_Literal 0x1 0593 e7ff | | Load 0x3,-0x1 0594 e002 | | Load 0x0,0x2 0595 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0596 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0597 c602 | | Store 0x3,0x2 0598 c406 | | Store 0x2,0x6 0599 e406 | | Load 0x2,0x6 059a 682a |h* | Jump_Zero 0x5c5 059b e003 | | Load 0x0,0x3 059c 180e | | Execute Package,Field_Execute,Field_Number 0xe 059d 4801 |H | Short_Literal 0x1 059e 4802 |H | Short_Literal 0x2 059f e005 | | Load 0x0,0x5 05a0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05a1 035b | [ | Declare_Type Array,Constrained 05a2 0337 | 7 | Declare_Variable Array 05a3 0092 06e8 | | Action Push_String_Extended,0x6e8 ; "!Targets." 05a5 e5ff | | Load 0x2,-0x1 05a6 01cc | | Execute Vector,Catenate 05a7 0092 06fb | | Action Push_String_Extended,0x6fb ; "." 05a9 01cc | | Execute Vector,Catenate 05aa e7ff | | Load 0x3,-0x1 05ab 01cc | | Execute Vector,Catenate 05ac e005 | | Load 0x0,0x5 05ad 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05ae e005 | | Load 0x0,0x5 05af 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05b0 0119 | | Execute Any,Check_In_Formal_Type 05b1 4801 |H | Short_Literal 0x1 05b2 00da | | Load_Top At_Offset_2 05b3 01d6 | | Execute Vector,Field_Write 05b4 e406 | | Load 0x2,0x6 05b5 e002 | | Load 0x0,0x2 05b6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05b7 011c | | Execute Any,Convert_Unchecked 05b8 1c01 | | Execute_Immediate Run_Utility,0x1 05b9 e005 | | Load 0x0,0x5 05ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05bb e005 | | Load 0x0,0x5 05bc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05bd 0119 | | Execute Any,Check_In_Formal_Type 05be 4802 |H | Short_Literal 0x2 05bf 00da | | Load_Top At_Offset_2 05c0 01d6 | | Execute Vector,Field_Write 05c1 6062 |`b | Indirect_Literal Discrete,0x624,{0x00000000, 0x00008895} 05c2 e006 | | Load 0x0,0x6 05c3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 05c4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05c5 e602 | | Load 0x3,0x2 05c6 e002 | | Load 0x0,0x2 05c7 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 05c8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05c9 c603 | | Store 0x3,0x3 05ca e002 | | Load 0x0,0x2 05cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05cc 00db | | Load_Top At_Offset_3 05cd 0120 | | Execute Any,Is_Value 05ce 6802 |h | Jump_Zero 0x5d1 05cf 00f1 | | Load_Encached Diana_Temp_Seq 05d0 7801 |x | Jump 0x5d2 05d1 00db | | Load_Top At_Offset_3 05d2 e604 | | Load 0x3,0x4 05d3 0120 | | Execute Any,Is_Value 05d4 6804 |h | Jump_Zero 0x5d9 05d5 e002 | | Load 0x0,0x2 05d6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 05d7 1b17 | | Execute Package,Field_Read,Field_Number 0x17 05d8 7801 |x | Jump 0x5da 05d9 e604 | | Load 0x3,0x4 05da 00db | | Load_Top At_Offset_3 05db 0120 | | Execute Any,Is_Value 05dc 6803 |h | Jump_Zero 0x5e0 05dd e004 | | Load 0x0,0x4 05de 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05df 7801 |x | Jump 0x5e1 05e0 00db | | Load_Top At_Offset_3 05e1 e606 | | Load 0x3,0x6 05e2 6771 |gq | Indirect_Literal Discrete,0x554,{0x00000000, 0x00004000} 05e3 e007 | | Load 0x0,0x7 05e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05e5 4800 |H | Short_Literal 0x0 05e6 e002 | | Load 0x0,0x2 05e7 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 05e8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05e9 e002 | | Load 0x0,0x2 05ea 1815 | | Execute Package,Field_Execute,Field_Number 0x15 05eb 4ffc |O | Short_Literal -0x4 05ec 4ffd |O | Short_Literal -0x3 05ed e603 | | Load 0x3,0x3 05ee e002 | | Load 0x0,0x2 05ef 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 05f0 180d | | Execute Package,Field_Execute,Field_Number 0xd 05f1 00d1 | | Pop_Control Pop_Count_1 05f2 c607 | | Store 0x3,0x7 05f3 c604 | | Store 0x3,0x4 05f4 c605 | | Store 0x3,0x5 05f5 c406 | | Store 0x2,0x6 05f6 e406 | | Load 0x2,0x6 05f7 682a |h* | Jump_Zero 0x622 05f8 e003 | | Load 0x0,0x3 05f9 180e | | Execute Package,Field_Execute,Field_Number 0xe 05fa 4801 |H | Short_Literal 0x1 05fb 4802 |H | Short_Literal 0x2 05fc e005 | | Load 0x0,0x5 05fd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05fe 035b | [ | Declare_Type Array,Constrained 05ff 0337 | 7 | Declare_Variable Array 0600 0092 06e8 | | Action Push_String_Extended,0x6e8 ; "!Targets." 0602 e5ff | | Load 0x2,-0x1 0603 01cc | | Execute Vector,Catenate 0604 0092 06fb | | Action Push_String_Extended,0x6fb ; "." 0606 01cc | | Execute Vector,Catenate 0607 e7ff | | Load 0x3,-0x1 0608 01cc | | Execute Vector,Catenate 0609 e005 | | Load 0x0,0x5 060a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 060b e005 | | Load 0x0,0x5 060c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 060d 0119 | | Execute Any,Check_In_Formal_Type 060e 4801 |H | Short_Literal 0x1 060f 00da | | Load_Top At_Offset_2 0610 01d6 | | Execute Vector,Field_Write 0611 e406 | | Load 0x2,0x6 0612 e002 | | Load 0x0,0x2 0613 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0614 011c | | Execute Any,Convert_Unchecked 0615 1c01 | | Execute_Immediate Run_Utility,0x1 0616 e005 | | Load 0x0,0x5 0617 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0618 e005 | | Load 0x0,0x5 0619 1b0e | | Execute Package,Field_Read,Field_Number 0xe 061a 0119 | | Execute Any,Check_In_Formal_Type 061b 4802 |H | Short_Literal 0x2 061c 00da | | Load_Top At_Offset_2 061d 01d6 | | Execute Vector,Field_Write 061e 6005 |` | Indirect_Literal Discrete,0x624,{0x00000000, 0x00008895} 061f e006 | | Load 0x0,0x6 0620 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0621 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0622 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0623 0000 | | .XXX[0x1] 0624 0000 0000 | | .LITERAL {0x00000000, 0x00008895} 0628 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 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 e015 | | Load 0x0,0x15 0635 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0636 6805 |h | Jump_Zero 0x63c 0637 0092 0708 | | Action Push_String_Extended,0x708 ; "No Operational Customizations Defined." 0639 e012 | | Load 0x0,0x12 063a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 063b 7803 |x | Jump 0x63f 063c 00da | | Load_Top At_Offset_2 063d e015 | | Load 0x0,0x15 063e 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 063f 0092 0704 | | Action Push_String_Extended,0x704 ; " " 0641 e012 | | Load 0x0,0x12 0642 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0643 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0644 0000 0000 | | .BLANK 0000[0x4] 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 1b14 | | Execute Package,Field_Read,Field_Number 0x14 064e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 064f 6805 |h | Jump_Zero 0x655 0650 0092 0709 | | Action Push_String_Extended,0x709 ; "No Pragma 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 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0658 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0659 0092 0704 | | Action Push_String_Extended,0x704 ; " " 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 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0666 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0667 6805 |h | Jump_Zero 0x66d 0668 0092 070a | | Action Push_String_Extended,0x70a ; "No Attribute 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 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0670 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0671 0092 0704 | | Action Push_String_Extended,0x704 ; " " 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 1b13 | | Execute Package,Field_Read,Field_Number 0x13 067e 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 067f 6805 |h | Jump_Zero 0x685 0680 0092 070b | | Action Push_String_Extended,0x70b ; "No Predefined Environment 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 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0688 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0689 0092 0704 | | Action Push_String_Extended,0x704 ; " " 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 e016 | | Load 0x0,0x16 0695 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0696 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0697 6805 |h | Jump_Zero 0x69d 0698 0092 070c | | Action Push_String_Extended,0x70c ; "No Rep Spec Customizations Defined." 069a e012 | | Load 0x0,0x12 069b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 069c 7804 |x | Jump 0x6a1 069d 00da | | Load_Top At_Offset_2 069e e016 | | Load 0x0,0x16 069f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 06a0 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 06a1 0092 0704 | | Action Push_String_Extended,0x704 ; " " 06a3 e012 | | Load 0x0,0x12 06a4 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06a5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06a6 0000 0000 | | .XXX[0x2] 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06ab | | .CONST 0x06ab ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0001 | | .CONST 0x0001 ; Number of locals 06ab BODY_06a8: 06ab INIT_06a8: 06ab 00da | | Load_Top At_Offset_2 06ac e017 | | Load 0x0,0x17 06ad 1b10 | | Execute Package,Field_Read,Field_Number 0x10 06ae 012f | / | Execute Any,Equal 06af 6805 |h | Jump_Zero 0x6b5 06b0 0092 070d | | Action Push_String_Extended,0x70d ; "No Telnet Customizations Defined." 06b2 e012 | | Load 0x0,0x12 06b3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06b4 7803 |x | Jump 0x6b8 06b5 00da | | Load_Top At_Offset_2 06b6 e017 | | Load 0x0,0x17 06b7 1817 | | Execute Package,Field_Execute,Field_Number 0x17 06b8 0092 0704 | | Action Push_String_Extended,0x704 ; " " 06ba e012 | | Load 0x0,0x12 06bb 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06bd 0000 0000 | | .XXX[0x3] 06bf 0000 | | 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c7 | | .CONST 0x06c7 ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0002 | | .CONST 0x0002 ; Number of locals 06c3 INIT_06c0: 06c3 e405 | | Load 0x2,0x5 06c4 e002 | | Load 0x0,0x2 06c5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06c6 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 06c7 BODY_06c0: 06c7 e406 | | Load 0x2,0x6 06c8 e213 | | Load 0x1,0x13 06c9 01d5 | | Execute Vector,Field_Reference 06ca 00d8 | | Load_Top At_Offset_0 06cb 00da | | Load_Top At_Offset_2 06cc 01dd | | Execute Vector,First 06cd 00db | | Load_Top At_Offset_3 06ce 01dc | | Execute Vector,Last 06cf 0afb | | Execute_Immediate Plus,-0x5 06d0 00d8 | | Load_Top At_Offset_0 06d1 00e2 | | Load_Encached Integer_Cache 06d2 0260 | ` | Execute Discrete,In_Type 06d3 7001 |p | Jump_Nonzero 0x6d5 06d4 0801 | | Execute_Immediate Raise,0x1 06d5 e602 | | Load 0x3,0x2 06d6 01cf | | Execute Vector,Slice_Read 06d7 e001 | | Load 0x0,0x1 06d8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06d9 00d2 | | Pop_Control Pop_Count_2 06da e406 | | Load 0x2,0x6 06db 0a01 | | Execute_Immediate Plus,0x1 06dc c406 | | Store 0x2,0x6 06dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06de ; -------------------------------------------------------------------------------------- 06de ; STRING TABLE 06de ; -------------------------------------------------------------------------------------- 06de 0062 | b | .STRTAB 0x0062->0x070f ; "Rs6000_Aix_Ibm " 06df 0070 | p | .STRTAB 0x0070->0x0717 ; "Vax_Vms_Dec_Xt " 06e0 007e | ~ | .STRTAB 0x007e->0x071f ; "I386_Lynx_Als_Xt" 06e1 008c | | .STRTAB 0x008c->0x0727 ; "I486_Iux_Als_Xt " 06e2 009a | | .STRTAB 0x009a->0x072f ; "I960_Vms_Tar_Xt " 06e3 00a8 | | .STRTAB 0x00a8->0x0737 ; "IC30_Vms_Tar_Xt " 06e4 00b6 | | .STRTAB 0x00b6->0x073f ; "Sparc_Sun_Xt " 06e5 00c4 | | .STRTAB 0x00c4->0x0747 ; "Ix86_Unix_Als_Xt" 06e6 00d2 | | .STRTAB 0x00d2->0x074f ; "Create_Predefined_Library" 06e7 00e9 | | .STRTAB 0x00e9->0x075b ; "!targets." 06e8 00f0 | | .STRTAB 0x00f0->0x0760 ; "!Targets." 06e9 00f7 | | .STRTAB 0x00f7->0x0764 ; "Create_Predefined_Library completed" 06ea 0118 | | .STRTAB 0x0118->0x0776 ; "!targets" 06eb 011e | | .STRTAB 0x011e->0x077a ; "!Targets" 06ec 0124 | $ | .STRTAB 0x0124->0x077e ; "Create_Predefined_Library failed" 06ed 0142 | B | .STRTAB 0x0142->0x078e ; "Io" 06ee 0142 | B | .STRTAB 0x0142->0x078f ; "Lrm" 06ef 0143 | C | .STRTAB 0x0143->0x0790 ; "Reusable_Components" 06f0 0154 | T | .STRTAB 0x0154->0x079a ; "Target_Interface" 06f1 0162 | b | .STRTAB 0x0162->0x07a2 ; "The " 06f2 0164 | d | .STRTAB 0x0164->0x07a4 ; " target is not authorized for this machine." 06f3 018d | | .STRTAB 0x018d->0x07b9 ; "Registration of " 06f4 019b | | .STRTAB 0x019b->0x07c1 ; " has failed." 06f5 01a5 | | .STRTAB 0x01a5->0x07c7 ; "<PROFILE>" 06f6 01ac | | .STRTAB 0x01ac->0x07cc ; " has completed." 06f7 01b9 | | .STRTAB 0x01b9->0x07d3 ; " failed." 06f8 01bf | | .STRTAB 0x01bf->0x07d7 ; "Exception " 06f9 01c7 | | .STRTAB 0x01c7->0x07dc ; " caught in Register." 06fa 01d9 | | .STRTAB 0x01d9->0x07e6 ; " was raised in " 06fb 01e6 | | .STRTAB 0x01e6->0x07ee ; "." 06fc 01e5 | | .STRTAB 0x01e5->0x07ee ; "Unregistered " 06fd 01f0 | | .STRTAB 0x01f0->0x07f5 ; " RCI." 06fe 01f3 | | .STRTAB 0x01f3->0x07f7 ; "Destroyed " 06ff 01fb | | .STRTAB 0x01fb->0x07fc ; " caught in UnRegister." 0700 020f | | .STRTAB 0x020f->0x0807 ; " is not registered" 0701 021f | | .STRTAB 0x021f->0x0810 ; "Information on RCI customization for " 0702 0242 | B | .STRTAB 0x0242->0x0823 ; " caught in Information." 0703 0257 | W | .STRTAB 0x0257->0x082e ; "Registered RCI Customizations: " 0704 0275 | u | .STRTAB 0x0275->0x083e ; " " 0705 0276 | v | .STRTAB 0x0276->0x0840 ; "No registered RCI Customizations" 0706 0294 | | .STRTAB 0x0294->0x0850 ; " caught in Display_All_Registered_Targets." 0707 02bc | | .STRTAB 0x02bc->0x0865 ; "!machine.rci.@_defs" 0708 02cd | | .STRTAB 0x02cd->0x086e ; "No Operational Customizations Defined." 0709 02f1 | | .STRTAB 0x02f1->0x0881 ; "No Pragma Customizations Defined." 070a 0310 | | .STRTAB 0x0310->0x0892 ; "No Attribute Customizations Defined." 070b 0332 | 2 | .STRTAB 0x0332->0x08a4 ; "No Predefined Environment Customizations Defined." 070c 0361 | a | .STRTAB 0x0361->0x08bc ; "No Rep Spec Customizations Defined." 070d 0382 | | .STRTAB 0x0382->0x08ce ; "No Telnet Customizations Defined." 070e 03a1 | | .STREND 0x03a1->0x08de 070f 5273 3630 |Rs60| .STRTAB_STRINGS 08df 0000 | | .XXX[0x1] 08e0 ; -------------------------------------------------------------------------------------- 08e0 ; Debug Table 08e0 ; -------------------------------------------------------------------------------------- 08e0 0004 000e | | .DEBUG4 0x0004,0x000e,0xedf1,0x0000,0x0001,0x0000 08e6 006a 02c0 | j | .XXX[0x28] 08e8 006b b680 | k | 08ea 0012 cb40 | @| 08ec 006a 02c0 | j | 08ee 006b ce80 | k | 08f0 0003 b280 | | 08f2 006a 02c0 | j | 08f4 006b e680 | k | 08f6 001a 8940 | @| 08f8 006a 02c0 | j | 08fa 006b fe80 | k | 08fc 001c 51c0 | Q | 08fe 006a 02c0 | j | 0900 0000 0000 | | 0902 0007 2780 | ' | 0904 006a 02c0 | j | 0906 00b4 e440 | @| 0908 0000 0000 | | 090a 0000 0015 | | 090c 5242 c000 |RB | 090e 0000 0000 | | .BLANK 0000[0xa] 0918 00fc 0000 | | .XXX[0x7] 091a fa00 000b | | 091c 0ed8 000d | | 091e 8d68 | h | 091f 0000 0000 | | .BLANK 0000[0xa] 0929 006d c100 | m | .XXX[0x8] 092b 0000 0000 | | 092d 0000 7780 | w | 092f 0036 be60 | 6 `| 0931 0000 0000 | | .BLANK 0000[0x5] 0936 0040 0000 | @ | .XXX[0x13] 0938 0580 0000 | | 093a 3200 0000 |2 | 093c 0d00 0000 | | 093e 1200 03ad | | 0940 d000 0000 | | 0942 04c4 6db4 | m | 0944 2c00 0380 |, | 0946 ad80 005b | [| 0948 9c70 | p | 0949 0000 0000 | | .BLANK 0000[0x11] 095a 374c 8000 |7L | .XXX[0x2] 095c 0000 0000 | | .BLANK 0000[0x5] 0961 4000 0001 |@ | .XXX[0x4d] 0963 4849 89e9 |HI | 0965 6a64 e849 |jd I| 0967 e88b 2000 | | 0969 36be 6000 |6 ` | 096b 3635 a000 |65 | 096d 0000 0000 | | 096f 4649 3000 |FI0 | 0971 1b76 4000 | v@ | 0973 02fa 9000 | | 0975 1b1a d000 | | 0977 1b7c 4000 | |@ | 0979 00ec a000 | | 097b 1b1a d000 | | 097d 1b82 4000 | @ | 097f 0447 b000 | G | 0981 1b1a d000 | | 0983 1b88 4000 | @ | 0985 159b 9000 | | 0987 1b1a d000 | | 0989 1b8e 4000 | @ | 098b 06a2 5000 | P | 098d 1b1a d000 | | 098f 1b94 4000 | @ | 0991 0714 7000 | p | 0993 1b1a d000 | | 0995 1b9a 4000 | @ | 0997 11fa 3000 | 0 | 0999 1b1a d000 | | 099b 1ba0 4000 | @ | 099d 117d 9000 | } | 099f 1b1a d000 | | 09a1 0000 0000 | | 09a3 01c9 e000 | | 09a5 1b1a d000 | | 09a7 2dd6 2000 |- | 09a9 0000 0000 | | 09ab 0000 0554 | T| 09ad d0b0 | | 09ae 0000 0000 | | .BLANK 0000[0xb] 09b9 3f00 003e |? >| .XXX[0x7] 09bb 8000 0377 | w| 09bd 6e00 0410 |n | 09bf 8600 | | 09c0 0000 0000 | | .BLANK 0000[0xa] 09ca 1c11 e000 | | .XXX[0x8] 09cc 0000 0000 | | 09ce 001d e000 | | 09d0 0dff e800 | | 09d2 0000 0000 | | .BLANK 0000[0x5] 09d7 1000 0001 | | .XXX[0x17] 09d9 6000 000c |` | 09db 8000 0003 | | 09dd 4000 0004 |@ | 09df 8000 eba1 | | 09e1 0000 0001 | | 09e3 311b d50b |1 | 09e5 0000 d201 | | 09e7 5800 0000 |X | 09e9 0400 0000 | | 09eb 0000 0000 | | 09ed 0040 | @ | 09ee 0000 0000 | | .BLANK 0000[0xc] 09fa 000e 0ef0 | | .XXX[0x2] 09fc 0000 0000 | | .BLANK 0000[0x4]