|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0d3cb3
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 01a0 | | .CONST 0x01a0 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 004f | O | .CONST 0x004f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0019 | | .CONST 0x0019 ; Number of locals 000b INIT_0008: 000b 4801 |H | Short_Literal 0x1 000c 4be7 |K | Short_Literal 0x3e7 000d 00e5 | | Load_Encached Long_Integer_Cache 000e 03f9 | | Declare_Type Discrete,Constrained,Visible 000f 4800 |H | Short_Literal 0x0 0010 4803 |H | Short_Literal 0x3 0011 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 0013 03fe | | Declare_Type Discrete,Defined,Visible 0014 4800 |H | Short_Literal 0x0 0015 606a |`j | Indirect_Literal Discrete,0x80,{0x00000000, 0x000f3a71} 0016 00e5 | | Load_Encached Long_Integer_Cache 0017 03f9 | | Declare_Type Discrete,Constrained,Visible 0018 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated 001a 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 001c 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated 001e 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated 0020 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 0022 e20d | | Load 0x1,0xd 0023 0266 | f | Execute Discrete,Bounds 0024 e20d | | Load 0x1,0xd 0025 0266 | f | Execute Discrete,Bounds 0026 e20f | | Load 0x1,0xf 0027 02a0 | | Declare_Subprogram Null_Subprogram 0028 4802 |H | Short_Literal 0x2 0029 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 002a e20d | | Load 0x1,0xd 002b 00d9 | | Load_Top At_Offset_1 002c 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call 002e 4800 |H | Short_Literal 0x0 002f 4801 |H | Short_Literal 0x1 0030 4800 |H | Short_Literal 0x0 0031 4800 |H | Short_Literal 0x0 0032 4801 |H | Short_Literal 0x1 0033 4801 |H | Short_Literal 0x1 0034 031e | | Declare_Type Variant_Record,Defined,Visible 0035 00bf | | Action Accept_Activation 0036 e002 | | Load 0x0,0x2 0037 e003 | | Load 0x0,0x3 0038 e20f | | Load 0x1,0xf 0039 e004 | | Load 0x0,0x4 003a 1b50 | P | Execute Package,Field_Read,Field_Number 0x50 003b 0387 | | Declare_Variable Package 003c 00d8 | | Load_Top At_Offset_0 003d 020f | | Execute Module,Activate 003e e20d | | Load 0x1,0xd 003f 00d8 | | Load_Top At_Offset_0 0040 02a0 | | Declare_Subprogram Null_Subprogram 0041 4802 |H | Short_Literal 0x2 0042 032d | - | Declare_Type Record,Defined 0043 00d8 | | Load_Top At_Offset_0 0044 0322 | " | Declare_Variable Record 0045 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0046 00c7 | | Action Elaborate_Subprogram 0047 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0048 00c7 | | Action Elaborate_Subprogram 0049 1d12 | | Execute_Immediate Reference_Lex_1,0x12 004a 00c7 | | Action Elaborate_Subprogram 004b 1d13 | | Execute_Immediate Reference_Lex_1,0x13 004c 00c7 | | Action Elaborate_Subprogram 004d 1d14 | | Execute_Immediate Reference_Lex_1,0x14 004e 00c7 | | Action Elaborate_Subprogram 004f BODY_0008: 004f 00bc | | Action Signal_Activated 0050 00bb | | Action Signal_Completion 0051 0000 0000 | | .BLANK 0000[0x7] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b 4607 |F | Jump_Case 0x8 005c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 005d 7807 |x | Jump 0x65 ; case 0x1 005e 780a |x | Jump 0x69 ; case 0x2 005f 780e |x | Jump 0x6e ; case 0x3 0060 7811 |x | Jump 0x72 ; case 0x4 0061 7812 |x | Jump 0x74 ; case 0x5 0062 7813 |x | Jump 0x76 ; case 0x6 0063 7816 |x | Jump 0x7a ; case 0x7 0064 4302 |C | .XXX[0x1] 0065 00da | | Load_Top At_Offset_2 0066 0091 018e | | Action Push_String_Extended_Indexed,0x18e ; "NORTH" 0068 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0069 00db | | Load_Top At_Offset_3 006a 00db | | Load_Top At_Offset_3 006b 00e0 | | Load_Encached Standard_Cache 006c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 006d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 006e 00da | | Load_Top At_Offset_2 006f 00e0 | | Load_Encached Standard_Cache 0070 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0071 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0072 00db | | Load_Top At_Offset_3 0073 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0074 00db | | Load_Top At_Offset_3 0075 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0076 e20e | | Load 0x1,0xe 0077 00dc | | Load_Top At_Offset_4 0078 0267 | g | Execute Discrete,Predecessor 0079 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 007a e20e | | Load 0x1,0xe 007b 00dc | | Load_Top At_Offset_4 007c 0268 | h | Execute Discrete,Successor 007d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 007e 0000 0000 | | .XXX[0x2] 0080 0000 0000 | | .LITERAL {0x00000000, 0x000f3a71} 0084 0000 0000 | | .BLANK 0000[0x4] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b 00da | | Load_Top At_Offset_2 008c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 008d 09ff | | Execute_Immediate Binary_Scale,-0x1 008e 0a01 | | Execute_Immediate Plus,0x1 008f e219 | | Load 0x1,0x19 0090 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0091 00da | | Load_Top At_Offset_2 0092 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0093 09ff | | Execute_Immediate Binary_Scale,-0x1 0094 0a01 | | Execute_Immediate Plus,0x1 0095 e219 | | Load 0x1,0x19 0096 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0097 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 00db | | Load_Top At_Offset_3 009c 4603 |F | Jump_Case 0x4 009d 7813 |x | Jump 0xb1 ; case 0x0 009e 7826 |x& | Jump 0xc5 ; case 0x1 009f 781b |x | Jump 0xbb ; case 0x2 00a0 7800 |x | Jump 0xa1 ; case 0x3 00a1 e219 | | Load 0x1,0x19 00a2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00a3 0f01 | | Execute_Immediate Equal,0x1 00a4 6805 |h | Jump_Zero 0xaa 00a5 00da | | Load_Top At_Offset_2 00a6 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 00a7 e219 | | Load 0x1,0x19 00a8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00aa 00e5 | | Load_Encached Long_Integer_Cache 00ab e219 | | Load 0x1,0x19 00ac 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00ad 0267 | g | Execute Discrete,Predecessor 00ae e219 | | Load 0x1,0x19 00af 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00b0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00b1 00e5 | | Load_Encached Long_Integer_Cache 00b2 e219 | | Load 0x1,0x19 00b3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00b4 e5ff | | Load 0x2,-0x1 00b5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 00b6 026e | n | Execute Discrete,Modulo 00b7 0268 | h | Execute Discrete,Successor 00b8 e219 | | Load 0x1,0x19 00b9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00ba 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00bb 00e5 | | Load_Encached Long_Integer_Cache 00bc e219 | | Load 0x1,0x19 00bd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00be e5ff | | Load 0x2,-0x1 00bf 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 00c0 026e | n | Execute Discrete,Modulo 00c1 0268 | h | Execute Discrete,Successor 00c2 e219 | | Load 0x1,0x19 00c3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00c4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00c5 e219 | | Load 0x1,0x19 00c6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00c7 0f01 | | Execute_Immediate Equal,0x1 00c8 6805 |h | Jump_Zero 0xce 00c9 00da | | Load_Top At_Offset_2 00ca 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 00cb e219 | | Load 0x1,0x19 00cc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00cd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00ce 00e5 | | Load_Encached Long_Integer_Cache 00cf e219 | | Load 0x1,0x19 00d0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00d1 0267 | g | Execute Discrete,Predecessor 00d2 e219 | | Load 0x1,0x19 00d3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00d4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00d5 0000 0000 | | .XXX[0x3] 00d7 0000 | | 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db 00da | | Load_Top At_Offset_2 00dc e219 | | Load 0x1,0x19 00dd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00de e219 | | Load 0x1,0x19 00df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e0 e5fe | | Load 0x2,-0x2 00e1 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 00e2 01a6 | | Execute Matrix,Field_Write 00e3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00e4 0000 0000 | | .BLANK 0000[0x4] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb e219 | | Load 0x1,0x19 00ec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00ed e219 | | Load 0x1,0x19 00ee 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00ef e5ff | | Load 0x2,-0x1 00f0 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 00f1 01a7 | | Execute Matrix,Field_Read 00f2 0c01 | | Execute_Immediate Greater_Equal,0x1 00f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00f4 0000 0000 | | .BLANK 0000[0x4] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fb | | .CONST 0x00fb ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0001 | | .CONST 0x0001 ; Number of locals 00fb BODY_00f8: 00fb INIT_00f8: 00fb 00cf | | Action Mark_Auxiliary 00fc 4801 |H | Short_Literal 0x1 00fd e5ff | | Load 0x2,-0x1 00fe 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 00ff 0264 | d | Execute Discrete,Below_Bound 0100 7018 |p | Jump_Nonzero 0x119 0101 00cf | | Action Mark_Auxiliary 0102 e5ff | | Load 0x2,-0x1 0103 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0104 4801 |H | Short_Literal 0x1 0105 0263 | c | Execute Discrete,Above_Bound 0106 700c |p | Jump_Nonzero 0x113 0107 e217 | | Load 0x1,0x17 0108 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0109 4806 |H | Short_Literal 0x6 010a 00da | | Load_Top At_Offset_2 010b e404 | | Load 0x2,0x4 010c e5ff | | Load 0x2,-0x1 010d 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 010e 01a7 | | Execute Matrix,Field_Read 010f e217 | | Load 0x1,0x17 0110 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0111 00c8 | | Action Pop_Auxiliary_Range 0112 3ff4 |? | Loop_Increasing 0x107 0113 00ce | | Action Pop_Auxiliary 0114 4801 |H | Short_Literal 0x1 0115 e004 | | Load 0x0,0x4 0116 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0117 00c8 | | Action Pop_Auxiliary_Range 0118 37e8 |7 | Loop_Decreasing 0x101 0119 4502 |E | Exit_Suprogram New_Top_Offset 0x2 011a 0000 0000 | | .BLANK 0000[0x6] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 4609 |F | Jump_Case 0xa 0124 7809 |x | Jump 0x12e ; case 0x0 0125 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0126 7845 |xE | Jump 0x16c ; case 0x2 0127 7848 |xH | Jump 0x170 ; case 0x3 0128 7864 |xd | Jump 0x18d ; case 0x4 0129 7863 |xc | Jump 0x18d ; case 0x5 012a 7862 |xb | Jump 0x18d ; case 0x6 012b 784a |xJ | Jump 0x176 ; case 0x7 012c 7854 |xT | Jump 0x181 ; case 0x8 012d 785f |x_ | Jump 0x18d ; case 0x9 012e 4801 |H | Short_Literal 0x1 012f 00db | | Load_Top At_Offset_3 0130 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0131 4801 |H | Short_Literal 0x1 0132 e5ff | | Load 0x2,-0x1 0133 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0134 e215 | | Load 0x1,0x15 0135 035b | [ | Declare_Type Array,Constrained 0136 0337 | 7 | Declare_Variable Array 0137 4801 |H | Short_Literal 0x1 0138 00d9 | | Load_Top At_Offset_1 0139 01ac | | Execute Matrix,Last 013a 4801 |H | Short_Literal 0x1 013b 0263 | c | Execute Discrete,Above_Bound 013c 700d |p | Jump_Nonzero 0x14a 013d 4802 |H | Short_Literal 0x2 013e 00db | | Load_Top At_Offset_3 013f 01ac | | Execute Matrix,Last 0140 4801 |H | Short_Literal 0x1 0141 0263 | c | Execute Discrete,Above_Bound 0142 7006 |p | Jump_Nonzero 0x149 0143 4800 |H | Short_Literal 0x0 0144 00d9 | | Load_Top At_Offset_1 0145 e404 | | Load 0x2,0x4 0146 e402 | | Load 0x2,0x2 0147 01a6 | | Execute Matrix,Field_Write 0148 3ffa |? | Loop_Increasing 0x143 0149 3ff3 |? | Loop_Increasing 0x13d 014a 00db | | Load_Top At_Offset_3 014b 00d8 | | Load_Top At_Offset_0 014c 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 014d 4801 |H | Short_Literal 0x1 014e 00db | | Load_Top At_Offset_3 014f 01aa | | Execute Matrix,Bounds 0150 4801 |H | Short_Literal 0x1 0151 00db | | Load_Top At_Offset_3 0152 01aa | | Execute Matrix,Bounds 0153 00da | | Load_Top At_Offset_2 0154 027f | | Execute Discrete,Equal 0155 7001 |p | Jump_Nonzero 0x157 0156 08e0 | | Execute_Immediate Raise,0xe0 0157 00cd | | Action Spare6_Action 0158 027f | | Execute Discrete,Equal 0159 7001 |p | Jump_Nonzero 0x15b 015a 08e0 | | Execute_Immediate Raise,0xe0 015b 4802 |H | Short_Literal 0x2 015c 00db | | Load_Top At_Offset_3 015d 01aa | | Execute Matrix,Bounds 015e 4802 |H | Short_Literal 0x2 015f 00db | | Load_Top At_Offset_3 0160 01aa | | Execute Matrix,Bounds 0161 00da | | Load_Top At_Offset_2 0162 027f | | Execute Discrete,Equal 0163 7001 |p | Jump_Nonzero 0x165 0164 08e0 | | Execute_Immediate Raise,0xe0 0165 00cd | | Action Spare6_Action 0166 027f | | Execute Discrete,Equal 0167 7001 |p | Jump_Nonzero 0x169 0168 08e0 | | Execute_Immediate Raise,0xe0 0169 00d1 | | Pop_Control Pop_Count_1 016a 2902 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2 016b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 016c 4801 |H | Short_Literal 0x1 016d 4802 |H | Short_Literal 0x2 016e 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 016f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0170 e5fd | | Load 0x2,-0x3 0171 00db | | Load_Top At_Offset_3 0172 1c07 | | Execute_Immediate Run_Utility,0x7 0173 e5fe | | Load 0x2,-0x2 0174 0306 | | Complete_Type Variant_Record,By_Renaming 0175 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 0176 00db | | Load_Top At_Offset_3 0177 4801 |H | Short_Literal 0x1 0178 e5fe | | Load 0x2,-0x2 0179 4801 |H | Short_Literal 0x1 017a e5fe | | Load 0x2,-0x2 017b e215 | | Load 0x1,0x15 017c 035b | [ | Declare_Type Array,Constrained 017d 4801 |H | Short_Literal 0x1 017e e5ff | | Load 0x2,-0x1 017f 031b | | Declare_Type Variant_Record,Constrained 0180 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0181 00db | | Load_Top At_Offset_3 0182 00db | | Load_Top At_Offset_3 0183 02fc | | Declare_Variable Variant_Record,With_Constraint 0184 4801 |H | Short_Literal 0x1 0185 e5fe | | Load 0x2,-0x2 0186 4801 |H | Short_Literal 0x1 0187 e5fe | | Load 0x2,-0x2 0188 e215 | | Load 0x1,0x15 0189 0334 | 4 | Declare_Variable Array,With_Constraint 018a 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2 018b 016a | j | QQ_execute Variant_Record,XXX 018c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 018d 0869 | i | Execute_Immediate Raise,0x69 018e ; -------------------------------------------------------------------------------------- 018e ; STRING TABLE 018e ; -------------------------------------------------------------------------------------- 018e 000a | | .STRTAB 0x000a->0x0193 ; "NORTH" 018f 000d | | .STRTAB 0x000d->0x0195 ; "SOUTH" 0190 0010 | | .STRTAB 0x0010->0x0198 ; "EAST" 0191 0012 | | .STRTAB 0x0012->0x019a ; "WEST" 0192 0014 | | .STREND 0x0014->0x019c 0193 4e4f 5254 |NORT| .STRTAB_STRINGS 019c 0000 0000 | | .BLANK 0000[0x4] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; Debug Table 01a0 ; -------------------------------------------------------------------------------------- 01a0 0004 0004 | | .DEBUG4 0x0004,0x0004,0xefed,0x0000,0x0001,0x0009 01a6 000b 01ca | | .DBG4T 0x000b,0x01ca,0x8000,0x8000 01aa 0036 01e0 | 6 | .DBG4T 0x0036,0x01e0,0x8000,0x0000 01ae 005b 0000 | [ | .DBG4T 0x005b,0x0000,0x0005,0x0000 01b2 008b 01ea | | .DBG4T 0x008b,0x01ea,0x0001,0x0000 01b6 009b 01ee | | .DBG4T 0x009b,0x01ee,0x0001,0x4000 01ba 00db 0202 | | .DBG4T 0x00db,0x0202,0x0001,0x0000 01be 00eb 0205 | | .DBG4T 0x00eb,0x0205,0x0002,0x0000 01c2 00fb 0208 | | .DBG4T 0x00fb,0x0208,0x0001,0x0000 01c6 0123 0000 | # | .DBG4T 0x0123,0x0000,0x0005,0x0000 01ca ; -------------------------------------------------------------------------------------- 01ca ; Debug chain 01ca ; -------------------------------------------------------------------------------------- 01ca 000a 0000 | | .DBGLEN 0x000a,0x0000 01cc 000b 000f | | .DBGLNO 0x000b,0x000f,0x0014,0x0018,0x001a,0x001c,0x001e,0x0020,0x0022,0x002a 01d6 0001 0003 | | .XXX[0xa] 01d8 0004 0005 | | 01da 0006 0007 | | 01dc 0008 0009 | | 01de 000a 000b | | 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; Debug chain 01e0 ; -------------------------------------------------------------------------------------- 01e0 0008 0000 | | .DBGLEN 0x0008,0x0000 01e2 0036 003e | 6 >| .DBGLNO 0x0036,0x003e,0x0043,0x0045,0x0047,0x0049,0x004b,0x004d 01ea ; -------------------------------------------------------------------------------------- 01ea ; Debug chain 01ea ; -------------------------------------------------------------------------------------- 01ea 0000 0002 | | .DBGLEN 0x0000,0x0002 01ec 008b 0091 | | .DBGLNO 0x008b,0x0091 01ee ; -------------------------------------------------------------------------------------- 01ee ; Debug chain 01ee ; -------------------------------------------------------------------------------------- 01ee 0000 0009 | | .DBGLEN 0x0000,0x0009 01f0 009b 00a1 | | .DBGLNO 0x009b,0x00a1,0x00a5,0x00aa,0x00b1,0x00bb,0x00c5,0x00c9,0x00ce 01f9 0001 0007 | | .XXX[0x9] 01fb 0008 0009 | | 01fd 0002 0003 | | 01ff 0004 0005 | | 0201 0006 | | 0202 ; -------------------------------------------------------------------------------------- 0202 ; Debug chain 0202 ; -------------------------------------------------------------------------------------- 0202 0000 0001 | | .DBGLEN 0x0000,0x0001 0204 00db | | .DBGLNO 0x00db 0205 ; -------------------------------------------------------------------------------------- 0205 ; Debug chain 0205 ; -------------------------------------------------------------------------------------- 0205 0000 0001 | | .DBGLEN 0x0000,0x0001 0207 00eb | | .DBGLNO 0x00eb 0208 ; -------------------------------------------------------------------------------------- 0208 ; Debug chain 0208 ; -------------------------------------------------------------------------------------- 0208 0000 0004 | | .DBGLEN 0x0000,0x0004 020a 00fc 0102 | | .DBGLNO 0x00fc,0x0102,0x0107,0x0114 020e 0000 0000 | | .BLANK 0000[0x1f2]