|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800) Types: SEG Notes: 5811_R1K_CODE Names: »1012755.SEG«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »1012755.SEG« └─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3 └─ ⟦this⟧ »1012755.SEG« └─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288 └─ ⟦this⟧ »1012755.SEG« └─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5 └─ ⟦this⟧ »1012755.SEG« └─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000 └─ ⟦this⟧ »1012755.SEG«
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0178 | x | .CONST 0x0178 ; 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 0101 | | .CONST 0x0101 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 003c | < | .CONST 0x003c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0014 | | .CONST 0x0014 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 ; Debug Table 0x0 = .DEBUG 0x000b,0x01ba,0x8000,0x0000,0x0037,0x0874,0x0000,0x000d ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 480a |H | Short_Literal 0xa 000d 00e3 | | Load_Encached Natural_Cache 000e 03f9 | | Declare_Type Discrete,Constrained,Visible 000f 4804 |H | Short_Literal 0x4 ; Debug Table 0x0.0x1 = 0xf,0xfffe 0010 032b | + | Declare_Type Record,Incomplete,Visible 0011 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0x11,0xfffd 0013 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x13,0xfffc 0015 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x15,0xfffb 0017 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x5 = 0x17,0xfffa 0018 4802 |H | Short_Literal 0x2 0019 029f 0093 | | Declare_Subprogram INIT_0090,For_Call 001b 03fd | | Declare_Type Discrete,Defined 001c 6143 |aC | Indirect_Literal Discrete,0x160,{0x00000000, 0x00370874} ; Debug Table 0x0.0x6 = 0x1c,0xfff9 001d 4845 |HE | Short_Literal 0x45 001e e20d | | Load 0x1,0xd 001f 480a |H | Short_Literal 0xa 0020 e001 | | Load 0x0,0x1 0021 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0022 e001 | | Load 0x0,0x1 0023 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0024 e002 | | Load 0x0,0x2 0025 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0026 0387 | | Declare_Variable Package 0027 00d8 | | Load_Top At_Offset_0 0028 020f | | Execute Module,Activate 0029 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x0.0x7 = 0x29,0xfff8 002a 00da | | Load_Top At_Offset_2 002b 00da | | Load_Top At_Offset_2 002c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 002d 00db | | Load_Top At_Offset_3 002e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 002f 029f 00ab | | Declare_Subprogram INIT_00a8,For_Call 0031 e20e | | Load 0x1,0xe 0032 0326 | & | Complete_Type Record,By_Defining 0033 00bf | | Action Accept_Activation 0034 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1 = .DEBUG 0x0034,0x01cc,0x8000,0x0000,0x0037,0x0a94,0x0000,0x0003 ; Debug Table 0x1.0x0 = 0x34,0xffff 0035 00c7 | | Action Elaborate_Subprogram 0036 029d 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call ; Debug Table 0x1.0x1 = 0x36,0xfffe 0038 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x2 = 0x38,0xfffd 0039 00c7 | | Action Elaborate_Subprogram 003a 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x3 = 0x3a,0xfffc 003b 00c7 | | Action Elaborate_Subprogram 003c BODY_0008: 003c 00bc | | Action Signal_Activated 003d 00bb | | Action Signal_Completion 003e 0000 0000 | | .XXX[0x2] 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 0043 | C | .CONST 0x0043 ; Address of begin 0041 0004 | | .CONST 0x0004 ; Address of exception handler 0042 0001 | | .CONST 0x0001 ; Number of locals 0043 BODY_0040: 0043 INIT_0040: 0043 4801 |H | Short_Literal 0x1 ; Debug Table 0x2 = .DEBUG 0x0043,0x01d6,0x0001,0x0000,0x0037,0x0874,0x0000,0x0019 ; Debug Table 0x2.0x0 = 0x43,0x1 0044 00db | | Load_Top At_Offset_3 0045 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0046 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x1 = 0x46,0x2 0047 00db | | Load_Top At_Offset_3 0048 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0049 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x2 = 0x49,0x3 004a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 004b e213 | | Load 0x1,0x13 004c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 004d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 004e 00d1 | | Pop_Control Pop_Count_1 004f 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x3 = 0x4f,0x4 0050 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0051 e213 | | Load 0x1,0x13 0052 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0053 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0054 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0055 0000 0000 | | .XXX[0x3] 0057 0000 | | 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 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x005b,0x01e0,0x0001,0x0000,0x0037,0x0874,0x0000,0x0021 ; Debug Table 0x3.0x0 = 0x5b,0x1 005c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 005d 7002 |p | Jump_Nonzero 0x60 005e 4887 |H | Short_Literal 0x87 005f 0257 | W | Execute Discrete,Raise 0060 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x1 = 0x60,0x2 0061 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0062 4602 |F | Jump_Case 0x3 0063 7802 |x | Jump 0x66 ; case 0x0 0064 7804 |x | Jump 0x69 ; case 0x1 0065 7803 |x | Jump 0x69 ; case 0x2 0066 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x2 = 0x66,0x3 0067 a5fe | | Store_Unchecked 0x2,-0x2 0068 7807 |x | Jump 0x70 0069 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x3 = 0x69,0x4 006a 00e1 | | Load_Encached Boolean_Cache 006b e5ff | | Load 0x2,-0x1 006c 8214 | | Call 0x1,0x14 006d 00d1 | | Pop_Control Pop_Count_1 006e c5fe | | Store 0x2,-0x2 006f 00d1 | | Pop_Control Pop_Count_1 0070 4802 |H | Short_Literal 0x2 ; Debug Table 0x3.0x4 = 0x70,0x5 0071 00db | | Load_Top At_Offset_3 0072 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0073 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0074 0000 0000 | | .BLANK 0000[0x4] 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 007b | { | .CONST 0x007b ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0001 | | .CONST 0x0001 ; Number of locals 007b BODY_0078: 007b INIT_0078: 007b 00db | | Load_Top At_Offset_3 ; Debug Table 0x4 = .DEBUG 0x007b,0x01ec,0x0001,0x0000,0x0037,0x0874,0x0000,0x0031 ; Debug Table 0x4.0x0 = 0x7b,0x1 007c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 007d 7002 |p | Jump_Nonzero 0x80 007e 4887 |H | Short_Literal 0x87 007f 0257 | W | Execute Discrete,Raise 0080 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x1 = 0x80,0x2 0081 e5fe | | Load 0x2,-0x2 0082 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0083 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x2 = 0x83,0x3 0084 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0085 00db | | Load_Top At_Offset_3 0086 e213 | | Load 0x1,0x13 0087 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0088 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0089 0000 0000 | | .BLANK 0000[0x7] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 4603 |F | Jump_Case 0x4 ; Debug Table 0x5 = .DEBUG 0x0093,0x01f4,0x0005,0x0000,0x0037,0x0874,0x0000,0x003e 0094 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0095 7802 |x | Jump 0x98 ; case 0x1 0096 7805 |x | Jump 0x9c ; case 0x2 0097 7809 |x | Jump 0xa1 ; case 0x3 0098 00da | | Load_Top At_Offset_2 0099 0091 0164 | d| Action Push_String_Extended_Indexed,0x164 ; "NONE" 009b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 009c 00db | | Load_Top At_Offset_3 009d 00db | | Load_Top At_Offset_3 009e 00e0 | | Load_Encached Standard_Cache 009f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00a0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00a1 00da | | Load_Top At_Offset_2 00a2 00e0 | | Load_Encached Standard_Cache 00a3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00a4 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00a5 0000 0000 | | .XXX[0x3] 00a7 0000 | | 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab 4608 |F | Jump_Case 0x9 ; Debug Table 0x6 = .DEBUG 0x00ab,0x01f6,0x0005,0x0000,0x0037,0x0874,0x0000,0x005c 00ac 7808 |x | Jump 0xb5 ; case 0x0 00ad 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 00ae 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 00af 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 00b0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 00b1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 00b2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 00b3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 00b4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8 00b5 4800 |H | Short_Literal 0x0 00b6 00db | | Load_Top At_Offset_3 00b7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00b8 00da | | Load_Top At_Offset_2 00b9 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 00ba 1c00 | | Execute_Immediate Run_Utility,0x0 00bb 00da | | Load_Top At_Offset_2 00bc 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 00bd 1c00 | | Execute_Immediate Run_Utility,0x0 00be 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 00bf 0000 | | .XXX[0x1] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00d4 | | .CONST 0x00d4 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0006 | | .CONST 0x0006 ; Number of locals 00c3 INIT_00c0: 00c3 e003 | | Load 0x0,0x3 ; Debug Table 0x7 = .DEBUG 0x00c3,0x01f8,0x0001,0x0000,0x0037,0x0a94,0x0000,0x0026 ; Debug Table 0x7.0x0 = 0xc3,0xffff 00c4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00c5 02ff | | Declare_Variable Variant_Record 00c6 00d8 | | Load_Top At_Offset_0 00c7 1c00 | | Execute_Immediate Run_Utility,0x0 00c8 e213 | | Load 0x1,0x13 ; Debug Table 0x7.0x1 = 0xc8,0xfffe 00c9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00ca 02ff | | Declare_Variable Variant_Record 00cb 00d8 | | Load_Top At_Offset_0 00cc 1c00 | | Execute_Immediate Run_Utility,0x0 00cd 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x7.0x2 = 0xcd,0xfffd 00ce e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x3 = 0xce,0xfffc 00cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00d0 0322 | " | Declare_Variable Record 00d1 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0x4 = 0xd1,0xfffb 00d2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00d3 0322 | " | Declare_Variable Record 00d4 BODY_00c0: 00d4 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x5 = 0xd4,0x1 00d5 a5fe | | Store_Unchecked 0x2,-0x2 00d6 e402 | | Load 0x2,0x2 ; Debug Table 0x7.0x6 = 0xd6,0x2 00d7 e003 | | Load 0x0,0x3 00d8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00d9 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00da 00d1 | | Pop_Control Pop_Count_1 00db 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x7 = 0xdb,0x3 00dc e213 | | Load 0x1,0x13 00dd 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00de 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00df 00d1 | | Pop_Control Pop_Count_1 00e0 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x8 = 0xe0,0x4 00e1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 00e2 e213 | | Load 0x1,0x13 00e3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00e4 e5ff | | Load 0x2,-0x1 00e5 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 00e6 e213 | | Load 0x1,0x13 00e7 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00e8 0272 | r | Execute Discrete,Minus 00e9 0248 | H | Execute Discrete,Check_In_Integer 00ea 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 00eb 00cf | | Action Mark_Auxiliary 00ec 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x9 = 0xec,0x5 00ed 4801 |H | Short_Literal 0x1 00ee 0263 | c | Execute Discrete,Above_Bound 00ef 7009 |p | Jump_Nonzero 0xf9 00f0 e402 | | Load 0x2,0x2 ; Debug Table 0x7.0xa = 0xf0,0x6 00f1 0092 0167 | g| Action Push_String_Extended,0x167 ; "... " 00f3 e003 | | Load 0x0,0x3 00f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00f5 181d | | Execute Package,Field_Execute,Field_Number 0x1d 00f6 00d1 | | Pop_Control Pop_Count_1 00f7 00c8 | | Action Pop_Auxiliary_Range 00f8 3ff7 |? | Loop_Increasing 0xf0 00f9 00c9 | | Action Pop_Auxiliary_Loop 00fa e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0xb = 0xfa,0x7 00fb 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 00fc e213 | | Load 0x1,0x13 00fd 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00fe 4801 |H | Short_Literal 0x1 00ff 0263 | c | Execute Discrete,Above_Bound 0100 704c |pL | Jump_Nonzero 0x14d 0101 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0xc = 0x101,0x8 0102 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2 0103 e213 | | Load 0x1,0x13 0104 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0105 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0106 6805 |h | Jump_Zero 0x10c 0107 e001 | | Load 0x0,0x1 ; Debug Table 0x7.0xd = 0x107,0x9 0108 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0109 e406 | | Load 0x2,0x6 010a 017d | } | Execute Record,Structure_Write 010b 7806 |x | Jump 0x112 010c 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0xe = 0x10c,0xa 010d e5ff | | Load 0x2,-0x1 010e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 010f e213 | | Load 0x1,0x13 0110 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0111 00d2 | | Pop_Control Pop_Count_2 0112 e405 | | Load 0x2,0x5 ; Debug Table 0x7.0xf = 0x112,0xb 0113 e5ff | | Load 0x2,-0x1 0114 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0115 e213 | | Load 0x1,0x13 0116 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0117 00d2 | | Pop_Control Pop_Count_2 0118 e403 | | Load 0x2,0x3 ; Debug Table 0x7.0x10 = 0x118,0xc 0119 e405 | | Load 0x2,0x5 011a e213 | | Load 0x1,0x13 011b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 011c 00d1 | | Pop_Control Pop_Count_1 011d e405 | | Load 0x2,0x5 ; Debug Table 0x7.0x11 = 0x11d,0xd 011e e406 | | Load 0x2,0x6 011f 017f | | Execute Record,Equal 0120 680d |h | Jump_Zero 0x12e 0121 e402 | | Load 0x2,0x2 ; Debug Table 0x7.0x12 = 0x121,0xe 0122 e001 | | Load 0x0,0x1 0123 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0124 0a03 | | Execute_Immediate Plus,0x3 0125 00e4 | | Load_Encached Positive_Cache 0126 025b | [ | Execute Discrete,Check_In_Type 0127 e003 | | Load 0x0,0x3 0128 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0129 e003 | | Load 0x0,0x3 012a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 012b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 012c 00d1 | | Pop_Control Pop_Count_1 012d 781d |x | Jump 0x14b 012e e402 | | Load 0x2,0x2 ; Debug Table 0x7.0x13 = 0x12e,0xf 012f 0092 0168 | h| Action Push_String_Extended,0x168 ; " =>" 0131 e003 | | Load 0x0,0x3 0132 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0133 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0134 e003 | | Load 0x0,0x3 0135 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0136 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0137 00d1 | | Pop_Control Pop_Count_1 0138 e402 | | Load 0x2,0x2 ; Debug Table 0x7.0x14 = 0x138,0x10 0139 e001 | | Load 0x0,0x1 013a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 013b 00e4 | | Load_Encached Positive_Cache 013c 025b | [ | Execute Discrete,Check_In_Type 013d e405 | | Load 0x2,0x5 013e e001 | | Load 0x0,0x1 013f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0140 e003 | | Load 0x0,0x3 0141 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0142 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0143 e003 | | Load 0x0,0x3 0144 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0145 e003 | | Load 0x0,0x3 0146 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0147 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0148 00d1 | | Pop_Control Pop_Count_1 0149 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x15 = 0x149,0x11 014a a5fe | | Store_Unchecked 0x2,-0x2 014b 00c8 | | Action Pop_Auxiliary_Range 014c 3fb4 |? | Loop_Increasing 0x101 014d 00ce | | Action Pop_Auxiliary 014e 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x16 = 0x14e,0x12 014f e5ff | | Load 0x2,-0x1 0150 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0151 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x17 = 0x151,0x13 0152 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0153 e213 | | Load 0x1,0x13 0154 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0155 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0156 00d1 | | Pop_Control Pop_Count_1 0157 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x18 = 0x157,0x14 0158 e402 | | Load 0x2,0x2 0159 e003 | | Load 0x0,0x3 015a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 015b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 015c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 015d 0000 0000 | | .XXX[0x3] 015f 0000 | | 0160 0000 0000 | | .LITERAL {0x00000000, 0x00370874} 0164 ; -------------------------------------------------------------------------------------- 0164 ; STRING TABLE 0164 ; -------------------------------------------------------------------------------------- 0164 000c | | .STRTAB 0x000c->0x016a ; "NONE" 0165 000e | | .STRTAB 0x000e->0x016c ; "NODE" 0166 0010 | | .STRTAB 0x0010->0x016e ; "ITEM" 0167 0012 | | .STRTAB 0x0012->0x0170 ; "... " 0168 0014 | | .STRTAB 0x0014->0x0172 ; " =>" 0169 0015 | | .STREND 0x0015->0x0173 016a 4e4f 4e45 |NONE| .STRTAB_STRINGS 0174 0000 0000 | | .BLANK 0000[0x4] 0178 ; -------------------------------------------------------------------------------------- 0178 ; Debug Table 0178 ; -------------------------------------------------------------------------------------- 0178 0003 0008 | | .CONST 0x0003,0x0008 017a 000b 01ba | | .DEBUG 0x000b,0x01ba,0x8000,0x0000,0x0037,0x0874,0x0000,0x000d 0182 0034 01cc | 4 | .DEBUG 0x0034,0x01cc,0x8000,0x0000,0x0037,0x0a94,0x0000,0x0003 018a 0043 01d6 | C | .DEBUG 0x0043,0x01d6,0x0001,0x0000,0x0037,0x0874,0x0000,0x0019 0192 005b 01e0 | [ | .DEBUG 0x005b,0x01e0,0x0001,0x0000,0x0037,0x0874,0x0000,0x0021 019a 007b 01ec | { | .DEBUG 0x007b,0x01ec,0x0001,0x0000,0x0037,0x0874,0x0000,0x0031 01a2 0093 01f4 | | .DEBUG 0x0093,0x01f4,0x0005,0x0000,0x0037,0x0874,0x0000,0x003e 01aa 00ab 01f6 | | .DEBUG 0x00ab,0x01f6,0x0005,0x0000,0x0037,0x0874,0x0000,0x005c 01b2 00c3 01f8 | | .DEBUG 0x00c3,0x01f8,0x0001,0x0000,0x0037,0x0a94,0x0000,0x0026 01ba ; -------------------------------------------------------------------------------------- 01ba ; Debug3 Subtable 0x0 01ba ; -------------------------------------------------------------------------------------- 01ba 0008 0000 | | .DBG3TAB 0x0008,0x0000 01bc 000b ffff | | .CONST 0x000b,0xffff 01be 000f fffe | | .CONST 0x000f,0xfffe 01c0 0011 fffd | | .CONST 0x0011,0xfffd 01c2 0013 fffc | | .CONST 0x0013,0xfffc 01c4 0015 fffb | | .CONST 0x0015,0xfffb 01c6 0017 fffa | | .CONST 0x0017,0xfffa 01c8 001c fff9 | | .CONST 0x001c,0xfff9 01ca 0029 fff8 | ) | .CONST 0x0029,0xfff8 01cc ; -------------------------------------------------------------------------------------- 01cc ; Debug3 Subtable 0x1 01cc ; -------------------------------------------------------------------------------------- 01cc 0004 0000 | | .DBG3TAB 0x0004,0x0000 01ce 0034 ffff | 4 | .CONST 0x0034,0xffff 01d0 0036 fffe | 6 | .CONST 0x0036,0xfffe 01d2 0038 fffd | 8 | .CONST 0x0038,0xfffd 01d4 003a fffc | : | .CONST 0x003a,0xfffc 01d6 ; -------------------------------------------------------------------------------------- 01d6 ; Debug3 Subtable 0x2 01d6 ; -------------------------------------------------------------------------------------- 01d6 0000 0004 | | .DBG3TAB 0x0000,0x0004 01d8 0043 0001 | C | .CONST 0x0043,0x0001 01da 0046 0002 | F | .CONST 0x0046,0x0002 01dc 0049 0003 | I | .CONST 0x0049,0x0003 01de 004f 0004 | O | .CONST 0x004f,0x0004 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; Debug3 Subtable 0x3 01e0 ; -------------------------------------------------------------------------------------- 01e0 0000 0005 | | .DBG3TAB 0x0000,0x0005 01e2 005b 0001 | [ | .CONST 0x005b,0x0001 01e4 0060 0002 | ` | .CONST 0x0060,0x0002 01e6 0066 0003 | f | .CONST 0x0066,0x0003 01e8 0069 0004 | i | .CONST 0x0069,0x0004 01ea 0070 0005 | p | .CONST 0x0070,0x0005 01ec ; -------------------------------------------------------------------------------------- 01ec ; Debug3 Subtable 0x4 01ec ; -------------------------------------------------------------------------------------- 01ec 0000 0003 | | .DBG3TAB 0x0000,0x0003 01ee 007b 0001 | { | .CONST 0x007b,0x0001 01f0 0080 0002 | | .CONST 0x0080,0x0002 01f2 0083 0003 | | .CONST 0x0083,0x0003 01f4 ; -------------------------------------------------------------------------------------- 01f4 ; Debug3 Subtable 0x5 01f4 ; -------------------------------------------------------------------------------------- 01f4 0000 0000 | | .DBG3TAB 0x0000,0x0000 01f6 ; -------------------------------------------------------------------------------------- 01f6 ; Debug3 Subtable 0x6 01f6 ; -------------------------------------------------------------------------------------- 01f6 0000 0000 | | .DBG3TAB 0x0000,0x0000 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; Debug3 Subtable 0x7 01f8 ; -------------------------------------------------------------------------------------- 01f8 0005 0014 | | .DBG3TAB 0x0005,0x0014 01fa 00c3 ffff | | .CONST 0x00c3,0xffff 01fc 00c8 fffe | | .CONST 0x00c8,0xfffe 01fe 00cd fffd | | .CONST 0x00cd,0xfffd 0200 00ce fffc | | .CONST 0x00ce,0xfffc 0202 00d1 fffb | | .CONST 0x00d1,0xfffb 0204 00d4 0001 | | .CONST 0x00d4,0x0001 0206 00d6 0002 | | .CONST 0x00d6,0x0002 0208 00db 0003 | | .CONST 0x00db,0x0003 020a 00e0 0004 | | .CONST 0x00e0,0x0004 020c 00ec 0005 | | .CONST 0x00ec,0x0005 020e 00f0 0006 | | .CONST 0x00f0,0x0006 0210 00fa 0007 | | .CONST 0x00fa,0x0007 0212 0101 0008 | | .CONST 0x0101,0x0008 0214 0107 0009 | | .CONST 0x0107,0x0009 0216 010c 000a | | .CONST 0x010c,0x000a 0218 0112 000b | | .CONST 0x0112,0x000b 021a 0118 000c | | .CONST 0x0118,0x000c 021c 011d 000d | | .CONST 0x011d,0x000d 021e 0121 000e | ! | .CONST 0x0121,0x000e 0220 012e 000f | . | .CONST 0x012e,0x000f 0222 0138 0010 | 8 | .CONST 0x0138,0x0010 0224 0149 0011 | I | .CONST 0x0149,0x0011 0226 014e 0012 | N | .CONST 0x014e,0x0012 0228 0151 0013 | Q | .CONST 0x0151,0x0013 022a 0157 0014 | W | .CONST 0x0157,0x0014 022c 0000 0000 | | .BLANK 0000[0x1d4]