|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_043cfb
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 05b8 | | .CONST 0x05b8 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 006a | j | .CONST 0x006a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0030 | 0 | .CONST 0x0030 ; Number of locals 000b INIT_0008: 000b 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 000d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 000f 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated 0011 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated 0013 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated 0015 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 0017 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 0019 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 001b 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 001d 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 001f 00bf | | Action Accept_Activation 0020 e001 | | Load 0x0,0x1 0021 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0022 193b | ; | Execute Package,Field_Reference,Field_Number 0x3b 0023 0007 | | Action Break_Optional 0024 029d 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call 0026 029d 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call 0028 029d 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call 002a 029d 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call 002c 029d 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call 002e 029d 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call 0030 029d 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call 0032 029d 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call 0034 029d 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call 0036 e002 | | Load 0x0,0x2 0037 1926 | & | Execute Package,Field_Reference,Field_Number 0x26 0038 00c6 | | Action Check_Subprogram_Elaborated 0039 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 003a e003 | | Load 0x0,0x3 003b e004 | | Load 0x0,0x4 003c 4800 |H | Short_Literal 0x0 003d 0007 | | Action Break_Optional 003e e002 | | Load 0x0,0x2 003f 1926 | & | Execute Package,Field_Reference,Field_Number 0x26 0040 00c6 | | Action Check_Subprogram_Elaborated 0041 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0042 e005 | | Load 0x0,0x5 0043 e006 | | Load 0x0,0x6 0044 4800 |H | Short_Literal 0x0 0045 0007 | | Action Break_Optional 0046 e002 | | Load 0x0,0x2 0047 1926 | & | Execute Package,Field_Reference,Field_Number 0x26 0048 00c6 | | Action Check_Subprogram_Elaborated 0049 1d20 | | Execute_Immediate Reference_Lex_1,0x20 004a e007 | | Load 0x0,0x7 004b e008 | | Load 0x0,0x8 004c 4800 |H | Short_Literal 0x0 004d 0007 | | Action Break_Optional 004e 1d0f | | Execute_Immediate Reference_Lex_1,0xf 004f 00c7 | | Action Elaborate_Subprogram 0050 029d 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call 0052 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0053 00c7 | | Action Elaborate_Subprogram 0054 029d 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call 0056 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0057 00c7 | | Action Elaborate_Subprogram 0058 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0059 00c7 | | Action Elaborate_Subprogram 005a 1d11 | | Execute_Immediate Reference_Lex_1,0x11 005b 00c7 | | Action Elaborate_Subprogram 005c 1d12 | | Execute_Immediate Reference_Lex_1,0x12 005d 00c7 | | Action Elaborate_Subprogram 005e 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call 0060 029d 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call 0062 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0063 00c7 | | Action Elaborate_Subprogram 0064 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0065 00c7 | | Action Elaborate_Subprogram 0066 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0067 00c7 | | Action Elaborate_Subprogram 0068 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0069 00c7 | | Action Elaborate_Subprogram 006a BODY_0008: 006a 00bc | | Action Signal_Activated 006b 00bb | | Action Signal_Completion 006c 0000 0000 | | .BLANK 0000[0x4] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 007d | } | .CONST 0x007d ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0006 | | .CONST 0x0006 ; Number of locals 0073 INIT_0070: 0073 e002 | | Load 0x0,0x2 0074 1925 | % | Execute Package,Field_Reference,Field_Number 0x25 0075 00c6 | | Action Check_Subprogram_Elaborated 0076 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 0077 0092 04d9 | | Action Push_String_Extended,0x4d9 ; "Cant find" 0079 e009 | | Load 0x0,0x9 007a e00a | | Load 0x0,0xa 007b 4806 |H | Short_Literal 0x6 007c 0007 | | Action Break_Optional 007d BODY_0070: 007d e5fe | | Load 0x2,-0x2 007e e001 | | Load 0x0,0x1 007f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0080 e5ff | | Load 0x2,-0x1 0081 4802 |H | Short_Literal 0x2 0082 4802 |H | Short_Literal 0x2 0083 0099 | | Action Reference_Dynamic 0084 e403 | | Load 0x2,0x3 0085 4804 |H | Short_Literal 0x4 0086 4802 |H | Short_Literal 0x2 0087 0099 | | Action Reference_Dynamic 0088 e002 | | Load 0x0,0x2 0089 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 008a 00d1 | | Pop_Control Pop_Count_1 008b e5fe | | Load 0x2,-0x2 008c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 008d 6802 |h | Jump_Zero 0x90 008e e00b | | Load 0x0,0xb 008f 0257 | W | Execute Discrete,Raise 0090 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0091 0000 0000 | | .BLANK 0000[0x7] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 00a5 | | .CONST 0x00a5 ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0006 | | .CONST 0x0006 ; Number of locals 009b INIT_0098: 009b e002 | | Load 0x0,0x2 009c 1925 | % | Execute Package,Field_Reference,Field_Number 0x25 009d 00c6 | | Action Check_Subprogram_Elaborated 009e 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 009f 0092 04d9 | | Action Push_String_Extended,0x4d9 ; "Cant find" 00a1 e00c | | Load 0x0,0xc 00a2 e00d | | Load 0x0,0xd 00a3 4806 |H | Short_Literal 0x6 00a4 0007 | | Action Break_Optional 00a5 BODY_0098: 00a5 e5fe | | Load 0x2,-0x2 00a6 e001 | | Load 0x0,0x1 00a7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00a8 e5ff | | Load 0x2,-0x1 00a9 4802 |H | Short_Literal 0x2 00aa 4802 |H | Short_Literal 0x2 00ab 0099 | | Action Reference_Dynamic 00ac e403 | | Load 0x2,0x3 00ad 4804 |H | Short_Literal 0x4 00ae 4802 |H | Short_Literal 0x2 00af 0099 | | Action Reference_Dynamic 00b0 e002 | | Load 0x0,0x2 00b1 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 00b2 00d1 | | Pop_Control Pop_Count_1 00b3 e5fe | | Load 0x2,-0x2 00b4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00b5 6802 |h | Jump_Zero 0xb8 00b6 e00b | | Load 0x0,0xb 00b7 0257 | W | Execute Discrete,Raise 00b8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00b9 0000 0000 | | .BLANK 0000[0x7] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00d1 | | .CONST 0x00d1 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0007 | | .CONST 0x0007 ; Number of locals 00c3 INIT_00c0: 00c3 029f 044b | K| Declare_Subprogram INIT_0448,For_Call 00c5 e002 | | Load 0x0,0x2 00c6 1925 | % | Execute Package,Field_Reference,Field_Number 0x25 00c7 00c6 | | Action Check_Subprogram_Elaborated 00c8 4802 |H | Short_Literal 0x2 00c9 4802 |H | Short_Literal 0x2 00ca 0099 | | Action Reference_Dynamic 00cb 0092 04d9 | | Action Push_String_Extended,0x4d9 ; "Cant find" 00cd e00e | | Load 0x0,0xe 00ce e00f | | Load 0x0,0xf 00cf 4807 |H | Short_Literal 0x7 00d0 0007 | | Action Break_Optional 00d1 BODY_00c0: 00d1 e5fe | | Load 0x2,-0x2 00d2 e001 | | Load 0x0,0x1 00d3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00d4 e5ff | | Load 0x2,-0x1 00d5 4803 |H | Short_Literal 0x3 00d6 4802 |H | Short_Literal 0x2 00d7 0099 | | Action Reference_Dynamic 00d8 e404 | | Load 0x2,0x4 00d9 4805 |H | Short_Literal 0x5 00da 4802 |H | Short_Literal 0x2 00db 0099 | | Action Reference_Dynamic 00dc e002 | | Load 0x0,0x2 00dd 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 00de 00d1 | | Pop_Control Pop_Count_1 00df e5fe | | Load 0x2,-0x2 00e0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e1 6802 |h | Jump_Zero 0xe4 00e2 e00b | | Load 0x0,0xb 00e3 0257 | W | Execute Discrete,Raise 00e4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00e5 0000 0000 | | .XXX[0x3] 00e7 0000 | | 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00f1 | | .CONST 0x00f1 ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0003 | | .CONST 0x0003 ; Number of locals 00eb INIT_00e8: 00eb e001 | | Load 0x0,0x1 00ec 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00ed 02ff | | Declare_Variable Variant_Record 00ee 00d8 | | Load_Top At_Offset_0 00ef 1c00 | | Execute_Immediate Run_Utility,0x0 00f0 00e1 | | Load_Encached Boolean_Cache 00f1 BODY_00e8: 00f1 00e1 | | Load_Encached Boolean_Cache 00f2 00da | | Load_Top At_Offset_2 00f3 e5ff | | Load 0x2,-0x1 00f4 e5fe | | Load 0x2,-0x2 00f5 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 00f6 e010 | | Load 0x0,0x10 00f7 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00f8 00d1 | | Pop_Control Pop_Count_1 00f9 0059 | Y | Store_Top Discrete,At_Offset_1 00fa 00d8 | | Load_Top At_Offset_0 00fb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00fc 0000 0000 | | .BLANK 0000[0x4] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0103 | | .CONST 0x0103 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0001 | | .CONST 0x0001 ; Number of locals 0103 BODY_0100: 0103 INIT_0100: 0103 00da | | Load_Top At_Offset_2 0104 e011 | | Load 0x0,0x11 0105 1b6a | j | Execute Package,Field_Read,Field_Number 0x6a 0106 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0107 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010b | | .CONST 0x010b ; Address of begin 0109 0112 | | .CONST 0x0112 ; Address of exception handler 010a 0001 | | .CONST 0x0001 ; Number of locals 010b BODY_0108: 010b INIT_0108: 010b 00da | | Load_Top At_Offset_2 010c e5fd | | Load 0x2,-0x3 010d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 010e e012 | | Load 0x0,0x12 010f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0110 c5fe | | Store 0x2,-0x2 0111 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0112 TRAP_0108: 0112 e012 | | Load 0x0,0x12 0113 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0114 010f | | Execute Exception,Equal 0115 6809 |h | Jump_Zero 0x11f 0116 e5fd | | Load 0x2,-0x3 0117 e5ff | | Load 0x2,-0x1 0118 0092 04da | | Action Push_String_Extended,0x4da ; "Could not get enclosing subsystem for" 011a e013 | | Load 0x0,0x13 011b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 011c e014 | | Load 0x0,0x14 011d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 011e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 011f 0100 | | Execute Exception,Raise 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0128 | ( | .CONST 0x0128 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0002 | | .CONST 0x0002 ; Number of locals 0123 INIT_0120: 0123 e001 | | Load 0x0,0x1 0124 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0125 02c7 | | Declare_Variable Any 0126 00d8 | | Load_Top At_Offset_0 0127 1c00 | | Execute_Immediate Run_Utility,0x0 0128 BODY_0120: 0128 e5fd | | Load 0x2,-0x3 0129 00d9 | | Load_Top At_Offset_1 012a 0120 | | Execute Any,Is_Value 012b 6803 |h | Jump_Zero 0x12f 012c e001 | | Load 0x0,0x1 012d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 012e 7801 |x | Jump 0x130 012f 00d9 | | Load_Top At_Offset_1 0130 e5ff | | Load 0x2,-0x1 0131 8212 | | Call 0x1,0x12 0132 c402 | | Store 0x2,0x2 0133 00d1 | | Pop_Control Pop_Count_1 0134 e5fd | | Load 0x2,-0x3 0135 e5fe | | Load 0x2,-0x2 0136 0120 | | Execute Any,Is_Value 0137 6803 |h | Jump_Zero 0x13b 0138 e001 | | Load 0x0,0x1 0139 1b0f | | Execute Package,Field_Read,Field_Number 0xf 013a 7801 |x | Jump 0x13c 013b e5fe | | Load 0x2,-0x2 013c 00da | | Load_Top At_Offset_2 013d e5ff | | Load 0x2,-0x1 013e 822f | / | Call 0x1,0x2f 013f c5fe | | Store 0x2,-0x2 0140 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0141 0000 0000 | | .BLANK 0000[0x7] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 0159 | Y | .CONST 0x0159 ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0005 | | .CONST 0x0005 ; Number of locals 014b INIT_0148: 014b e001 | | Load 0x0,0x1 014c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 014d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 014e e001 | | Load 0x0,0x1 014f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0150 e001 | | Load 0x0,0x1 0151 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0152 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0153 0092 04db | | Action Push_String_Extended,0x4db ; "'L(INTERNAL)." 0155 e5ff | | Load 0x2,-0x1 0156 8217 | | Call 0x1,0x17 0157 01cc | | Execute Vector,Catenate 0158 0007 | | Action Break_Optional 0159 BODY_0148: 0159 e001 | | Load 0x0,0x1 015a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 015b e001 | | Load 0x0,0x1 015c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 015d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 015e 6061 |`a | Indirect_Literal Discrete,0x1c0,{0x00000000, 0x00004000} 015f e5fc | | Load 0x2,-0x4 0160 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0161 4800 |H | Short_Literal 0x0 0162 e5fe | | Load 0x2,-0x2 0163 e001 | | Load 0x0,0x1 0164 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0165 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0166 c402 | | Store 0x2,0x2 0167 005b | [ | Store_Top Discrete,At_Offset_3 0168 00da | | Load_Top At_Offset_2 0169 e002 | | Load 0x0,0x2 016a 180e | | Execute Package,Field_Execute,Field_Number 0xe 016b 700a |p | Jump_Nonzero 0x176 016c e5fc | | Load 0x2,-0x4 016d 00db | | Load_Top At_Offset_3 016e e5fe | | Load 0x2,-0x2 016f 0092 04dc | | Action Push_String_Extended,0x4dc ; "Could not establish naming context for" 0171 e013 | | Load 0x0,0x13 0172 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0173 e014 | | Load 0x0,0x14 0174 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0175 00d1 | | Pop_Control Pop_Count_1 0176 e001 | | Load 0x0,0x1 0177 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0178 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0179 e5fd | | Load 0x2,-0x3 017a 0120 | | Execute Any,Is_Value 017b 6803 |h | Jump_Zero 0x17f 017c e001 | | Load 0x0,0x1 017d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 017e 7801 |x | Jump 0x180 017f e5fd | | Load 0x2,-0x3 0180 603f |`? | Indirect_Literal Discrete,0x1c0,{0x00000000, 0x00004000} 0181 e5fc | | Load 0x2,-0x4 0182 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0183 e402 | | Load 0x2,0x2 0184 e405 | | Load 0x2,0x5 0185 e001 | | Load 0x0,0x1 0186 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0187 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0188 c5fd | | Store 0x2,-0x3 0189 005a | Z | Store_Top Discrete,At_Offset_2 018a 00d9 | | Load_Top At_Offset_1 018b 460e |F | Jump_Case 0xf 018c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x0 018d 780d |x | Jump 0x19b ; case 0x1 018e 780c |x | Jump 0x19b ; case 0x2 018f 7827 |x' | Jump 0x1b7 ; case 0x3 0190 780a |x | Jump 0x19b ; case 0x4 0191 7809 |x | Jump 0x19b ; case 0x5 0192 7808 |x | Jump 0x19b ; case 0x6 0193 7807 |x | Jump 0x19b ; case 0x7 0194 7806 |x | Jump 0x19b ; case 0x8 0195 7805 |x | Jump 0x19b ; case 0x9 0196 7804 |x | Jump 0x19b ; case 0xa 0197 7803 |x | Jump 0x19b ; case 0xb 0198 7802 |x | Jump 0x19b ; case 0xc 0199 7801 |x | Jump 0x19b ; case 0xd 019a 7800 |x | Jump 0x19b ; case 0xe 019b e5fc | | Load 0x2,-0x4 019c 0092 04dd | | Action Push_String_Extended,0x4dd ; "because " 019e 6021 |`! | Indirect_Literal Discrete,0x1c0,{0x00000000, 0x00004000} 019f e5fc | | Load 0x2,-0x4 01a0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01a1 e015 | | Load 0x0,0x15 01a2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01a3 e016 | | Load 0x0,0x16 01a4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01a5 4801 |H | Short_Literal 0x1 01a6 4800 |H | Short_Literal 0x0 01a7 e402 | | Load 0x2,0x2 01a8 e405 | | Load 0x2,0x5 01a9 e404 | | Load 0x2,0x4 01aa e001 | | Load 0x0,0x1 01ab 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01ac 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 01ad 01cc | | Execute Vector,Catenate 01ae e5ff | | Load 0x2,-0x1 01af 0092 04de | | Action Push_String_Extended,0x4de ; "Could not find corresponding unit for" 01b1 e013 | | Load 0x0,0x13 01b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01b3 e014 | | Load 0x0,0x14 01b4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01b5 00d1 | | Pop_Control Pop_Count_1 01b6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01b7 e5fc | | Load 0x2,-0x4 01b8 e5fe | | Load 0x2,-0x2 01b9 e5ff | | Load 0x2,-0x1 01ba 821a | | Call 0x1,0x1a 01bb 00d1 | | Pop_Control Pop_Count_1 01bc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01bd 0000 0000 | | .XXX[0x3] 01bf 0000 | | 01c0 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 01c4 0000 0000 | | .BLANK 0000[0x4] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01d0 | | .CONST 0x01d0 ; Address of begin 01c9 01e9 | | .CONST 0x01e9 ; Address of exception handler 01ca 0002 | | .CONST 0x0002 ; Number of locals 01cb INIT_01c8: 01cb e001 | | Load 0x0,0x1 01cc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01cd 02ff | | Declare_Variable Variant_Record 01ce 00d8 | | Load_Top At_Offset_0 01cf 1c00 | | Execute_Immediate Run_Utility,0x0 01d0 BODY_01c8: 01d0 e5fe | | Load 0x2,-0x2 01d1 e5fc | | Load 0x2,-0x4 01d2 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 01d3 e010 | | Load 0x0,0x10 01d4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01d5 00d9 | | Load_Top At_Offset_1 01d6 016d | m | Execute Variant_Record,Structure_Write 01d7 e5fc | | Load 0x2,-0x4 01d8 e5fd | | Load 0x2,-0x3 01d9 0120 | | Execute Any,Is_Value 01da 6803 |h | Jump_Zero 0x1de 01db e017 | | Load 0x0,0x17 01dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01dd 7801 |x | Jump 0x1df 01de e5fd | | Load 0x2,-0x3 01df 00da | | Load_Top At_Offset_2 01e0 e018 | | Load 0x0,0x18 01e1 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 01e2 0162 | b | Execute Variant_Record,Check_In_Type 01e3 e5fe | | Load 0x2,-0x2 01e4 e5ff | | Load 0x2,-0x1 01e5 e002 | | Load 0x0,0x2 01e6 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01e7 c5fd | | Store 0x2,-0x3 01e8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01e9 TRAP_01c8: 01e9 e010 | | Load 0x0,0x10 01ea 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 01eb 010f | | Execute Exception,Equal 01ec 6805 |h | Jump_Zero 0x1f2 01ed e5fc | | Load 0x2,-0x4 01ee e5fe | | Load 0x2,-0x2 01ef e5ff | | Load 0x2,-0x1 01f0 821a | | Call 0x1,0x1a 01f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01f2 0100 | | Execute Exception,Raise 01f3 0000 0000 | | .BLANK 0000[0x5] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0209 | | .CONST 0x0209 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb e5fc | | Load 0x2,-0x4 01fc e5fd | | Load 0x2,-0x3 01fd 0120 | | Execute Any,Is_Value 01fe 6803 |h | Jump_Zero 0x202 01ff e011 | | Load 0x0,0x11 0200 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0201 7801 |x | Jump 0x203 0202 e5fd | | Load 0x2,-0x3 0203 e5fe | | Load 0x2,-0x2 0204 e5ff | | Load 0x2,-0x1 0205 e002 | | Load 0x0,0x2 0206 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0207 c5fd | | Store 0x2,-0x3 0208 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0209 TRAP_01f8: 0209 0007 | | Action Break_Optional 020a e5fc | | Load 0x2,-0x4 020b e5fe | | Load 0x2,-0x2 020c e5ff | | Load 0x2,-0x1 020d 821a | | Call 0x1,0x1a 020e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 020f 0000 | | .XXX[0x1] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 00da | | Load_Top At_Offset_2 0214 e002 | | Load 0x0,0x2 0215 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0216 680e |h | Jump_Zero 0x225 0217 e5fd | | Load 0x2,-0x3 0218 00ea | | Load_Encached Null_String_Cache 0219 e5fe | | Load 0x2,-0x2 021a 0092 04df | | Action Push_String_Extended,0x4df ; "specified for subsystem" 021c e5ff | | Load 0x2,-0x1 021d 0092 04e0 | | Action Push_String_Extended,0x4e0 ; "Duplicate spec view" 021f e013 | | Load 0x0,0x13 0220 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0221 e014 | | Load 0x0,0x14 0222 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0223 00d1 | | Pop_Control Pop_Count_1 0224 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0225 e5fd | | Load 0x2,-0x3 0226 00ea | | Load_Encached Null_String_Cache 0227 e5fe | | Load 0x2,-0x2 0228 0092 04df | | Action Push_String_Extended,0x4df ; "specified for subsystem" 022a e5ff | | Load 0x2,-0x1 022b 0092 04e1 | | Action Push_String_Extended,0x4e1 ; "Duplicate load view" 022d e013 | | Load 0x0,0x13 022e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 022f e014 | | Load 0x0,0x14 0230 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0231 00d1 | | Pop_Control Pop_Count_1 0232 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0233 0000 0000 | | .BLANK 0000[0x5] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023b | ; | .CONST 0x023b ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0001 | | .CONST 0x0001 ; Number of locals 023b BODY_0238: 023b INIT_0238: 023b 00da | | Load_Top At_Offset_2 023c e002 | | Load 0x0,0x2 023d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 023e 680b |h | Jump_Zero 0x24a 023f 00db | | Load_Top At_Offset_3 0240 00db | | Load_Top At_Offset_3 0241 0092 04e2 | | Action Push_String_Extended,0x4e2 ; "No corresponding load view found for" 0243 e013 | | Load 0x0,0x13 0244 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0245 e5ff | | Load 0x2,-0x1 0246 e014 | | Load 0x0,0x14 0247 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0248 00d1 | | Pop_Control Pop_Count_1 0249 4502 |E | Exit_Suprogram New_Top_Offset 0x2 024a 00db | | Load_Top At_Offset_3 024b 00db | | Load_Top At_Offset_3 024c 0092 04e3 | | Action Push_String_Extended,0x4e3 ; "No corresponding spec view found for" 024e e013 | | Load 0x0,0x13 024f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0250 e5ff | | Load 0x2,-0x1 0251 e014 | | Load 0x0,0x14 0252 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0253 00d1 | | Pop_Control Pop_Count_1 0254 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0255 0000 0000 | | .XXX[0x3] 0257 0000 | | 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b e5fd | | Load 0x2,-0x3 025c 00ea | | Load_Encached Null_String_Cache 025d e5fe | | Load 0x2,-0x2 025e 0092 04e4 | | Action Push_String_Extended,0x4e4 ; "in view" 0260 e5ff | | Load 0x2,-0x1 0261 0092 04e5 | | Action Push_String_Extended,0x4e5 ; "No corresponding unit found for" 0263 e013 | | Load 0x0,0x13 0264 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0265 e5ff | | Load 0x2,-0x1 0266 e014 | | Load 0x0,0x14 0267 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0268 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0269 0000 0000 | | .BLANK 0000[0x7] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0282 | | .CONST 0x0282 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0006 | | .CONST 0x0006 ; Number of locals 0273 INIT_0270: 0273 0092 04e6 | | Action Push_String_Extended,0x4e6 ; "Code_Database" 0275 e001 | | Load 0x0,0x1 0276 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0277 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0278 e001 | | Load 0x0,0x1 0279 1b0d | | Execute Package,Field_Read,Field_Number 0xd 027a e001 | | Load 0x0,0x1 027b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 027c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 027d e001 | | Load 0x0,0x1 027e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 027f 02ff | | Declare_Variable Variant_Record 0280 00d8 | | Load_Top At_Offset_0 0281 1c00 | | Execute_Immediate Run_Utility,0x0 0282 BODY_0270: 0282 e018 | | Load 0x0,0x18 0283 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 0284 e019 | | Load 0x0,0x19 0285 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0286 e5fe | | Load 0x2,-0x2 0287 016d | m | Execute Variant_Record,Structure_Write 0288 4800 |H | Short_Literal 0x0 0289 a5fd | | Store_Unchecked 0x2,-0x3 028a e001 | | Load 0x0,0x1 028b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 028c e001 | | Load 0x0,0x1 028d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 028e 1b11 | | Execute Package,Field_Read,Field_Number 0x11 028f 605c |`\ | Indirect_Literal Discrete,0x2ec,{0x00000000, 0x00004000} 0290 e5fc | | Load 0x2,-0x4 0291 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0292 4800 |H | Short_Literal 0x0 0293 e5ff | | Load 0x2,-0x1 0294 e001 | | Load 0x0,0x1 0295 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0296 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0297 c403 | | Store 0x2,0x3 0298 005b | [ | Store_Top Discrete,At_Offset_3 0299 00da | | Load_Top At_Offset_2 029a e002 | | Load 0x0,0x2 029b 180e | | Execute Package,Field_Execute,Field_Number 0xe 029c 700a |p | Jump_Nonzero 0x2a7 029d e5fc | | Load 0x2,-0x4 029e 00db | | Load_Top At_Offset_3 029f e5ff | | Load 0x2,-0x1 02a0 0092 04dc | | Action Push_String_Extended,0x4dc ; "Could not establish naming context for" 02a2 e013 | | Load 0x0,0x13 02a3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02a4 e014 | | Load 0x0,0x14 02a5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02a6 00d1 | | Pop_Control Pop_Count_1 02a7 e001 | | Load 0x0,0x1 02a8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 02a9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02aa 00d9 | | Load_Top At_Offset_1 02ab 6040 |`@ | Indirect_Literal Discrete,0x2ec,{0x00000000, 0x00004000} 02ac e5fc | | Load 0x2,-0x4 02ad 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02ae 4800 |H | Short_Literal 0x0 02af e403 | | Load 0x2,0x3 02b0 e402 | | Load 0x2,0x2 02b1 e001 | | Load 0x0,0x1 02b2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 02b3 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 02b4 00d1 | | Pop_Control Pop_Count_1 02b5 005a | Z | Store_Top Discrete,At_Offset_2 02b6 00d9 | | Load_Top At_Offset_1 02b7 460e |F | Jump_Case 0xf 02b8 782a |x* | Jump 0x2e3 ; case 0x0 02b9 780d |x | Jump 0x2c7 ; case 0x1 02ba 780c |x | Jump 0x2c7 ; case 0x2 02bb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x3 02bc 780a |x | Jump 0x2c7 ; case 0x4 02bd 7809 |x | Jump 0x2c7 ; case 0x5 02be 7808 |x | Jump 0x2c7 ; case 0x6 02bf 7807 |x | Jump 0x2c7 ; case 0x7 02c0 7806 |x | Jump 0x2c7 ; case 0x8 02c1 7805 |x | Jump 0x2c7 ; case 0x9 02c2 7804 |x | Jump 0x2c7 ; case 0xa 02c3 7803 |x | Jump 0x2c7 ; case 0xb 02c4 7802 |x | Jump 0x2c7 ; case 0xc 02c5 7801 |x | Jump 0x2c7 ; case 0xd 02c6 7800 |x | Jump 0x2c7 ; case 0xe 02c7 e5fc | | Load 0x2,-0x4 02c8 0092 04e7 | | Action Push_String_Extended,0x4e7 ; " because " 02ca 6021 |`! | Indirect_Literal Discrete,0x2ec,{0x00000000, 0x00004000} 02cb e5fc | | Load 0x2,-0x4 02cc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02cd e015 | | Load 0x0,0x15 02ce 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02cf e016 | | Load 0x0,0x16 02d0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02d1 4801 |H | Short_Literal 0x1 02d2 4800 |H | Short_Literal 0x0 02d3 e403 | | Load 0x2,0x3 02d4 e402 | | Load 0x2,0x2 02d5 e405 | | Load 0x2,0x5 02d6 e001 | | Load 0x0,0x1 02d7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 02d8 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 02d9 01cc | | Execute Vector,Catenate 02da e5ff | | Load 0x2,-0x1 02db 0092 04e8 | | Action Push_String_Extended,0x4e8 ; "Could not get code database for" 02dd e013 | | Load 0x0,0x13 02de 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02df e014 | | Load 0x0,0x14 02e0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02e1 00d1 | | Pop_Control Pop_Count_1 02e2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02e3 00d8 | | Load_Top At_Offset_0 02e4 e018 | | Load 0x0,0x18 02e5 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 02e6 0162 | b | Execute Variant_Record,Check_In_Type 02e7 e5fe | | Load 0x2,-0x2 02e8 016d | m | Execute Variant_Record,Structure_Write 02e9 4801 |H | Short_Literal 0x1 02ea a5fd | | Store_Unchecked 0x2,-0x3 02eb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02ec 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f7 | | .CONST 0x02f7 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0003 | | .CONST 0x0003 ; Number of locals 02f3 INIT_02f0: 02f3 029f 045b | [| Declare_Subprogram INIT_0458,For_Call 02f5 029f 0473 | s| Declare_Subprogram INIT_0470,For_Call 02f7 BODY_02f0: 02f7 8402 | | Call 0x2,0x2 02f8 8403 | | Call 0x2,0x3 02f9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02fa 0000 0000 | | .BLANK 0000[0x6] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0309 | | .CONST 0x0309 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0004 | | .CONST 0x0004 ; Number of locals 0303 INIT_0300: 0303 029f 048b | | Declare_Subprogram INIT_0488,For_Call 0305 029f 04a3 | | Declare_Subprogram INIT_04a0,For_Call 0307 029f 04bb | | Declare_Subprogram INIT_04b8,For_Call 0309 BODY_0300: 0309 8402 | | Call 0x2,0x2 030a 8403 | | Call 0x2,0x3 030b 8404 | | Call 0x2,0x4 030c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 030d 0000 0000 | | .XXX[0x3] 030f 0000 | | 0310 ; -------------------------------------------------------------------------------------- 0310 ; SUBPROGRAM 0310 ; -------------------------------------------------------------------------------------- 0310 0313 | | .CONST 0x0313 ; Address of begin 0311 0004 | | .CONST 0x0004 ; Address of exception handler 0312 0001 | | .CONST 0x0001 ; Number of locals 0313 BODY_0310: 0313 INIT_0310: 0313 00db | | Load_Top At_Offset_3 0314 e001 | | Load 0x0,0x1 0315 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0316 7005 |p | Jump_Nonzero 0x31c 0317 e5fc | | Load 0x2,-0x4 0318 00db | | Load_Top At_Offset_3 0319 e5fe | | Load 0x2,-0x2 031a 821c | | Call 0x1,0x1c 031b 00d1 | | Pop_Control Pop_Count_1 031c e5fd | | Load 0x2,-0x3 031d e001 | | Load 0x0,0x1 031e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 031f 7005 |p | Jump_Nonzero 0x325 0320 e5fc | | Load 0x2,-0x4 0321 00db | | Load_Top At_Offset_3 0322 e5fd | | Load 0x2,-0x3 0323 821d | | Call 0x1,0x1d 0324 00d1 | | Pop_Control Pop_Count_1 0325 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0326 0000 0000 | | .XXX[0x2] 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 032b | + | .CONST 0x032b ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0001 | | .CONST 0x0001 ; Number of locals 032b BODY_0328: 032b INIT_0328: 032b 00db | | Load_Top At_Offset_3 032c e001 | | Load 0x0,0x1 032d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 032e 7005 |p | Jump_Nonzero 0x334 032f e5fc | | Load 0x2,-0x4 0330 00db | | Load_Top At_Offset_3 0331 e5fe | | Load 0x2,-0x2 0332 821c | | Call 0x1,0x1c 0333 00d1 | | Pop_Control Pop_Count_1 0334 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0335 0000 0000 | | .XXX[0x3] 0337 0000 | | 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033b | ; | .CONST 0x033b ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0001 | | .CONST 0x0001 ; Number of locals 033b BODY_0338: 033b INIT_0338: 033b e5fd | | Load 0x2,-0x3 033c e001 | | Load 0x0,0x1 033d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 033e 7005 |p | Jump_Nonzero 0x344 033f e5fc | | Load 0x2,-0x4 0340 00db | | Load_Top At_Offset_3 0341 e5fd | | Load 0x2,-0x3 0342 821d | | Call 0x1,0x1d 0343 00d1 | | Pop_Control Pop_Count_1 0344 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0345 0000 0000 | | .XXX[0x3] 0347 0000 | | 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 0355 | U | .CONST 0x0355 ; Address of begin 0349 03a8 | | .CONST 0x03a8 ; Address of exception handler 034a 0003 | | .CONST 0x0003 ; Number of locals 034b INIT_0348: 034b e001 | | Load 0x0,0x1 034c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 034d 02c7 | | Declare_Variable Any 034e 00d8 | | Load_Top At_Offset_0 034f 1c00 | | Execute_Immediate Run_Utility,0x0 0350 e001 | | Load 0x0,0x1 0351 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0352 02c7 | | Declare_Variable Any 0353 00d8 | | Load_Top At_Offset_0 0354 1c00 | | Execute_Immediate Run_Utility,0x0 0355 BODY_0348: 0355 e5ff | | Load 0x2,-0x1 0356 e002 | | Load 0x0,0x2 0357 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0358 6820 |h | Jump_Zero 0x379 0359 e5fe | | Load 0x2,-0x2 035a 00da | | Load_Top At_Offset_2 035b 0120 | | Execute Any,Is_Value 035c 6803 |h | Jump_Zero 0x360 035d e001 | | Load 0x0,0x1 035e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 035f 7801 |x | Jump 0x361 0360 00da | | Load_Top At_Offset_2 0361 e5ff | | Load 0x2,-0x1 0362 e002 | | Load 0x0,0x2 0363 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0364 c402 | | Store 0x2,0x2 0365 00d1 | | Pop_Control Pop_Count_1 0366 e5fe | | Load 0x2,-0x2 0367 00d9 | | Load_Top At_Offset_1 0368 0120 | | Execute Any,Is_Value 0369 6803 |h | Jump_Zero 0x36d 036a e001 | | Load 0x0,0x1 036b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 036c 7801 |x | Jump 0x36e 036d 00d9 | | Load_Top At_Offset_1 036e 00db | | Load_Top At_Offset_3 036f e002 | | Load 0x0,0x2 0370 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0371 c403 | | Store 0x2,0x3 0372 00d1 | | Pop_Control Pop_Count_1 0373 e5fe | | Load 0x2,-0x2 0374 00d9 | | Load_Top At_Offset_1 0375 00db | | Load_Top At_Offset_3 0376 821c | | Call 0x1,0x1c 0377 00d1 | | Pop_Control Pop_Count_1 0378 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0379 e5ff | | Load 0x2,-0x1 037a e002 | | Load 0x0,0x2 037b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 037c 6815 |h | Jump_Zero 0x392 037d e5ff | | Load 0x2,-0x1 037e c402 | | Store 0x2,0x2 037f e5fe | | Load 0x2,-0x2 0380 00d9 | | Load_Top At_Offset_1 0381 0120 | | Execute Any,Is_Value 0382 6803 |h | Jump_Zero 0x386 0383 e001 | | Load 0x0,0x1 0384 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0385 7801 |x | Jump 0x387 0386 00d9 | | Load_Top At_Offset_1 0387 e5ff | | Load 0x2,-0x1 0388 e002 | | Load 0x0,0x2 0389 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 038a c403 | | Store 0x2,0x3 038b 00d1 | | Pop_Control Pop_Count_1 038c e5fe | | Load 0x2,-0x2 038d 00d9 | | Load_Top At_Offset_1 038e 00db | | Load_Top At_Offset_3 038f 821c | | Call 0x1,0x1c 0390 00d1 | | Pop_Control Pop_Count_1 0391 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0392 e5ff | | Load 0x2,-0x1 0393 e002 | | Load 0x0,0x2 0394 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0395 6808 |h | Jump_Zero 0x39e 0396 e5fe | | Load 0x2,-0x2 0397 e5ff | | Load 0x2,-0x1 0398 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0399 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 039a e002 | | Load 0x0,0x2 039b 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 039c 00d1 | | Pop_Control Pop_Count_1 039d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 039e e5fe | | Load 0x2,-0x2 039f 0092 04e9 | | Action Push_String_Extended,0x4e9 ; "is not an ada unit, view or activity" 03a1 e5ff | | Load 0x2,-0x1 03a2 e013 | | Load 0x0,0x13 03a3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03a4 e014 | | Load 0x0,0x14 03a5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03a6 00d1 | | Pop_Control Pop_Count_1 03a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03a8 TRAP_0348: 03a8 e00b | | Load 0x0,0xb 03a9 010f | | Execute Exception,Equal 03aa 6801 |h | Jump_Zero 0x3ac 03ab 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03ac 0100 | | Execute Exception,Raise 03ad 0000 0000 | | .XXX[0x3] 03af 0000 | | 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03bd | | .CONST 0x03bd ; Address of begin 03b1 0410 | | .CONST 0x0410 ; Address of exception handler 03b2 0003 | | .CONST 0x0003 ; Number of locals 03b3 INIT_03b0: 03b3 e001 | | Load 0x0,0x1 03b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03b5 02c7 | | Declare_Variable Any 03b6 00d8 | | Load_Top At_Offset_0 03b7 1c00 | | Execute_Immediate Run_Utility,0x0 03b8 e001 | | Load 0x0,0x1 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 BODY_03b0: 03bd e5ff | | Load 0x2,-0x1 03be e002 | | Load 0x0,0x2 03bf 1812 | | Execute Package,Field_Execute,Field_Number 0x12 03c0 6820 |h | Jump_Zero 0x3e1 03c1 e5fe | | Load 0x2,-0x2 03c2 00da | | Load_Top At_Offset_2 03c3 0120 | | Execute Any,Is_Value 03c4 6803 |h | Jump_Zero 0x3c8 03c5 e001 | | Load 0x0,0x1 03c6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03c7 7801 |x | Jump 0x3c9 03c8 00da | | Load_Top At_Offset_2 03c9 e5ff | | Load 0x2,-0x1 03ca e002 | | Load 0x0,0x2 03cb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 03cc c402 | | Store 0x2,0x2 03cd 00d1 | | Pop_Control Pop_Count_1 03ce e5fe | | Load 0x2,-0x2 03cf 00d9 | | Load_Top At_Offset_1 03d0 0120 | | Execute Any,Is_Value 03d1 6803 |h | Jump_Zero 0x3d5 03d2 e001 | | Load 0x0,0x1 03d3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03d4 7801 |x | Jump 0x3d6 03d5 00d9 | | Load_Top At_Offset_1 03d6 00db | | Load_Top At_Offset_3 03d7 e002 | | Load 0x0,0x2 03d8 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 03d9 c403 | | Store 0x2,0x3 03da 00d1 | | Pop_Control Pop_Count_1 03db e5fe | | Load 0x2,-0x2 03dc 00d9 | | Load_Top At_Offset_1 03dd 00db | | Load_Top At_Offset_3 03de 821d | | Call 0x1,0x1d 03df 00d1 | | Pop_Control Pop_Count_1 03e0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03e1 e5ff | | Load 0x2,-0x1 03e2 e002 | | Load 0x0,0x2 03e3 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03e4 6815 |h | Jump_Zero 0x3fa 03e5 e5ff | | Load 0x2,-0x1 03e6 c402 | | Store 0x2,0x2 03e7 e5fe | | Load 0x2,-0x2 03e8 00d9 | | Load_Top At_Offset_1 03e9 0120 | | Execute Any,Is_Value 03ea 6803 |h | Jump_Zero 0x3ee 03eb e001 | | Load 0x0,0x1 03ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03ed 7801 |x | Jump 0x3ef 03ee 00d9 | | Load_Top At_Offset_1 03ef e5ff | | Load 0x2,-0x1 03f0 e002 | | Load 0x0,0x2 03f1 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 03f2 c403 | | Store 0x2,0x3 03f3 00d1 | | Pop_Control Pop_Count_1 03f4 e5fe | | Load 0x2,-0x2 03f5 00d9 | | Load_Top At_Offset_1 03f6 00db | | Load_Top At_Offset_3 03f7 821d | | Call 0x1,0x1d 03f8 00d1 | | Pop_Control Pop_Count_1 03f9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03fa e5ff | | Load 0x2,-0x1 03fb e002 | | Load 0x0,0x2 03fc 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03fd 6808 |h | Jump_Zero 0x406 03fe e5fe | | Load 0x2,-0x2 03ff e5ff | | Load 0x2,-0x1 0400 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0401 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0402 e002 | | Load 0x0,0x2 0403 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0404 00d1 | | Pop_Control Pop_Count_1 0405 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0406 e5fe | | Load 0x2,-0x2 0407 0092 04e9 | | Action Push_String_Extended,0x4e9 ; "is not an ada unit, view or activity" 0409 e5ff | | Load 0x2,-0x1 040a e013 | | Load 0x0,0x13 040b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 040c e014 | | Load 0x0,0x14 040d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 040e 00d1 | | Pop_Control Pop_Count_1 040f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0410 TRAP_03b0: 0410 e00b | | Load 0x0,0xb 0411 010f | | Execute Exception,Equal 0412 6801 |h | Jump_Zero 0x414 0413 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0414 0100 | | Execute Exception,Raise 0415 0000 0000 | | .XXX[0x3] 0417 0000 | | 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 041b | | .CONST 0x041b ; Address of begin 0419 0422 | " | .CONST 0x0422 ; Address of exception handler 041a 0001 | | .CONST 0x0001 ; Number of locals 041b BODY_0418: 041b INIT_0418: 041b 00db | | Load_Top At_Offset_3 041c e5fc | | Load 0x2,-0x4 041d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 041e e012 | | Load 0x0,0x12 041f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0420 c5fd | | Store 0x2,-0x3 0421 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0422 TRAP_0418: 0422 e012 | | Load 0x0,0x12 0423 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0424 010f | | Execute Exception,Equal 0425 6804 |h | Jump_Zero 0x42a 0426 e5fc | | Load 0x2,-0x4 0427 e5ff | | Load 0x2,-0x1 0428 8219 | | Call 0x1,0x19 0429 4503 |E | Exit_Suprogram New_Top_Offset 0x3 042a 0100 | | Execute Exception,Raise 042b 0000 0000 | | .BLANK 0000[0x5] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0433 | 3 | .CONST 0x0433 ; Address of begin 0431 043a | : | .CONST 0x043a ; Address of exception handler 0432 0001 | | .CONST 0x0001 ; Number of locals 0433 BODY_0430: 0433 INIT_0430: 0433 00db | | Load_Top At_Offset_3 0434 e5fc | | Load 0x2,-0x4 0435 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0436 e012 | | Load 0x0,0x12 0437 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0438 c5fd | | Store 0x2,-0x3 0439 4503 |E | Exit_Suprogram New_Top_Offset 0x3 043a TRAP_0430: 043a e012 | | Load 0x0,0x12 043b 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 043c 010f | | Execute Exception,Equal 043d 6804 |h | Jump_Zero 0x442 043e e5fc | | Load 0x2,-0x4 043f e5ff | | Load 0x2,-0x1 0440 8219 | | Call 0x1,0x19 0441 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0442 0100 | | Execute Exception,Raise 0443 0000 0000 | | .BLANK 0000[0x5] 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044b | K | .CONST 0x044b ; Address of begin 0449 0004 | | .CONST 0x0004 ; Address of exception handler 044a 0001 | | .CONST 0x0001 ; Number of locals 044b BODY_0448: 044b INIT_0448: 044b 00db | | Load_Top At_Offset_3 044c 00db | | Load_Top At_Offset_3 044d e001 | | Load 0x0,0x1 044e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 044f 0119 | | Execute Any,Check_In_Formal_Type 0450 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0451 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0452 e002 | | Load 0x0,0x2 0453 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0454 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0455 0000 0000 | | .XXX[0x3] 0457 0000 | | 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045b | [ | .CONST 0x045b ; Address of begin 0459 0463 | c | .CONST 0x0463 ; Address of exception handler 045a 0001 | | .CONST 0x0001 ; Number of locals 045b BODY_0458: 045b INIT_0458: 045b 4801 |H | Short_Literal 0x1 045c e5fe | | Load 0x2,-0x2 045d e5ff | | Load 0x2,-0x1 045e e5fd | | Load 0x2,-0x3 045f 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0460 e012 | | Load 0x0,0x12 0461 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0462 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0463 TRAP_0458: 0463 e012 | | Load 0x0,0x12 0464 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0465 010f | | Execute Exception,Equal 0466 6802 |h | Jump_Zero 0x469 0467 00cc | | Action Pop_Block 0468 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0469 0100 | | Execute Exception,Raise 046a 0000 0000 | | .BLANK 0000[0x6] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0473 | s | .CONST 0x0473 ; Address of begin 0471 047b | { | .CONST 0x047b ; Address of exception handler 0472 0001 | | .CONST 0x0001 ; Number of locals 0473 BODY_0470: 0473 INIT_0470: 0473 4801 |H | Short_Literal 0x1 0474 e5ff | | Load 0x2,-0x1 0475 e5fe | | Load 0x2,-0x2 0476 e5fd | | Load 0x2,-0x3 0477 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0478 e012 | | Load 0x0,0x12 0479 1818 | | Execute Package,Field_Execute,Field_Number 0x18 047a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 047b TRAP_0470: 047b e012 | | Load 0x0,0x12 047c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 047d 010f | | Execute Exception,Equal 047e 6805 |h | Jump_Zero 0x484 047f e5fd | | Load 0x2,-0x3 0480 e5fe | | Load 0x2,-0x2 0481 e5ff | | Load 0x2,-0x1 0482 8218 | | Call 0x1,0x18 0483 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0484 0100 | | Execute Exception,Raise 0485 0000 0000 | | .XXX[0x3] 0487 0000 | | 0488 ; -------------------------------------------------------------------------------------- 0488 ; SUBPROGRAM 0488 ; -------------------------------------------------------------------------------------- 0488 048b | | .CONST 0x048b ; Address of begin 0489 0493 | | .CONST 0x0493 ; Address of exception handler 048a 0001 | | .CONST 0x0001 ; Number of locals 048b BODY_0488: 048b INIT_0488: 048b 4801 |H | Short_Literal 0x1 048c e5fe | | Load 0x2,-0x2 048d e5ff | | Load 0x2,-0x1 048e e5fd | | Load 0x2,-0x3 048f 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0490 e012 | | Load 0x0,0x12 0491 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0492 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0493 TRAP_0488: 0493 e012 | | Load 0x0,0x12 0494 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0495 010f | | Execute Exception,Equal 0496 6802 |h | Jump_Zero 0x499 0497 00cc | | Action Pop_Block 0498 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0499 0100 | | Execute Exception,Raise 049a 0000 0000 | | .BLANK 0000[0x6] 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a3 | | .CONST 0x04a3 ; Address of begin 04a1 04ab | | .CONST 0x04ab ; Address of exception handler 04a2 0001 | | .CONST 0x0001 ; Number of locals 04a3 BODY_04a0: 04a3 INIT_04a0: 04a3 4801 |H | Short_Literal 0x1 04a4 e5ff | | Load 0x2,-0x1 04a5 e5fe | | Load 0x2,-0x2 04a6 e5fd | | Load 0x2,-0x3 04a7 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 04a8 e012 | | Load 0x0,0x12 04a9 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04aa 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04ab TRAP_04a0: 04ab e012 | | Load 0x0,0x12 04ac 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 04ad 010f | | Execute Exception,Equal 04ae 6801 |h | Jump_Zero 0x4b0 04af 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04b0 0100 | | Execute Exception,Raise 04b1 0000 0000 | | .BLANK 0000[0x7] 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04c1 | | .CONST 0x04c1 ; Address of begin 04b9 04d3 | | .CONST 0x04d3 ; Address of exception handler 04ba 0003 | | .CONST 0x0003 ; Number of locals 04bb INIT_04b8: 04bb e018 | | Load 0x0,0x18 04bc 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 04bd 02ff | | Declare_Variable Variant_Record 04be 00d8 | | Load_Top At_Offset_0 04bf 1c00 | | Execute_Immediate Run_Utility,0x0 04c0 00e1 | | Load_Encached Boolean_Cache 04c1 BODY_04b8: 04c1 e5fd | | Load 0x2,-0x3 04c2 00e1 | | Load_Encached Boolean_Cache 04c3 00db | | Load_Top At_Offset_3 04c4 e5ff | | Load 0x2,-0x1 04c5 821b | | Call 0x1,0x1b 04c6 00d1 | | Pop_Control Pop_Count_1 04c7 005a | Z | Store_Top Discrete,At_Offset_2 04c8 00d1 | | Pop_Control Pop_Count_1 04c9 00d8 | | Load_Top At_Offset_0 04ca 6807 |h | Jump_Zero 0x4d2 04cb 4801 |H | Short_Literal 0x1 04cc 00da | | Load_Top At_Offset_2 04cd e5ff | | Load 0x2,-0x1 04ce e5fd | | Load 0x2,-0x3 04cf 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 04d0 e010 | | Load 0x0,0x10 04d1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04d2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04d3 TRAP_04b8: 04d3 e012 | | Load 0x0,0x12 04d4 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 04d5 010f | | Execute Exception,Equal 04d6 6801 |h | Jump_Zero 0x4d8 04d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04d8 0100 | | Execute Exception,Raise 04d9 ; -------------------------------------------------------------------------------------- 04d9 ; STRING TABLE 04d9 ; -------------------------------------------------------------------------------------- 04d9 0024 | $ | .STRTAB 0x0024->0x04eb ; "Cant find" 04da 002b | + | .STRTAB 0x002b->0x04ef ; "Could not get enclosing subsystem for" 04db 004e | N | .STRTAB 0x004e->0x0502 ; "'L(INTERNAL)." 04dc 0059 | Y | .STRTAB 0x0059->0x0508 ; "Could not establish naming context for" 04dd 007d | } | .STRTAB 0x007d->0x051b ; "because " 04de 0083 | | .STRTAB 0x0083->0x051f ; "Could not find corresponding unit for" 04df 00a6 | | .STRTAB 0x00a6->0x0532 ; "specified for subsystem" 04e0 00bb | | .STRTAB 0x00bb->0x053d ; "Duplicate spec view" 04e1 00cc | | .STRTAB 0x00cc->0x0547 ; "Duplicate load view" 04e2 00dd | | .STRTAB 0x00dd->0x0550 ; "No corresponding load view found for" 04e3 00ff | | .STRTAB 0x00ff->0x0562 ; "No corresponding spec view found for" 04e4 0121 | ! | .STRTAB 0x0121->0x0574 ; "in view" 04e5 0126 | & | .STRTAB 0x0126->0x0578 ; "No corresponding unit found for" 04e6 0143 | C | .STRTAB 0x0143->0x0587 ; "Code_Database" 04e7 014e | N | .STRTAB 0x014e->0x058e ; " because " 04e8 0155 | U | .STRTAB 0x0155->0x0592 ; "Could not get code database for" 04e9 0172 | r | .STRTAB 0x0172->0x05a2 ; "is not an ada unit, view or activity" 04ea 0194 | | .STREND 0x0194->0x05b4 04eb 4361 6e74 |Cant| .STRTAB_STRINGS 05b4 0000 0000 | | .BLANK 0000[0x4] 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; Debug Table 05b8 ; -------------------------------------------------------------------------------------- 05b8 0004 0012 | | .DEBUG4 0x0004,0x0012,0xa50b,0x0000,0x0001,0x0000 05be 1906 4190 | A | .XXX[0x42] 05c0 6419 0641 |d A| 05c2 9064 1906 | d | 05c4 4190 6419 |A d | 05c6 0641 9064 | A d| 05c8 1906 4190 | A | 05ca 6419 0641 |d A| 05cc 9064 1906 | d | 05ce 4190 6419 |A d | 05d0 0641 9064 | A d| 05d2 1906 4190 | A | 05d4 6419 0641 |d A| 05d6 9064 1906 | d | 05d8 4190 6419 |A d | 05da 0641 9064 | A d| 05dc 1906 4190 | A | 05de 6419 0641 |d A| 05e0 9064 1906 | d | 05e2 4190 6419 |A d | 05e4 0641 9064 | A d| 05e6 1906 4190 | A | 05e8 6419 0641 |d A| 05ea 9064 1906 | d | 05ec 4190 6419 |A d | 05ee 0641 9064 | A d| 05f0 1906 4190 | A | 05f2 6419 0641 |d A| 05f4 9064 1906 | d | 05f6 4190 6419 |A d | 05f8 0641 9064 | A d| 05fa 1906 4190 | A | 05fc 6419 0641 |d A| 05fe 9064 1906 | d |