|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0170 | p | .CONST 0x0170 ; 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 004a | J | .CONST 0x004a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0017 | | .CONST 0x0017 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x01ba,0x8000,0x0000,0x0058,0x5b25,0x0000,0x0009 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xd,0xfffd 000e e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3 = 0xe,0xfffc 000f 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0010 0129 | ) | Execute Any,Make_Visible 0011 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x11,0xfffb 0013 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x13,0xfffa 0015 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x15,0xfff9 0017 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x17,0xfff8 0019 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x19,0xfff7 001b 00bf | | Action Accept_Activation 001c 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001c,0x01ce,0x8000,0x0000,0x0058,0x6615,0x0000,0x000b ; Debug Table 0x1.0x0 = 0x1c,0xffff 001d e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x1 = 0x1d,0xfffe 001e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 001f 0266 | f | Execute Discrete,Bounds 0020 e003 | | Load 0x0,0x3 0021 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0022 02a0 | | Declare_Subprogram Null_Subprogram 0023 4801 |H | Short_Literal 0x1 0024 035d | ] | Declare_Type Array,Defined 0025 00d8 | | Load_Top At_Offset_0 0026 0337 | 7 | Declare_Variable Array 0027 00d8 | | Load_Top At_Offset_0 0028 0337 | 7 | Declare_Variable Array 0029 4800 |H | Short_Literal 0x0 002a 4800 |H | Short_Literal 0x0 002b 00da | | Load_Top At_Offset_2 002c 01d6 | | Execute Vector,Field_Write 002d 4801 |H | Short_Literal 0x1 002e 4801 |H | Short_Literal 0x1 002f 00da | | Load_Top At_Offset_2 0030 01d6 | | Execute Vector,Field_Write 0031 00d9 | | Load_Top At_Offset_1 0032 01d4 | | Execute Vector,Structure_Write 0033 612c |a, | Indirect_Literal Discrete,0x160,{0x00000000, 0x00586615} ; Debug Table 0x1.0x2 = 0x33,0xfffd 0034 482e |H. | Short_Literal 0x2e 0035 e004 | | Load 0x0,0x4 0036 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0037 e003 | | Load 0x0,0x3 0038 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0039 0387 | | Declare_Variable Package 003a 00d8 | | Load_Top At_Offset_0 003b 020f | | Execute Module,Activate 003c 029d 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call ; Debug Table 0x1.0x3 = 0x3c,0xfffc 003e 029d 011b | | Declare_Subprogram INIT_0118,For_Outer_Call ; Debug Table 0x1.0x4 = 0x3e,0xfffb 0040 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x5 = 0x40,0xfffa 0041 00c7 | | Action Elaborate_Subprogram 0042 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x6 = 0x42,0xfff9 0043 00c7 | | Action Elaborate_Subprogram 0044 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x7 = 0x44,0xfff8 0045 00c7 | | Action Elaborate_Subprogram 0046 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x8 = 0x46,0xfff7 0047 00c7 | | Action Elaborate_Subprogram 0048 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x9 = 0x48,0xfff6 0049 00c7 | | Action Elaborate_Subprogram 004a BODY_0008: 004a 00bc | | Action Signal_Activated 004b 00bb | | Action Signal_Completion 004c 0000 0000 | | .BLANK 0000[0x4] 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0053 | S | .CONST 0x0053 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0001 | | .CONST 0x0001 ; Number of locals 0053 BODY_0050: 0053 INIT_0050: 0053 e5fa | | Load 0x2,-0x6 ; Debug Table 0x2 = .DEBUG 0x0053,0x01e4,0x0001,0x0000,0x0058,0x5b25,0x0000,0x001d ; Debug Table 0x2.0x0 = 0x53,0x1 0054 e5fb | | Load 0x2,-0x5 0055 e5fc | | Load 0x2,-0x4 0056 e5fd | | Load 0x2,-0x3 0057 e5fe | | Load 0x2,-0x2 0058 e5ff | | Load 0x2,-0x1 0059 8216 | | Call 0x1,0x16 005a c5fa | | Store 0x2,-0x6 005b 4506 |E | Exit_Suprogram New_Top_Offset 0x6 005c 0000 0000 | | .BLANK 0000[0x4] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0070 | p | .CONST 0x0070 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0002 | | .CONST 0x0002 ; Number of locals 0063 INIT_0060: 0063 e005 | | Load 0x0,0x5 ; Debug Table 0x3 = .DEBUG 0x0063,0x01e8,0x0001,0x0000,0x0058,0x5b25,0x0000,0x003e ; Debug Table 0x3.0x0 = 0x63,0xffff 0064 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0065 02c7 | | Declare_Variable Any 0066 e006 | | Load 0x0,0x6 0067 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0068 e005 | | Load 0x0,0x5 0069 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 006a 1816 | | Execute Package,Field_Execute,Field_Number 0x16 006b e5fd | | Load 0x2,-0x3 006c e5fe | | Load 0x2,-0x2 006d e007 | | Load 0x0,0x7 006e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 006f c402 | | Store 0x2,0x2 0070 BODY_0060: 0070 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0x70,0x1 0071 e005 | | Load 0x0,0x5 0072 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0073 680c |h | Jump_Zero 0x80 0074 e5fc | | Load 0x2,-0x4 ; Debug Table 0x3.0x2 = 0x74,0x2 0075 0092 0164 | d| Action Push_String_Extended,0x164 ; "; " 0077 01cc | | Execute Vector,Catenate 0078 e5fe | | Load 0x2,-0x2 0079 01cc | | Execute Vector,Catenate 007a 0092 0165 | e| Action Push_String_Extended,0x165 ; " is undefined" 007c 01cc | | Execute Vector,Catenate 007d e5fd | | Load 0x2,-0x3 007e e007 | | Load 0x0,0x7 007f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0080 e5fa | | Load 0x2,-0x6 ; Debug Table 0x3.0x3 = 0x80,0x3 0081 e5fb | | Load 0x2,-0x5 0082 e5fc | | Load 0x2,-0x4 0083 e5fd | | Load 0x2,-0x3 0084 e5fe | | Load 0x2,-0x2 0085 e5ff | | Load 0x2,-0x1 0086 8216 | | Call 0x1,0x16 0087 c5fa | | Store 0x2,-0x6 0088 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0089 0000 0000 | | .BLANK 0000[0x7] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0098 | | .CONST 0x0098 ; Address of begin 0091 00ae | | .CONST 0x00ae ; Address of exception handler 0092 0002 | | .CONST 0x0002 ; Number of locals 0093 INIT_0090: 0093 e003 | | Load 0x0,0x3 ; Debug Table 0x4 = .DEBUG 0x0093,0x01f2,0x0001,0x0000,0x0058,0x5b25,0x0000,0x005f ; Debug Table 0x4.0x0 = 0x93,0xffff 0094 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0095 02c7 | | Declare_Variable Any 0096 00d8 | | Load_Top At_Offset_0 0097 1c00 | | Execute_Immediate Run_Utility,0x0 0098 BODY_0090: 0098 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x1 = 0x98,0x1 0099 e5fe | | Load 0x2,-0x2 009a 0217 | | Execute Heap_Access,All_Reference 009b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 009c e005 | | Load 0x0,0x5 009d 181e | | Execute Package,Field_Execute,Field_Number 0x1e 009e e5fc | | Load 0x2,-0x4 009f e5ff | | Load 0x2,-0x1 00a0 e003 | | Load 0x0,0x3 00a1 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00a2 c402 | | Store 0x2,0x2 00a3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x2 = 0xa3,0x2 00a4 e215 | | Load 0x1,0x15 00a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00a6 c5fb | | Store 0x2,-0x5 00a7 e5fb | | Load 0x2,-0x5 ; Debug Table 0x4.0x3 = 0xa7,0x3 00a8 e5fc | | Load 0x2,-0x4 00a9 e5ff | | Load 0x2,-0x1 00aa e004 | | Load 0x0,0x4 00ab 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00ac c5fb | | Store 0x2,-0x5 00ad 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00ae TRAP_0090: 00ae 0007 | | Action Break_Optional 00af e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x4 = 0xaf,0x4 00b0 0092 0164 | d| Action Push_String_Extended,0x164 ; "; " 00b2 01cc | | Execute Vector,Catenate 00b3 e008 | | Load 0x0,0x8 00b4 180d | | Execute Package,Field_Execute,Field_Number 0xd 00b5 01cc | | Execute Vector,Catenate 00b6 e5fe | | Load 0x2,-0x2 00b7 e007 | | Load 0x0,0x7 00b8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 00b9 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00ba 0000 0000 | | .BLANK 0000[0x6] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c3 | | .CONST 0x00c3 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0001 | | .CONST 0x0001 ; Number of locals 00c3 BODY_00c0: 00c3 INIT_00c0: 00c3 e5fa | | Load 0x2,-0x6 ; Debug Table 0x5 = .DEBUG 0x00c3,0x01fe,0x0001,0x0000,0x0058,0x5b25,0x0000,0x007a ; Debug Table 0x5.0x0 = 0xc3,0x1 00c4 e5fb | | Load 0x2,-0x5 00c5 e5fc | | Load 0x2,-0x4 00c6 e5fd | | Load 0x2,-0x3 00c7 e5fd | | Load 0x2,-0x3 00c8 e5fe | | Load 0x2,-0x2 00c9 e007 | | Load 0x0,0x7 00ca 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00cb e5ff | | Load 0x2,-0x1 00cc 8217 | | Call 0x1,0x17 00cd c5fa | | Store 0x2,-0x6 00ce 4506 |E | Exit_Suprogram New_Top_Offset 0x6 00cf 0000 | | .XXX[0x1] 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; SUBPROGRAM 00d0 ; -------------------------------------------------------------------------------------- 00d0 00d3 | | .CONST 0x00d3 ; Address of begin 00d1 0004 | | .CONST 0x0004 ; Address of exception handler 00d2 0001 | | .CONST 0x0001 ; Number of locals 00d3 BODY_00d0: 00d3 INIT_00d0: 00d3 e5fb | | Load 0x2,-0x5 ; Debug Table 0x6 = .DEBUG 0x00d3,0x0202,0x0001,0x0000,0x0058,0x5b25,0x0000,0x009d ; Debug Table 0x6.0x0 = 0xd3,0x1 00d4 e5fc | | Load 0x2,-0x4 00d5 e5fd | | Load 0x2,-0x3 00d6 e5fe | | Load 0x2,-0x2 00d7 e5ff | | Load 0x2,-0x1 00d8 e005 | | Load 0x0,0x5 00d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00da 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 00db 8210 | | Call 0x1,0x10 00dc c5fb | | Store 0x2,-0x5 00dd 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00de 0000 0000 | | .XXX[0x2] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e8 | | .CONST 0x00e8 ; Address of begin 00e1 0106 | | .CONST 0x0106 ; Address of exception handler 00e2 0002 | | .CONST 0x0002 ; Number of locals 00e3 INIT_00e0: 00e3 e003 | | Load 0x0,0x3 ; Debug Table 0x7 = .DEBUG 0x00e3,0x0206,0x0001,0x0000,0x0058,0x6615,0x0000,0x0038 ; Debug Table 0x7.0x0 = 0xe3,0xffff 00e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e5 02c7 | | Declare_Variable Any 00e6 00d8 | | Load_Top At_Offset_0 00e7 1c00 | | Execute_Immediate Run_Utility,0x0 00e8 BODY_00e0: 00e8 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x1 = 0xe8,0x1 00e9 6814 |h | Jump_Zero 0xfe 00ea 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x2 = 0xea,0x2 00eb e5fd | | Load 0x2,-0x3 00ec 0217 | | Execute Heap_Access,All_Reference 00ed 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00ee e005 | | Load 0x0,0x5 00ef 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 00f0 e005 | | Load 0x0,0x5 00f1 181e | | Execute Package,Field_Execute,Field_Number 0x1e 00f2 e5fb | | Load 0x2,-0x5 00f3 e5fe | | Load 0x2,-0x2 00f4 e5ff | | Load 0x2,-0x1 00f5 e214 | | Load 0x1,0x14 00f6 01d7 | | Execute Vector,Field_Read 00f7 e003 | | Load 0x0,0x3 00f8 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00f9 c402 | | Store 0x2,0x2 00fa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x3 = 0xfa,0x3 00fb e215 | | Load 0x1,0x15 00fc 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00fd c5fa | | Store 0x2,-0x6 00fe e5fa | | Load 0x2,-0x6 ; Debug Table 0x7.0x4 = 0xfe,0x4 00ff e5fb | | Load 0x2,-0x5 0100 e5fe | | Load 0x2,-0x2 0101 e5ff | | Load 0x2,-0x1 0102 e004 | | Load 0x0,0x4 0103 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0104 c5fa | | Store 0x2,-0x6 0105 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0106 TRAP_00e0: 0106 0007 | | Action Break_Optional 0107 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x5 = 0x107,0x5 0108 0092 0164 | d| Action Push_String_Extended,0x164 ; "; " 010a 01cc | | Execute Vector,Catenate 010b e008 | | Load 0x0,0x8 010c 180d | | Execute Package,Field_Execute,Field_Number 0xd 010d 01cc | | Execute Vector,Catenate 010e e5fd | | Load 0x2,-0x3 010f e007 | | Load 0x0,0x7 0110 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0111 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0112 0000 0000 | | .BLANK 0000[0x6] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 012a | * | .CONST 0x012a ; Address of begin 0119 0150 | P | .CONST 0x0150 ; Address of exception handler 011a 0004 | | .CONST 0x0004 ; Number of locals 011b INIT_0118: 011b e003 | | Load 0x0,0x3 ; Debug Table 0x8 = .DEBUG 0x011b,0x0214,0x0001,0x0000,0x0058,0x6615,0x0000,0x00ba ; Debug Table 0x8.0x0 = 0x11b,0xffff 011c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 011d 02c7 | | Declare_Variable Any 011e 00d8 | | Load_Top At_Offset_0 011f 1c00 | | Execute_Immediate Run_Utility,0x0 0120 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x1 = 0x120,0xfffe 0121 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0122 02c7 | | Declare_Variable Any 0123 e5fd | | Load 0x2,-0x3 0124 e5fe | | Load 0x2,-0x2 0125 e007 | | Load 0x0,0x7 0126 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0127 c403 | | Store 0x2,0x3 0128 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x2 = 0x128,0xfffd 0129 1b0d | | Execute Package,Field_Read,Field_Number 0xd 012a BODY_0118: 012a 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x3 = 0x12a,0x1 012b e5fd | | Load 0x2,-0x3 012c 0217 | | Execute Heap_Access,All_Reference 012d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 012e e005 | | Load 0x0,0x5 012f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0130 e5fb | | Load 0x2,-0x5 0131 e5fe | | Load 0x2,-0x2 0132 e5ff | | Load 0x2,-0x1 0133 e214 | | Load 0x1,0x14 0134 01d7 | | Execute Vector,Field_Read 0135 e003 | | Load 0x0,0x3 0136 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0137 c402 | | Store 0x2,0x2 0138 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x4 = 0x138,0x2 0139 e215 | | Load 0x1,0x15 013a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 013b c5fa | | Store 0x2,-0x6 013c e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x5 = 0x13c,0x3 013d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 013e 601d |` | Indirect_Literal Discrete,0x15c,{0x00000000, 0x00004000} 013f e009 | | Load 0x0,0x9 0140 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0141 e00a | | Load 0x0,0xa 0142 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 0143 e403 | | Load 0x2,0x3 0144 e005 | | Load 0x0,0x5 0145 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 0146 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0147 0059 | Y | Store_Top Discrete,At_Offset_1 0148 e5fa | | Load 0x2,-0x6 ; Debug Table 0x8.0x6 = 0x148,0x4 0149 e5fb | | Load 0x2,-0x5 014a 00ea | | Load_Encached Null_String_Cache 014b e5ff | | Load 0x2,-0x1 014c e004 | | Load 0x0,0x4 014d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 014e c5fa | | Store 0x2,-0x6 014f 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0150 TRAP_0118: 0150 0007 | | Action Break_Optional 0151 e5fc | | Load 0x2,-0x4 ; Debug Table 0x8.0x7 = 0x151,0x5 0152 0092 0164 | d| Action Push_String_Extended,0x164 ; "; " 0154 01cc | | Execute Vector,Catenate 0155 e008 | | Load 0x0,0x8 0156 180d | | Execute Package,Field_Execute,Field_Number 0xd 0157 01cc | | Execute Vector,Catenate 0158 e5fd | | Load 0x2,-0x3 0159 e007 | | Load 0x0,0x7 015a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 015b 4506 |E | Exit_Suprogram New_Top_Offset 0x6 015c 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0160 0000 0000 | | .LITERAL {0x00000000, 0x00586615} 0164 ; -------------------------------------------------------------------------------------- 0164 ; STRING TABLE 0164 ; -------------------------------------------------------------------------------------- 0164 0006 | | .STRTAB 0x0006->0x0167 ; "; " 0165 0006 | | .STRTAB 0x0006->0x0168 ; " is undefined" 0166 0011 | | .STREND 0x0011->0x016e 0167 3b20 2069 |; i| .STRTAB_STRINGS 016f 0000 | | .XXX[0x1] 0170 ; -------------------------------------------------------------------------------------- 0170 ; Debug Table 0170 ; -------------------------------------------------------------------------------------- 0170 0003 0009 | | .CONST 0x0003,0x0009 0172 000b 01ba | | .DEBUG 0x000b,0x01ba,0x8000,0x0000,0x0058,0x5b25,0x0000,0x0009 017a 001c 01ce | | .DEBUG 0x001c,0x01ce,0x8000,0x0000,0x0058,0x6615,0x0000,0x000b 0182 0053 01e4 | S | .DEBUG 0x0053,0x01e4,0x0001,0x0000,0x0058,0x5b25,0x0000,0x001d 018a 0063 01e8 | c | .DEBUG 0x0063,0x01e8,0x0001,0x0000,0x0058,0x5b25,0x0000,0x003e 0192 0093 01f2 | | .DEBUG 0x0093,0x01f2,0x0001,0x0000,0x0058,0x5b25,0x0000,0x005f 019a 00c3 01fe | | .DEBUG 0x00c3,0x01fe,0x0001,0x0000,0x0058,0x5b25,0x0000,0x007a 01a2 00d3 0202 | | .DEBUG 0x00d3,0x0202,0x0001,0x0000,0x0058,0x5b25,0x0000,0x009d 01aa 00e3 0206 | | .DEBUG 0x00e3,0x0206,0x0001,0x0000,0x0058,0x6615,0x0000,0x0038 01b2 011b 0214 | | .DEBUG 0x011b,0x0214,0x0001,0x0000,0x0058,0x6615,0x0000,0x00ba 01ba ; -------------------------------------------------------------------------------------- 01ba ; Debug3 Subtable 0x0 01ba ; -------------------------------------------------------------------------------------- 01ba 0009 0000 | | .DBG3TAB 0x0009,0x0000 01bc 000b ffff | | .CONST 0x000b,0xffff 01be 000c fffe | | .CONST 0x000c,0xfffe 01c0 000d fffd | | .CONST 0x000d,0xfffd 01c2 000e fffc | | .CONST 0x000e,0xfffc 01c4 0011 fffb | | .CONST 0x0011,0xfffb 01c6 0013 fffa | | .CONST 0x0013,0xfffa 01c8 0015 fff9 | | .CONST 0x0015,0xfff9 01ca 0017 fff8 | | .CONST 0x0017,0xfff8 01cc 0019 fff7 | | .CONST 0x0019,0xfff7 01ce ; -------------------------------------------------------------------------------------- 01ce ; Debug3 Subtable 0x1 01ce ; -------------------------------------------------------------------------------------- 01ce 000a 0000 | | .DBG3TAB 0x000a,0x0000 01d0 001c ffff | | .CONST 0x001c,0xffff 01d2 001d fffe | | .CONST 0x001d,0xfffe 01d4 0033 fffd | 3 | .CONST 0x0033,0xfffd 01d6 003c fffc | < | .CONST 0x003c,0xfffc 01d8 003e fffb | > | .CONST 0x003e,0xfffb 01da 0040 fffa | @ | .CONST 0x0040,0xfffa 01dc 0042 fff9 | B | .CONST 0x0042,0xfff9 01de 0044 fff8 | D | .CONST 0x0044,0xfff8 01e0 0046 fff7 | F | .CONST 0x0046,0xfff7 01e2 0048 fff6 | H | .CONST 0x0048,0xfff6 01e4 ; -------------------------------------------------------------------------------------- 01e4 ; Debug3 Subtable 0x2 01e4 ; -------------------------------------------------------------------------------------- 01e4 0000 0001 | | .DBG3TAB 0x0000,0x0001 01e6 0053 0001 | S | .CONST 0x0053,0x0001 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; Debug3 Subtable 0x3 01e8 ; -------------------------------------------------------------------------------------- 01e8 0001 0003 | | .DBG3TAB 0x0001,0x0003 01ea 0063 ffff | c | .CONST 0x0063,0xffff 01ec 0070 0001 | p | .CONST 0x0070,0x0001 01ee 0074 0002 | t | .CONST 0x0074,0x0002 01f0 0080 0003 | | .CONST 0x0080,0x0003 01f2 ; -------------------------------------------------------------------------------------- 01f2 ; Debug3 Subtable 0x4 01f2 ; -------------------------------------------------------------------------------------- 01f2 0001 0004 | | .DBG3TAB 0x0001,0x0004 01f4 0093 ffff | | .CONST 0x0093,0xffff 01f6 0098 0001 | | .CONST 0x0098,0x0001 01f8 00a3 0002 | | .CONST 0x00a3,0x0002 01fa 00a7 0003 | | .CONST 0x00a7,0x0003 01fc 00af 0004 | | .CONST 0x00af,0x0004 01fe ; -------------------------------------------------------------------------------------- 01fe ; Debug3 Subtable 0x5 01fe ; -------------------------------------------------------------------------------------- 01fe 0000 0001 | | .DBG3TAB 0x0000,0x0001 0200 00c3 0001 | | .CONST 0x00c3,0x0001 0202 ; -------------------------------------------------------------------------------------- 0202 ; Debug3 Subtable 0x6 0202 ; -------------------------------------------------------------------------------------- 0202 0000 0001 | | .DBG3TAB 0x0000,0x0001 0204 00d3 0001 | | .CONST 0x00d3,0x0001 0206 ; -------------------------------------------------------------------------------------- 0206 ; Debug3 Subtable 0x7 0206 ; -------------------------------------------------------------------------------------- 0206 0001 0005 | | .DBG3TAB 0x0001,0x0005 0208 00e3 ffff | | .CONST 0x00e3,0xffff 020a 00e8 0001 | | .CONST 0x00e8,0x0001 020c 00ea 0002 | | .CONST 0x00ea,0x0002 020e 00fa 0003 | | .CONST 0x00fa,0x0003 0210 00fe 0004 | | .CONST 0x00fe,0x0004 0212 0107 0005 | | .CONST 0x0107,0x0005 0214 ; -------------------------------------------------------------------------------------- 0214 ; Debug3 Subtable 0x8 0214 ; -------------------------------------------------------------------------------------- 0214 0003 0005 | | .DBG3TAB 0x0003,0x0005 0216 011b ffff | | .CONST 0x011b,0xffff 0218 0120 fffe | | .CONST 0x0120,0xfffe 021a 0128 fffd | ( | .CONST 0x0128,0xfffd 021c 012a 0001 | * | .CONST 0x012a,0x0001 021e 0138 0002 | 8 | .CONST 0x0138,0x0002 0220 013c 0003 | < | .CONST 0x013c,0x0003 0222 0148 0004 | H | .CONST 0x0148,0x0004 0224 0151 0005 | Q | .CONST 0x0151,0x0005 0226 0000 0000 | | .BLANK 0000[0x1da]