|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦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 0258 | X | .CONST 0x0258 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0029 | ) | .CONST 0x0029 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0008 | | .CONST 0x0008 ; Number of locals 001b INIT_0018: 001b 029f 003b | ;| Declare_Subprogram INIT_0038,For_Call 001d 029f 0043 | C| Declare_Subprogram INIT_0040,For_Call 001f 029f 004b | K| Declare_Subprogram INIT_0048,For_Call 0021 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 0023 029f 006b | k| Declare_Subprogram INIT_0068,For_Call 0025 029f 009b | | Declare_Subprogram INIT_0098,For_Call 0027 029f 00cb | | Declare_Subprogram INIT_00c8,For_Call 0029 BODY_0018: 0029 e002 | | Load 0x0,0x2 002a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 002b 7004 |p | Jump_Nonzero 0x30 002c 0092 01ac | | Action Push_String_Extended,0x1ac ; "Privileged mode is required to run this command" 002e 8405 | | Call 0x2,0x5 002f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0030 8408 | | Call 0x2,0x8 0031 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0032 0000 0000 | | .BLANK 0000[0x6] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 003b | ; | .CONST 0x003b ; Address of begin 0039 0004 | | .CONST 0x0004 ; Address of exception handler 003a 0001 | | .CONST 0x0001 ; Number of locals 003b BODY_0038: 003b INIT_0038: 003b e7ff | | Load 0x3,-0x1 003c 0f00 | | Execute_Immediate Equal,0x0 003d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 003e 0000 0000 | | .XXX[0x2] 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 0043 | C | .CONST 0x0043 ; Address of begin 0041 0004 | | .CONST 0x0004 ; Address of exception handler 0042 0001 | | .CONST 0x0001 ; Number of locals 0043 BODY_0040: 0043 INIT_0040: 0043 e7ff | | Load 0x3,-0x1 0044 0f00 | | Execute_Immediate Equal,0x0 0045 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0046 0000 0000 | | .XXX[0x2] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b e5fd | | Load 0x2,-0x3 004c e003 | | Load 0x0,0x3 004d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 004e 4807 |H | Short_Literal 0x7 004f e7ff | | Load 0x3,-0x1 0050 e004 | | Load 0x0,0x4 0051 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0052 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0053 0000 0000 | | .BLANK 0000[0x5] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b e5fd | | Load 0x2,-0x3 005c e003 | | Load 0x0,0x3 005d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 005e 4805 |H | Short_Literal 0x5 005f e7ff | | Load 0x3,-0x1 0060 e004 | | Load 0x0,0x4 0061 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0062 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0063 0000 0000 | | .BLANK 0000[0x5] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 006d | m | .CONST 0x006d ; Address of begin 0069 0089 | | .CONST 0x0089 ; Address of exception handler 006a 0002 | | .CONST 0x0002 ; Number of locals 006b INIT_0068: 006b e005 | | Load 0x0,0x5 006c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006d BODY_0068: 006d e005 | | Load 0x0,0x5 006e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006f 6020 |` | Indirect_Literal Discrete,0x90,{0x00000000, 0x00004000} 0070 e006 | | Load 0x0,0x6 0071 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0072 e7fd | | Load 0x3,-0x3 0073 e7fe | | Load 0x3,-0x2 0074 e007 | | Load 0x0,0x7 0075 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0076 c602 | | Store 0x3,0x2 0077 00d8 | | Load_Top At_Offset_0 0078 8402 | | Call 0x2,0x2 0079 700e |p | Jump_Nonzero 0x88 007a 0092 01ad | | Action Push_String_Extended,0x1ad ; "Could not set unit state for " 007c e7ff | | Load 0x3,-0x1 007d 01cc | | Execute Vector,Catenate 007e 0092 01ae | | Action Push_String_Extended,0x1ae ; " to source: " 0080 01cc | | Execute Vector,Catenate 0081 e602 | | Load 0x3,0x2 0082 e005 | | Load 0x0,0x5 0083 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0084 011c | | Execute Any,Convert_Unchecked 0085 1c01 | | Execute_Immediate Run_Utility,0x1 0086 01cc | | Execute Vector,Catenate 0087 8404 | | Call 0x2,0x4 0088 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0089 TRAP_0068: 0089 0007 | | Action Break_Optional 008a 0092 01af | | Action Push_String_Extended,0x1af ; "Unhandled exception setting unit state for unit " 008c e7ff | | Load 0x3,-0x1 008d 01cc | | Execute Vector,Catenate 008e 8404 | | Call 0x2,0x4 008f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0090 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0094 0000 0000 | | .BLANK 0000[0x4] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 00ac | | .CONST 0x00ac ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0008 | | .CONST 0x0008 ; Number of locals 009b INIT_0098: 009b 00ec | | Load_Encached Diana_Tree_Cache 009c 00ec | | Load_Encached Diana_Tree_Cache 009d e005 | | Load 0x0,0x5 009e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 009f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 00a0 02c7 | | Declare_Variable Any 00a1 00d8 | | Load_Top At_Offset_0 00a2 1c00 | | Execute_Immediate Run_Utility,0x0 00a3 e005 | | Load 0x0,0x5 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 e005 | | Load 0x0,0x5 00a6 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 00a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a8 029f 013b | ;| Declare_Subprogram INIT_0138,For_Call 00aa 029f 017b | {| Declare_Subprogram INIT_0178,For_Call 00ac BODY_0098: 00ac 8607 | | Call 0x3,0x7 00ad 8608 | | Call 0x3,0x8 00ae e602 | | Load 0x3,0x2 00af 4976 |Iv | Short_Literal 0x176 00b0 00eb | | Load_Encached Diana_Cache 00b1 0098 | | Execute Package,Field_Read_Dynamic 00b2 180f | | Execute Package,Field_Execute,Field_Number 0xf 00b3 a603 | | Store_Unchecked 0x3,0x3 00b4 e606 | | Load 0x3,0x6 00b5 0c04 | | Execute_Immediate Greater_Equal,0x4 00b6 6804 |h | Jump_Zero 0xbb 00b7 e5fd | | Load 0x2,-0x3 00b8 4800 |H | Short_Literal 0x0 00b9 e7ff | | Load 0x3,-0x1 00ba 8008 | | Call 0x0,0x8 00bb e606 | | Load 0x3,0x6 00bc 0c03 | | Execute_Immediate Greater_Equal,0x3 00bd 6804 |h | Jump_Zero 0xc2 00be 4802 |H | Short_Literal 0x2 00bf e603 | | Load 0x3,0x3 00c0 e7ff | | Load 0x3,-0x1 00c1 8406 | | Call 0x2,0x6 00c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00c3 0000 0000 | | .BLANK 0000[0x5] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00d4 | | .CONST 0x00d4 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0003 | | .CONST 0x0003 ; Number of locals 00cb INIT_00c8: 00cb e005 | | Load 0x0,0x5 00cc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00cd 1b18 | | Execute Package,Field_Read,Field_Number 0x18 00ce 02c7 | | Declare_Variable Any 00cf 00d8 | | Load_Top At_Offset_0 00d0 1c00 | | Execute_Immediate Run_Utility,0x0 00d1 e005 | | Load 0x0,0x5 00d2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00d3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00d4 BODY_00c8: 00d4 e005 | | Load 0x0,0x5 00d5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00d6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00d7 e602 | | Load 0x3,0x2 00d8 6057 |`W | Indirect_Literal Discrete,0x130,{0x00000000, 0x00004000} 00d9 e006 | | Load 0x0,0x6 00da 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00db e009 | | Load 0x0,0x9 00dc 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00dd e00a | | Load 0x0,0xa 00de 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00df 4801 |H | Short_Literal 0x1 00e0 4800 |H | Short_Literal 0x0 00e1 e009 | | Load 0x0,0x9 00e2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00e3 e005 | | Load 0x0,0x5 00e4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00e5 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00e6 e5ff | | Load 0x2,-0x1 00e7 e005 | | Load 0x0,0x5 00e8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00e9 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00ea c602 | | Store 0x3,0x2 00eb c603 | | Store 0x3,0x3 00ec 00d8 | | Load_Top At_Offset_0 00ed 8403 | | Call 0x2,0x3 00ee 701e |p | Jump_Nonzero 0x10d 00ef 0092 01b0 | | Action Push_String_Extended,0x1b0 ; "Can't resolve \x22" 00f1 e5ff | | Load 0x2,-0x1 00f2 01cc | | Execute Vector,Catenate 00f3 0092 01b1 | | Action Push_String_Extended,0x1b1 ; "\x22 because " 00f5 01cc | | Execute Vector,Catenate 00f6 6039 |`9 | Indirect_Literal Discrete,0x130,{0x00000000, 0x00004000} 00f7 e006 | | Load 0x0,0x6 00f8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00f9 e009 | | Load 0x0,0x9 00fa 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00fb e00a | | Load 0x0,0xa 00fc 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00fd 4801 |H | Short_Literal 0x1 00fe 4800 |H | Short_Literal 0x0 00ff e009 | | Load 0x0,0x9 0100 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0101 e005 | | Load 0x0,0x5 0102 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0103 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0104 e5ff | | Load 0x2,-0x1 0105 e603 | | Load 0x3,0x3 0106 e005 | | Load 0x0,0x5 0107 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0108 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 0109 01cc | | Execute Vector,Catenate 010a 8405 | | Call 0x2,0x5 010b 00cc | | Action Pop_Block 010c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 010d 00cf | | Action Mark_Auxiliary 010e 780b |x | Jump 0x11a 010f e602 | | Load 0x3,0x2 0110 e005 | | Load 0x0,0x5 0111 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0112 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0113 8407 | | Call 0x2,0x7 0114 e602 | | Load 0x3,0x2 0115 e005 | | Load 0x0,0x5 0116 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0117 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0118 c602 | | Store 0x3,0x2 0119 00c9 | | Action Pop_Auxiliary_Loop 011a e602 | | Load 0x3,0x2 011b e005 | | Load 0x0,0x5 011c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 011d 181e | | Execute Package,Field_Execute,Field_Number 0x1e 011e 6ff0 |o | Jump_Zero 0x10f 011f 00ce | | Action Pop_Auxiliary 0120 e5fe | | Load 0x2,-0x2 0121 680b |h | Jump_Zero 0x12d 0122 e5fd | | Load 0x2,-0x3 0123 00ea | | Load_Encached Null_String_Cache 0124 4801 |H | Short_Literal 0x1 0125 4800 |H | Short_Literal 0x0 0126 485b |H[ | Short_Literal 0x5b 0127 e5ff | | Load 0x2,-0x1 0128 01ca | | Execute Vector,Prepend 0129 0092 01b2 | | Action Push_String_Extended,0x1b2 ; "]$$" 012b 01cc | | Execute Vector,Catenate 012c 800b | | Call 0x0,0xb 012d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 012e 0000 0000 | | .XXX[0x2] 0130 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0134 0000 0000 | | .BLANK 0000[0x4] 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 016f | o | .CONST 0x016f ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b e005 | | Load 0x0,0x5 013c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 013d e604 | | Load 0x3,0x4 013e 0120 | | Execute Any,Is_Value 013f 6804 |h | Jump_Zero 0x144 0140 e005 | | Load 0x0,0x5 0141 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0142 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0143 7801 |x | Jump 0x145 0144 e604 | | Load 0x3,0x4 0145 e005 | | Load 0x0,0x5 0146 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0147 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0148 67e7 |g | Indirect_Literal Discrete,0x130,{0x00000000, 0x00004000} 0149 4801 |H | Short_Literal 0x1 014a 4800 |H | Short_Literal 0x0 014b 4800 |H | Short_Literal 0x0 014c e009 | | Load 0x0,0x9 014d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 014e e005 | | Load 0x0,0x5 014f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0150 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0151 e006 | | Load 0x0,0x6 0152 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0153 4800 |H | Short_Literal 0x0 0154 e7ff | | Load 0x3,-0x1 0155 e005 | | Load 0x0,0x5 0156 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0157 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0158 c602 | | Store 0x3,0x2 0159 c604 | | Store 0x3,0x4 015a c605 | | Store 0x3,0x5 015b e605 | | Load 0x3,0x5 015c 8402 | | Call 0x2,0x2 015d 7010 |p | Jump_Nonzero 0x16e 015e 0092 01b3 | | Action Push_String_Extended,0x1b3 ; "Bad status opening unit " 0160 e7ff | | Load 0x3,-0x1 0161 01cc | | Execute Vector,Catenate 0162 0092 01b4 | | Action Push_String_Extended,0x1b4 ; ": " 0164 01cc | | Execute Vector,Catenate 0165 e605 | | Load 0x3,0x5 0166 e005 | | Load 0x0,0x5 0167 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0168 011c | | Execute Any,Convert_Unchecked 0169 1c01 | | Execute_Immediate Run_Utility,0x1 016a 01cc | | Execute Vector,Catenate 016b 8405 | | Call 0x2,0x5 016c 00cc | | Action Pop_Block 016d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 016e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 016f TRAP_0138: 016f 0007 | | Action Break_Optional 0170 0092 01b5 | | Action Push_String_Extended,0x1b5 ; "Unhandled exception opening ada unit " 0172 e7ff | | Load 0x3,-0x1 0173 01cc | | Execute Vector,Catenate 0174 8404 | | Call 0x2,0x4 0175 00cc | | Action Pop_Block 0176 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0177 0000 | | .XXX[0x1] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 019d | | .CONST 0x019d ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b e005 | | Load 0x0,0x5 017c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 017d e005 | | Load 0x0,0x5 017e 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 017f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0180 6027 |`' | Indirect_Literal Discrete,0x1a8,{0x00000000, 0x00004000} 0181 e006 | | Load 0x0,0x6 0182 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0183 e602 | | Load 0x3,0x2 0184 e005 | | Load 0x0,0x5 0185 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 0186 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0187 c606 | | Store 0x3,0x6 0188 c605 | | Store 0x3,0x5 0189 e605 | | Load 0x3,0x5 018a 8402 | | Call 0x2,0x2 018b 7010 |p | Jump_Nonzero 0x19c 018c 0092 01b6 | | Action Push_String_Extended,0x1b6 ; "Bad status getting unit state for unit " 018e e7ff | | Load 0x3,-0x1 018f 01cc | | Execute Vector,Catenate 0190 0092 01b4 | | Action Push_String_Extended,0x1b4 ; ": " 0192 01cc | | Execute Vector,Catenate 0193 e605 | | Load 0x3,0x5 0194 e005 | | Load 0x0,0x5 0195 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0196 011c | | Execute Any,Convert_Unchecked 0197 1c01 | | Execute_Immediate Run_Utility,0x1 0198 01cc | | Execute Vector,Catenate 0199 8405 | | Call 0x2,0x5 019a 00cc | | Action Pop_Block 019b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 019c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 019d TRAP_0178: 019d 0007 | | Action Break_Optional 019e 0092 01b7 | | Action Push_String_Extended,0x1b7 ; "Unhandled exception getting unit state for unit " 01a0 e7ff | | Load 0x3,-0x1 01a1 01cc | | Execute Vector,Catenate 01a2 8404 | | Call 0x2,0x4 01a3 00cc | | Action Pop_Block 01a4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01a5 0000 0000 | | .XXX[0x3] 01a7 0000 | | 01a8 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 01ac ; -------------------------------------------------------------------------------------- 01ac ; STRING TABLE 01ac ; -------------------------------------------------------------------------------------- 01ac 001a | | .STRTAB 0x001a->0x01b9 ; "Privileged mode is required to run this command" 01ad 0047 | G | .STRTAB 0x0047->0x01d0 ; "Could not set unit state for " 01ae 0062 | b | .STRTAB 0x0062->0x01df ; " to source: " 01af 006c | l | .STRTAB 0x006c->0x01e5 ; "Unhandled exception setting unit state for unit " 01b0 009a | | .STRTAB 0x009a->0x01fd ; "Can't resolve \x22" 01b1 00a7 | | .STRTAB 0x00a7->0x0204 ; "\x22 because " 01b2 00af | | .STRTAB 0x00af->0x0209 ; "]$$" 01b3 00b0 | | .STRTAB 0x00b0->0x020b ; "Bad status opening unit " 01b4 00c6 | | .STRTAB 0x00c6->0x0217 ; ": " 01b5 00c6 | | .STRTAB 0x00c6->0x0218 ; "Unhandled exception opening ada unit " 01b6 00e9 | | .STRTAB 0x00e9->0x022a ; "Bad status getting unit state for unit " 01b7 010e | | .STRTAB 0x010e->0x023e ; "Unhandled exception getting unit state for unit " 01b8 013c | < | .STREND 0x013c->0x0256 01b9 5072 6976 |Priv| .STRTAB_STRINGS 0256 0000 0000 | | .XXX[0x2] 0258 ; -------------------------------------------------------------------------------------- 0258 ; Debug Table 0258 ; -------------------------------------------------------------------------------------- 0258 0004 0010 | | .DEBUG4 0x0004,0x0010,0xd9b5,0x0000,0x0001,0x0000 025e 85b5 94f0 | | .XXX[0x1a2] 0260 f1fa 408c | @ | 0262 0021 3915 | !9 | 0264 5d7d 3905 |]}9 | 0266 3514 5c00 |5 \ | 0268 3d4d 5105 |=MQ | 026a 3911 0549 |9 I| 026c 10b9 4d51 | MQ| 026e 4925 391c |I%9 | 0270 2c00 54f8 |, T | 0272 f939 95dc | 9 | 0274 8111 99cc | | 0276 8119 a5b1 | | 0278 9481 3985 | 9 | 027a b594 f0f1 | | 027c fa40 8c00 | @ | 027e 2d15 1919 |- | 0280 3d49 517d |=IQ}| 0282 3d39 3164 |=91d| 0284 5c00 414d |\ AM| 0286 5105 3911 |Q 9 | 0288 0549 10b9 | I | 028a 093d 3d31 | ==1| 028c 1505 3858 | 8X| 028e 0055 4d51 | UMQ| 0290 0539 1105 | 9 | 0292 4910 b909 |I | 0294 3d3d 3115 |==1 | 0296 0538 b951 | 8 Q| 0298 4955 1400 |IU | 029a 0800 0001 | | 029c 1400 4931 | I1| 029e 3d1d 7d41 |= }A| 02a0 4915 5925 |I Y%| 02a2 3d55 4d7d |=UM}| 02a4 0d49 054d | I M| 02a6 2008 0000 | | 02a8 0004 0040 | @| 02aa 0000 0004 | | 02ac 001d ad5c | \| 02ae 0234 0014 | 4 | 02b0 0000 0004 | | 02b2 0060 0049 | ` I| 02b4 313d 1d7d |1= }| 02b6 4149 1559 |AI Y| 02b8 253d 554d |%=UM| 02ba 7d0d 4905 |} I | 02bc 4d20 f5ee |M | 02be 5000 0800 |P | 02c0 013d fc00 | = | 02c2 2535 250d |%5% | 02c4 493d 0d3d |I= =| 02c6 1114 0800 | | 02c8 0000 0400 | | 02ca 4c00 0002 |L | 02cc 0c00 1dad | | 02ce 5c02 3400 |\ 4 | 02d0 1400 0001 | | 02d2 fc0e 8400 | | 02d4 4935 250d |I5% | 02d6 493d 0d3d |I= =| 02d8 1114 b919 | | 02da 2555 7d5d |%U}]| 02dc 3d49 10ee |=I | 02de 65c8 e640 |e @| 02e0 7000 293d |p )=| 02e2 1919 4d15 | M | 02e4 517d 3125 |Q}1%| 02e6 5198 5c00 |Q \ | 02e8 8135 250d | 5% | 02ea 493d 0d3d |I= =| 02ec 1114 b919 | | 02ee 3d49 7d19 |=I} | 02f0 2554 b93d |%T =| 02f2 1919 4d15 | M | 02f4 517d 3125 |Q}1%| 02f6 5115 4905 |Q I | 02f8 3000 00e6 |0 | 02fa 4070 0029 |@p )| 02fc 3d19 194d |= M| 02fe 1551 7d4d | Q}M| 0300 490d 985c |I \| 0302 007d 3525 | }5%| 0304 0d49 3d0d | I= | 0306 3d11 14b9 |= | 0308 193d 497d | =I}| 030a 1925 54b9 | %T | 030c 3d19 194d |= M| 030e 1551 7d4d | Q}M| 0310 3d55 490d |=UI | 0312 1400 00e6 | | 0314 4070 0039 |@p 9| 0316 3d19 194d |= M| 0318 1551 7d49 | Q}I| 031a 151d 7d4d | }M| 031c 490d 985c |I \| 031e 00a1 3525 | 5%| 0320 0d49 3d0d | I= | 0322 3d11 14b9 |= | 0324 193d 497d | =I}| 0326 1925 54b9 | %T | 0328 3d19 194d |= M| 032a 1551 7d49 | Q}I| 032c 151d 254d | %M| 032e 5115 497d |Q I}| 0330 4d3d 5549 |M=UI| 0332 0d14 0000 | | 0334 e640 7000 | @p | 0336 313d 1919 |1= | 0338 4d15 517d |M Q}| 033a 0d39 5149 | 9QI| 033c 3198 5c00 |1 \ | 033e 8935 250d | 5% | 0340 493d 0d3d |I= =| 0342 1114 b919 | | 0344 3d49 7d19 |=I} | 0346 2554 b949 |%T I| 0348 151d 254d | %M| 034a 5115 497d |Q I}| 034c 0d3d 3951 | =9Q| 034e 493d 3000 |I=0 | 0350 00e6 4070 | @p| 0352 0029 3115 | )1 | 0354 391d 5121 |9 Q!| 0356 7d31 2551 |}1%Q| 0358 985c 0081 | \ | 035a 3525 0d49 |5% I| 035c 3d0d 3d11 |= = | 035e 14b9 193d | =| 0360 497d 1925 |I} %| 0362 54b9 3115 |T 1 | 0364 391d 5121 |9 Q!| 0366 7d31 2551 |}1%Q| 0368 1549 0530 | I 0| 036a 0000 e640 | @| 036c 7000 2119 |p ! | 036e 2531 317d |%11}| 0370 3125 5198 |1%Q | 0372 5c00 6d35 |\ m5| 0374 250d 493d |% I=| 0376 0d3d 1114 | = | 0378 b919 3d49 | =I| 037a 7d19 2554 |} %T| 037c b919 2531 | %1| 037e 317d 353d |1}5=| 0380 1114 0000 | | 0382 e640 7000 | @p | 0384 3131 1539 |11 9| 0386 1d51 217d | Q!}| 0388 0d39 5149 | 9QI| 038a 3198 5c00 |1 \ | 038c 8935 250d | 5% | 038e 493d 0d3d |I= =| 0390 1114 b919 | | 0392 3d49 7d19 |=I} | 0394 2554 b931 |%T 1| 0396 1539 7d19 | 9} | 0398 2531 317d |%11}| 039a 0d3d 3951 | =9Q| 039c 493d 3000 |I=0 | 039e 00e6 4070 | @p| 03a0 0029 3115 | )1 | 03a2 391d 5121 |9 Q!| 03a4 7d4d 490d |}MI | 03a6 985c 007d | \ }| 03a8 3525 0d49 |5% I| 03aa 3d0d 3d11 |= = | 03ac 14b9 193d | =| 03ae 497d 1925 |I} %| 03b0 54b9 3115 |T 1 | 03b2 391d 5121 |9 Q!| 03b4 7d4d 3d55 |}M=U| 03b6 490d 1400 |I | 03b8 00e6 4070 | @p| 03ba 0021 1925 | ! %| 03bc 3131 7d4d |11}M| 03be 490d 985c |I \| 03c0 0075 3525 | u5%| 03c2 0d49 3d0d | I= | 03c4 3d11 14b9 |= | 03c6 193d 497d | =I}| 03c8 1925 54b9 | %T | 03ca 1925 3131 | %11| 03cc 7d4d 3d55 |}M=U| 03ce 490d 1400 |I | 03d0 00e6 4070 | @p| 03d2 0031 1925 | 1 %| 03d4 557d 1955 |U} U| 03d6 390d 5125 |9 Q%| 03d8 3d39 985c |=9 \| 03da 007d 3525 | }5%| 03dc 0d49 3d0d | I= | 03de 3d11 14b9 |= | 03e0 193d 497d | =I}| 03e2 1925 54b9 | %T | 03e4 1925 557d | %U}| 03e6 3d41 1549 |=A I| 03e8 0551 253d | Q%=| 03ea 3800 00e6 |8 | 03ec 4070 0025 |@p %| 03ee 3511 497d |5 I}| 03f0 0d39 5149 | 9QI| 03f2 3198 5c00 |1 \ | 03f4 8935 250d | 5% | 03f6 493d 0d3d |I= =| 03f8 1114 b919 | | 03fa 3d49 7d19 |=I} | 03fc 2554 b949 |%T I| 03fe 151d 254d | %M|