|
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 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0085 | | .CONST 0x0085 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0028 | ( | .CONST 0x0028 ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x01c2,0xc000,0x0000,0x0058,0x6ac5,0x0000,0x000c ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 000d 0129 | ) | Execute Any,Make_Visible 000e 4804 |H | Short_Literal 0x4 ; Debug Table 0x0.0x1 = 0xe,0xfffe 000f 032b | + | Declare_Type Record,Incomplete,Visible 0010 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x2 = 0x10,0xfffd 0011 02a0 | | Declare_Subprogram Null_Subprogram 0012 03ae | | Declare_Type Heap_Access,Defined,Visible 0013 0007 | | Action Break_Optional ; Debug Table 0x0.0x3 = 0x13,0xfffc 0014 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x14,0xfffb 0016 e20f | | Load 0x1,0xf ; Debug Table 0x0.0x5 = 0x16,0xfffa 0017 02a0 | | Declare_Subprogram Null_Subprogram 0018 03ae | | Declare_Type Heap_Access,Defined,Visible 0019 0007 | | Action Break_Optional ; Debug Table 0x0.0x6 = 0x19,0xfff9 001a 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1a,0xfff8 001c 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1c,0xfff7 001e 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1e,0xfff6 0020 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x20,0xfff5 0022 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xb = 0x22,0xfff4 0023 4802 |H | Short_Literal 0x2 0024 e002 | | Load 0x0,0x2 0025 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0026 012c | , | Execute Any,Size 0027 026d | m | Execute Discrete,Exponentiate 0028 0aff | | Execute_Immediate Plus,-0x1 0029 00e5 | | Load_Encached Long_Integer_Cache 002a 03f8 | | Declare_Type Discrete,Constrained 002b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0xc = 0x2b,0xfff3 002c 012c | , | Execute Any,Size 002d e002 | | Load 0x0,0x2 002e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002f 012c | , | Execute Any,Size 0030 027f | | Execute Discrete,Equal 0031 7002 |p | Jump_Nonzero 0x34 0032 4887 |H | Short_Literal 0x87 0033 0257 | W | Execute Discrete,Raise 0034 0007 | | Action Break_Optional ; Debug Table 0x0.0xd = 0x34,0xfff2 0035 029b 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Unelaborated ; Debug Table 0x0.0xe = 0x35,0xfff1 0037 6138 |a8 | Indirect_Literal Discrete,0x170,{0x00000000, 0x00586ac5} ; Debug Table 0x0.0xf = 0x37,0xfff0 0038 48c7 |H | Short_Literal 0xc7 0039 00db | | Load_Top At_Offset_3 003a e20f | | Load 0x1,0xf 003b 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 003c 612f |a/ | Indirect_Literal Discrete,0x16c,{0x00000000, 0x7fffffff} 003d 4806 |H | Short_Literal 0x6 003e 4871 |Hq | Short_Literal 0x71 003f e003 | | Load 0x0,0x3 0040 0387 | | Declare_Variable Package 0041 00d8 | | Load_Top At_Offset_0 0042 020f | | Execute Module,Activate 0043 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x10 = 0x43,0xffef 0044 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 0045 e211 | | Load 0x1,0x11 0046 0325 | % | Complete_Type Record,By_Renaming 0047 00bf | | Action Accept_Activation 0048 611f |a | Indirect_Literal Discrete,0x168,{0x00000000, 0x005874f5} ; Debug Table 0x1 = .DEBUG 0x0048,0x01e6,0xc000,0x0000,0x0058,0x74f5,0x0000,0x000d ; Debug Table 0x1.0x0 = 0x48,0xffff 0049 480e |H | Short_Literal 0xe 004a e219 | | Load 0x1,0x19 004b e002 | | Load 0x0,0x2 004c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 004d e004 | | Load 0x0,0x4 004e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 004f 0387 | | Declare_Variable Package 0050 00d8 | | Load_Top At_Offset_0 0051 020f | | Execute Module,Activate 0052 6115 |a | Indirect_Literal Discrete,0x168,{0x00000000, 0x005874f5} ; Debug Table 0x1.0x1 = 0x52,0xfffe 0053 4819 |H | Short_Literal 0x19 0054 e002 | | Load 0x0,0x2 0055 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0056 e219 | | Load 0x1,0x19 0057 e004 | | Load 0x0,0x4 0058 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0059 0387 | | Declare_Variable Package 005a 00d8 | | Load_Top At_Offset_0 005b 020f | | Execute Module,Activate 005c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x2 = 0x5c,0xfffd 005d 00c7 | | Action Elaborate_Subprogram 005e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x3 = 0x5e,0xfffc 005f 00c7 | | Action Elaborate_Subprogram 0060 6107 |a | Indirect_Literal Discrete,0x168,{0x00000000, 0x005874f5} ; Debug Table 0x1.0x4 = 0x60,0xfffb 0061 484c |HL | Short_Literal 0x4c 0062 e211 | | Load 0x1,0x11 0063 e212 | | Load 0x1,0x12 0064 e005 | | Load 0x0,0x5 0065 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0066 0387 | | Declare_Variable Package 0067 00d8 | | Load_Top At_Offset_0 0068 020f | | Execute Module,Activate 0069 e005 | | Load 0x0,0x5 ; Debug Table 0x1.0x5 = 0x69,0xfffa 006a 1919 | | Execute Package,Field_Reference,Field_Number 0x19 006b 00c6 | | Action Check_Subprogram_Elaborated 006c 00db | | Load_Top At_Offset_3 006d 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 006e e21b | | Load 0x1,0x1b 006f 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 0070 60f7 |` | Indirect_Literal Discrete,0x168,{0x00000000, 0x005874f5} 0071 4855 |HU | Short_Literal 0x55 0072 4800 |H | Short_Literal 0x0 0073 0007 | | Action Break_Optional 0074 e005 | | Load 0x0,0x5 ; Debug Table 0x1.0x6 = 0x74,0xfff9 0075 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0076 00c6 | | Action Check_Subprogram_Elaborated 0077 e20f | | Load 0x1,0xf 0078 e214 | | Load 0x1,0x14 0079 60ee |` | Indirect_Literal Discrete,0x168,{0x00000000, 0x005874f5} 007a 4866 |Hf | Short_Literal 0x66 007b 4800 |H | Short_Literal 0x0 007c 0007 | | Action Break_Optional 007d 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x7 = 0x7d,0xfff8 007e 00c7 | | Action Elaborate_Subprogram 007f 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x8 = 0x7f,0xfff7 0080 00c7 | | Action Elaborate_Subprogram 0081 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x9 = 0x81,0xfff6 0082 00c7 | | Action Elaborate_Subprogram 0083 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xa = 0x83,0xfff5 0084 00c7 | | Action Elaborate_Subprogram 0085 BODY_0008: 0085 00bc | | Action Signal_Activated 0086 00bb | | Action Signal_Completion 0087 0000 | | .XXX[0x1] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b 4800 |H | Short_Literal 0x0 ; Debug Table 0x2 = .DEBUG 0x008b,0x01fe,0x1001,0x0000,0x0058,0x6ac5,0x0000,0x0026 ; Debug Table 0x2.0x0 = 0x8b,0x1 008c a5fe | | Store_Unchecked 0x2,-0x2 008d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 008e 0000 0000 | | .XXX[0x2] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0099 | | .CONST 0x0099 ; Address of begin 0091 00d5 | | .CONST 0x00d5 ; Address of exception handler 0092 0005 | | .CONST 0x0005 ; Number of locals 0093 INIT_0090: 0093 e21b | | Load 0x1,0x1b ; Debug Table 0x3 = .DEBUG 0x0093,0x0202,0x1001,0x0000,0x0058,0x6ac5,0x0000,0x003c ; Debug Table 0x3.0x0 = 0x93,0xffff 0094 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0095 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x1 = 0x95,0xfffe 0096 e219 | | Load 0x1,0x19 ; Debug Table 0x3.0x2 = 0x96,0xfffd 0097 0007 | | Action Break_Optional 0098 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x3.0x3 = 0x98,0xfffc 0099 BODY_0090: 0099 487e |H~ | Short_Literal 0x7e ; Debug Table 0x3.0x4 = 0x99,0x1 009a a5fb | | Store_Unchecked 0x2,-0x5 009b e214 | | Load 0x1,0x14 ; Debug Table 0x3.0x5 = 0x9b,0x2 009c a5fc | | Store_Unchecked 0x2,-0x4 009d e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x6 = 0x9d,0x3 009e e21d | | Load 0x1,0x1d 009f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00a0 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00a1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x7 = 0xa1,0x4 00a2 e21e | | Load 0x1,0x1e 00a3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00a4 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00a5 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x8 = 0xa5,0x5 00a6 e21b | | Load 0x1,0x1b 00a7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00a8 00db | | Load_Top At_Offset_3 00a9 e5fd | | Load 0x2,-0x3 00aa e21e | | Load 0x1,0x1e 00ab 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00ac e405 | | Load 0x2,0x5 00ad e21f | | Load 0x1,0x1f 00ae e220 | | Load 0x1,0x20 00af 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00b0 e005 | | Load 0x0,0x5 00b1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00b2 e21b | | Load 0x1,0x1b 00b3 181f | | Execute Package,Field_Execute,Field_Number 0x1f 00b4 c402 | | Store 0x2,0x2 00b5 005b | [ | Store_Top Discrete,At_Offset_3 00b6 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x9 = 0xb6,0x6 00b7 7005 |p | Jump_Nonzero 0xbd 00b8 4852 |HR | Short_Literal 0x52 ; Debug Table 0x3.0xa = 0xb8,0x7 00b9 a5fb | | Store_Unchecked 0x2,-0x5 00ba e001 | | Load 0x0,0x1 ; Debug Table 0x3.0xb = 0xba,0x8 00bb 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00bc 0257 | W | Execute Discrete,Raise 00bd 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0xc = 0xbd,0x9 00be e402 | | Load 0x2,0x2 00bf 0217 | | Execute Heap_Access,All_Reference 00c0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00c1 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0xd = 0xc1,0xa 00c2 e402 | | Load 0x2,0x2 00c3 0217 | | Execute Heap_Access,All_Reference 00c4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00c5 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xe = 0xc5,0xb 00c6 0217 | | Execute Heap_Access,All_Reference 00c7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00c8 012d | - | Execute Any,Address 00c9 e006 | | Load 0x0,0x6 00ca 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00cb 00d9 | | Load_Top At_Offset_1 00cc e224 | $ | Load 0x1,0x24 00cd e225 | % | Load 0x1,0x25 00ce 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 00cf e005 | | Load 0x0,0x5 00d0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00d1 a5fc | | Store_Unchecked 0x2,-0x4 00d2 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xf = 0xd2,0xc 00d3 a5fb | | Store_Unchecked 0x2,-0x5 00d4 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00d5 TRAP_0090: 00d5 e001 | | Load 0x0,0x1 00d6 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00d7 010f | | Execute Exception,Equal 00d8 6801 |h | Jump_Zero 0xda 00d9 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x3.0x10 = 0xd9,0xd 00da 4885 |H | Short_Literal 0x85 00db 010f | | Execute Exception,Equal 00dc 6803 |h | Jump_Zero 0xe0 00dd 4850 |HP | Short_Literal 0x50 ; Debug Table 0x3.0x11 = 0xdd,0xe 00de a5fb | | Store_Unchecked 0x2,-0x5 00df 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00e0 0100 | | Execute Exception,Raise 00e1 0000 0000 | | .BLANK 0000[0x7] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00ec | | .CONST 0x00ec ; Address of begin 00e9 0101 | | .CONST 0x0101 ; Address of exception handler 00ea 0002 | | .CONST 0x0002 ; Number of locals 00eb INIT_00e8: 00eb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4 = .DEBUG 0x00eb,0x0228,0x1001,0x0000,0x0058,0x6ac5,0x0000,0x0056 ; Debug Table 0x4.0x0 = 0xeb,0xffff 00ec BODY_00e8: 00ec 487e |H~ | Short_Literal 0x7e ; Debug Table 0x4.0x1 = 0xec,0x1 00ed a5fd | | Store_Unchecked 0x2,-0x3 00ee 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x2 = 0xee,0x2 00ef e5fe | | Load 0x2,-0x2 00f0 e5ff | | Load 0x2,-0x1 00f1 e21d | | Load 0x1,0x1d 00f2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00f3 e21b | | Load 0x1,0x1b 00f4 1820 | | Execute Package,Field_Execute,Field_Number 0x20 00f5 00d1 | | Pop_Control Pop_Count_1 00f6 0059 | Y | Store_Top Discrete,At_Offset_1 00f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x3 = 0xf7,0x3 00f8 7005 |p | Jump_Nonzero 0xfe 00f9 4853 |HS | Short_Literal 0x53 ; Debug Table 0x4.0x4 = 0xf9,0x4 00fa a5fd | | Store_Unchecked 0x2,-0x3 00fb e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x5 = 0xfb,0x5 00fc 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00fd 0257 | W | Execute Discrete,Raise 00fe 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x6 = 0xfe,0x6 00ff a5fd | | Store_Unchecked 0x2,-0x3 0100 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0101 TRAP_00e8: 0101 e001 | | Load 0x0,0x1 0102 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0103 010f | | Execute Exception,Equal 0104 6801 |h | Jump_Zero 0x106 0105 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x4.0x7 = 0x105,0x7 0106 4885 |H | Short_Literal 0x85 0107 010f | | Execute Exception,Equal 0108 6803 |h | Jump_Zero 0x10c 0109 4850 |HP | Short_Literal 0x50 ; Debug Table 0x4.0x8 = 0x109,0x8 010a a5fd | | Store_Unchecked 0x2,-0x3 010b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 010c 0100 | | Execute Exception,Raise 010d 0000 0000 | | .XXX[0x3] 010f 0000 | | 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 0113 | | .CONST 0x0113 ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0001 | | .CONST 0x0001 ; Number of locals 0113 BODY_0110: 0113 INIT_0110: 0113 487e |H~ | Short_Literal 0x7e ; Debug Table 0x5 = .DEBUG 0x0113,0x023c,0x1001,0x0000,0x0058,0x6ac5,0x0000,0x0068 ; Debug Table 0x5.0x0 = 0x113,0x1 0114 a5fd | | Store_Unchecked 0x2,-0x3 0115 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x1 = 0x115,0x2 0116 a5fe | | Store_Unchecked 0x2,-0x2 0117 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x2 = 0x117,0x3 0118 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0119 a5fe | | Store_Unchecked 0x2,-0x2 011a 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x3 = 0x11a,0x4 011b a5fd | | Store_Unchecked 0x2,-0x3 011c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 011d 0000 0000 | | .XXX[0x3] 011f 0000 | | 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 012f | / | .CONST 0x012f ; Address of begin 0121 013e | > | .CONST 0x013e ; Address of exception handler 0122 0006 | | .CONST 0x0006 ; Number of locals 0123 INIT_0120: 0123 029f 015b | [| Declare_Subprogram INIT_0158,For_Call ; Debug Table 0x6 = .DEBUG 0x0123,0x0246,0x3801,0x0002,0x0058,0x6ac5,0x0000,0x0078 ; Debug Table 0x6.0x0 = 0x123,0xffff 0125 e21b | | Load 0x1,0x1b ; Debug Table 0x6.0x1 = 0x125,0xfffe 0126 1923 | # | Execute Package,Field_Reference,Field_Number 0x23 0127 00c6 | | Action Check_Subprogram_Elaborated 0128 4802 |H | Short_Literal 0x2 0129 4802 |H | Short_Literal 0x2 012a 0099 | | Action Reference_Dynamic 012b 603c |`< | Indirect_Literal Discrete,0x168,{0x00000000, 0x005874f5} 012c 49ba |I | Short_Literal 0x1ba 012d 4806 |H | Short_Literal 0x6 012e 0007 | | Action Break_Optional 012f BODY_0120: 012f 487e |H~ | Short_Literal 0x7e ; Debug Table 0x6.0x2 = 0x12f,0x1 0130 a5fc | | Store_Unchecked 0x2,-0x4 0131 e5fd | | Load 0x2,-0x3 ; Debug Table 0x6.0x3 = 0x131,0x2 0132 4803 |H | Short_Literal 0x3 0133 4802 |H | Short_Literal 0x2 0134 0099 | | Action Reference_Dynamic 0135 4804 |H | Short_Literal 0x4 0136 4802 |H | Short_Literal 0x2 0137 0099 | | Action Reference_Dynamic 0138 e21b | | Load 0x1,0x1b 0139 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 013a 00d1 | | Pop_Control Pop_Count_1 013b 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x4 = 0x13b,0x3 013c a5fc | | Store_Unchecked 0x2,-0x4 013d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 013e TRAP_0120: 013e e001 | | Load 0x0,0x1 013f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0140 010f | | Execute Exception,Equal 0141 6801 |h | Jump_Zero 0x143 0142 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x6.0x5 = 0x142,0x4 0143 4885 |H | Short_Literal 0x85 0144 010f | | Execute Exception,Equal 0145 6803 |h | Jump_Zero 0x149 0146 4851 |HQ | Short_Literal 0x51 ; Debug Table 0x6.0x6 = 0x146,0x5 0147 a5fc | | Store_Unchecked 0x2,-0x4 0148 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0149 0100 | | Execute Exception,Raise 014a 0000 0000 | | .BLANK 0000[0x6] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 4887 |H | Short_Literal 0x87 ; Debug Table 0x7 = .DEBUG 0x0153,0x0256,0x1002,0x0000,0x0058,0x6ac5,0x0000,0x00be ; Debug Table 0x7.0x0 = 0x153,0x1 0154 0257 | W | Execute Discrete,Raise 0155 0000 0000 | | .XXX[0x3] 0157 0000 | | 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015b | [ | .CONST 0x015b ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0001 | | .CONST 0x0001 ; Number of locals 015b BODY_0158: 015b INIT_0158: 015b 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x015b,0x025a,0x1801,0x0002,0x0058,0x74f5,0x0000,0x019e ; Debug Table 0x8.0x0 = 0x15b,0x1 015c 0217 | | Execute Heap_Access,All_Reference 015d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 015e e20f | | Load 0x1,0xf 015f 0119 | | Execute Any,Check_In_Formal_Type 0160 00db | | Load_Top At_Offset_3 0161 0217 | | Execute Heap_Access,All_Reference 0162 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0163 e21c | | Load 0x1,0x1c 0164 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0165 85fe | | Call 0x2,-0x2 0166 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0167 0000 | | .XXX[0x1] 0168 0000 0000 | | .LITERAL {0x00000000, 0x005874f5} 016c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0170 0000 0000 | | .LITERAL {0x00000000, 0x00586ac5} 0174 0000 0000 | | .BLANK 0000[0x4] 0178 ; -------------------------------------------------------------------------------------- 0178 ; Debug Table 0178 ; -------------------------------------------------------------------------------------- 0178 0003 0009 | | .CONST 0x0003,0x0009 017a 000b 01c2 | | .DEBUG 0x000b,0x01c2,0xc000,0x0000,0x0058,0x6ac5,0x0000,0x000c 0182 0048 01e6 | H | .DEBUG 0x0048,0x01e6,0xc000,0x0000,0x0058,0x74f5,0x0000,0x000d 018a 008b 01fe | | .DEBUG 0x008b,0x01fe,0x1001,0x0000,0x0058,0x6ac5,0x0000,0x0026 0192 0093 0202 | | .DEBUG 0x0093,0x0202,0x1001,0x0000,0x0058,0x6ac5,0x0000,0x003c 019a 00eb 0228 | (| .DEBUG 0x00eb,0x0228,0x1001,0x0000,0x0058,0x6ac5,0x0000,0x0056 01a2 0113 023c | <| .DEBUG 0x0113,0x023c,0x1001,0x0000,0x0058,0x6ac5,0x0000,0x0068 01aa 0123 0246 | # F| .DEBUG 0x0123,0x0246,0x3801,0x0002,0x0058,0x6ac5,0x0000,0x0078 01b2 0153 0256 | S V| .DEBUG 0x0153,0x0256,0x1002,0x0000,0x0058,0x6ac5,0x0000,0x00be 01ba 015b 025a | [ Z| .DEBUG 0x015b,0x025a,0x1801,0x0002,0x0058,0x74f5,0x0000,0x019e 01c2 ; -------------------------------------------------------------------------------------- 01c2 ; Debug3 Subtable 0x0 01c2 ; -------------------------------------------------------------------------------------- 01c2 0011 0000 | | .DBG3TAB 0x0011,0x0000 01c4 000b ffff | | .CONST 0x000b,0xffff 01c6 000e fffe | | .CONST 0x000e,0xfffe 01c8 0010 fffd | | .CONST 0x0010,0xfffd 01ca 0013 fffc | | .CONST 0x0013,0xfffc 01cc 0014 fffb | | .CONST 0x0014,0xfffb 01ce 0016 fffa | | .CONST 0x0016,0xfffa 01d0 0019 fff9 | | .CONST 0x0019,0xfff9 01d2 001a fff8 | | .CONST 0x001a,0xfff8 01d4 001c fff7 | | .CONST 0x001c,0xfff7 01d6 001e fff6 | | .CONST 0x001e,0xfff6 01d8 0020 fff5 | | .CONST 0x0020,0xfff5 01da 0022 fff4 | " | .CONST 0x0022,0xfff4 01dc 002b fff3 | + | .CONST 0x002b,0xfff3 01de 0034 fff2 | 4 | .CONST 0x0034,0xfff2 01e0 0035 fff1 | 5 | .CONST 0x0035,0xfff1 01e2 0037 fff0 | 7 | .CONST 0x0037,0xfff0 01e4 0043 ffef | C | .CONST 0x0043,0xffef 01e6 ; -------------------------------------------------------------------------------------- 01e6 ; Debug3 Subtable 0x1 01e6 ; -------------------------------------------------------------------------------------- 01e6 000b 0000 | | .DBG3TAB 0x000b,0x0000 01e8 0048 ffff | H | .CONST 0x0048,0xffff 01ea 0052 fffe | R | .CONST 0x0052,0xfffe 01ec 005c fffd | \ | .CONST 0x005c,0xfffd 01ee 005e fffc | ^ | .CONST 0x005e,0xfffc 01f0 0060 fffb | ` | .CONST 0x0060,0xfffb 01f2 0069 fffa | i | .CONST 0x0069,0xfffa 01f4 0074 fff9 | t | .CONST 0x0074,0xfff9 01f6 007d fff8 | } | .CONST 0x007d,0xfff8 01f8 007f fff7 | | .CONST 0x007f,0xfff7 01fa 0081 fff6 | | .CONST 0x0081,0xfff6 01fc 0083 fff5 | | .CONST 0x0083,0xfff5 01fe ; -------------------------------------------------------------------------------------- 01fe ; Debug3 Subtable 0x2 01fe ; -------------------------------------------------------------------------------------- 01fe 0000 0001 | | .DBG3TAB 0x0000,0x0001 0200 008b 0001 | | .CONST 0x008b,0x0001 0202 ; -------------------------------------------------------------------------------------- 0202 ; Debug3 Subtable 0x3 0202 ; -------------------------------------------------------------------------------------- 0202 0004 000e | | .DBG3TAB 0x0004,0x000e 0204 0093 ffff | | .CONST 0x0093,0xffff 0206 0095 fffe | | .CONST 0x0095,0xfffe 0208 0096 fffd | | .CONST 0x0096,0xfffd 020a 0098 fffc | | .CONST 0x0098,0xfffc 020c 0099 0001 | | .CONST 0x0099,0x0001 020e 009b 0002 | | .CONST 0x009b,0x0002 0210 009d 0003 | | .CONST 0x009d,0x0003 0212 00a1 0004 | | .CONST 0x00a1,0x0004 0214 00a5 0005 | | .CONST 0x00a5,0x0005 0216 00b6 0006 | | .CONST 0x00b6,0x0006 0218 00b8 0007 | | .CONST 0x00b8,0x0007 021a 00ba 0008 | | .CONST 0x00ba,0x0008 021c 00bd 0009 | | .CONST 0x00bd,0x0009 021e 00c1 000a | | .CONST 0x00c1,0x000a 0220 00c5 000b | | .CONST 0x00c5,0x000b 0222 00d2 000c | | .CONST 0x00d2,0x000c 0224 00d9 000d | | .CONST 0x00d9,0x000d 0226 00dd 000e | | .CONST 0x00dd,0x000e 0228 ; -------------------------------------------------------------------------------------- 0228 ; Debug3 Subtable 0x4 0228 ; -------------------------------------------------------------------------------------- 0228 0001 0008 | | .DBG3TAB 0x0001,0x0008 022a 00eb ffff | | .CONST 0x00eb,0xffff 022c 00ec 0001 | | .CONST 0x00ec,0x0001 022e 00ee 0002 | | .CONST 0x00ee,0x0002 0230 00f7 0003 | | .CONST 0x00f7,0x0003 0232 00f9 0004 | | .CONST 0x00f9,0x0004 0234 00fb 0005 | | .CONST 0x00fb,0x0005 0236 00fe 0006 | | .CONST 0x00fe,0x0006 0238 0105 0007 | | .CONST 0x0105,0x0007 023a 0109 0008 | | .CONST 0x0109,0x0008 023c ; -------------------------------------------------------------------------------------- 023c ; Debug3 Subtable 0x5 023c ; -------------------------------------------------------------------------------------- 023c 0000 0004 | | .DBG3TAB 0x0000,0x0004 023e 0113 0001 | | .CONST 0x0113,0x0001 0240 0115 0002 | | .CONST 0x0115,0x0002 0242 0117 0003 | | .CONST 0x0117,0x0003 0244 011a 0004 | | .CONST 0x011a,0x0004 0246 ; -------------------------------------------------------------------------------------- 0246 ; Debug3 Subtable 0x6 0246 ; -------------------------------------------------------------------------------------- 0246 0002 0005 | | .DBG3TAB 0x0002,0x0005 0248 0123 ffff | # | .CONST 0x0123,0xffff 024a 0125 fffe | % | .CONST 0x0125,0xfffe 024c 012f 0001 | / | .CONST 0x012f,0x0001 024e 0131 0002 | 1 | .CONST 0x0131,0x0002 0250 013b 0003 | ; | .CONST 0x013b,0x0003 0252 0142 0004 | B | .CONST 0x0142,0x0004 0254 0146 0005 | F | .CONST 0x0146,0x0005 0256 ; -------------------------------------------------------------------------------------- 0256 ; Debug3 Subtable 0x7 0256 ; -------------------------------------------------------------------------------------- 0256 0000 0001 | | .DBG3TAB 0x0000,0x0001 0258 0153 0001 | S | .CONST 0x0153,0x0001 025a ; -------------------------------------------------------------------------------------- 025a ; Debug3 Subtable 0x8 025a ; -------------------------------------------------------------------------------------- 025a 0000 0001 | | .DBG3TAB 0x0000,0x0001 025c 015b 0001 | [ | .CONST 0x015b,0x0001 025e 0000 0000 | | .BLANK 0000[0x1a2]