|
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, 580b_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 580b |X | .CONST 0x580b ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0240 | @ | .CONST 0x0240 ; 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 001a | | .CONST 0x001a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0272,0x8000,0x0000,0x0039,0x3346,0x0000,0x0007 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 00bf | | Action Accept_Activation 000e 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x000e,0x0276,0x8000,0x0000,0x0039,0x3356,0x0000,0x001b ; Debug Table 0x1.0x0 = 0xe,0xffff 000f 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0xf,0xfffe 0010 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x10,0xfffd 0011 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x11,0xfffc 0012 029d 008b | | Declare_Subprogram INIT_0088,For_Outer_Call ; Debug Table 0x1.0x4 = 0x12,0xfffb 0014 029d 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call ; Debug Table 0x1.0x5 = 0x14,0xfffa 0016 029d 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call ; Debug Table 0x1.0x6 = 0x16,0xfff9 0018 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x7 = 0x18,0xfff8 0019 00c7 | | Action Elaborate_Subprogram 001a BODY_0008: 001a 00bc | | Action Signal_Activated 001b 00bb | | Action Signal_Completion 001c 0000 0000 | | .BLANK 0000[0x4] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 0035 | 5 | .CONST 0x0035 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0006 | | .CONST 0x0006 ; Number of locals 0023 INIT_0020: 0023 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2 = .DEBUG 0x0023,0x0288,0x0001,0x0000,0x0039,0x3346,0x0000,0x0008 ; Debug Table 0x2.0x0 = 0x23,0xffff 0024 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x1 = 0x24,0xfffe 0025 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0026 02ff | | Declare_Variable Variant_Record 0027 00d8 | | Load_Top At_Offset_0 0028 1c00 | | Execute_Immediate Run_Utility,0x0 0029 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x2 = 0x29,0xfffd 002a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 002b 02ff | | Declare_Variable Variant_Record 002c 00d8 | | Load_Top At_Offset_0 002d 1c00 | | Execute_Immediate Run_Utility,0x0 002e e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x3 = 0x2e,0xfffc 002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0030 e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x4 = 0x30,0xfffb 0031 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0032 0007 | | Action Break_Optional ; Debug Table 0x2.0x5 = 0x32,0xfffa 0033 0007 | | Action Break_Optional ; Debug Table 0x2.0x6 = 0x33,0xfff9 0034 0007 | | Action Break_Optional ; Debug Table 0x2.0x7 = 0x34,0xfff8 0035 BODY_0020: 0035 e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x8 = 0x35,0x1 0036 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0037 00db | | Load_Top At_Offset_3 0038 e004 | | Load 0x0,0x4 0039 1b0e | | Execute Package,Field_Read,Field_Number 0xe 003a 61ed |a | Indirect_Literal Discrete,0x228,{0x00000000, 0x00028000} 003b e005 | | Load 0x0,0x5 003c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 003d e005 | | Load 0x0,0x5 003e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 003f 4800 |H | Short_Literal 0x0 0040 4fff |O | Short_Literal -0x1 0041 e002 | | Load 0x0,0x2 0042 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0043 e006 | | Load 0x0,0x6 0044 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0045 e006 | | Load 0x0,0x6 0046 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0047 0092 022c | ,| Action Push_String_Extended,0x22c ; "!" 0049 4800 |H | Short_Literal 0x0 004a e002 | | Load 0x0,0x2 004b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 004c e001 | | Load 0x0,0x1 004d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 004e e002 | | Load 0x0,0x2 004f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0050 00d1 | | Pop_Control Pop_Count_1 0051 005a | Z | Store_Top Discrete,At_Offset_2 0052 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x9 = 0x52,0x2 0053 6802 |h | Jump_Zero 0x56 0054 61cf |a | Indirect_Literal Discrete,0x224,{0x00000000, 0x39335609} ; Debug Table 0x2.0xa = 0x54,0x3 0055 0257 | W | Execute Discrete,Raise 0056 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xb = 0x56,0x4 0057 e002 | | Load 0x0,0x2 0058 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0059 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0xc = 0x59,0x5 005a e403 | | Load 0x2,0x3 005b e404 | | Load 0x2,0x4 005c 8210 | | Call 0x1,0x10 005d 00d1 | | Pop_Control Pop_Count_1 005e c402 | | Store 0x2,0x2 005f e003 | | Load 0x0,0x3 ; Debug Table 0x2.0xd = 0x5f,0x6 0060 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0061 e004 | | Load 0x0,0x4 0062 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0063 61c4 |a | Indirect_Literal Discrete,0x228,{0x00000000, 0x00028000} 0064 4801 |H | Short_Literal 0x1 0065 e403 | | Load 0x2,0x3 0066 e404 | | Load 0x2,0x4 0067 e002 | | Load 0x0,0x2 0068 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0069 0059 | Y | Store_Top Discrete,At_Offset_1 006a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0xe = 0x6a,0x7 006b 6802 |h | Jump_Zero 0x6e 006c 61b3 |a | Indirect_Literal Discrete,0x220,{0x00000000, 0x3933560a} ; Debug Table 0x2.0xf = 0x6c,0x8 006d 0257 | W | Execute Discrete,Raise 006e e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x10 = 0x6e,0x9 006f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0070 e004 | | Load 0x0,0x4 0071 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0072 61b5 |a | Indirect_Literal Discrete,0x228,{0x00000000, 0x00028000} 0073 4801 |H | Short_Literal 0x1 0074 e404 | | Load 0x2,0x4 0075 e002 | | Load 0x0,0x2 0076 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0077 0059 | Y | Store_Top Discrete,At_Offset_1 0078 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x11 = 0x78,0xa 0079 6802 |h | Jump_Zero 0x7c 007a 61a1 |a | Indirect_Literal Discrete,0x21c,{0x00000000, 0x3933560b} ; Debug Table 0x2.0x12 = 0x7a,0xb 007b 0257 | W | Execute Discrete,Raise 007c e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x13 = 0x7c,0xc 007d e5fe | | Load 0x2,-0x2 007e 820e | | Call 0x1,0xe 007f e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x14 = 0x7f,0xd 0080 a5fc | | Store_Unchecked 0x2,-0x4 0081 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0082 0000 0000 | | .BLANK 0000[0x6] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 00ab | | .CONST 0x00ab ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0006 | | .CONST 0x0006 ; Number of locals 008b INIT_0088: 008b e002 | | Load 0x0,0x2 ; Debug Table 0x3 = .DEBUG 0x008b,0x02b4,0x0001,0x0000,0x0039,0x3356,0x0000,0x0046 ; Debug Table 0x3.0x0 = 0x8b,0xffff 008c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 008d 02ff | | Declare_Variable Variant_Record 008e 00d8 | | Load_Top At_Offset_0 008f 1c00 | | Execute_Immediate Run_Utility,0x0 0090 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x1 = 0x90,0xfffe 0091 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0092 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0093 02c7 | | Declare_Variable Any 0094 00d8 | | Load_Top At_Offset_0 0095 1c00 | | Execute_Immediate Run_Utility,0x0 0096 e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x2 = 0x96,0xfffd 0097 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0098 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x3 = 0x98,0xfffc 0099 e007 | | Load 0x0,0x7 009a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 009b 1c08 | | Execute_Immediate Run_Utility,0x8 009c 00d8 | | Load_Top At_Offset_0 009d 1c00 | | Execute_Immediate Run_Utility,0x0 009e e004 | | Load 0x0,0x4 ; Debug Table 0x3.0x4 = 0x9e,0xfffb 009f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a0 02c7 | | Declare_Variable Any 00a1 e008 | | Load 0x0,0x8 00a2 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00a3 e004 | | Load 0x0,0x4 00a4 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00a5 c406 | | Store 0x2,0x6 00a6 0007 | | Action Break_Optional ; Debug Table 0x3.0x5 = 0xa6,0xfffa 00a7 0007 | | Action Break_Optional ; Debug Table 0x3.0x6 = 0xa7,0xfff9 00a8 0007 | | Action Break_Optional ; Debug Table 0x3.0x7 = 0xa8,0xfff8 00a9 0007 | | Action Break_Optional ; Debug Table 0x3.0x8 = 0xa9,0xfff7 00aa 0007 | | Action Break_Optional ; Debug Table 0x3.0x9 = 0xaa,0xfff6 00ab BODY_0088: 00ab e003 | | Load 0x0,0x3 ; Debug Table 0x3.0xa = 0xab,0x1 00ac 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00ad e402 | | Load 0x2,0x2 00ae e004 | | Load 0x0,0x4 00af 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b0 6177 |aw | Indirect_Literal Discrete,0x228,{0x00000000, 0x00028000} 00b1 4800 |H | Short_Literal 0x0 00b2 4fff |O | Short_Literal -0x1 00b3 0092 022d | -| Action Push_String_Extended,0x22d ; "*R1000_STANDARD*" 00b5 e002 | | Load 0x0,0x2 00b6 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00b7 e001 | | Load 0x0,0x1 00b8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b9 e002 | | Load 0x0,0x2 00ba 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00bb 00d1 | | Pop_Control Pop_Count_1 00bc 005b | [ | Store_Top Discrete,At_Offset_3 00bd 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0xb = 0xbd,0x2 00be 6802 |h | Jump_Zero 0xc1 00bf 6158 |aX | Indirect_Literal Discrete,0x218,{0x00000000, 0x39335602} ; Debug Table 0x3.0xc = 0xbf,0x3 00c0 0257 | W | Execute Discrete,Raise 00c1 e003 | | Load 0x0,0x3 ; Debug Table 0x3.0xd = 0xc1,0x4 00c2 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00c3 e403 | | Load 0x2,0x3 00c4 0120 | | Execute Any,Is_Value 00c5 6804 |h | Jump_Zero 0xca 00c6 e001 | | Load 0x0,0x1 00c7 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00c9 7801 |x | Jump 0xcb 00ca e403 | | Load 0x2,0x3 00cb 00da | | Load_Top At_Offset_2 00cc 4800 |H | Short_Literal 0x0 00cd 4803 |H | Short_Literal 0x3 00ce e5fe | | Load 0x2,-0x2 00cf e001 | | Load 0x0,0x1 00d0 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00d1 c403 | | Store 0x2,0x3 00d2 005b | [ | Store_Top Discrete,At_Offset_3 00d3 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0xe = 0xd3,0x5 00d4 6802 |h | Jump_Zero 0xd7 00d5 613e |a> | Indirect_Literal Discrete,0x214,{0x00000000, 0x39335603} ; Debug Table 0x3.0xf = 0xd5,0x6 00d6 0257 | W | Execute Discrete,Raise 00d7 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x10 = 0xd7,0x7 00d8 e403 | | Load 0x2,0x3 00d9 e001 | | Load 0x0,0x1 00da 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00db 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00dc e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x11 = 0xdc,0x8 00dd 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00de 4800 |H | Short_Literal 0x0 00df 4801 |H | Short_Literal 0x1 00e0 00db | | Load_Top At_Offset_3 00e1 e5fe | | Load 0x2,-0x2 00e2 e001 | | Load 0x0,0x1 00e3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00e4 005b | [ | Store_Top Discrete,At_Offset_3 00e5 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x12 = 0xe5,0x9 00e6 6802 |h | Jump_Zero 0xe9 00e7 6128 |a( | Indirect_Literal Discrete,0x210,{0x00000000, 0x39335601} ; Debug Table 0x3.0x13 = 0xe7,0xa 00e8 0257 | W | Execute Discrete,Raise 00e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x14 = 0xe9,0xb 00ea 4801 |H | Short_Literal 0x1 00eb 4801 |H | Short_Literal 0x1 00ec e004 | | Load 0x0,0x4 00ed 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00ee c406 | | Store 0x2,0x6 00ef e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x15 = 0xef,0xc 00f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00f1 e004 | | Load 0x0,0x4 00f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00f3 6134 |a4 | Indirect_Literal Discrete,0x228,{0x00000000, 0x00028000} 00f4 4801 |H | Short_Literal 0x1 00f5 e5fe | | Load 0x2,-0x2 00f6 e402 | | Load 0x2,0x2 00f7 e002 | | Load 0x0,0x2 00f8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 00f9 005b | [ | Store_Top Discrete,At_Offset_3 00fa 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x16 = 0xfa,0xd 00fb 6802 |h | Jump_Zero 0xfe 00fc 610f |a | Indirect_Literal Discrete,0x20c,{0x00000000, 0x39335604} ; Debug Table 0x3.0x17 = 0xfc,0xe 00fd 0257 | W | Execute Discrete,Raise 00fe e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x18 = 0xfe,0xf 00ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0100 e004 | | Load 0x0,0x4 0101 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0102 6125 |a% | Indirect_Literal Discrete,0x228,{0x00000000, 0x00028000} 0103 4801 |H | Short_Literal 0x1 0104 e402 | | Load 0x2,0x2 0105 e002 | | Load 0x0,0x2 0106 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0107 005b | [ | Store_Top Discrete,At_Offset_3 0108 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x19 = 0x108,0x10 0109 6802 |h | Jump_Zero 0x10c 010a 60fd |` | Indirect_Literal Discrete,0x208,{0x00000000, 0x39335605} ; Debug Table 0x3.0x1a = 0x10a,0x11 010b 0257 | W | Execute Discrete,Raise 010c e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x1b = 0x10c,0x12 010d 00da | | Load_Top At_Offset_2 010e 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2 010f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0110 e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x1c = 0x110,0x13 0111 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0112 e004 | | Load 0x0,0x4 0113 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0114 4800 |H | Short_Literal 0x0 0115 e405 | | Load 0x2,0x5 0116 e5fe | | Load 0x2,-0x2 0117 e007 | | Load 0x0,0x7 0118 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0119 005b | [ | Store_Top Discrete,At_Offset_3 011a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 011b 0000 0000 | | .BLANK 0000[0x5] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 012b | + | .CONST 0x012b ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0003 | | .CONST 0x0003 ; Number of locals 0123 INIT_0120: 0123 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x0123,0x02f0,0x0002,0x0000,0x0039,0x3356,0x0000,0x014d ; Debug Table 0x4.0x0 = 0x123,0xffff 0124 0092 022e | .| Action Push_String_Extended,0x22e ; "\x22!\x22" 0126 4829 |H) | Short_Literal 0x29 0127 00eb | | Load_Encached Diana_Cache 0128 187a | z | Execute Package,Field_Execute,Field_Number 0x7a 0129 0031 | 1 | Store_Top Heap_Access,At_Offset_1 012a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x1 = 0x12a,0xfffe 012b BODY_0120: 012b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x2 = 0x12b,0x1 012c e009 | | Load 0x0,0x9 012d 180d | | Execute Package,Field_Execute,Field_Number 0xd 012e 00eb | | Load_Encached Diana_Cache ; Debug Table 0x4.0x3 = 0x12e,0x2 012f 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 0130 4889 |H | Short_Literal 0x89 0131 00eb | | Load_Encached Diana_Cache 0132 187f | | Execute Package,Field_Execute,Field_Number 0x7f 0133 00eb | | Load_Encached Diana_Cache 0134 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 0135 4897 |H | Short_Literal 0x97 0136 00eb | | Load_Encached Diana_Cache 0137 187f | | Execute Package,Field_Execute,Field_Number 0x7f 0138 00eb | | Load_Encached Diana_Cache 0139 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 013a 4891 |H | Short_Literal 0x91 013b 00eb | | Load_Encached Diana_Cache 013c 187f | | Execute Package,Field_Execute,Field_Number 0x7f 013d 484e |HN | Short_Literal 0x4e 013e 00eb | | Load_Encached Diana_Cache 013f 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 0140 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0141 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x4 = 0x141,0x3 0142 00da | | Load_Top At_Offset_2 0143 4957 |IW | Short_Literal 0x157 0144 00eb | | Load_Encached Diana_Cache 0145 0096 | | Execute Package,Entry 0146 00eb | | Load_Encached Diana_Cache ; Debug Table 0x4.0x5 = 0x146,0x4 0147 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 0148 4895 |H | Short_Literal 0x95 0149 00eb | | Load_Encached Diana_Cache 014a 187f | | Execute Package,Field_Execute,Field_Number 0x7f 014b 00d9 | | Load_Top At_Offset_1 014c 00db | | Load_Top At_Offset_3 014d 4847 |HG | Short_Literal 0x47 014e 00eb | | Load_Encached Diana_Cache 014f 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 0150 00eb | | Load_Encached Diana_Cache 0151 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 0152 4884 |H | Short_Literal 0x84 0153 00eb | | Load_Encached Diana_Cache 0154 187f | | Execute Package,Field_Execute,Field_Number 0x7f 0155 48a8 |H | Short_Literal 0xa8 0156 00eb | | Load_Encached Diana_Cache 0157 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 0158 00ca | | Action Exit_Nullary_Function 0159 0000 0000 | | .BLANK 0000[0x7] 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 018b | | .CONST 0x018b ; Address of begin 0161 01f2 | | .CONST 0x01f2 ; Address of exception handler 0162 000a | | .CONST 0x000a ; Number of locals 0163 INIT_0160: 0163 0007 | | Action Break_Optional ; Debug Table 0x5 = .DEBUG 0x0163,0x02fe,0x0001,0x0000,0x0039,0x3356,0x0000,0x01d0 ; Debug Table 0x5.0x0 = 0x163,0xffff 0164 0007 | | Action Break_Optional ; Debug Table 0x5.0x1 = 0x164,0xfffe 0165 0007 | | Action Break_Optional ; Debug Table 0x5.0x2 = 0x165,0xfffd 0166 e004 | | Load 0x0,0x4 ; Debug Table 0x5.0x3 = 0x166,0xfffc 0167 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0168 02c7 | | Declare_Variable Any 0169 e008 | | Load 0x0,0x8 016a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 016b e004 | | Load 0x0,0x4 016c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 016d c402 | | Store 0x2,0x2 016e 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x4 = 0x16e,0xfffb 016f e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x5 = 0x16f,0xfffa 0170 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0171 02ff | | Declare_Variable Variant_Record 0172 00d8 | | Load_Top At_Offset_0 0173 1c00 | | Execute_Immediate Run_Utility,0x0 0174 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x6 = 0x174,0xfff9 0175 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0176 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0177 02c7 | | Declare_Variable Any 0178 00d8 | | Load_Top At_Offset_0 0179 1c00 | | Execute_Immediate Run_Utility,0x0 017a e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x7 = 0x17a,0xfff8 017b 1b13 | | Execute Package,Field_Read,Field_Number 0x13 017c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 017d 02c7 | | Declare_Variable Any 017e 00d8 | | Load_Top At_Offset_0 017f 1c00 | | Execute_Immediate Run_Utility,0x0 0180 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x8 = 0x180,0xfff7 0181 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0182 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x9 = 0x182,0xfff6 0183 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0184 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0xa = 0x184,0xfff5 0185 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0186 e00a | | Load 0x0,0xa ; Debug Table 0x5.0xb = 0x186,0xfff4 0187 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0188 02c7 | | Declare_Variable Any 0189 00d8 | | Load_Top At_Offset_0 018a 1c00 | | Execute_Immediate Run_Utility,0x0 018b BODY_0160: 018b e008 | | Load 0x0,0x8 ; Debug Table 0x5.0xc = 0x18b,0x1 018c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 018d 4800 |H | Short_Literal 0x0 018e e001 | | Load 0x0,0x1 018f 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0190 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0191 c406 | | Store 0x2,0x6 0192 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0xd = 0x192,0x2 0193 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0194 e404 | | Load 0x2,0x4 0195 4801 |H | Short_Literal 0x1 0196 e5ff | | Load 0x2,-0x1 0197 e402 | | Load 0x2,0x2 0198 4800 |H | Short_Literal 0x0 0199 e006 | | Load 0x0,0x6 019a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 019b 4800 |H | Short_Literal 0x0 019c e001 | | Load 0x0,0x1 019d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 019e 00d1 | | Pop_Control Pop_Count_1 019f c407 | | Store 0x2,0x7 01a0 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0xe = 0x1a0,0x3 01a1 6802 |h | Jump_Zero 0x1a4 01a2 6061 |`a | Indirect_Literal Discrete,0x204,{0x00000000, 0x39335606} ; Debug Table 0x5.0xf = 0x1a2,0x4 01a3 0257 | W | Execute Discrete,Raise 01a4 e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x10 = 0x1a4,0x5 01a5 e5fe | | Load 0x2,-0x2 01a6 016d | m | Execute Variant_Record,Structure_Write 01a7 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x11 = 0x1a7,0x6 01a8 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01a9 e405 | | Load 0x2,0x5 01aa 0120 | | Execute Any,Is_Value 01ab 6804 |h | Jump_Zero 0x1b0 01ac e001 | | Load 0x0,0x1 01ad 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01af 7801 |x | Jump 0x1b1 01b0 e405 | | Load 0x2,0x5 01b1 e402 | | Load 0x2,0x2 01b2 4800 |H | Short_Literal 0x0 01b3 4802 |H | Short_Literal 0x2 01b4 e404 | | Load 0x2,0x4 01b5 e001 | | Load 0x0,0x1 01b6 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01b7 c405 | | Store 0x2,0x5 01b8 005b | [ | Store_Top Discrete,At_Offset_3 01b9 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x12 = 0x1b9,0x7 01ba 6802 |h | Jump_Zero 0x1bd 01bb 6048 |`H | Indirect_Literal Discrete,0x204,{0x00000000, 0x39335606} ; Debug Table 0x5.0x13 = 0x1bb,0x8 01bc 0257 | W | Execute Discrete,Raise 01bd e008 | | Load 0x0,0x8 ; Debug Table 0x5.0x14 = 0x1bd,0x9 01be 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01bf 4800 |H | Short_Literal 0x0 01c0 e405 | | Load 0x2,0x5 01c1 e001 | | Load 0x0,0x1 01c2 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01c3 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 01c4 820f | | Call 0x1,0xf ; Debug Table 0x5.0x15 = 0x1c4,0xa 01c5 a403 | | Store_Unchecked 0x2,0x3 01c6 e405 | | Load 0x2,0x5 ; Debug Table 0x5.0x16 = 0x1c6,0xb 01c7 e403 | | Load 0x2,0x3 01c8 e001 | | Load 0x0,0x1 01c9 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01ca 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01cb e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x17 = 0x1cb,0xc 01cc a5fd | | Store_Unchecked 0x2,-0x3 01cd 4803 |H | Short_Literal 0x3 ; Debug Table 0x5.0x18 = 0x1cd,0xd 01ce e405 | | Load 0x2,0x5 01cf e001 | | Load 0x0,0x1 01d0 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01d1 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01d2 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x19 = 0x1d2,0xe 01d3 e405 | | Load 0x2,0x5 01d4 e001 | | Load 0x0,0x1 01d5 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01d6 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01d7 e008 | | Load 0x0,0x8 ; Debug Table 0x5.0x1a = 0x1d7,0xf 01d8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01d9 4800 |H | Short_Literal 0x0 01da e406 | | Load 0x2,0x6 01db e001 | | Load 0x0,0x1 01dc 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01dd 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 01de e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x1b = 0x1de,0x10 01df 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01e0 4800 |H | Short_Literal 0x0 01e1 4801 |H | Short_Literal 0x1 01e2 e402 | | Load 0x2,0x2 01e3 e404 | | Load 0x2,0x4 01e4 e001 | | Load 0x0,0x1 01e5 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01e6 005a | Z | Store_Top Discrete,At_Offset_2 01e7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x1c = 0x1e7,0x11 01e8 6802 |h | Jump_Zero 0x1eb 01e9 601a |` | Indirect_Literal Discrete,0x204,{0x00000000, 0x39335606} ; Debug Table 0x5.0x1d = 0x1e9,0x12 01ea 0257 | W | Execute Discrete,Raise 01eb e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x1e = 0x1eb,0x13 01ec 4801 |H | Short_Literal 0x1 01ed 4801 |H | Short_Literal 0x1 01ee e004 | | Load 0x0,0x4 01ef 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01f0 c402 | | Store 0x2,0x2 01f1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01f2 TRAP_0160: 01f2 0007 | | Action Break_Optional 01f3 e008 | | Load 0x0,0x8 ; Debug Table 0x5.0x1f = 0x1f3,0x14 01f4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01f5 4800 |H | Short_Literal 0x0 01f6 e406 | | Load 0x2,0x6 01f7 e001 | | Load 0x0,0x1 01f8 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01f9 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 01fa e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x20 = 0x1fa,0x15 01fb 4801 |H | Short_Literal 0x1 01fc 4800 |H | Short_Literal 0x0 01fd e004 | | Load 0x0,0x4 01fe 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01ff c402 | | Store 0x2,0x2 0200 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x21 = 0x200,0x16 0201 0101 | | Execute Exception,Reraise 0202 0000 0000 | | .XXX[0x2] 0204 0000 0000 | | .LITERAL {0x00000000, 0x39335606} 0208 0000 0000 | | .LITERAL {0x00000000, 0x39335605} 020c 0000 0000 | | .LITERAL {0x00000000, 0x39335604} 0210 0000 0000 | | .LITERAL {0x00000000, 0x39335601} 0214 0000 0000 | | .LITERAL {0x00000000, 0x39335603} 0218 0000 0000 | | .LITERAL {0x00000000, 0x39335602} 021c 0000 0000 | | .LITERAL {0x00000000, 0x3933560b} 0220 0000 0000 | | .LITERAL {0x00000000, 0x3933560a} 0224 0000 0000 | | .LITERAL {0x00000000, 0x39335609} 0228 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 022c ; -------------------------------------------------------------------------------------- 022c ; STRING TABLE 022c ; -------------------------------------------------------------------------------------- 022c 0008 | | .STRTAB 0x0008->0x0230 ; "!" 022d 0007 | | .STRTAB 0x0007->0x0230 ; "*R1000_STANDARD*" 022e 0015 | | .STRTAB 0x0015->0x0238 ; "\x22!\x22" 022f 0016 | | .STREND 0x0016->0x023a 0230 212a 5231 |!*R1| .STRTAB_STRINGS 023a 0000 0000 | | .BLANK 0000[0x6] 0240 ; -------------------------------------------------------------------------------------- 0240 ; Debug Table 0240 ; -------------------------------------------------------------------------------------- 0240 0003 0006 | | .CONST 0x0003,0x0006 0242 000b 0272 | r| .DEBUG 0x000b,0x0272,0x8000,0x0000,0x0039,0x3346,0x0000,0x0007 024a 000e 0276 | v| .DEBUG 0x000e,0x0276,0x8000,0x0000,0x0039,0x3356,0x0000,0x001b 0252 0023 0288 | # | .DEBUG 0x0023,0x0288,0x0001,0x0000,0x0039,0x3346,0x0000,0x0008 025a 008b 02b4 | | .DEBUG 0x008b,0x02b4,0x0001,0x0000,0x0039,0x3356,0x0000,0x0046 0262 0123 02f0 | # | .DEBUG 0x0123,0x02f0,0x0002,0x0000,0x0039,0x3356,0x0000,0x014d 026a 0163 02fe | c | .DEBUG 0x0163,0x02fe,0x0001,0x0000,0x0039,0x3356,0x0000,0x01d0 0272 ; -------------------------------------------------------------------------------------- 0272 ; Debug3 Subtable 0x0 0272 ; -------------------------------------------------------------------------------------- 0272 0001 0000 | | .DBG3TAB 0x0001,0x0000 0274 000b ffff | | .CONST 0x000b,0xffff 0276 ; -------------------------------------------------------------------------------------- 0276 ; Debug3 Subtable 0x1 0276 ; -------------------------------------------------------------------------------------- 0276 0008 0000 | | .DBG3TAB 0x0008,0x0000 0278 000e ffff | | .CONST 0x000e,0xffff 027a 000f fffe | | .CONST 0x000f,0xfffe 027c 0010 fffd | | .CONST 0x0010,0xfffd 027e 0011 fffc | | .CONST 0x0011,0xfffc 0280 0012 fffb | | .CONST 0x0012,0xfffb 0282 0014 fffa | | .CONST 0x0014,0xfffa 0284 0016 fff9 | | .CONST 0x0016,0xfff9 0286 0018 fff8 | | .CONST 0x0018,0xfff8 0288 ; -------------------------------------------------------------------------------------- 0288 ; Debug3 Subtable 0x2 0288 ; -------------------------------------------------------------------------------------- 0288 0008 000d | | .DBG3TAB 0x0008,0x000d 028a 0023 ffff | # | .CONST 0x0023,0xffff 028c 0024 fffe | $ | .CONST 0x0024,0xfffe 028e 0029 fffd | ) | .CONST 0x0029,0xfffd 0290 002e fffc | . | .CONST 0x002e,0xfffc 0292 0030 fffb | 0 | .CONST 0x0030,0xfffb 0294 0032 fffa | 2 | .CONST 0x0032,0xfffa 0296 0033 fff9 | 3 | .CONST 0x0033,0xfff9 0298 0034 fff8 | 4 | .CONST 0x0034,0xfff8 029a 0035 0001 | 5 | .CONST 0x0035,0x0001 029c 0052 0002 | R | .CONST 0x0052,0x0002 029e 0054 0003 | T | .CONST 0x0054,0x0003 02a0 0056 0004 | V | .CONST 0x0056,0x0004 02a2 0059 0005 | Y | .CONST 0x0059,0x0005 02a4 005f 0006 | _ | .CONST 0x005f,0x0006 02a6 006a 0007 | j | .CONST 0x006a,0x0007 02a8 006c 0008 | l | .CONST 0x006c,0x0008 02aa 006e 0009 | n | .CONST 0x006e,0x0009 02ac 0078 000a | x | .CONST 0x0078,0x000a 02ae 007a 000b | z | .CONST 0x007a,0x000b 02b0 007c 000c | | | .CONST 0x007c,0x000c 02b2 007f 000d | | .CONST 0x007f,0x000d 02b4 ; -------------------------------------------------------------------------------------- 02b4 ; Debug3 Subtable 0x3 02b4 ; -------------------------------------------------------------------------------------- 02b4 000a 0013 | | .DBG3TAB 0x000a,0x0013 02b6 008b ffff | | .CONST 0x008b,0xffff 02b8 0090 fffe | | .CONST 0x0090,0xfffe 02ba 0096 fffd | | .CONST 0x0096,0xfffd 02bc 0098 fffc | | .CONST 0x0098,0xfffc 02be 009e fffb | | .CONST 0x009e,0xfffb 02c0 00a6 fffa | | .CONST 0x00a6,0xfffa 02c2 00a7 fff9 | | .CONST 0x00a7,0xfff9 02c4 00a8 fff8 | | .CONST 0x00a8,0xfff8 02c6 00a9 fff7 | | .CONST 0x00a9,0xfff7 02c8 00aa fff6 | | .CONST 0x00aa,0xfff6 02ca 00ab 0001 | | .CONST 0x00ab,0x0001 02cc 00bd 0002 | | .CONST 0x00bd,0x0002 02ce 00bf 0003 | | .CONST 0x00bf,0x0003 02d0 00c1 0004 | | .CONST 0x00c1,0x0004 02d2 00d3 0005 | | .CONST 0x00d3,0x0005 02d4 00d5 0006 | | .CONST 0x00d5,0x0006 02d6 00d7 0007 | | .CONST 0x00d7,0x0007 02d8 00dc 0008 | | .CONST 0x00dc,0x0008 02da 00e5 0009 | | .CONST 0x00e5,0x0009 02dc 00e7 000a | | .CONST 0x00e7,0x000a 02de 00e9 000b | | .CONST 0x00e9,0x000b 02e0 00ef 000c | | .CONST 0x00ef,0x000c 02e2 00fa 000d | | .CONST 0x00fa,0x000d 02e4 00fc 000e | | .CONST 0x00fc,0x000e 02e6 00fe 000f | | .CONST 0x00fe,0x000f 02e8 0108 0010 | | .CONST 0x0108,0x0010 02ea 010a 0011 | | .CONST 0x010a,0x0011 02ec 010c 0012 | | .CONST 0x010c,0x0012 02ee 0110 0013 | | .CONST 0x0110,0x0013 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; Debug3 Subtable 0x4 02f0 ; -------------------------------------------------------------------------------------- 02f0 0002 0004 | | .DBG3TAB 0x0002,0x0004 02f2 0123 ffff | # | .CONST 0x0123,0xffff 02f4 012a fffe | * | .CONST 0x012a,0xfffe 02f6 012b 0001 | + | .CONST 0x012b,0x0001 02f8 012e 0002 | . | .CONST 0x012e,0x0002 02fa 0141 0003 | A | .CONST 0x0141,0x0003 02fc 0146 0004 | F | .CONST 0x0146,0x0004 02fe ; -------------------------------------------------------------------------------------- 02fe ; Debug3 Subtable 0x5 02fe ; -------------------------------------------------------------------------------------- 02fe 000c 0016 | | .DBG3TAB 0x000c,0x0016 0300 0163 ffff | c | .CONST 0x0163,0xffff 0302 0164 fffe | d | .CONST 0x0164,0xfffe 0304 0165 fffd | e | .CONST 0x0165,0xfffd 0306 0166 fffc | f | .CONST 0x0166,0xfffc 0308 016e fffb | n | .CONST 0x016e,0xfffb 030a 016f fffa | o | .CONST 0x016f,0xfffa 030c 0174 fff9 | t | .CONST 0x0174,0xfff9 030e 017a fff8 | z | .CONST 0x017a,0xfff8 0310 0180 fff7 | | .CONST 0x0180,0xfff7 0312 0182 fff6 | | .CONST 0x0182,0xfff6 0314 0184 fff5 | | .CONST 0x0184,0xfff5 0316 0186 fff4 | | .CONST 0x0186,0xfff4 0318 018b 0001 | | .CONST 0x018b,0x0001 031a 0192 0002 | | .CONST 0x0192,0x0002 031c 01a0 0003 | | .CONST 0x01a0,0x0003 031e 01a2 0004 | | .CONST 0x01a2,0x0004 0320 01a4 0005 | | .CONST 0x01a4,0x0005 0322 01a7 0006 | | .CONST 0x01a7,0x0006 0324 01b9 0007 | | .CONST 0x01b9,0x0007 0326 01bb 0008 | | .CONST 0x01bb,0x0008 0328 01bd 0009 | | .CONST 0x01bd,0x0009 032a 01c4 000a | | .CONST 0x01c4,0x000a 032c 01c6 000b | | .CONST 0x01c6,0x000b 032e 01cb 000c | | .CONST 0x01cb,0x000c 0330 01cd 000d | | .CONST 0x01cd,0x000d 0332 01d2 000e | | .CONST 0x01d2,0x000e 0334 01d7 000f | | .CONST 0x01d7,0x000f 0336 01de 0010 | | .CONST 0x01de,0x0010 0338 01e7 0011 | | .CONST 0x01e7,0x0011 033a 01e9 0012 | | .CONST 0x01e9,0x0012 033c 01eb 0013 | | .CONST 0x01eb,0x0013 033e 01f3 0014 | | .CONST 0x01f3,0x0014 0340 01fa 0015 | | .CONST 0x01fa,0x0015 0342 0200 0016 | | .CONST 0x0200,0x0016 0344 0000 0000 | | .BLANK 0000[0xbc]