|
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, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_040cf4
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 01b0 | | .CONST 0x01b0 ; 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 0053 | S | .CONST 0x0053 ; Address of begin 0009 0067 | g | .CONST 0x0067 ; Address of exception handler 000a 001a | | .CONST 0x001a ; Number of locals 000b INIT_0008: 000b 00bf | | Action Accept_Activation ; Debug Table 0x0 = .DEBUG 0x000b,0x022a,0x8000,0x0000,0x001b,0xa5d4,0x0000,0x0003 000c 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x000c,0x022c,0x8000,0x0000,0x0035,0x23b4,0x0000,0x000d ; Debug Table 0x1.0x0 = 0xc,0xffff 000d 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0xd,0xfffe 000e 029d 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call ; Debug Table 0x1.0x2 = 0xe,0xfffd 0010 029d 009b | | Declare_Subprogram INIT_0098,For_Outer_Call ; Debug Table 0x1.0x3 = 0x10,0xfffc 0012 029d 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call ; Debug Table 0x1.0x4 = 0x12,0xfffb 0014 029d 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call ; Debug Table 0x1.0x5 = 0x14,0xfffa 0016 029d 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call ; Debug Table 0x1.0x6 = 0x16,0xfff9 0018 029d 011b | | Declare_Subprogram INIT_0118,For_Outer_Call ; Debug Table 0x1.0x7 = 0x18,0xfff8 001a 029d 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call ; Debug Table 0x1.0x8 = 0x1a,0xfff7 001c 029d 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call ; Debug Table 0x1.0x9 = 0x1c,0xfff6 001e 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call ; Debug Table 0x1.0xa = 0x1e,0xfff5 0020 029d 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call ; Debug Table 0x1.0xb = 0x20,0xfff4 0022 029d 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call ; Debug Table 0x1.0xc = 0x22,0xfff3 0024 029d 018b | | Declare_Subprogram INIT_0188,For_Outer_Call ; Debug Table 0x1.0xd = 0x24,0xfff2 0026 029d 019b | | Declare_Subprogram INIT_0198,For_Outer_Call ; Debug Table 0x1.0xe = 0x26,0xfff1 0028 617b |a{ | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x003523b4} ; Debug Table 0x1.0xf = 0x28,0xfff0 0029 4a78 |Jx | Short_Literal 0x278 002a e001 | | Load 0x0,0x1 002b 1914 | | Execute Package,Field_Reference,Field_Number 0x14 002c e001 | | Load 0x0,0x1 002d 1915 | | Execute Package,Field_Reference,Field_Number 0x15 002e 1d11 | | Execute_Immediate Reference_Lex_1,0x11 002f 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0030 e001 | | Load 0x0,0x1 0031 1916 | | Execute Package,Field_Reference,Field_Number 0x16 0032 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0033 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0034 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0035 e001 | | Load 0x0,0x1 0036 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0037 e001 | | Load 0x0,0x1 0038 191a | | Execute Package,Field_Reference,Field_Number 0x1a 0039 1d19 | | Execute_Immediate Reference_Lex_1,0x19 003a 1d19 | | Execute_Immediate Reference_Lex_1,0x19 003b 1d16 | | Execute_Immediate Reference_Lex_1,0x16 003c e001 | | Load 0x0,0x1 003d 191e | | Execute Package,Field_Reference,Field_Number 0x1e 003e 1d17 | | Execute_Immediate Reference_Lex_1,0x17 003f 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0040 e001 | | Load 0x0,0x1 0041 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21 0042 e001 | | Load 0x0,0x1 0043 1922 | " | Execute Package,Field_Reference,Field_Number 0x22 0044 e001 | | Load 0x0,0x1 0045 1923 | # | Execute Package,Field_Reference,Field_Number 0x23 0046 e001 | | Load 0x0,0x1 0047 1924 | $ | Execute Package,Field_Reference,Field_Number 0x24 0048 e001 | | Load 0x0,0x1 0049 1925 | % | Execute Package,Field_Reference,Field_Number 0x25 004a e001 | | Load 0x0,0x1 004b 1926 | & | Execute Package,Field_Reference,Field_Number 0x26 004c e001 | | Load 0x0,0x1 004d 1927 | ' | Execute Package,Field_Reference,Field_Number 0x27 004e e002 | | Load 0x0,0x2 004f 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0050 0387 | | Declare_Variable Package 0051 00d8 | | Load_Top At_Offset_0 0052 020f | | Execute Module,Activate 0053 BODY_0008: 0053 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x10 = 0x53,0x1 0054 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0055 0322 | " | Declare_Variable Record 0056 00d9 | | Load_Top At_Offset_1 0057 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0058 00d9 | | Load_Top At_Offset_1 0059 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 005a 6145 |aE | Indirect_Literal Discrete,0x1a0,{0xffffffff, 0x80000001} 005b 00d9 | | Load_Top At_Offset_1 005c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 005d 4801 |H | Short_Literal 0x1 005e 4808 |H | Short_Literal 0x8 005f e003 | | Load 0x0,0x3 0060 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0061 0334 | 4 | Declare_Variable Array,With_Constraint 0062 5145 |QE | Indirect_Literal Any,0x1a8,{0x45746865, 0x726e6574} 0063 e002 | | Load 0x0,0x2 0064 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0065 00bc | | Action Signal_Activated 0066 00bb | | Action Signal_Completion 0067 TRAP_0008: 0067 e002 | | Load 0x0,0x2 0068 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0069 010f | | Execute Exception,Equal 006a 6802 |h | Jump_Zero 0x6d 006b 4887 |H | Short_Literal 0x87 ; Debug Table 0x1.0x11 = 0x6b,0x2 006c 0257 | W | Execute Discrete,Raise 006d e002 | | Load 0x0,0x2 006e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 006f 010f | | Execute Exception,Equal 0070 6802 |h | Jump_Zero 0x73 0071 4887 |H | Short_Literal 0x87 ; Debug Table 0x1.0x12 = 0x71,0x4 0072 0257 | W | Execute Discrete,Raise 0073 4887 |H | Short_Literal 0x87 ; Debug Table 0x1.0x13 = 0x73,0x6 0074 0257 | W | Execute Discrete,Raise 0075 0000 0000 | | .XXX[0x3] 0077 0000 | | 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 0083 | | .CONST 0x0083 ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0003 | | .CONST 0x0003 ; Number of locals 007b INIT_0078: 007b 4801 |H | Short_Literal 0x1 ; Debug Table 0x2 = .DEBUG 0x007b,0x0256,0x0002,0x0000,0x0035,0x23b4,0x0000,0x001c ; Debug Table 0x2.0x0 = 0x7b,0xffff 007c 4802 |H | Short_Literal 0x2 007d e003 | | Load 0x0,0x3 007e 1b15 | | Execute Package,Field_Read,Field_Number 0x15 007f 0334 | 4 | Declare_Variable Array,With_Constraint 0080 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1 = 0x80,0xfffe 0081 00e3 | | Load_Encached Natural_Cache 0082 03f1 | | Declare_Variable Discrete,With_Value 0083 BODY_0078: 0083 00cf | | Action Mark_Auxiliary 0084 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x2 = 0x84,0x1 0085 01da | | Execute Vector,Bounds 0086 0007 | | Action Break_Optional 0087 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x3 = 0x87,0x2 0088 48ff |H | Short_Literal 0xff 0089 0279 | y | Execute Discrete,And 008a e004 | | Load 0x0,0x4 008b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 008c 025b | [ | Execute Discrete,Check_In_Type 008d 00d9 | | Load_Top At_Offset_1 008e e402 | | Load 0x2,0x2 008f 01d6 | | Execute Vector,Field_Write 0090 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x4 = 0x90,0x3 0091 09f8 | | Execute_Immediate Binary_Scale,-0x8 0092 c403 | | Store 0x2,0x3 0093 00c8 | | Action Pop_Auxiliary_Range 0094 37f2 |7 | Loop_Decreasing 0x87 0095 00ce | | Action Pop_Auxiliary 0096 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x5 = 0x96,0x4 0097 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009d | | .CONST 0x009d ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0002 | | .CONST 0x0002 ; Number of locals 009b INIT_0098: 009b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x3 = .DEBUG 0x009b,0x0264,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0060 ; Debug Table 0x3.0x0 = 0x9b,0xffff 009c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 009d BODY_0098: 009d 00cf | | Action Mark_Auxiliary 009e e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x1 = 0x9e,0x1 009f 01d9 | | Execute Vector,Reverse_Bounds 00a0 0263 | c | Execute Discrete,Above_Bound 00a1 700a |p | Jump_Nonzero 0xac 00a2 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x2 = 0xa2,0x2 00a3 0908 | | Execute_Immediate Binary_Scale,0x8 00a4 0248 | H | Execute Discrete,Check_In_Integer 00a5 00d9 | | Load_Top At_Offset_1 00a6 e5ff | | Load 0x2,-0x1 00a7 01d7 | | Execute Vector,Field_Read 00a8 0273 | s | Execute Discrete,Plus 00a9 c402 | | Store 0x2,0x2 00aa 00c8 | | Action Pop_Auxiliary_Range 00ab 3ff6 |? | Loop_Increasing 0xa2 00ac 00ce | | Action Pop_Auxiliary 00ad 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x3 = 0xad,0x3 00ae e005 | | Load 0x0,0x5 00af 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32 00b0 025b | [ | Execute Discrete,Check_In_Type 00b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b2 0000 0000 | | .BLANK 0000[0x6] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bf | | .CONST 0x00bf ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0002 | | .CONST 0x0002 ; Number of locals 00bb INIT_00b8: 00bb e005 | | Load 0x0,0x5 ; Debug Table 0x4 = .DEBUG 0x00bb,0x026e,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0097 ; Debug Table 0x4.0x0 = 0xbb,0xffff 00bc 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 00bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00be 0337 | 7 | Declare_Variable Array 00bf BODY_00b8: 00bf 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x1 = 0xbf,0x1 00c0 01db | | Execute Vector,Length 00c1 0f06 | | Execute_Immediate Equal,0x6 00c2 6808 |h | Jump_Zero 0xcb 00c3 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x2 = 0xc3,0x2 00c4 e005 | | Load 0x0,0x5 00c5 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 00c6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00c7 01c7 | | Execute Vector,Convert 00c8 00d9 | | Load_Top At_Offset_1 00c9 01d4 | | Execute Vector,Structure_Write 00ca 781e |x | Jump 0xe9 00cb 00cf | | Action Mark_Auxiliary 00cc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x3 = 0xcc,0x3 00cd 01d9 | | Execute Vector,Reverse_Bounds 00ce 0007 | | Action Break_Optional 00cf 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x4 = 0xcf,0x4 00d0 00d9 | | Load_Top At_Offset_1 00d1 e402 | | Load 0x2,0x2 00d2 01d6 | | Execute Vector,Field_Write 00d3 00c8 | | Action Pop_Auxiliary_Range 00d4 3ffa |? | Loop_Increasing 0xcf 00d5 00c9 | | Action Pop_Auxiliary_Loop 00d6 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x5 = 0xd6,0x5 00d7 01da | | Execute Vector,Bounds 00d8 0264 | d | Execute Discrete,Below_Bound 00d9 700e |p | Jump_Nonzero 0xe8 00da 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x6 = 0xda,0x6 00db e5ff | | Load 0x2,-0x1 00dc 01d7 | | Execute Vector,Field_Read 00dd 4806 |H | Short_Literal 0x6 00de e5ff | | Load 0x2,-0x1 00df 01dc | | Execute Vector,Last 00e0 00db | | Load_Top At_Offset_3 00e1 0272 | r | Execute Discrete,Minus 00e2 0272 | r | Execute Discrete,Minus 00e3 0248 | H | Execute Discrete,Check_In_Integer 00e4 e402 | | Load 0x2,0x2 00e5 01d6 | | Execute Vector,Field_Write 00e6 00c8 | | Action Pop_Auxiliary_Range 00e7 37f2 |7 | Loop_Decreasing 0xda 00e8 00ce | | Action Pop_Auxiliary 00e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x7 = 0xe9,0x7 00ea 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00eb 0000 0000 | | .BLANK 0000[0x5] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f3 | | .CONST 0x00f3 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0001 | | .CONST 0x0001 ; Number of locals 00f3 BODY_00f0: 00f3 INIT_00f0: 00f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x00f3,0x0280,0x0002,0x0000,0x0035,0x23b4,0x0000,0x00f1 ; Debug Table 0x5.0x0 = 0xf3,0x1 00f4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00f5 0000 0000 | | .XXX[0x3] 00f7 0000 | | 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fd | | .CONST 0x00fd ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0002 | | .CONST 0x0002 ; Number of locals 00fb INIT_00f8: 00fb e005 | | Load 0x0,0x5 ; Debug Table 0x6 = .DEBUG 0x00fb,0x0284,0x0001,0x0000,0x0035,0x23b4,0x0000,0x0109 ; Debug Table 0x6.0x0 = 0xfb,0xffff 00fc 1b19 | | Execute Package,Field_Read,Field_Number 0x19 00fd BODY_00f8: 00fd e005 | | Load 0x0,0x5 ; Debug Table 0x6.0x1 = 0xfd,0x1 00fe 1b19 | | Execute Package,Field_Read,Field_Number 0x19 00ff e5fc | | Load 0x2,-0x4 0100 e5fd | | Load 0x2,-0x3 0101 820e | | Call 0x1,0xe 0102 e5fe | | Load 0x2,-0x2 0103 820f | | Call 0x1,0xf 0104 e5ff | | Load 0x2,-0x1 0105 e001 | | Load 0x0,0x1 0106 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0107 e005 | | Load 0x0,0x5 0108 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0109 1814 | | Execute Package,Field_Execute,Field_Number 0x14 010a 0059 | Y | Store_Top Discrete,At_Offset_1 010b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x2 = 0x10b,0x2 010c e001 | | Load 0x0,0x1 010d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 010e 01d7 | | Execute Vector,Field_Read 010f a5fb | | Store_Unchecked 0x2,-0x5 0110 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0111 0000 0000 | | .BLANK 0000[0x7] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b e003 | | Load 0x0,0x3 ; Debug Table 0x7 = .DEBUG 0x011b,0x028c,0x0001,0x0000,0x0035,0x23b4,0x0000,0x0150 ; Debug Table 0x7.0x0 = 0x11b,0x1 011c 1b19 | | Execute Package,Field_Read,Field_Number 0x19 011d e5fe | | Load 0x2,-0x2 011e e003 | | Load 0x0,0x3 011f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0120 e003 | | Load 0x0,0x3 0121 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0122 e5ff | | Load 0x2,-0x1 0123 8211 | | Call 0x1,0x11 0124 c5fd | | Store 0x2,-0x3 0125 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0126 0000 0000 | | .XXX[0x2] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 012d | - | .CONST 0x012d ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0002 | | .CONST 0x0002 ; Number of locals 012b INIT_0128: 012b e005 | | Load 0x0,0x5 ; Debug Table 0x8 = .DEBUG 0x012b,0x0290,0x0001,0x0000,0x0035,0x23b4,0x0000,0x0177 ; Debug Table 0x8.0x0 = 0x12b,0xffff 012c 1b19 | | Execute Package,Field_Read,Field_Number 0x19 012d BODY_0128: 012d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x8.0x1 = 0x12d,0x1 012e e005 | | Load 0x0,0x5 012f 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0130 e5fc | | Load 0x2,-0x4 0131 e5fd | | Load 0x2,-0x3 0132 e5fe | | Load 0x2,-0x2 0133 e5ff | | Load 0x2,-0x1 0134 e001 | | Load 0x0,0x1 0135 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0136 e005 | | Load 0x0,0x5 0137 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0138 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0139 005a | Z | Store_Top Discrete,At_Offset_2 013a c5fa | | Store 0x2,-0x6 013b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x2 = 0x13b,0x2 013c e001 | | Load 0x0,0x1 013d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 013e 01d7 | | Execute Vector,Field_Read 013f a5fb | | Store_Unchecked 0x2,-0x5 0140 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0141 0000 0000 | | .BLANK 0000[0x7] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014d | M | .CONST 0x014d ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0002 | | .CONST 0x0002 ; Number of locals 014b INIT_0148: 014b e005 | | Load 0x0,0x5 ; Debug Table 0x9 = .DEBUG 0x014b,0x0298,0x0001,0x0000,0x0035,0x23b4,0x0000,0x01bc ; Debug Table 0x9.0x0 = 0x14b,0xffff 014c 1b19 | | Execute Package,Field_Read,Field_Number 0x19 014d BODY_0148: 014d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x9.0x1 = 0x14d,0x1 014e e5fc | | Load 0x2,-0x4 014f e005 | | Load 0x0,0x5 0150 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0151 e5fe | | Load 0x2,-0x2 0152 e5ff | | Load 0x2,-0x1 0153 e001 | | Load 0x0,0x1 0154 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0155 e005 | | Load 0x0,0x5 0156 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0157 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0158 005b | [ | Store_Top Discrete,At_Offset_3 0159 00d1 | | Pop_Control Pop_Count_1 015a c5fb | | Store 0x2,-0x5 015b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x2 = 0x15b,0x2 015c e001 | | Load 0x0,0x1 015d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 015e 01d7 | | Execute Vector,Field_Read 015f a5fd | | Store_Unchecked 0x2,-0x3 0160 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0161 0000 0000 | | .BLANK 0000[0x7] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016b | k | .CONST 0x016b ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0001 | | .CONST 0x0001 ; Number of locals 016b BODY_0168: 016b INIT_0168: 016b e005 | | Load 0x0,0x5 ; Debug Table 0xa = .DEBUG 0x016b,0x02a0,0x0002,0x0000,0x0035,0x23b4,0x0000,0x01fb ; Debug Table 0xa.0x0 = 0x16b,0x1 016c 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 016d 1817 | | Execute Package,Field_Execute,Field_Number 0x17 016e 8210 | | Call 0x1,0x10 016f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0173 | s | .CONST 0x0173 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0001 | | .CONST 0x0001 ; Number of locals 0173 BODY_0170: 0173 INIT_0170: 0173 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x0173,0x02a4,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0213 ; Debug Table 0xb.0x0 = 0x173,0x1 0174 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0175 8215 | | Call 0x1,0x15 0176 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0177 0000 | | .XXX[0x1] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x017b,0x02a8,0x0002,0x0000,0x0035,0x23b4,0x0000,0x022b ; Debug Table 0xc.0x0 = 0x17b,0x1 017c e001 | | Load 0x0,0x1 017d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 017e e005 | | Load 0x0,0x5 017f 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0180 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0181 8210 | | Call 0x1,0x10 0182 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0183 0000 0000 | | .BLANK 0000[0x5] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018b | | .CONST 0x018b ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0001 | | .CONST 0x0001 ; Number of locals 018b BODY_0188: 018b INIT_0188: 018b 00da | | Load_Top At_Offset_2 ; Debug Table 0xd = .DEBUG 0x018b,0x02ac,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0249 ; Debug Table 0xd.0x0 = 0x18b,0x1 018c e001 | | Load 0x0,0x1 018d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 018e e005 | | Load 0x0,0x5 018f 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0190 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0191 820d | | Call 0x1,0xd 0192 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0193 0000 0000 | | .BLANK 0000[0x5] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019b | | .CONST 0x019b ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0001 | | .CONST 0x0001 ; Number of locals 019b BODY_0198: 019b INIT_0198: 019b 4800 |H | Short_Literal 0x0 ; Debug Table 0xe = .DEBUG 0x019b,0x02b0,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0267 ; Debug Table 0xe.0x0 = 0x19b,0x1 019c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019d 0000 0000 | | .XXX[0x3] 019f 0000 | | 01a0 ffff ffff | | .LITERAL {0xffffffff, 0x80000001} 01a4 0000 0000 | | .LITERAL {0x00000000, 0x003523b4} 01a8 4574 6865 |Ethe| .LITERAL {0x45746865, 0x726e6574} 01ac 0000 0000 | | .BLANK 0000[0x4] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; Debug Table 01b0 ; -------------------------------------------------------------------------------------- 01b0 0003 000f | | .CONST 0x0003,0x000f 01b2 000b 022a | *| .DEBUG 0x000b,0x022a,0x8000,0x0000,0x001b,0xa5d4,0x0000,0x0003 01ba 000c 022c | ,| .DEBUG 0x000c,0x022c,0x8000,0x0000,0x0035,0x23b4,0x0000,0x000d 01c2 007b 0256 | { V| .DEBUG 0x007b,0x0256,0x0002,0x0000,0x0035,0x23b4,0x0000,0x001c 01ca 009b 0264 | d| .DEBUG 0x009b,0x0264,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0060 01d2 00bb 026e | n| .DEBUG 0x00bb,0x026e,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0097 01da 00f3 0280 | | .DEBUG 0x00f3,0x0280,0x0002,0x0000,0x0035,0x23b4,0x0000,0x00f1 01e2 00fb 0284 | | .DEBUG 0x00fb,0x0284,0x0001,0x0000,0x0035,0x23b4,0x0000,0x0109 01ea 011b 028c | | .DEBUG 0x011b,0x028c,0x0001,0x0000,0x0035,0x23b4,0x0000,0x0150 01f2 012b 0290 | + | .DEBUG 0x012b,0x0290,0x0001,0x0000,0x0035,0x23b4,0x0000,0x0177 01fa 014b 0298 | K | .DEBUG 0x014b,0x0298,0x0001,0x0000,0x0035,0x23b4,0x0000,0x01bc 0202 016b 02a0 | k | .DEBUG 0x016b,0x02a0,0x0002,0x0000,0x0035,0x23b4,0x0000,0x01fb 020a 0173 02a4 | s | .DEBUG 0x0173,0x02a4,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0213 0212 017b 02a8 | { | .DEBUG 0x017b,0x02a8,0x0002,0x0000,0x0035,0x23b4,0x0000,0x022b 021a 018b 02ac | | .DEBUG 0x018b,0x02ac,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0249 0222 019b 02b0 | | .DEBUG 0x019b,0x02b0,0x0002,0x0000,0x0035,0x23b4,0x0000,0x0267 022a ; -------------------------------------------------------------------------------------- 022a ; Debug3 Subtable 0x0 022a ; -------------------------------------------------------------------------------------- 022a 0000 0000 | | .DBG3TAB 0x0000,0x0000 022c ; -------------------------------------------------------------------------------------- 022c ; Debug3 Subtable 0x1 022c ; -------------------------------------------------------------------------------------- 022c 0010 0004 | | .DBG3TAB 0x0010,0x0004 022e 000c ffff | | .CONST 0x000c,0xffff 0230 000d fffe | | .CONST 0x000d,0xfffe 0232 000e fffd | | .CONST 0x000e,0xfffd 0234 0010 fffc | | .CONST 0x0010,0xfffc 0236 0012 fffb | | .CONST 0x0012,0xfffb 0238 0014 fffa | | .CONST 0x0014,0xfffa 023a 0016 fff9 | | .CONST 0x0016,0xfff9 023c 0018 fff8 | | .CONST 0x0018,0xfff8 023e 001a fff7 | | .CONST 0x001a,0xfff7 0240 001c fff6 | | .CONST 0x001c,0xfff6 0242 001e fff5 | | .CONST 0x001e,0xfff5 0244 0020 fff4 | | .CONST 0x0020,0xfff4 0246 0022 fff3 | " | .CONST 0x0022,0xfff3 0248 0024 fff2 | $ | .CONST 0x0024,0xfff2 024a 0026 fff1 | & | .CONST 0x0026,0xfff1 024c 0028 fff0 | ( | .CONST 0x0028,0xfff0 024e 0053 0001 | S | .CONST 0x0053,0x0001 0250 006b 0002 | k | .CONST 0x006b,0x0002 0252 0071 0004 | q | .CONST 0x0071,0x0004 0254 0073 0006 | s | .CONST 0x0073,0x0006 0256 ; -------------------------------------------------------------------------------------- 0256 ; Debug3 Subtable 0x2 0256 ; -------------------------------------------------------------------------------------- 0256 0002 0004 | | .DBG3TAB 0x0002,0x0004 0258 007b ffff | { | .CONST 0x007b,0xffff 025a 0080 fffe | | .CONST 0x0080,0xfffe 025c 0084 0001 | | .CONST 0x0084,0x0001 025e 0087 0002 | | .CONST 0x0087,0x0002 0260 0090 0003 | | .CONST 0x0090,0x0003 0262 0096 0004 | | .CONST 0x0096,0x0004 0264 ; -------------------------------------------------------------------------------------- 0264 ; Debug3 Subtable 0x3 0264 ; -------------------------------------------------------------------------------------- 0264 0001 0003 | | .DBG3TAB 0x0001,0x0003 0266 009b ffff | | .CONST 0x009b,0xffff 0268 009e 0001 | | .CONST 0x009e,0x0001 026a 00a2 0002 | | .CONST 0x00a2,0x0002 026c 00ad 0003 | | .CONST 0x00ad,0x0003 026e ; -------------------------------------------------------------------------------------- 026e ; Debug3 Subtable 0x4 026e ; -------------------------------------------------------------------------------------- 026e 0001 0007 | | .DBG3TAB 0x0001,0x0007 0270 00bb ffff | | .CONST 0x00bb,0xffff 0272 00bf 0001 | | .CONST 0x00bf,0x0001 0274 00c3 0002 | | .CONST 0x00c3,0x0002 0276 00cc 0003 | | .CONST 0x00cc,0x0003 0278 00cf 0004 | | .CONST 0x00cf,0x0004 027a 00d6 0005 | | .CONST 0x00d6,0x0005 027c 00da 0006 | | .CONST 0x00da,0x0006 027e 00e9 0007 | | .CONST 0x00e9,0x0007 0280 ; -------------------------------------------------------------------------------------- 0280 ; Debug3 Subtable 0x5 0280 ; -------------------------------------------------------------------------------------- 0280 0000 0001 | | .DBG3TAB 0x0000,0x0001 0282 00f3 0001 | | .CONST 0x00f3,0x0001 0284 ; -------------------------------------------------------------------------------------- 0284 ; Debug3 Subtable 0x6 0284 ; -------------------------------------------------------------------------------------- 0284 0001 0002 | | .DBG3TAB 0x0001,0x0002 0286 00fb ffff | | .CONST 0x00fb,0xffff 0288 00fd 0001 | | .CONST 0x00fd,0x0001 028a 010b 0002 | | .CONST 0x010b,0x0002 028c ; -------------------------------------------------------------------------------------- 028c ; Debug3 Subtable 0x7 028c ; -------------------------------------------------------------------------------------- 028c 0000 0001 | | .DBG3TAB 0x0000,0x0001 028e 011b 0001 | | .CONST 0x011b,0x0001 0290 ; -------------------------------------------------------------------------------------- 0290 ; Debug3 Subtable 0x8 0290 ; -------------------------------------------------------------------------------------- 0290 0001 0002 | | .DBG3TAB 0x0001,0x0002 0292 012b ffff | + | .CONST 0x012b,0xffff 0294 012d 0001 | - | .CONST 0x012d,0x0001 0296 013b 0002 | ; | .CONST 0x013b,0x0002 0298 ; -------------------------------------------------------------------------------------- 0298 ; Debug3 Subtable 0x9 0298 ; -------------------------------------------------------------------------------------- 0298 0001 0002 | | .DBG3TAB 0x0001,0x0002 029a 014b ffff | K | .CONST 0x014b,0xffff 029c 014d 0001 | M | .CONST 0x014d,0x0001 029e 015b 0002 | [ | .CONST 0x015b,0x0002 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; Debug3 Subtable 0xa 02a0 ; -------------------------------------------------------------------------------------- 02a0 0000 0001 | | .DBG3TAB 0x0000,0x0001 02a2 016b 0001 | k | .CONST 0x016b,0x0001 02a4 ; -------------------------------------------------------------------------------------- 02a4 ; Debug3 Subtable 0xb 02a4 ; -------------------------------------------------------------------------------------- 02a4 0000 0001 | | .DBG3TAB 0x0000,0x0001 02a6 0173 0001 | s | .CONST 0x0173,0x0001 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; Debug3 Subtable 0xc 02a8 ; -------------------------------------------------------------------------------------- 02a8 0000 0001 | | .DBG3TAB 0x0000,0x0001 02aa 017b 0001 | { | .CONST 0x017b,0x0001 02ac ; -------------------------------------------------------------------------------------- 02ac ; Debug3 Subtable 0xd 02ac ; -------------------------------------------------------------------------------------- 02ac 0000 0001 | | .DBG3TAB 0x0000,0x0001 02ae 018b 0001 | | .CONST 0x018b,0x0001 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; Debug3 Subtable 0xe 02b0 ; -------------------------------------------------------------------------------------- 02b0 0000 0001 | | .DBG3TAB 0x0000,0x0001 02b2 019b 0001 | | .CONST 0x019b,0x0001 02b4 0000 0000 | | .BLANK 0000[0x14c]