|
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_11cacfe
└─⟦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 0220 | | .CONST 0x0220 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0020 | | .CONST 0x0020 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0017 | | .CONST 0x0017 ; Number of locals 000b INIT_0008: 000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated 000d 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated 000f 00bf | | Action Accept_Activation 0010 00e1 | | Load_Encached Boolean_Cache 0011 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0012 029d 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call 0014 029d 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call 0016 029d 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call 0018 029b 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Unelaborated 001a 1d17 | | Execute_Immediate Reference_Lex_1,0x17 001b 00c7 | | Action Elaborate_Subprogram 001c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 001d 00c7 | | Action Elaborate_Subprogram 001e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 001f 00c7 | | Action Elaborate_Subprogram 0020 BODY_0008: 0020 00bc | | Action Signal_Activated 0021 00bb | | Action Signal_Completion 0022 0000 0000 | | .BLANK 0000[0x6] 0028 ; -------------------------------------------------------------------------------------- 0028 ; SUBPROGRAM 0028 ; -------------------------------------------------------------------------------------- 0028 0032 | 2 | .CONST 0x0032 ; Address of begin 0029 0004 | | .CONST 0x0004 ; Address of exception handler 002a 0005 | | .CONST 0x0005 ; Number of locals 002b INIT_0028: 002b 1d17 | | Execute_Immediate Reference_Lex_1,0x17 002c 00c6 | | Action Check_Subprogram_Elaborated 002d 1d15 | | Execute_Immediate Reference_Lex_1,0x15 002e e001 | | Load 0x0,0x1 002f e002 | | Load 0x0,0x2 0030 4805 |H | Short_Literal 0x5 0031 0007 | | Action Break_Optional 0032 BODY_0028: 0032 e5fe | | Load 0x2,-0x2 0033 e5ff | | Load 0x2,-0x1 0034 4802 |H | Short_Literal 0x2 0035 4802 |H | Short_Literal 0x2 0036 0099 | | Action Reference_Dynamic 0037 4803 |H | Short_Literal 0x3 0038 4802 |H | Short_Literal 0x2 0039 0099 | | Action Reference_Dynamic 003a 8217 | | Call 0x1,0x17 003b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 003c 0000 0000 | | .BLANK 0000[0x4] 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 004a | J | .CONST 0x004a ; Address of begin 0041 0004 | | .CONST 0x0004 ; Address of exception handler 0042 0005 | | .CONST 0x0005 ; Number of locals 0043 INIT_0040: 0043 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0044 00c6 | | Action Check_Subprogram_Elaborated 0045 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0046 e003 | | Load 0x0,0x3 0047 e004 | | Load 0x0,0x4 0048 4805 |H | Short_Literal 0x5 0049 0007 | | Action Break_Optional 004a BODY_0040: 004a e5fe | | Load 0x2,-0x2 004b e5ff | | Load 0x2,-0x1 004c 4802 |H | Short_Literal 0x2 004d 4802 |H | Short_Literal 0x2 004e 0099 | | Action Reference_Dynamic 004f 4803 |H | Short_Literal 0x3 0050 4802 |H | Short_Literal 0x2 0051 0099 | | Action Reference_Dynamic 0052 8217 | | Call 0x1,0x17 0053 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0054 0000 0000 | | .BLANK 0000[0x4] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 00c8 | | .CONST 0x00c8 ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0004 | | .CONST 0x0004 ; Number of locals 005b INIT_0058: 005b e005 | | Load 0x0,0x5 005c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 005d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 005e 0266 | f | Execute Discrete,Bounds 005f e006 | | Load 0x0,0x6 0060 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0061 02a0 | | Declare_Subprogram Null_Subprogram 0062 4801 |H | Short_Literal 0x1 0063 035d | ] | Declare_Type Array,Defined 0064 00d8 | | Load_Top At_Offset_0 0065 0337 | 7 | Declare_Variable Array 0066 00d8 | | Load_Top At_Offset_0 0067 0335 | 5 | Declare_Variable Array,Duplicate 0068 00cd | | Action Spare6_Action 0069 4803 |H | Short_Literal 0x3 006a 4802 |H | Short_Literal 0x2 006b 00da | | Load_Top At_Offset_2 006c 01d6 | | Execute Vector,Field_Write 006d 4803 |H | Short_Literal 0x3 006e 4804 |H | Short_Literal 0x4 006f 00da | | Load_Top At_Offset_2 0070 01d6 | | Execute Vector,Field_Write 0071 4803 |H | Short_Literal 0x3 0072 4808 |H | Short_Literal 0x8 0073 00da | | Load_Top At_Offset_2 0074 01d6 | | Execute Vector,Field_Write 0075 4803 |H | Short_Literal 0x3 0076 4809 |H | Short_Literal 0x9 0077 00da | | Load_Top At_Offset_2 0078 01d6 | | Execute Vector,Field_Write 0079 4803 |H | Short_Literal 0x3 007a 480e |H | Short_Literal 0xe 007b 00da | | Load_Top At_Offset_2 007c 01d6 | | Execute Vector,Field_Write 007d 4803 |H | Short_Literal 0x3 007e 480f |H | Short_Literal 0xf 007f 00da | | Load_Top At_Offset_2 0080 01d6 | | Execute Vector,Field_Write 0081 4804 |H | Short_Literal 0x4 0082 480b |H | Short_Literal 0xb 0083 00da | | Load_Top At_Offset_2 0084 01d6 | | Execute Vector,Field_Write 0085 4804 |H | Short_Literal 0x4 0086 480c |H | Short_Literal 0xc 0087 00da | | Load_Top At_Offset_2 0088 01d6 | | Execute Vector,Field_Write 0089 4805 |H | Short_Literal 0x5 008a 4803 |H | Short_Literal 0x3 008b 00da | | Load_Top At_Offset_2 008c 01d6 | | Execute Vector,Field_Write 008d 4805 |H | Short_Literal 0x5 008e 4805 |H | Short_Literal 0x5 008f 00da | | Load_Top At_Offset_2 0090 01d6 | | Execute Vector,Field_Write 0091 4806 |H | Short_Literal 0x6 0092 4806 |H | Short_Literal 0x6 0093 00da | | Load_Top At_Offset_2 0094 01d6 | | Execute Vector,Field_Write 0095 4806 |H | Short_Literal 0x6 0096 480a |H | Short_Literal 0xa 0097 00da | | Load_Top At_Offset_2 0098 01d6 | | Execute Vector,Field_Write 0099 4806 |H | Short_Literal 0x6 009a 4810 |H | Short_Literal 0x10 009b 00da | | Load_Top At_Offset_2 009c 01d6 | | Execute Vector,Field_Write 009d 4807 |H | Short_Literal 0x7 009e 480d |H | Short_Literal 0xd 009f 00da | | Load_Top At_Offset_2 00a0 01d6 | | Execute Vector,Field_Write 00a1 4808 |H | Short_Literal 0x8 00a2 4807 |H | Short_Literal 0x7 00a3 00da | | Load_Top At_Offset_2 00a4 01d6 | | Execute Vector,Field_Write 00a5 4809 |H | Short_Literal 0x9 00a6 4811 |H | Short_Literal 0x11 00a7 00da | | Load_Top At_Offset_2 00a8 01d6 | | Execute Vector,Field_Write 00a9 4809 |H | Short_Literal 0x9 00aa 4812 |H | Short_Literal 0x12 00ab 00da | | Load_Top At_Offset_2 00ac 01d6 | | Execute Vector,Field_Write 00ad 480a |H | Short_Literal 0xa 00ae 4813 |H | Short_Literal 0x13 00af 00da | | Load_Top At_Offset_2 00b0 01d6 | | Execute Vector,Field_Write 00b1 480b |H | Short_Literal 0xb 00b2 4800 |H | Short_Literal 0x0 00b3 00da | | Load_Top At_Offset_2 00b4 01d6 | | Execute Vector,Field_Write 00b5 480b |H | Short_Literal 0xb 00b6 4801 |H | Short_Literal 0x1 00b7 00da | | Load_Top At_Offset_2 00b8 01d6 | | Execute Vector,Field_Write 00b9 480b |H | Short_Literal 0xb 00ba 4814 |H | Short_Literal 0x14 00bb 00da | | Load_Top At_Offset_2 00bc 01d6 | | Execute Vector,Field_Write 00bd 00d9 | | Load_Top At_Offset_1 00be 01d4 | | Execute Vector,Structure_Write 00bf e5ff | | Load 0x2,-0x1 00c0 e007 | | Load 0x0,0x7 00c1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00c2 e005 | | Load 0x0,0x5 00c3 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00c4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00c5 00d9 | | Load_Top At_Offset_1 00c6 01d7 | | Execute Vector,Field_Read 00c7 0007 | | Action Break_Optional 00c8 BODY_0058: 00c8 00d8 | | Load_Top At_Offset_0 00c9 0f0b | | Execute_Immediate Equal,0xb 00ca 6810 |h | Jump_Zero 0xdb 00cb e5ff | | Load 0x2,-0x1 00cc e007 | | Load 0x0,0x7 00cd 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00ce e008 | | Load 0x0,0x8 00cf 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00d0 6802 |h | Jump_Zero 0xd3 00d1 4801 |H | Short_Literal 0x1 00d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00d3 e5ff | | Load 0x2,-0x1 00d4 e007 | | Load 0x0,0x7 00d5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00d6 e009 | | Load 0x0,0x9 00d7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00d8 6810 |h | Jump_Zero 0xe9 00d9 480c |H | Short_Literal 0xc 00da 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00db 00d8 | | Load_Top At_Offset_0 00dc 0f03 | | Execute_Immediate Equal,0x3 00dd 00d9 | | Load_Top At_Offset_1 00de 0f05 | | Execute_Immediate Equal,0x5 00df 0278 | x | Execute Discrete,Or 00e0 6808 |h | Jump_Zero 0xe9 00e1 e5ff | | Load 0x2,-0x1 00e2 e007 | | Load 0x0,0x7 00e3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00e4 e00a | | Load 0x0,0xa 00e5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00e6 6802 |h | Jump_Zero 0xe9 00e7 4802 |H | Short_Literal 0x2 00e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00e9 00d8 | | Load_Top At_Offset_0 00ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00eb 0000 0000 | | .BLANK 0000[0x5] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f9 | | .CONST 0x00f9 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0004 | | .CONST 0x0004 ; Number of locals 00f3 INIT_00f0: 00f3 029f 014b | K| Declare_Subprogram INIT_0148,For_Call 00f5 029f 015b | [| Declare_Subprogram INIT_0158,For_Call 00f7 029f 016b | k| Declare_Subprogram INIT_0168,For_Call 00f9 BODY_00f0: 00f9 e00b | | Load 0x0,0xb 00fa 180e | | Execute Package,Field_Execute,Field_Number 0xe 00fb 8404 | | Call 0x2,0x4 00fc 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00fd 0000 0000 | | .XXX[0x3] 00ff 0000 | | 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0108 | | .CONST 0x0108 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0002 | | .CONST 0x0002 ; Number of locals 0103 INIT_0100: 0103 00db | | Load_Top At_Offset_3 0104 00db | | Load_Top At_Offset_3 0105 01d7 | | Execute Vector,Field_Read 0106 e007 | | Load 0x0,0x7 0107 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0108 BODY_0100: 0108 00cf | | Action Mark_Auxiliary 0109 00d9 | | Load_Top At_Offset_1 010a 01d9 | | Execute Vector,Reverse_Bounds 010b 0263 | c | Execute Discrete,Above_Bound 010c 701c |p | Jump_Nonzero 0x129 010d 00d8 | | Load_Top At_Offset_0 010e e402 | | Load 0x2,0x2 010f 01d7 | | Execute Vector,Field_Read 0110 8214 | | Call 0x1,0x14 0111 00d9 | | Load_Top At_Offset_1 0112 e402 | | Load 0x2,0x2 0113 01d7 | | Execute Vector,Field_Read 0114 e007 | | Load 0x0,0x7 0115 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0116 e00c | | Load 0x0,0xc 0117 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0118 e5fe | | Load 0x2,-0x2 0119 e5ff | | Load 0x2,-0x1 011a 01d7 | | Execute Vector,Field_Read 011b 8214 | | Call 0x1,0x14 011c e5fe | | Load 0x2,-0x2 011d e5ff | | Load 0x2,-0x1 011e 01d7 | | Execute Vector,Field_Read 011f e007 | | Load 0x0,0x7 0120 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0121 e00c | | Load 0x0,0xc 0122 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0123 4801 |H | Short_Literal 0x1 0124 e5fd | | Load 0x2,-0x3 0125 e006 | | Load 0x0,0x6 0126 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0127 00c8 | | Action Pop_Auxiliary_Range 0128 3fe4 |? | Loop_Increasing 0x10d 0129 4504 |E | Exit_Suprogram New_Top_Offset 0x4 012a 0000 0000 | | .BLANK 0000[0x6] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 4800 |H | Short_Literal 0x0 0134 a213 | | Store_Unchecked 0x1,0x13 0135 00cf | | Action Mark_Auxiliary 0136 e5fd | | Load 0x2,-0x3 0137 01d9 | | Execute Vector,Reverse_Bounds 0138 0263 | c | Execute Discrete,Above_Bound 0139 700a |p | Jump_Nonzero 0x144 013a 00d8 | | Load_Top At_Offset_0 013b e5fd | | Load 0x2,-0x3 013c 820f | | Call 0x1,0xf 013d 6804 |h | Jump_Zero 0x142 013e e5fc | | Load 0x2,-0x4 013f 00d9 | | Load_Top At_Offset_1 0140 e5fd | | Load 0x2,-0x3 0141 85fe | | Call 0x2,-0x2 0142 00c8 | | Action Pop_Auxiliary_Range 0143 3ff6 |? | Loop_Increasing 0x13a 0144 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0145 0000 0000 | | .XXX[0x3] 0147 0000 | | 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b e213 | | Load 0x1,0x13 014c 6802 |h | Jump_Zero 0x14f 014d 4800 |H | Short_Literal 0x0 014e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 014f e7fd | | Load 0x3,-0x3 0150 e7fe | | Load 0x3,-0x2 0151 e7ff | | Load 0x3,-0x1 0152 8210 | | Call 0x1,0x10 0153 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0154 0000 0000 | | .BLANK 0000[0x4] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015d | ] | .CONST 0x015d ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0002 | | .CONST 0x0002 ; Number of locals 015b INIT_0158: 015b 029f 01e3 | | Declare_Subprogram INIT_01e0,For_Call 015d BODY_0158: 015d 00db | | Load_Top At_Offset_3 015e e008 | | Load 0x0,0x8 015f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0160 6802 |h | Jump_Zero 0x163 0161 8602 | | Call 0x3,0x2 0162 7802 |x | Jump 0x165 0163 00db | | Load_Top At_Offset_3 0164 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0165 0831 | 1 | Execute_Immediate Raise,0x31 0166 0000 0000 | | .XXX[0x2] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 0175 | u | .CONST 0x0175 ; Address of begin 0169 01bd | | .CONST 0x01bd ; Address of exception handler 016a 0002 | | .CONST 0x0002 ; Number of locals 016b INIT_0168: 016b e005 | | Load 0x0,0x5 016c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 016d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 016e 02c7 | | Declare_Variable Any 016f e5fe | | Load 0x2,-0x2 0170 e5ff | | Load 0x2,-0x1 0171 01d7 | | Execute Vector,Field_Read 0172 e007 | | Load 0x0,0x7 0173 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0174 a602 | | Store_Unchecked 0x3,0x2 0175 BODY_0168: 0175 e00b | | Load 0x0,0xb 0176 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0177 e00b | | Load 0x0,0xb 0178 180f | | Execute Package,Field_Execute,Field_Number 0xf 0179 e006 | | Load 0x0,0x6 017a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 017b 0337 | 7 | Declare_Variable Array 017c e006 | | Load 0x0,0x6 017d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 017e 4801 |H | Short_Literal 0x1 017f 00da | | Load_Top At_Offset_2 0180 01d6 | | Execute Vector,Field_Write 0181 e006 | | Load 0x0,0x6 0182 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0183 4802 |H | Short_Literal 0x2 0184 00da | | Load_Top At_Offset_2 0185 01d6 | | Execute Vector,Field_Write 0186 e006 | | Load 0x0,0x6 0187 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0188 4803 |H | Short_Literal 0x3 0189 00da | | Load_Top At_Offset_2 018a 01d6 | | Execute Vector,Field_Write 018b e006 | | Load 0x0,0x6 018c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 018d 01c3 | | Execute Vector,Check_In_Type 018e e5fe | | Load 0x2,-0x2 018f 00d8 | | Load_Top At_Offset_0 0190 0aff | | Execute_Immediate Plus,-0x1 0191 00d8 | | Load_Top At_Offset_0 0192 00e3 | | Load_Encached Natural_Cache 0193 0260 | ` | Execute Discrete,In_Type 0194 7001 |p | Jump_Nonzero 0x196 0195 0801 | | Execute_Immediate Raise,0x1 0196 e5ff | | Load 0x2,-0x1 0197 8402 | | Call 0x2,0x2 0198 e602 | | Load 0x3,0x2 0199 8403 | | Call 0x2,0x3 019a e00c | | Load 0x0,0xc 019b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 019c e602 | | Load 0x3,0x2 019d e00c | | Load 0x0,0xc 019e 181c | | Execute Package,Field_Execute,Field_Number 0x1c 019f e5fe | | Load 0x2,-0x2 01a0 e5ff | | Load 0x2,-0x1 01a1 01d7 | | Execute Vector,Field_Read 01a2 8214 | | Call 0x1,0x14 01a3 e5fd | | Load 0x2,-0x3 01a4 e006 | | Load 0x0,0x6 01a5 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01a6 4800 |H | Short_Literal 0x0 01a7 a213 | | Store_Unchecked 0x1,0x13 01a8 0092 01f7 | | Action Push_String_Extended,0x1f7 ; "Saved module " 01aa e5fe | | Load 0x2,-0x2 01ab e5ff | | Load 0x2,-0x1 01ac 01d7 | | Execute Vector,Field_Read 01ad e007 | | Load 0x0,0x7 01ae 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01af e00c | | Load 0x0,0xc 01b0 181e | | Execute Package,Field_Execute,Field_Number 0x1e 01b1 01cc | | Execute Vector,Catenate 01b2 e5fe | | Load 0x2,-0x2 01b3 e5ff | | Load 0x2,-0x1 01b4 01d7 | | Execute Vector,Field_Read 01b5 e007 | | Load 0x0,0x7 01b6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01b7 e00c | | Load 0x0,0xc 01b8 181f | | Execute Package,Field_Execute,Field_Number 0x1f 01b9 01cc | | Execute Vector,Catenate 01ba e00d | | Load 0x0,0xd 01bb 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01bc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01bd TRAP_0168: 01bd e006 | | Load 0x0,0x6 01be 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01bf 010f | | Execute Exception,Equal 01c0 681d |h | Jump_Zero 0x1de 01c1 4801 |H | Short_Literal 0x1 01c2 a213 | | Store_Unchecked 0x1,0x13 01c3 0092 01f8 | | Action Push_String_Extended,0x1f8 ; "Ignoring " 01c5 e5fe | | Load 0x2,-0x2 01c6 e5ff | | Load 0x2,-0x1 01c7 01d7 | | Execute Vector,Field_Read 01c8 e007 | | Load 0x0,0x7 01c9 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01ca e00c | | Load 0x0,0xc 01cb 181e | | Execute Package,Field_Execute,Field_Number 0x1e 01cc 01cc | | Execute Vector,Catenate 01cd e5fe | | Load 0x2,-0x2 01ce e5ff | | Load 0x2,-0x1 01cf 01d7 | | Execute Vector,Field_Read 01d0 e007 | | Load 0x0,0x7 01d1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01d2 e00c | | Load 0x0,0xc 01d3 181f | | Execute Package,Field_Execute,Field_Number 0x1f 01d4 01cc | | Execute Vector,Catenate 01d5 0092 01f9 | | Action Push_String_Extended,0x1f9 ; " because it duplicates the module name of " 01d7 01cc | | Execute Vector,Catenate 01d8 e006 | | Load 0x0,0x6 01d9 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01da 01cc | | Execute Vector,Catenate 01db e00d | | Load 0x0,0xd 01dc 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01de 0100 | | Execute Exception,Raise 01df 0000 | | .XXX[0x1] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01ec | | .CONST 0x01ec ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0002 | | .CONST 0x0002 ; Number of locals 01e3 INIT_01e0: 01e3 e005 | | Load 0x0,0x5 01e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01e6 02c7 | | Declare_Variable Any 01e7 4800 |H | Short_Literal 0x0 01e8 e7ff | | Load 0x3,-0x1 01e9 e008 | | Load 0x0,0x8 01ea 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01eb a802 | | Store_Unchecked 0x4,0x2 01ec BODY_01e0: 01ec 00d8 | | Load_Top At_Offset_0 01ed e005 | | Load 0x0,0x5 01ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ef 180f | | Execute Package,Field_Execute,Field_Number 0xf 01f0 6803 |h | Jump_Zero 0x1f4 01f1 e7ff | | Load 0x3,-0x1 01f2 00cb | | Action Pop_Block_With_Result 01f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f4 00d8 | | Load_Top At_Offset_0 01f5 00cb | | Action Pop_Block_With_Result 01f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f7 ; -------------------------------------------------------------------------------------- 01f7 ; STRING TABLE 01f7 ; -------------------------------------------------------------------------------------- 01f7 0008 | | .STRTAB 0x0008->0x01fb ; "Saved module " 01f8 0013 | | .STRTAB 0x0013->0x0201 ; "Ignoring " 01f9 001a | | .STRTAB 0x001a->0x0206 ; " because it duplicates the module name of " 01fa 0042 | B | .STREND 0x0042->0x021b 01fb 5361 7665 |Save| .STRTAB_STRINGS 021b 0000 0000 | | .BLANK 0000[0x5] 0220 ; -------------------------------------------------------------------------------------- 0220 ; Debug Table 0220 ; -------------------------------------------------------------------------------------- 0220 0004 0011 | | .DEBUG4 0x0004,0x0011,0x97ac,0x0000,0x0001,0x0000 0226 2a00 0000 |* | .XXX[0x1da] 0228 07ff ffec | | 022a 1400 7191 | q | 022c 7a00 0000 |z | 022e 07ff ffec | | 0230 1400 7191 | q | 0232 ca00 0000 | | 0234 07ff ffec | | 0236 1400 7192 | q | 0238 3600 0000 |6 | 023a 13ff ffec | | 023c 1400 7192 | q | 023e ae00 0000 | | 0240 07ff ffec | | 0242 1400 7193 | q | 0244 2200 0000 |" | 0246 07ff ffec | | 0248 1400 7193 | q | 024a d600 0000 | | 024c 03ff ffec | | 024e 1400 7194 | q | 0250 e200 0000 | | 0252 03ff ffec | | 0254 1400 7195 | q | 0256 8a00 0000 | | 0258 07ff ffec | | 025a 1400 7195 | q | 025c ea00 0000 | | 025e 13ff ffec | | 0260 1400 7196 | q | 0262 2a00 0000 |* | 0264 13ff ffec | | 0266 1400 7196 | q | 0268 7e00 0000 |~ | 026a 13ff ffec | | 026c 1400 7196 | q | 026e be00 0000 | | 0270 13ff ffec | | 0272 1400 7197 | q | 0274 7e00 0000 |~ | 0276 13ff ffec | | 0278 1400 7197 | q | 027a ca00 0000 | | 027c 03ff ffec | | 027e 1400 7198 | q | 0280 1200 0000 | | 0282 03ff ffec | | 0284 1400 7198 | q | 0286 6e00 0000 |n | 0288 03ff ffec | | 028a 1400 7198 | q | 028c b200 0000 | | 028e 03ff ffec | | 0290 1400 7198 | q | 0292 e200 0000 | | 0294 03ff ffec | | 0296 1400 7199 | q | 0298 2a00 0000 |* | 029a 07ff ffec | | 029c 1400 7199 | q | 029e 8200 0000 | | 02a0 63ff ffec |c | 02a2 1400 719c | q | 02a4 8880 0000 | | 02a6 6000 0000 |` | 02a8 0000 719c | q | 02aa ee00 0000 | | 02ac 13ff ffec | | 02ae 1400 719d | q | 02b0 4200 0000 |B | 02b2 13ff ffec | | 02b4 1400 719d | q | 02b6 9600 0000 | | 02b8 13ff ffec | | 02ba 1400 71a1 | q | 02bc a200 0000 | | 02be 13ff ffec | | 02c0 1400 71a5 | q | 02c2 2600 0000 |& | 02c4 13ff ffec | | 02c6 1400 71a6 | q | 02c8 6e00 0000 |n | 02ca 07ff ffec | | 02cc 1400 71a7 | q | 02ce 2c80 0000 |, | 02d0 1000 0000 | | 02d2 0000 71a7 | q | 02d4 aa00 0001 | | 02d6 03ff ffec | | 02d8 1400 71ad | q | 02da aa00 0001 | | 02dc 03ff ffec | | 02de 1400 71af | q | 02e0 5a00 0001 |Z | 02e2 63ff ffec |c | 02e4 1400 71b4 | q | 02e6 ca00 0001 | | 02e8 63ff ffec |c | 02ea 1400 71b7 | q | 02ec 1200 0001 | | 02ee 63ff ffec |c | 02f0 1400 71bc | q | 02f2 7e00 0001 |~ | 02f4 63ff ffec |c | 02f6 1400 71be | q | 02f8 c600 0001 | | 02fa 83ff ffec | | 02fc 1400 71c4 | q | 02fe 4e00 0001 |N | 0300 83ff ffec | | 0302 1400 71c8 | q | 0304 1600 0001 | | 0306 63ff ffec |c | 0308 1400 71cd | q | 030a a200 0001 | | 030c 63ff ffec |c | 030e 1400 71cf | q | 0310 ea00 0001 | | 0312 73ff ffec |s | 0314 1400 71d5 | q | 0316 9600 0001 | | 0318 73ff ffec |s | 031a 1400 71d9 | q | 031c 0a00 0001 | | 031e 03ff ffec | | 0320 1400 71de | q | 0322 7200 0001 |r | 0324 03ff ffec | | 0326 1400 71e0 | q | 0328 2200 0001 |" | 032a 33ff ffec |3 | 032c 1400 71e5 | q | 032e 8e00 0001 | | 0330 33ff ffec |3 | 0332 1400 71e9 | q | 0334 3600 0001 |6 | 0336 73ff ffec |s | 0338 1400 71ee | q | 033a b600 0001 | | 033c 73ff ffec |s | 033e 1400 71f4 | q | 0340 2200 0001 |" | 0342 73ff ffec |s | 0344 1400 71f5 | q | 0346 ae00 0001 | | 0348 53ff ffec |S | 034a 1400 71fb | q | 034c 2a00 0001 |* | 034e 53ff ffec |S | 0350 1400 7200 | r | 0352 5a00 0001 |Z | 0354 83ff ffec | | 0356 1400 7205 | r | 0358 e200 0001 | | 035a 83ff ffec | | 035c 1400 720a | r | 035e e600 0001 | | 0360 83ff ffec | | 0362 1400 720d | r | 0364 3200 0001 |2 | 0366 63ff ffec |c | 0368 1400 7212 | r | 036a aa00 0001 | | 036c 63ff ffec |c | 036e 1400 7214 | r | 0370 f200 0000 | | 0372 13ff ffec | | 0374 1400 7215 | r | 0376 3a00 0000 |: | 0378 13ff ffec | | 037a 1400 7216 | r | 037c 4600 0000 |F | 037e a3ff ffec | | 0380 1400 721c | r | 0382 4a00 0000 |J | 0384 53ff ffec |S | 0386 1400 721e | r | 0388 a600 0000 | | 038a 13ff ffec | | 038c 1400 721f | r | 038e 0200 0000 | | 0390 13ff ffec | | 0392 1400 721f | r | 0394 5a00 0000 |Z | 0396 b3ff ffec | | 0398 1400 7223 | r#| 039a d600 0000 | | 039c b3ff ffec | | 039e 1400 7226 | r&| 03a0 0480 0000 | | 03a2 b000 0000 | | 03a4 0000 7226 | r&| 03a6 6080 0000 |` | 03a8 b000 0000 | | 03aa 0000 7226 | r&| 03ac be00 0000 | | 03ae 23ff ffec |# | 03b0 1400 7228 | r(| 03b2 9890 0000 | | 03b4 0400 11d9 | | 03b6 7000 7229 |p r)| 03b8 0210 0000 | | 03ba 0000 11d9 | | 03bc 7000 0000 |p | 03be 0110 0002 | | 03c0 1400 11d9 | | 03c2 7000 7229 |p r)| 03c4 a680 0000 | | 03c6 b000 0001 | | 03c8 1000 722a | r*| 03ca 0a80 0000 | | 03cc 1000 0001 | | 03ce 2000 0000 | | 03d0 0110 0002 | | 03d2 1400 11d9 | | 03d4 c000 0000 | | 03d6 0110 0002 | | 03d8 1c00 11da | | 03da 0000 0000 | | 03dc 0110 0002 | | 03de 2000 11dd | | 03e0 3000 722a |0 r*| 03e2 4e00 0000 |N | 03e4 d3ff ffec | | 03e6 1400 722d | r-| 03e8 5c90 0000 |\ | 03ea b000 11dd | | 03ec 5000 0000 |P | 03ee 0110 0001 | | 03f0 c800 11dd | | 03f2 5000 722d |P r-| 03f4 ce80 0000 | | 03f6 b000 0001 | | 03f8 1000 722e | r.| 03fa 1100 0000 | | 03fc b000 0000 | | 03fe 6000 722e |` r.|