|
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_779ce4
└─⟦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 0340 | @ | .CONST 0x0340 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0091 | | .CONST 0x0091 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0029 | ) | .CONST 0x0029 ; Number of locals 000b INIT_0008: 000b 4802 |H | Short_Literal 0x2 000c 0092 0318 | | Action Push_String_Extended,0x318 ; "Lock Error" 000e e002 | | Load 0x0,0x2 000f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0010 e002 | | Load 0x0,0x2 0011 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0012 011e | | Execute Any,Convert 0013 0129 | ) | Execute Any,Make_Visible 0014 4802 |H | Short_Literal 0x2 0015 0092 0319 | | Action Push_String_Extended,0x319 ; "Name Error" 0017 e002 | | Load 0x0,0x2 0018 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0019 e002 | | Load 0x0,0x2 001a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001b 011e | | Execute Any,Convert 001c 0129 | ) | Execute Any,Make_Visible 001d 4802 |H | Short_Literal 0x2 001e 0092 031a | | Action Push_String_Extended,0x31a ; "Mode Error" 0020 e002 | | Load 0x0,0x2 0021 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0022 e002 | | Load 0x0,0x2 0023 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0024 011e | | Execute Any,Convert 0025 0129 | ) | Execute Any,Make_Visible 0026 4802 |H | Short_Literal 0x2 0027 0092 031b | | Action Push_String_Extended,0x31b ; "Status Error" 0029 e002 | | Load 0x0,0x2 002a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 002b e002 | | Load 0x0,0x2 002c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002d 011e | | Execute Any,Convert 002e 0129 | ) | Execute Any,Make_Visible 002f 4801 |H | Short_Literal 0x1 0030 0092 031c | | Action Push_String_Extended,0x31c ; "End Of List" 0032 e002 | | Load 0x0,0x2 0033 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0034 e002 | | Load 0x0,0x2 0035 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0036 011e | | Execute Any,Convert 0037 0129 | ) | Execute Any,Make_Visible 0038 4800 |H | Short_Literal 0x0 0039 00ea | | Load_Encached Null_String_Cache 003a e002 | | Load 0x0,0x2 003b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 003c e002 | | Load 0x0,0x2 003d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003e 011e | | Execute Any,Convert 003f 0129 | ) | Execute Any,Make_Visible 0040 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 0042 4800 |H | Short_Literal 0x0 0043 4801 |H | Short_Literal 0x1 0044 029f 00a3 | | Declare_Subprogram INIT_00a0,For_Call 0046 03fe | | Declare_Type Discrete,Defined,Visible 0047 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 0049 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 004b 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated 004d 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 004f 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0051 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 0053 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated 0055 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated 0057 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated 0059 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated 005b 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated 005d 4803 |H | Short_Literal 0x3 005e 032b | + | Declare_Type Record,Incomplete,Visible 005f 00d8 | | Load_Top At_Offset_0 0060 02a0 | | Declare_Subprogram Null_Subprogram 0061 4818 |H | Short_Literal 0x18 0062 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0063 00bf | | Action Accept_Activation 0064 4be8 |K | Short_Literal 0x3e8 0065 e003 | | Load 0x0,0x3 0066 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0067 1c07 | | Execute_Immediate Run_Utility,0x7 0068 e002 | | Load 0x0,0x2 0069 1b0f | | Execute Package,Field_Read,Field_Number 0xf 006a 00d9 | | Load_Top At_Offset_1 006b e004 | | Load 0x0,0x4 006c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006d 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call 006f e224 | $ | Load 0x1,0x24 0070 0326 | & | Complete_Type Record,By_Defining 0071 00d9 | | Load_Top At_Offset_1 0072 03c4 | | Complete_Type Access,By_Component_Completion 0073 029d 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call 0075 029d 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call 0077 029d 030b | | Declare_Subprogram INIT_0308,For_Outer_Call 0079 1d17 | | Execute_Immediate Reference_Lex_1,0x17 007a 00c7 | | Action Elaborate_Subprogram 007b 1d19 | | Execute_Immediate Reference_Lex_1,0x19 007c 00c7 | | Action Elaborate_Subprogram 007d 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 007e 00c7 | | Action Elaborate_Subprogram 007f 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0080 00c7 | | Action Elaborate_Subprogram 0081 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0082 00c7 | | Action Elaborate_Subprogram 0083 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0084 00c7 | | Action Elaborate_Subprogram 0085 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0086 00c7 | | Action Elaborate_Subprogram 0087 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0088 00c7 | | Action Elaborate_Subprogram 0089 1d20 | | Execute_Immediate Reference_Lex_1,0x20 008a 00c7 | | Action Elaborate_Subprogram 008b 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 008c 00c7 | | Action Elaborate_Subprogram 008d 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 008e 00c7 | | Action Elaborate_Subprogram 008f 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0090 00c7 | | Action Elaborate_Subprogram 0091 BODY_0008: 0091 00bc | | Action Signal_Activated 0092 00bb | | Action Signal_Completion 0093 0000 0000 | | .BLANK 0000[0x5] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b 00da | | Load_Top At_Offset_2 009c 0227 | ' | Execute Access,All_Reference 009d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 009e c5fe | | Store 0x2,-0x2 009f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 4607 |F | Jump_Case 0x8 00a4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00a5 7807 |x | Jump 0xad ; case 0x1 00a6 780a |x | Jump 0xb1 ; case 0x2 00a7 780e |x | Jump 0xb6 ; case 0x3 00a8 7811 |x | Jump 0xba ; case 0x4 00a9 7812 |x | Jump 0xbc ; case 0x5 00aa 7813 |x | Jump 0xbe ; case 0x6 00ab 7816 |x | Jump 0xc2 ; case 0x7 00ac 4302 |C | .XXX[0x1] 00ad 00da | | Load_Top At_Offset_2 00ae 0091 0316 | | Action Push_String_Extended_Indexed,0x316 ; "READ" 00b0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00b1 00db | | Load_Top At_Offset_3 00b2 00db | | Load_Top At_Offset_3 00b3 00e0 | | Load_Encached Standard_Cache 00b4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00b6 00da | | Load_Top At_Offset_2 00b7 00e0 | | Load_Encached Standard_Cache 00b8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00b9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00ba 00db | | Load_Top At_Offset_3 00bb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00bc 00db | | Load_Top At_Offset_3 00bd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00be e218 | | Load 0x1,0x18 00bf 00dc | | Load_Top At_Offset_4 00c0 0267 | g | Execute Discrete,Predecessor 00c1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00c2 e218 | | Load 0x1,0x18 00c3 00dc | | Load_Top At_Offset_4 00c4 0268 | h | Execute Discrete,Successor 00c5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00c6 0000 0000 | | .XXX[0x2] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 00f2 | | .CONST 0x00f2 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb e5fd | | Load 0x2,-0x3 00cc 7006 |p | Jump_Nonzero 0xd3 00cd e225 | % | Load 0x1,0x25 00ce 03bc | | Declare_Variable Access,By_Allocation 00cf 00d8 | | Load_Top At_Offset_0 00d0 0227 | ' | Execute Access,All_Reference 00d1 1c00 | | Execute_Immediate Run_Utility,0x0 00d2 a5fd | | Store_Unchecked 0x2,-0x3 00d3 e5fd | | Load 0x2,-0x3 00d4 0229 | ) | Execute Access,All_Read 00d5 00d8 | | Load_Top At_Offset_0 00d6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00d7 00ea | | Load_Encached Null_String_Cache 00d8 e5fe | | Load 0x2,-0x2 00d9 e5ff | | Load 0x2,-0x1 00da 8227 | ' | Call 0x1,0x27 00db e004 | | Load 0x0,0x4 00dc 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00dd 00d9 | | Load_Top At_Offset_1 00de 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 00df 00d1 | | Pop_Control Pop_Count_1 00e0 e5fd | | Load 0x2,-0x3 00e1 0229 | ) | Execute Access,All_Read 00e2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00e3 00d8 | | Load_Top At_Offset_0 00e4 e5fd | | Load 0x2,-0x3 00e5 0227 | ' | Execute Access,All_Reference 00e6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 00e7 e004 | | Load 0x0,0x4 00e8 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 00e9 e005 | | Load 0x0,0x5 00ea 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00eb e005 | | Load 0x0,0x5 00ec 180f | | Execute Package,Field_Execute,Field_Number 0xf 00ed 00d2 | | Pop_Control Pop_Count_2 00ee e5fd | | Load 0x2,-0x3 00ef 8228 | ( | Call 0x1,0x28 00f0 c5fd | | Store 0x2,-0x3 00f1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00f2 TRAP_00c8: 00f2 00d8 | | Load_Top At_Offset_0 00f3 0107 | | Execute Exception,Get_Name 00f4 4950 |IP | Short_Literal 0x150 00f5 495f |I_ | Short_Literal 0x15f 00f6 0262 | b | Execute Discrete,In_Range 00f7 6805 |h | Jump_Zero 0xfd 00f8 e5fd | | Load 0x2,-0x3 00f9 e215 | | Load 0x1,0x15 00fa 8229 | ) | Call 0x1,0x29 00fb c5fd | | Store 0x2,-0x3 00fc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00fd 00d8 | | Load_Top At_Offset_0 00fe 0107 | | Execute Exception,Get_Name 00ff 4920 |I | Short_Literal 0x120 0100 492f |I/ | Short_Literal 0x12f 0101 0262 | b | Execute Discrete,In_Range 0102 6805 |h | Jump_Zero 0x108 0103 e5fd | | Load 0x2,-0x3 0104 e212 | | Load 0x1,0x12 0105 8229 | ) | Call 0x1,0x29 0106 c5fd | | Store 0x2,-0x3 0107 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0108 00d8 | | Load_Top At_Offset_0 0109 0107 | | Execute Exception,Get_Name 010a 4930 |I0 | Short_Literal 0x130 010b 493f |I? | Short_Literal 0x13f 010c 0262 | b | Execute Discrete,In_Range 010d 6805 |h | Jump_Zero 0x113 010e e5fd | | Load 0x2,-0x3 010f e211 | | Load 0x1,0x11 0110 8229 | ) | Call 0x1,0x29 0111 c5fd | | Store 0x2,-0x3 0112 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0113 00d8 | | Load_Top At_Offset_0 0114 0107 | | Execute Exception,Get_Name 0115 4900 |I | Short_Literal 0x100 0116 490f |I | Short_Literal 0x10f 0117 0262 | b | Execute Discrete,In_Range 0118 6805 |h | Jump_Zero 0x11e 0119 e5fd | | Load 0x2,-0x3 011a e214 | | Load 0x1,0x14 011b 8229 | ) | Call 0x1,0x29 011c c5fd | | Store 0x2,-0x3 011d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 011e 0100 | | Execute Exception,Raise 011f 0000 | | .XXX[0x1] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 013b | ; | .CONST 0x013b ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 00db | | Load_Top At_Offset_3 0124 7006 |p | Jump_Nonzero 0x12b 0125 e225 | % | Load 0x1,0x25 0126 03bc | | Declare_Variable Access,By_Allocation 0127 00d8 | | Load_Top At_Offset_0 0128 0227 | ' | Execute Access,All_Reference 0129 1c00 | | Execute_Immediate Run_Utility,0x0 012a a5fe | | Store_Unchecked 0x2,-0x2 012b 00db | | Load_Top At_Offset_3 012c 0229 | ) | Execute Access,All_Read 012d 00d8 | | Load_Top At_Offset_0 012e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 012f 00ea | | Load_Encached Null_String_Cache 0130 e5ff | | Load 0x2,-0x1 0131 4801 |H | Short_Literal 0x1 0132 e004 | | Load 0x0,0x4 0133 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0134 00d9 | | Load_Top At_Offset_1 0135 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0136 00d1 | | Pop_Control Pop_Count_1 0137 00db | | Load_Top At_Offset_3 0138 8228 | ( | Call 0x1,0x28 0139 c5fe | | Store 0x2,-0x2 013a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 013b TRAP_0120: 013b 00d8 | | Load_Top At_Offset_0 013c 0107 | | Execute Exception,Get_Name 013d 4920 |I | Short_Literal 0x120 013e 492f |I/ | Short_Literal 0x12f 013f 0262 | b | Execute Discrete,In_Range 0140 6805 |h | Jump_Zero 0x146 0141 e5fe | | Load 0x2,-0x2 0142 e212 | | Load 0x1,0x12 0143 8229 | ) | Call 0x1,0x29 0144 c5fe | | Store 0x2,-0x2 0145 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0146 00d8 | | Load_Top At_Offset_0 0147 0107 | | Execute Exception,Get_Name 0148 4930 |I0 | Short_Literal 0x130 0149 493f |I? | Short_Literal 0x13f 014a 0262 | b | Execute Discrete,In_Range 014b 6805 |h | Jump_Zero 0x151 014c e5fe | | Load 0x2,-0x2 014d e211 | | Load 0x1,0x11 014e 8229 | ) | Call 0x1,0x29 014f c5fe | | Store 0x2,-0x2 0150 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0151 00d8 | | Load_Top At_Offset_0 0152 0107 | | Execute Exception,Get_Name 0153 4900 |I | Short_Literal 0x100 0154 490f |I | Short_Literal 0x10f 0155 0262 | b | Execute Discrete,In_Range 0156 6805 |h | Jump_Zero 0x15c 0157 e5fe | | Load 0x2,-0x2 0158 e214 | | Load 0x1,0x14 0159 8229 | ) | Call 0x1,0x29 015a c5fe | | Store 0x2,-0x2 015b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 015c 0100 | | Execute Exception,Raise 015d 0000 0000 | | .XXX[0x3] 015f 0000 | | 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0163 | c | .CONST 0x0163 ; Address of begin 0161 0169 | i | .CONST 0x0169 ; Address of exception handler 0162 0001 | | .CONST 0x0001 ; Number of locals 0163 BODY_0160: 0163 INIT_0160: 0163 00da | | Load_Top At_Offset_2 0164 0227 | ' | Execute Access,All_Reference 0165 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0166 e004 | | Load 0x0,0x4 0167 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0168 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0169 TRAP_0160: 0169 010e | | Execute Exception,Is_Constraint_Error 016a 7006 |p | Jump_Nonzero 0x171 016b 00d8 | | Load_Top At_Offset_0 016c 0107 | | Execute Exception,Get_Name 016d 4900 |I | Short_Literal 0x100 016e 490f |I | Short_Literal 0x10f 016f 0262 | b | Execute Discrete,In_Range 0170 6802 |h | Jump_Zero 0x173 0171 00ea | | Load_Encached Null_String_Cache 0172 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0173 0100 | | Execute Exception,Raise 0174 0000 0000 | | .BLANK 0000[0x4] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 018f | | .CONST 0x018f ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b 4802 |H | Short_Literal 0x2 017c 00db | | Load_Top At_Offset_3 017d 0227 | ' | Execute Access,All_Reference 017e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 017f e002 | | Load 0x0,0x2 0180 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0181 700c |p | Jump_Nonzero 0x18e 0182 00da | | Load_Top At_Offset_2 0183 0229 | ) | Execute Access,All_Read 0184 00d8 | | Load_Top At_Offset_0 0185 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0186 e004 | | Load 0x0,0x4 0187 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0188 00d9 | | Load_Top At_Offset_1 0189 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 018a 00d1 | | Pop_Control Pop_Count_1 018b 00da | | Load_Top At_Offset_2 018c 8228 | ( | Call 0x1,0x28 018d 003b | ; | Store_Top Access,At_Offset_3 018e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 018f TRAP_0178: 018f 00d8 | | Load_Top At_Offset_0 0190 0107 | | Execute Exception,Get_Name 0191 4930 |I0 | Short_Literal 0x130 0192 493f |I? | Short_Literal 0x13f 0193 0262 | b | Execute Discrete,In_Range 0194 6805 |h | Jump_Zero 0x19a 0195 00db | | Load_Top At_Offset_3 0196 e211 | | Load 0x1,0x11 0197 8229 | ) | Call 0x1,0x29 0198 c5ff | | Store 0x2,-0x1 0199 4501 |E | Exit_Suprogram New_Top_Offset 0x1 019a 010e | | Execute Exception,Is_Constraint_Error 019b 7006 |p | Jump_Nonzero 0x1a2 019c 00d8 | | Load_Top At_Offset_0 019d 0107 | | Execute Exception,Get_Name 019e 4900 |I | Short_Literal 0x100 019f 490f |I | Short_Literal 0x10f 01a0 0262 | b | Execute Discrete,In_Range 01a1 6805 |h | Jump_Zero 0x1a7 01a2 00db | | Load_Top At_Offset_3 01a3 e214 | | Load 0x1,0x14 01a4 8229 | ) | Call 0x1,0x29 01a5 c5ff | | Store 0x2,-0x1 01a6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01a7 0100 | | Execute Exception,Raise 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ab | | .CONST 0x01ab ; Address of begin 01a9 01c1 | | .CONST 0x01c1 ; Address of exception handler 01aa 0001 | | .CONST 0x0001 ; Number of locals 01ab BODY_01a8: 01ab INIT_01a8: 01ab 4802 |H | Short_Literal 0x2 01ac e5fe | | Load 0x2,-0x2 01ad 0227 | ' | Execute Access,All_Reference 01ae 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01af e002 | | Load 0x0,0x2 01b0 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01b1 700e |p | Jump_Nonzero 0x1c0 01b2 00db | | Load_Top At_Offset_3 01b3 0229 | ) | Execute Access,All_Read 01b4 00d8 | | Load_Top At_Offset_0 01b5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01b6 e5ff | | Load 0x2,-0x1 01b7 8227 | ' | Call 0x1,0x27 01b8 e004 | | Load 0x0,0x4 01b9 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01ba 00d9 | | Load_Top At_Offset_1 01bb 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 01bc 00d1 | | Pop_Control Pop_Count_1 01bd 00db | | Load_Top At_Offset_3 01be 8228 | ( | Call 0x1,0x28 01bf c5fe | | Store 0x2,-0x2 01c0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c1 TRAP_01a8: 01c1 00d8 | | Load_Top At_Offset_0 01c2 0107 | | Execute Exception,Get_Name 01c3 4930 |I0 | Short_Literal 0x130 01c4 493f |I? | Short_Literal 0x13f 01c5 0262 | b | Execute Discrete,In_Range 01c6 6805 |h | Jump_Zero 0x1cc 01c7 e5fe | | Load 0x2,-0x2 01c8 e211 | | Load 0x1,0x11 01c9 8229 | ) | Call 0x1,0x29 01ca c5fe | | Store 0x2,-0x2 01cb 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01cc 010e | | Execute Exception,Is_Constraint_Error 01cd 7006 |p | Jump_Nonzero 0x1d4 01ce 00d8 | | Load_Top At_Offset_0 01cf 0107 | | Execute Exception,Get_Name 01d0 4900 |I | Short_Literal 0x100 01d1 490f |I | Short_Literal 0x10f 01d2 0262 | b | Execute Discrete,In_Range 01d3 6805 |h | Jump_Zero 0x1d9 01d4 e5fe | | Load 0x2,-0x2 01d5 e214 | | Load 0x1,0x14 01d6 8229 | ) | Call 0x1,0x29 01d7 c5fe | | Store 0x2,-0x2 01d8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01d9 0100 | | Execute Exception,Raise 01da 0000 0000 | | .BLANK 0000[0x6] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01e3 | | .CONST 0x01e3 ; Address of begin 01e1 01e9 | | .CONST 0x01e9 ; Address of exception handler 01e2 0001 | | .CONST 0x0001 ; Number of locals 01e3 BODY_01e0: 01e3 INIT_01e0: 01e3 00da | | Load_Top At_Offset_2 01e4 0227 | ' | Execute Access,All_Reference 01e5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01e6 e004 | | Load 0x0,0x4 01e7 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 01e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e9 TRAP_01e0: 01e9 0007 | | Action Break_Optional 01ea 4801 |H | Short_Literal 0x1 01eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ec 0000 0000 | | .BLANK 0000[0x4] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0214 | | .CONST 0x0214 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 4801 |H | Short_Literal 0x1 01f4 00db | | Load_Top At_Offset_3 01f5 0227 | ' | Execute Access,All_Reference 01f6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01f7 e002 | | Load 0x0,0x2 01f8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01f9 7019 |p | Jump_Nonzero 0x213 01fa 00da | | Load_Top At_Offset_2 01fb 821e | | Call 0x1,0x1e 01fc 7012 |p | Jump_Nonzero 0x20f 01fd 00da | | Load_Top At_Offset_2 01fe 0229 | ) | Execute Access,All_Read 01ff 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0200 00d8 | | Load_Top At_Offset_0 0201 e5ff | | Load 0x2,-0x1 0202 0227 | ' | Execute Access,All_Reference 0203 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0204 e004 | | Load 0x0,0x4 0205 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 0206 e005 | | Load 0x0,0x5 0207 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0208 e005 | | Load 0x0,0x5 0209 180f | | Execute Package,Field_Execute,Field_Number 0xf 020a 00d2 | | Pop_Control Pop_Count_2 020b 00da | | Load_Top At_Offset_2 020c 8228 | ( | Call 0x1,0x28 020d 003b | ; | Store_Top Access,At_Offset_3 020e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 020f 00da | | Load_Top At_Offset_2 0210 e215 | | Load 0x1,0x15 0211 8229 | ) | Call 0x1,0x29 0212 003b | ; | Store_Top Access,At_Offset_3 0213 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0214 TRAP_01f0: 0214 00d8 | | Load_Top At_Offset_0 0215 0107 | | Execute Exception,Get_Name 0216 4950 |IP | Short_Literal 0x150 0217 495f |I_ | Short_Literal 0x15f 0218 0262 | b | Execute Discrete,In_Range 0219 6805 |h | Jump_Zero 0x21f 021a 00db | | Load_Top At_Offset_3 021b e215 | | Load 0x1,0x15 021c 8229 | ) | Call 0x1,0x29 021d c5ff | | Store 0x2,-0x1 021e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 021f 010e | | Execute Exception,Is_Constraint_Error 0220 7006 |p | Jump_Nonzero 0x227 0221 00d8 | | Load_Top At_Offset_0 0222 0107 | | Execute Exception,Get_Name 0223 4900 |I | Short_Literal 0x100 0224 490f |I | Short_Literal 0x10f 0225 0262 | b | Execute Discrete,In_Range 0226 6805 |h | Jump_Zero 0x22c 0227 00db | | Load_Top At_Offset_3 0228 e214 | | Load 0x1,0x14 0229 8229 | ) | Call 0x1,0x29 022a c5ff | | Store 0x2,-0x1 022b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 022c 0100 | | Execute Exception,Raise 022d 0000 0000 | | .XXX[0x3] 022f 0000 | | 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0233 | 3 | .CONST 0x0233 ; Address of begin 0231 0245 | E | .CONST 0x0245 ; Address of exception handler 0232 0001 | | .CONST 0x0001 ; Number of locals 0233 BODY_0230: 0233 INIT_0230: 0233 4802 |H | Short_Literal 0x2 0234 e5fe | | Load 0x2,-0x2 0235 0227 | ' | Execute Access,All_Reference 0236 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0237 e002 | | Load 0x0,0x2 0238 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0239 700a |p | Jump_Nonzero 0x244 023a 00da | | Load_Top At_Offset_2 023b 820f | | Call 0x1,0xf 023c e5fe | | Load 0x2,-0x2 023d 0227 | ' | Execute Access,All_Reference 023e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 023f e004 | | Load 0x0,0x4 0240 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0241 00db | | Load_Top At_Offset_3 0242 8228 | ( | Call 0x1,0x28 0243 c5fe | | Store 0x2,-0x2 0244 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0245 TRAP_0230: 0245 00d8 | | Load_Top At_Offset_0 0246 0107 | | Execute Exception,Get_Name 0247 4910 |I | Short_Literal 0x110 0248 491f |I | Short_Literal 0x11f 0249 0262 | b | Execute Discrete,In_Range 024a 6805 |h | Jump_Zero 0x250 024b e5fe | | Load 0x2,-0x2 024c e213 | | Load 0x1,0x13 024d 8229 | ) | Call 0x1,0x29 024e c5fe | | Store 0x2,-0x2 024f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0250 010e | | Execute Exception,Is_Constraint_Error 0251 7006 |p | Jump_Nonzero 0x258 0252 00d8 | | Load_Top At_Offset_0 0253 0107 | | Execute Exception,Get_Name 0254 4900 |I | Short_Literal 0x100 0255 490f |I | Short_Literal 0x10f 0256 0262 | b | Execute Discrete,In_Range 0257 6805 |h | Jump_Zero 0x25d 0258 e5fe | | Load 0x2,-0x2 0259 e214 | | Load 0x1,0x14 025a 8229 | ) | Call 0x1,0x29 025b c5fe | | Store 0x2,-0x2 025c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 025d 0100 | | Execute Exception,Raise 025e 0000 0000 | | .XXX[0x2] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 4801 |H | Short_Literal 0x1 0264 00db | | Load_Top At_Offset_3 0265 0227 | ' | Execute Access,All_Reference 0266 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0267 e002 | | Load 0x0,0x2 0268 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0269 7003 |p | Jump_Nonzero 0x26d 026a 00da | | Load_Top At_Offset_2 026b 8228 | ( | Call 0x1,0x28 026c 003b | ; | Store_Top Access,At_Offset_3 026d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 026e 0000 0000 | | .XXX[0x2] 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0273 | s | .CONST 0x0273 ; Address of begin 0271 0287 | | .CONST 0x0287 ; Address of exception handler 0272 0001 | | .CONST 0x0001 ; Number of locals 0273 BODY_0270: 0273 INIT_0270: 0273 4802 |H | Short_Literal 0x2 0274 00db | | Load_Top At_Offset_3 0275 0227 | ' | Execute Access,All_Reference 0276 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0277 e002 | | Load 0x0,0x2 0278 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0279 700c |p | Jump_Nonzero 0x286 027a 00da | | Load_Top At_Offset_2 027b 0229 | ) | Execute Access,All_Read 027c 00d8 | | Load_Top At_Offset_0 027d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 027e e004 | | Load 0x0,0x4 027f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0280 00d9 | | Load_Top At_Offset_1 0281 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0282 00d1 | | Pop_Control Pop_Count_1 0283 00da | | Load_Top At_Offset_2 0284 8228 | ( | Call 0x1,0x28 0285 003b | ; | Store_Top Access,At_Offset_3 0286 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0287 TRAP_0270: 0287 010e | | Execute Exception,Is_Constraint_Error 0288 7006 |p | Jump_Nonzero 0x28f 0289 00d8 | | Load_Top At_Offset_0 028a 0107 | | Execute Exception,Get_Name 028b 4900 |I | Short_Literal 0x100 028c 490f |I | Short_Literal 0x10f 028d 0262 | b | Execute Discrete,In_Range 028e 6805 |h | Jump_Zero 0x294 028f 00db | | Load_Top At_Offset_3 0290 e214 | | Load 0x1,0x14 0291 8229 | ) | Call 0x1,0x29 0292 c5ff | | Store 0x2,-0x1 0293 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0294 0100 | | Execute Exception,Raise 0295 0000 0000 | | .XXX[0x3] 0297 0000 | | 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 02a1 | | .CONST 0x02a1 ; Address of begin 0299 02b6 | | .CONST 0x02b6 ; Address of exception handler 029a 0003 | | .CONST 0x0003 ; Number of locals 029b INIT_0298: 029b 00da | | Load_Top At_Offset_2 029c 0007 | | Action Break_Optional 029d e20e | | Load 0x1,0xe 029e 02c7 | | Declare_Variable Any 029f 00d8 | | Load_Top At_Offset_0 02a0 1c00 | | Execute_Immediate Run_Utility,0x0 02a1 BODY_0298: 02a1 4801 |H | Short_Literal 0x1 02a2 00da | | Load_Top At_Offset_2 02a3 0227 | ' | Execute Access,All_Reference 02a4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02a5 e002 | | Load 0x0,0x2 02a6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02a7 700a |p | Jump_Nonzero 0x2b2 02a8 00d9 | | Load_Top At_Offset_1 02a9 0227 | ' | Execute Access,All_Reference 02aa 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 02ab e005 | | Load 0x0,0x5 02ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ad 8210 | | Call 0x1,0x10 02ae c403 | | Store 0x2,0x3 02af 00d9 | | Load_Top At_Offset_1 02b0 8228 | ( | Call 0x1,0x28 02b1 003a | : | Store_Top Access,At_Offset_2 02b2 00d8 | | Load_Top At_Offset_0 02b3 e20e | | Load 0x1,0xe 02b4 0119 | | Execute Any,Check_In_Formal_Type 02b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02b6 TRAP_0298: 02b6 010e | | Execute Exception,Is_Constraint_Error 02b7 7006 |p | Jump_Nonzero 0x2be 02b8 00d8 | | Load_Top At_Offset_0 02b9 0107 | | Execute Exception,Get_Name 02ba 4900 |I | Short_Literal 0x100 02bb 490f |I | Short_Literal 0x10f 02bc 0262 | b | Execute Discrete,In_Range 02bd 6805 |h | Jump_Zero 0x2c3 02be 00da | | Load_Top At_Offset_2 02bf e214 | | Load 0x1,0x14 02c0 8229 | ) | Call 0x1,0x29 02c1 003b | ; | Store_Top Access,At_Offset_3 02c2 0831 | 1 | Execute_Immediate Raise,0x31 02c3 0100 | | Execute Exception,Raise 02c4 0000 0000 | | .BLANK 0000[0x4] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb 4601 |F | Jump_Case 0x2 02cc 7801 |x | Jump 0x2ce ; case 0x0 02cd 7813 |x | Jump 0x2e1 ; case 0x1 02ce 00da | | Load_Top At_Offset_2 02cf 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02d0 0125 | % | Execute Any,Set_Constraint 02d1 00da | | Load_Top At_Offset_2 02d2 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02d3 1c00 | | Execute_Immediate Run_Utility,0x0 02d4 00da | | Load_Top At_Offset_2 02d5 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 02d6 0125 | % | Execute Any,Set_Constraint 02d7 00da | | Load_Top At_Offset_2 02d8 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 02d9 1c00 | | Execute_Immediate Run_Utility,0x0 02da 00da | | Load_Top At_Offset_2 02db 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 02dc 0125 | % | Execute Any,Set_Constraint 02dd 00da | | Load_Top At_Offset_2 02de 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 02df 1c00 | | Execute_Immediate Run_Utility,0x0 02e0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 02e1 00da | | Load_Top At_Offset_2 02e2 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 02e3 0125 | % | Execute Any,Set_Constraint 02e4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 02e5 0000 0000 | | .XXX[0x3] 02e7 0000 | | 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02eb | | .CONST 0x02eb ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0001 | | .CONST 0x0001 ; Number of locals 02eb BODY_02e8: 02eb INIT_02e8: 02eb 00da | | Load_Top At_Offset_2 02ec 6802 |h | Jump_Zero 0x2ef 02ed 4801 |H | Short_Literal 0x1 02ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ef 4800 |H | Short_Literal 0x0 02f0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02f1 0000 0000 | | .BLANK 0000[0x7] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02fb | | .CONST 0x02fb ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0001 | | .CONST 0x0001 ; Number of locals 02fb BODY_02f8: 02fb INIT_02f8: 02fb 00da | | Load_Top At_Offset_2 02fc 0229 | ) | Execute Access,All_Read 02fd 00d8 | | Load_Top At_Offset_0 02fe 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02ff 00ea | | Load_Encached Null_String_Cache 0300 e216 | | Load 0x1,0x16 0301 e002 | | Load 0x0,0x2 0302 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0303 00d9 | | Load_Top At_Offset_1 0304 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0305 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0306 0000 0000 | | .XXX[0x2] 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 030b | | .CONST 0x030b ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0001 | | .CONST 0x0001 ; Number of locals 030b BODY_0308: 030b INIT_0308: 030b 00db | | Load_Top At_Offset_3 030c 0229 | ) | Execute Access,All_Read 030d 00d8 | | Load_Top At_Offset_0 030e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 030f 00ea | | Load_Encached Null_String_Cache 0310 e5ff | | Load 0x2,-0x1 0311 e002 | | Load 0x0,0x2 0312 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0313 00d9 | | Load_Top At_Offset_1 0314 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0315 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0316 ; -------------------------------------------------------------------------------------- 0316 ; STRING TABLE 0316 ; -------------------------------------------------------------------------------------- 0316 0010 | | .STRTAB 0x0010->0x031e ; "READ" 0317 0012 | | .STRTAB 0x0012->0x0320 ; "WRITE" 0318 0015 | | .STRTAB 0x0015->0x0322 ; "Lock Error" 0319 001d | | .STRTAB 0x001d->0x0327 ; "Name Error" 031a 0025 | % | .STRTAB 0x0025->0x032c ; "Mode Error" 031b 002d | - | .STRTAB 0x002d->0x0331 ; "Status Error" 031c 0037 | 7 | .STRTAB 0x0037->0x0337 ; "End Of List" 031d 0040 | @ | .STREND 0x0040->0x033d 031e 5245 4144 |READ| .STRTAB_STRINGS 033d 0000 0000 | | .XXX[0x3] 033f 0000 | | 0340 ; -------------------------------------------------------------------------------------- 0340 ; Debug Table 0340 ; -------------------------------------------------------------------------------------- 0340 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5ddc,0x0000,0x0001,0x0000 0346 0000 0000 | | .BLANK 0000[0xba]