|
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 0160 | ` | .CONST 0x0160 ; 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 0035 | 5 | .CONST 0x0035 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0011 | | .CONST 0x0011 ; Number of locals 000b INIT_0008: 000b 4801 |H | Short_Literal 0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x018a,0x8000,0x0000,0x0057,0x5115,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff ; Debug Table 0x0.0x1 = 0xb,0xfffe ; Debug Table 0x0.0x2 = 0xb,0xfffd ; Debug Table 0x0.0x3 = 0xb,0xfffc ; Debug Table 0x0.0x4 = 0xb,0xfffb 000c 4840 |H@ | Short_Literal 0x40 000d 00e3 | | Load_Encached Natural_Cache 000e 03f9 | | Declare_Type Discrete,Constrained,Visible 000f 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0xf,0xfffa 0011 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x11,0xfff9 0013 00bf | | Action Accept_Activation 0014 e001 | | Load 0x0,0x1 ; Debug Table 0x1 = .DEBUG 0x0014,0x019a,0x8000,0x0000,0x0057,0x5265,0x0000,0x0007 ; Debug Table 0x1.0x0 = 0x14,0xffff ; Debug Table 0x1.0x1 = 0x14,0xfffe 0015 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0016 0322 | " | Declare_Variable Record 0017 4800 |H | Short_Literal 0x0 0018 00d9 | | Load_Top At_Offset_1 0019 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 001a 4802 |H | Short_Literal 0x2 001b 00d9 | | Load_Top At_Offset_1 001c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 001d 4800 |H | Short_Literal 0x0 001e 00d9 | | Load_Top At_Offset_1 001f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0020 e001 | | Load 0x0,0x1 0021 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0022 0337 | 7 | Declare_Variable Array 0023 4803 |H | Short_Literal 0x3 0024 4800 |H | Short_Literal 0x0 0025 4800 |H | Short_Literal 0x0 0026 00d9 | | Load_Top At_Offset_1 0027 e211 | | Load 0x1,0x11 0028 01d6 | | Execute Vector,Field_Write 0029 3ffb |? | Loop_Increasing 0x25 002a e001 | | Load 0x0,0x1 002b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 002c 0119 | | Execute Any,Check_In_Formal_Type 002d 00d9 | | Load_Top At_Offset_1 002e 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 002f 029d 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call ; Debug Table 0x1.0x2 = 0x2f,0xfffd 0031 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x3 = 0x31,0xfffc 0032 00c7 | | Action Elaborate_Subprogram 0033 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x4 = 0x33,0xfffb 0034 00c7 | | Action Elaborate_Subprogram 0035 BODY_0008: 0035 00bc | | Action Signal_Activated 0036 00bb | | Action Signal_Completion 0037 0000 | | .XXX[0x1] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 0045 | E | .CONST 0x0045 ; Address of begin 0039 0004 | | .CONST 0x0004 ; Address of exception handler 003a 0007 | | .CONST 0x0007 ; Number of locals 003b INIT_0038: 003b e002 | | Load 0x0,0x2 ; Debug Table 0x2 = .DEBUG 0x003b,0x01a6,0x0001,0x0000,0x0057,0x5115,0x0000,0x0022 ; Debug Table 0x2.0x0 = 0x3b,0xffff 003c 1b67 | g | Execute Package,Field_Read,Field_Number 0x67 003d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 003e e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x1 = 0x3e,0xfffe 003f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0040 0322 | " | Declare_Variable Record 0041 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x2 = 0x41,0xfffd 0042 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x2.0x3 = 0x42,0xfffc 0043 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x2.0x4 = 0x43,0xfffb 0044 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0x5 = 0x44,0xfffa 0045 BODY_0038: 0045 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x6 = 0x45,0x1 ; Debug Table 0x2.0x7 = 0x45,0x401 0046 0217 | | Execute Heap_Access,All_Reference 0047 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0048 4602 |F | Jump_Case 0x3 ; Debug Table 0x2.0x8 = 0x48,0x1 0049 7802 |x | Jump 0x4c ; case 0x0 004a 7806 |x | Jump 0x51 ; case 0x1 004b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x2 004c e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x9 = 0x4c,0x2 ; Debug Table 0x2.0xa = 0x4c,0x801 004d 0217 | | Execute Heap_Access,All_Reference 004e 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 004f a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x2.0xb = 0x4f,0x2 0050 7802 |x | Jump 0x53 0051 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0xc = 0x51,0x4 0052 a402 | | Store_Unchecked 0x2,0x2 0053 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0xd = 0x53,0x5 0054 e002 | | Load 0x0,0x2 0055 1b67 | g | Execute Package,Field_Read,Field_Number 0x67 0056 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0057 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0xe = 0x57,0xf3ff 0058 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0059 0322 | " | Declare_Variable Record 005a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0xf = 0x5a,0xc01 005b 00d9 | | Load_Top At_Offset_1 005c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 005d e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x10 = 0x5d,0xc02 005e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 005f 0322 | " | Declare_Variable Record 0060 4801 |H | Short_Literal 0x1 0061 00d9 | | Load_Top At_Offset_1 0062 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0063 4801 |H | Short_Literal 0x1 0064 00d9 | | Load_Top At_Offset_1 0065 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0066 00d9 | | Load_Top At_Offset_1 0067 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0068 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x11 = 0x68,0xc03 0069 00d0 | | Action Swap_Control 006a 00d1 | | Pop_Control Pop_Count_1 006b 00d0 | | Action Swap_Control 006c 00d1 | | Pop_Control Pop_Count_1 006d e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x12 = 0x6d,0x5 006e 017d | } | Execute Record,Structure_Write 006f 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x2.0x13 = 0x6f,0x6 0070 00e4 | | Load_Encached Positive_Cache 0071 00e3 | | Load_Encached Natural_Cache 0072 e5fe | | Load 0x2,-0x2 0073 e403 | | Load 0x2,0x3 0074 e002 | | Load 0x0,0x2 0075 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0076 e403 | | Load 0x2,0x3 0077 e002 | | Load 0x0,0x2 0078 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 0079 8211 | | Call 0x1,0x11 007a c404 | | Store 0x2,0x4 007b c405 | | Store 0x2,0x5 007c 005a | Z | Store_Top Discrete,At_Offset_2 007d 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x14 = 0x7d,0x7 007e e5fe | | Load 0x2,-0x2 007f 027f | | Execute Discrete,Equal 0080 6818 |h | Jump_Zero 0x99 0081 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x15 = 0x81,0x8 0082 0a01 | | Execute_Immediate Plus,0x1 0083 00e4 | | Load_Encached Positive_Cache 0084 025b | [ | Execute Discrete,Check_In_Type 0085 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x16 = 0x85,0x1001 0086 e403 | | Load 0x2,0x3 0087 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0088 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0089 00d1 | | Pop_Control Pop_Count_1 008a e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x17 = 0x8a,0x9 008b 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 008c e5fd | | Load 0x2,-0x3 008d 00db | | Load_Top At_Offset_3 008e e405 | | Load 0x2,0x5 008f 0272 | r | Execute Discrete,Minus 0090 0248 | H | Execute Discrete,Check_In_Integer 0091 0aff | | Execute_Immediate Plus,-0x1 0092 00e3 | | Load_Encached Natural_Cache 0093 025b | [ | Execute Discrete,Check_In_Type 0094 e403 | | Load 0x2,0x3 0095 e002 | | Load 0x0,0x2 0096 1b62 | b | Execute Package,Field_Read,Field_Number 0x62 0097 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0098 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0099 00cf | | Action Mark_Auxiliary 009a e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x18 = 0x9a,0xa 009b e404 | | Load 0x2,0x4 009c 0a01 | | Execute_Immediate Plus,0x1 009d 0248 | H | Execute Discrete,Check_In_Integer 009e e20d | | Load 0x1,0xd 009f 025b | [ | Execute Discrete,Check_In_Type 00a0 0263 | c | Execute Discrete,Above_Bound 00a1 7009 |p | Jump_Nonzero 0xab 00a2 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x19 = 0xa2,0xb 00a3 e210 | | Load 0x1,0x10 00a4 4820 |H | Short_Literal 0x20 00a5 e002 | | Load 0x0,0x2 00a6 1b62 | b | Execute Package,Field_Read,Field_Number 0x62 00a7 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00a8 00d1 | | Pop_Control Pop_Count_1 00a9 00c8 | | Action Pop_Auxiliary_Range 00aa 3ff7 |? | Loop_Increasing 0xa2 00ab 00ce | | Action Pop_Auxiliary 00ac e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x1a = 0xac,0xc 00ad e002 | | Load 0x0,0x2 00ae 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 00af e5fd | | Load 0x2,-0x3 00b0 e002 | | Load 0x0,0x2 00b1 1b62 | b | Execute Package,Field_Read,Field_Number 0x62 00b2 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00b3 00d1 | | Pop_Control Pop_Count_1 00b4 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00b5 0000 0000 | | .XXX[0x3] 00b7 0000 | | 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00c5 | | .CONST 0x00c5 ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0007 | | .CONST 0x0007 ; Number of locals 00bb INIT_00b8: 00bb e002 | | Load 0x0,0x2 ; Debug Table 0x3 = .DEBUG 0x00bb,0x01de,0x0002,0x0000,0x0057,0x5115,0x0000,0x0034 ; Debug Table 0x3.0x0 = 0xbb,0xffff 00bc 1b67 | g | Execute Package,Field_Read,Field_Number 0x67 00bd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00be e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x1 = 0xbe,0xfffe 00bf 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00c0 0322 | " | Declare_Variable Record 00c1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x3.0x2 = 0xc1,0xfffd 00c2 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x3.0x3 = 0xc2,0xfffc 00c3 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x3.0x4 = 0xc3,0xfffb 00c4 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x5 = 0xc4,0xfffa 00c5 BODY_00b8: 00c5 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x6 = 0xc5,0x1 ; Debug Table 0x3.0x7 = 0xc5,0x401 00c6 0217 | | Execute Heap_Access,All_Reference 00c7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00c8 4602 |F | Jump_Case 0x3 ; Debug Table 0x3.0x8 = 0xc8,0x1 00c9 7802 |x | Jump 0xcc ; case 0x0 00ca 7810 |x | Jump 0xdb ; case 0x1 00cb 7805 |x | Jump 0xd1 ; case 0x2 00cc e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x9 = 0xcc,0x2 ; Debug Table 0x3.0xa = 0xcc,0x801 00cd 0217 | | Execute Heap_Access,All_Reference 00ce 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 00cf a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x3.0xb = 0xcf,0x2 00d0 780c |x | Jump 0xdd 00d1 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0xc = 0xd1,0x3 ; Debug Table 0x3.0xd = 0xd1,0xc01 00d2 0217 | | Execute Heap_Access,All_Reference 00d3 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 00d4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xe = 0xd4,0x3 ; Debug Table 0x3.0xf = 0xd4,0x1001 00d5 0217 | | Execute Heap_Access,All_Reference 00d6 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 00d7 00d0 | | Action Swap_Control 00d8 00d1 | | Pop_Control Pop_Count_1 00d9 a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0x3.0x10 = 0xd9,0x3 00da 7802 |x | Jump 0xdd 00db e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x11 = 0xdb,0x4 00dc a402 | | Store_Unchecked 0x2,0x2 00dd e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x12 = 0xdd,0x5 00de e002 | | Load 0x0,0x2 00df 1b67 | g | Execute Package,Field_Read,Field_Number 0x67 00e0 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00e1 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x13 = 0xe1,0xebff 00e2 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00e3 0322 | " | Declare_Variable Record 00e4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x14 = 0xe4,0x1401 00e5 00d9 | | Load_Top At_Offset_1 00e6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00e7 e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x15 = 0xe7,0x1402 00e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00e9 0322 | " | Declare_Variable Record 00ea 4801 |H | Short_Literal 0x1 00eb 00d9 | | Load_Top At_Offset_1 00ec 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00ed 4801 |H | Short_Literal 0x1 00ee 00d9 | | Load_Top At_Offset_1 00ef 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00f0 00d9 | | Load_Top At_Offset_1 00f1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00f2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x16 = 0xf2,0x1403 00f3 00d0 | | Action Swap_Control 00f4 00d1 | | Pop_Control Pop_Count_1 00f5 00d0 | | Action Swap_Control 00f6 00d1 | | Pop_Control Pop_Count_1 00f7 e403 | | Load 0x2,0x3 ; Debug Table 0x3.0x17 = 0xf7,0x5 00f8 017d | } | Execute Record,Structure_Write 00f9 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x3.0x18 = 0xf9,0x6 00fa 00e4 | | Load_Encached Positive_Cache 00fb 00e3 | | Load_Encached Natural_Cache 00fc e5fe | | Load 0x2,-0x2 00fd e403 | | Load 0x2,0x3 00fe e002 | | Load 0x0,0x2 00ff 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0100 e403 | | Load 0x2,0x3 0101 e002 | | Load 0x0,0x2 0102 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 0103 8211 | | Call 0x1,0x11 0104 c404 | | Store 0x2,0x4 0105 c405 | | Store 0x2,0x5 0106 005a | Z | Store_Top Discrete,At_Offset_2 0107 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x19 = 0x107,0x7 0108 e5fe | | Load 0x2,-0x2 0109 027f | | Execute Discrete,Equal 010a 680f |h | Jump_Zero 0x11a 010b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x1a = 0x10b,0x8 010c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1b = 0x10c,0x1801 010d e403 | | Load 0x2,0x3 010e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 010f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0110 00d1 | | Pop_Control Pop_Count_1 0111 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x1c = 0x111,0x9 0112 00db | | Load_Top At_Offset_3 0113 0272 | r | Execute Discrete,Minus 0114 00e3 | | Load_Encached Natural_Cache 0115 025b | [ | Execute Discrete,Check_In_Type 0116 e403 | | Load 0x2,0x3 0117 e002 | | Load 0x0,0x2 0118 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0119 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 011a 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x3.0x1d = 0x11a,0xa 011b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 011c 0000 0000 | | .BLANK 0000[0x4] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0125 | % | .CONST 0x0125 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0002 | | .CONST 0x0002 ; Number of locals 0123 INIT_0120: 0123 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x4 = .DEBUG 0x0123,0x021c,0x0001,0x0000,0x0057,0x5265,0x0000,0x0038 ; Debug Table 0x4.0x0 = 0x123,0xffff 0124 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0125 BODY_0120: 0125 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x1 = 0x125,0x1 0126 a5fc | | Store_Unchecked 0x2,-0x4 0127 00cf | | Action Mark_Auxiliary 0128 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x2 = 0x128,0x2 0129 01dc | | Execute Vector,Last 012a e5ff | | Load 0x2,-0x1 012b 01dd | | Execute Vector,First 012c 0263 | c | Execute Discrete,Above_Bound 012d 7026 |p& | Jump_Nonzero 0x154 012e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x3 = 0x12e,0x3 012f e5ff | | Load 0x2,-0x1 0130 01d5 | | Execute Vector,Field_Reference 0131 e210 | | Load 0x1,0x10 0132 017f | | Execute Record,Equal 0133 681e |h | Jump_Zero 0x152 0134 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x4 = 0x134,0x4 0135 0a01 | | Execute_Immediate Plus,0x1 0136 c402 | | Store 0x2,0x2 0137 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x5 = 0x137,0x5 0138 e5fe | | Load 0x2,-0x2 0139 027f | | Execute Discrete,Equal 013a 680a |h | Jump_Zero 0x145 013b 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x6 = 0x13b,0x6 013c a5fd | | Store_Unchecked 0x2,-0x3 013d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x7 = 0x13d,0x7 013e e5ff | | Load 0x2,-0x1 013f 01dd | | Execute Vector,First 0140 0272 | r | Execute Discrete,Minus 0141 0248 | H | Execute Discrete,Check_In_Integer 0142 0a01 | | Execute_Immediate Plus,0x1 0143 c5fc | | Store 0x2,-0x4 0144 780d |x | Jump 0x152 0145 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x8 = 0x145,0x8 0146 e5fe | | Load 0x2,-0x2 0147 0a01 | | Execute_Immediate Plus,0x1 0148 027f | | Execute Discrete,Equal 0149 6808 |h | Jump_Zero 0x152 014a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x9 = 0x14a,0x9 014b e5ff | | Load 0x2,-0x1 014c 01dd | | Execute Vector,First 014d 0272 | r | Execute Discrete,Minus 014e 0248 | H | Execute Discrete,Check_In_Integer 014f 0a01 | | Execute_Immediate Plus,0x1 0150 c5fb | | Store 0x2,-0x5 0151 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x4.0xa = 0x151,0xa 0152 00c8 | | Action Pop_Auxiliary_Range 0153 3fda |? | Loop_Increasing 0x12e 0154 00ce | | Action Pop_Auxiliary 0155 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0xb = 0x155,0xb 0156 a5fd | | Store_Unchecked 0x2,-0x3 0157 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0xc = 0x157,0xc 0158 01db | | Execute Vector,Length 0159 0a01 | | Execute_Immediate Plus,0x1 015a c5fb | | Store 0x2,-0x5 015b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 015c 0000 0000 | | .BLANK 0000[0x4] 0160 ; -------------------------------------------------------------------------------------- 0160 ; Debug Table 0160 ; -------------------------------------------------------------------------------------- 0160 0003 0005 | | .CONST 0x0003,0x0005 0162 000b 018a | | .DEBUG 0x000b,0x018a,0x8000,0x0000,0x0057,0x5115,0x0000,0x0005 016a 0014 019a | | .DEBUG 0x0014,0x019a,0x8000,0x0000,0x0057,0x5265,0x0000,0x0007 0172 003b 01a6 | ; | .DEBUG 0x003b,0x01a6,0x0001,0x0000,0x0057,0x5115,0x0000,0x0022 017a 00bb 01de | | .DEBUG 0x00bb,0x01de,0x0002,0x0000,0x0057,0x5115,0x0000,0x0034 0182 0123 021c | # | .DEBUG 0x0123,0x021c,0x0001,0x0000,0x0057,0x5265,0x0000,0x0038 018a ; -------------------------------------------------------------------------------------- 018a ; Debug3 Subtable 0x0 018a ; -------------------------------------------------------------------------------------- 018a 0007 0000 | | .DBG3TAB 0x0007,0x0000 018c 000b ffff | | .CONST 0x000b,0xffff 018e 000b fffe | | .CONST 0x000b,0xfffe 0190 000b fffd | | .CONST 0x000b,0xfffd 0192 000b fffc | | .CONST 0x000b,0xfffc 0194 000b fffb | | .CONST 0x000b,0xfffb 0196 000f fffa | | .CONST 0x000f,0xfffa 0198 0011 fff9 | | .CONST 0x0011,0xfff9 019a ; -------------------------------------------------------------------------------------- 019a ; Debug3 Subtable 0x1 019a ; -------------------------------------------------------------------------------------- 019a 0005 0000 | | .DBG3TAB 0x0005,0x0000 019c 0014 ffff | | .CONST 0x0014,0xffff 019e 0014 fffe | | .CONST 0x0014,0xfffe 01a0 002f fffd | / | .CONST 0x002f,0xfffd 01a2 0031 fffc | 1 | .CONST 0x0031,0xfffc 01a4 0033 fffb | 3 | .CONST 0x0033,0xfffb 01a6 ; -------------------------------------------------------------------------------------- 01a6 ; Debug3 Subtable 0x2 01a6 ; -------------------------------------------------------------------------------------- 01a6 0007 0014 | | .DBG3TAB 0x0007,0x0014 01a8 003b ffff | ; | .CONST 0x003b,0xffff 01aa 003e fffe | > | .CONST 0x003e,0xfffe 01ac 0041 fffd | A | .CONST 0x0041,0xfffd 01ae 0042 fffc | B | .CONST 0x0042,0xfffc 01b0 0043 fffb | C | .CONST 0x0043,0xfffb 01b2 0044 fffa | D | .CONST 0x0044,0xfffa 01b4 0045 0001 | E | .CONST 0x0045,0x0001 01b6 0045 0401 | E | .CONST 0x0045,0x0401 01b8 0048 0001 | H | .CONST 0x0048,0x0001 01ba 004c 0002 | L | .CONST 0x004c,0x0002 01bc 004c 0801 | L | .CONST 0x004c,0x0801 01be 004f 0002 | O | .CONST 0x004f,0x0002 01c0 0051 0004 | Q | .CONST 0x0051,0x0004 01c2 0053 0005 | S | .CONST 0x0053,0x0005 01c4 0057 f3ff | W | .CONST 0x0057,0xf3ff 01c6 005a 0c01 | Z | .CONST 0x005a,0x0c01 01c8 005d 0c02 | ] | .CONST 0x005d,0x0c02 01ca 0068 0c03 | h | .CONST 0x0068,0x0c03 01cc 006d 0005 | m | .CONST 0x006d,0x0005 01ce 006f 0006 | o | .CONST 0x006f,0x0006 01d0 007d 0007 | } | .CONST 0x007d,0x0007 01d2 0081 0008 | | .CONST 0x0081,0x0008 01d4 0085 1001 | | .CONST 0x0085,0x1001 01d6 008a 0009 | | .CONST 0x008a,0x0009 01d8 009a 000a | | .CONST 0x009a,0x000a 01da 00a2 000b | | .CONST 0x00a2,0x000b 01dc 00ac 000c | | .CONST 0x00ac,0x000c 01de ; -------------------------------------------------------------------------------------- 01de ; Debug3 Subtable 0x3 01de ; -------------------------------------------------------------------------------------- 01de 0007 0017 | | .DBG3TAB 0x0007,0x0017 01e0 00bb ffff | | .CONST 0x00bb,0xffff 01e2 00be fffe | | .CONST 0x00be,0xfffe 01e4 00c1 fffd | | .CONST 0x00c1,0xfffd 01e6 00c2 fffc | | .CONST 0x00c2,0xfffc 01e8 00c3 fffb | | .CONST 0x00c3,0xfffb 01ea 00c4 fffa | | .CONST 0x00c4,0xfffa 01ec 00c5 0001 | | .CONST 0x00c5,0x0001 01ee 00c5 0401 | | .CONST 0x00c5,0x0401 01f0 00c8 0001 | | .CONST 0x00c8,0x0001 01f2 00cc 0002 | | .CONST 0x00cc,0x0002 01f4 00cc 0801 | | .CONST 0x00cc,0x0801 01f6 00cf 0002 | | .CONST 0x00cf,0x0002 01f8 00d1 0003 | | .CONST 0x00d1,0x0003 01fa 00d1 0c01 | | .CONST 0x00d1,0x0c01 01fc 00d4 0003 | | .CONST 0x00d4,0x0003 01fe 00d4 1001 | | .CONST 0x00d4,0x1001 0200 00d9 0003 | | .CONST 0x00d9,0x0003 0202 00db 0004 | | .CONST 0x00db,0x0004 0204 00dd 0005 | | .CONST 0x00dd,0x0005 0206 00e1 ebff | | .CONST 0x00e1,0xebff 0208 00e4 1401 | | .CONST 0x00e4,0x1401 020a 00e7 1402 | | .CONST 0x00e7,0x1402 020c 00f2 1403 | | .CONST 0x00f2,0x1403 020e 00f7 0005 | | .CONST 0x00f7,0x0005 0210 00f9 0006 | | .CONST 0x00f9,0x0006 0212 0107 0007 | | .CONST 0x0107,0x0007 0214 010b 0008 | | .CONST 0x010b,0x0008 0216 010c 1801 | | .CONST 0x010c,0x1801 0218 0111 0009 | | .CONST 0x0111,0x0009 021a 011a 000a | | .CONST 0x011a,0x000a 021c ; -------------------------------------------------------------------------------------- 021c ; Debug3 Subtable 0x4 021c ; -------------------------------------------------------------------------------------- 021c 0001 000c | | .DBG3TAB 0x0001,0x000c 021e 0123 ffff | # | .CONST 0x0123,0xffff 0220 0125 0001 | % | .CONST 0x0125,0x0001 0222 0128 0002 | ( | .CONST 0x0128,0x0002 0224 012e 0003 | . | .CONST 0x012e,0x0003 0226 0134 0004 | 4 | .CONST 0x0134,0x0004 0228 0137 0005 | 7 | .CONST 0x0137,0x0005 022a 013b 0006 | ; | .CONST 0x013b,0x0006 022c 013d 0007 | = | .CONST 0x013d,0x0007 022e 0145 0008 | E | .CONST 0x0145,0x0008 0230 014a 0009 | J | .CONST 0x014a,0x0009 0232 0151 000a | Q | .CONST 0x0151,0x000a 0234 0155 000b | U | .CONST 0x0155,0x000b 0236 0157 000c | W | .CONST 0x0157,0x000c 0238 0000 0000 | | .BLANK 0000[0x1c8]