|
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: 5120 (0x1400) Notes: 00_class, 5813_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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0618 | | .CONST 0x0618 ; 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 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 008a | | .CONST 0x008a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0023 | # | .CONST 0x0023 ; Number of locals 000b INIT_0008: 000b 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x06e2,0x4000,0x0000,0x0059,0x80d5,0x0000,0x0191 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 00bf | | Action Accept_Activation 0010 480c |H | Short_Literal 0xc ; Debug Table 0x1 = .DEBUG 0x0010,0x06e8,0x4000,0x0000,0x0059,0x8235,0x0000,0x0010 ; Debug Table 0x1.0x0 = 0x10,0xffff 0011 032a | * | Declare_Type Record,Incomplete 0012 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative ; Debug Table 0x1.0x1 = 0x12,0xfffe 0013 00d9 | | Load_Top At_Offset_1 0014 02a0 | | Declare_Subprogram Null_Subprogram 0015 00da | | Load_Top At_Offset_2 0016 03a3 | | Complete_Type Heap_Access,By_Defining 0017 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x2 = 0x17,0xfffd ; Debug Table 0x1.0x3 = 0x17,0xfffc ; Debug Table 0x1.0x4 = 0x17,0xfffb 0018 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0019 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x5 = 0x19,0xfffa ; Debug Table 0x1.0x6 = 0x19,0xfff9 ; Debug Table 0x1.0x7 = 0x19,0xfff8 ; Debug Table 0x1.0x8 = 0x19,0xfff7 ; Debug Table 0x1.0x9 = 0x19,0xfff6 001a 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0xa = 0x1a,0x401 001b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x1.0xb = 0x1b,0xfff6 001c e002 | | Load 0x0,0x2 ; Debug Table 0x1.0xc = 0x1c,0xfff5 ; Debug Table 0x1.0xd = 0x1c,0xfff4 ; Debug Table 0x1.0xe = 0x1c,0xfff3 001d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 001e 00da | | Load_Top At_Offset_2 001f 00e3 | | Load_Encached Natural_Cache 0020 00ec | | Load_Encached Diana_Tree_Cache 0021 e003 | | Load 0x0,0x3 0022 1b55 | U | Execute Package,Field_Read,Field_Number 0x55 0023 00ef | | Load_Encached Diana_Sequence_Cache 0024 00e3 | | Load_Encached Natural_Cache 0025 e004 | | Load 0x0,0x4 0026 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0027 00e1 | | Load_Encached Boolean_Cache 0028 00e1 | | Load_Encached Boolean_Cache 0029 e217 | | Load 0x1,0x17 002a e217 | | Load 0x1,0x17 002b 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call 002d e216 | | Load 0x1,0x16 002e 0326 | & | Complete_Type Record,By_Defining 002f 00db | | Load_Top At_Offset_3 ; Debug Table 0x1.0xf = 0x2f,0xfff2 0030 0322 | " | Declare_Variable Record 0031 e002 | | Load 0x0,0x2 0032 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0033 00d9 | | Load_Top At_Offset_1 0034 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0035 4800 |H | Short_Literal 0x0 0036 00d9 | | Load_Top At_Offset_1 0037 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0038 4800 |H | Short_Literal 0x0 0039 00d9 | | Load_Top At_Offset_1 003a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 003b 00d9 | | Load_Top At_Offset_1 003c 00d9 | | Load_Top At_Offset_1 003d 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 003e e003 | | Load 0x0,0x3 003f 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 0040 e003 | | Load 0x0,0x3 0041 1b55 | U | Execute Package,Field_Read,Field_Number 0x55 0042 0119 | | Execute Any,Check_In_Formal_Type 0043 00d9 | | Load_Top At_Offset_1 0044 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0045 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x1.0x10 = 0x45,0x801 0046 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1.0x11 = 0x46,0xfff2 0047 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0048 4800 |H | Short_Literal 0x0 0049 00d9 | | Load_Top At_Offset_1 004a 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 004b e004 | | Load 0x0,0x4 004c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 004d 00d9 | | Load_Top At_Offset_1 004e 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 004f 4800 |H | Short_Literal 0x0 0050 00d9 | | Load_Top At_Offset_1 0051 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0052 4801 |H | Short_Literal 0x1 0053 00d9 | | Load_Top At_Offset_1 0054 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0055 00db | | Load_Top At_Offset_3 0056 00d9 | | Load_Top At_Offset_1 0057 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0058 00db | | Load_Top At_Offset_3 0059 00d9 | | Load_Top At_Offset_1 005a 380b |8 | Execute Record,Field_Write,Field_Number 0xb 005b e005 | | Load 0x0,0x5 ; Debug Table 0x1.0x12 = 0x5b,0xfff1 005c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 005d e005 | | Load 0x0,0x5 005e 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e 005f 00e3 | | Load_Encached Natural_Cache 0060 00e3 | | Load_Encached Natural_Cache 0061 02a0 | | Declare_Subprogram Null_Subprogram 0062 4804 |H | Short_Literal 0x4 0063 032d | - | Declare_Type Record,Defined 0064 029d 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call ; Debug Table 0x1.0x13 = 0x64,0xfff0 0066 029d 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call ; Debug Table 0x1.0x14 = 0x66,0xffef 0068 029d 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call ; Debug Table 0x1.0x15 = 0x68,0xffee 006a 029d 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call ; Debug Table 0x1.0x16 = 0x6a,0xffed 006c 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x17 = 0x6c,0xffff 006d 4800 |H | Short_Literal 0x0 006e 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call 0070 03fd | | Declare_Type Discrete,Defined 0071 029b 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Unelaborated ; Debug Table 0x1.0x18 = 0x71,0xfffe 0073 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 ; Debug Table 0x1.0x19 = 0x73,0xffff 0074 00c7 | | Action Elaborate_Subprogram 0075 62a2 |b | Indirect_Literal Discrete,0x318,{0x00000000, 0x00598235} ; Debug Table 0x1.0x1a = 0x75,0xffea 0076 49ec |I | Short_Literal 0x1ec 0077 e21b | | Load 0x1,0x1b 0078 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0079 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 007a 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 007b 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 007c e220 | | Load 0x1,0x20 007d 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 007e 4801 |H | Short_Literal 0x1 007f e004 | | Load 0x0,0x4 0080 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0081 0387 | | Declare_Variable Package 0082 00d8 | | Load_Top At_Offset_0 0083 020f | | Execute Module,Activate 0084 029d 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call ; Debug Table 0x1.0x1b = 0x84,0xffe9 0086 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x1c = 0x86,0xffe8 0087 00c7 | | Action Elaborate_Subprogram 0088 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x1d = 0x88,0xffe7 0089 00c7 | | Action Elaborate_Subprogram 008a BODY_0008: 008a 00bc | | Action Signal_Activated 008b 00bb | | Action Signal_Completion 008c 0000 0000 | | .BLANK 0000[0x4] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0095 | | .CONST 0x0095 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0002 | | .CONST 0x0002 ; Number of locals 0093 INIT_0090: 0093 e006 | | Load 0x0,0x6 ; Debug Table 0x2 = .DEBUG 0x0093,0x0726,0x1001,0x0000,0x0059,0x80d5,0x0000,0x01cd ; Debug Table 0x2.0x0 = 0x93,0xffff 0094 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0095 BODY_0090: 0095 e007 | | Load 0x0,0x7 ; Debug Table 0x2.0x1 = 0x95,0x1 0096 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0097 e20f | | Load 0x1,0xf 0098 e007 | | Load 0x0,0x7 0099 1811 | | Execute Package,Field_Execute,Field_Number 0x11 009a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 009b e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x2 = 0x9b,0x2 009c e5fe | | Load 0x2,-0x2 009d 00da | | Load_Top At_Offset_2 009e e5ff | | Load 0x2,-0x1 009f e211 | | Load 0x1,0x11 00a0 0119 | | Execute Any,Check_In_Formal_Type 00a1 8223 | # | Call 0x1,0x23 00a2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x3 = 0xa2,0x3 00a3 a5fc | | Store_Unchecked 0x2,-0x4 00a4 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00a5 0000 0000 | | .XXX[0x3] 00a7 0000 | | 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 010f | | .CONST 0x010f ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0025 | % | .CONST 0x0025 ; Number of locals 00ab INIT_00a8: 00ab e5fc | | Load 0x2,-0x4 ; Debug Table 0x3 = .DEBUG 0x00ab,0x0730,0x1001,0x0000,0x0059,0x80d5,0x0000,0x01e5 ; Debug Table 0x3.0x0 = 0xab,0xffff 00ac e008 | | Load 0x0,0x8 00ad 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00ae e009 | | Load 0x0,0x9 00af 1b17 | | Execute Package,Field_Read,Field_Number 0x17 00b0 03f1 | | Declare_Variable Discrete,With_Value 00b1 e00a | | Load 0x0,0xa ; Debug Table 0x3.0x1 = 0xb1,0xfffe 00b2 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00b4 e00b | | Load 0x0,0xb 00b5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00b6 4800 |H | Short_Literal 0x0 00b7 e00a | | Load 0x0,0xa 00b8 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00b9 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 00ba 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00bb e5fc | | Load 0x2,-0x4 ; Debug Table 0x3.0x2 = 0xbb,0xfffd 00bc e003 | | Load 0x0,0x3 00bd 180f | | Execute Package,Field_Execute,Field_Number 0xf 00be e003 | | Load 0x0,0x3 00bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00c0 011e | | Execute Any,Convert 00c1 e007 | | Load 0x0,0x7 ; Debug Table 0x3.0x3 = 0xc1,0xfffc 00c2 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 00c3 0322 | " | Declare_Variable Record 00c4 e5fc | | Load 0x2,-0x4 00c5 e5fe | | Load 0x2,-0x2 00c6 e007 | | Load 0x0,0x7 00c7 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00c8 00d9 | | Load_Top At_Offset_1 00c9 017d | } | Execute Record,Structure_Write 00ca e007 | | Load 0x0,0x7 ; Debug Table 0x3.0x4 = 0xca,0xfffb 00cb 191d | | Execute Package,Field_Reference,Field_Number 0x1d 00cc 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x3.0x5 = 0xcc,0xfffa 00cd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00ce 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x3.0x6 = 0xce,0xfff9 00cf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00d0 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x3.0x7 = 0xd0,0xfff8 00d1 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x3.0x8 = 0xd1,0x401 00d2 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x3.0x9 = 0xd2,0xfff8 00d3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3.0xa = 0xd3,0xfff7 00d4 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0xb = 0xd4,0xfff6 00d5 e005 | | Load 0x0,0x5 00d6 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00d7 0217 | | Execute Heap_Access,All_Reference 00d8 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 00d9 0c01 | | Execute_Immediate Greater_Equal,0x1 00da 00e1 | | Load_Encached Boolean_Cache 00db 03f1 | | Declare_Variable Discrete,With_Value 00dc 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x3.0xc = 0xdc,0xfff5 00dd 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x3.0xd = 0xdd,0x801 00de 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x3.0xe = 0xde,0xfff5 00df 029f 021b | | Declare_Subprogram INIT_0218,For_Call ; Debug Table 0x3.0x10 = 0xdf,0xfff3 ; Debug Table 0x3.0x11 = 0xdf,0xfff2 ; Debug Table 0x3.0xf = 0xdf,0xfff4 00e1 029f 029b | | Declare_Subprogram INIT_0298,For_Call ; Debug Table 0x3.0x12 = 0xe1,0xfff1 00e3 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call ; Debug Table 0x3.0x13 = 0xe3,0xfff0 ; Debug Table 0x3.0x14 = 0xe3,0xffef ; Debug Table 0x3.0x15 = 0xe3,0xffee 00e5 029f 0333 | 3| Declare_Subprogram INIT_0330,For_Call ; Debug Table 0x3.0x16 = 0xe5,0xffed 00e7 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x17 = 0xe7,0xffec 00e8 1933 | 3 | Execute Package,Field_Reference,Field_Number 0x33 00e9 00c6 | | Action Check_Subprogram_Elaborated 00ea 480f |H | Short_Literal 0xf 00eb 4802 |H | Short_Literal 0x2 00ec 0099 | | Action Reference_Dynamic 00ed 4810 |H | Short_Literal 0x10 00ee 4802 |H | Short_Literal 0x2 00ef 0099 | | Action Reference_Dynamic 00f0 e5fb | | Load 0x2,-0x5 00f1 4ffa |O | Short_Literal -0x6 00f2 4802 |H | Short_Literal 0x2 00f3 0099 | | Action Reference_Dynamic 00f4 e5fd | | Load 0x2,-0x3 00f5 e404 | | Load 0x2,0x4 00f6 621d |b | Indirect_Literal Discrete,0x314,{0x00000000, 0x005982a5} 00f7 4a9f |J | Short_Literal 0x29f 00f8 4819 |H | Short_Literal 0x19 00f9 e00c | | Load 0x0,0xc ; Debug Table 0x3.0x18 = 0xf9,0xffeb 00fa 1913 | | Execute Package,Field_Reference,Field_Number 0x13 00fb 00c6 | | Action Check_Subprogram_Elaborated 00fc e211 | | Load 0x1,0x11 00fd 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00fe 6215 |b | Indirect_Literal Discrete,0x314,{0x00000000, 0x005982a5} 00ff 4aba |J | Short_Literal 0x2ba 0100 481e |H | Short_Literal 0x1e 0101 029f 034b | K| Declare_Subprogram INIT_0348,For_Call ; Debug Table 0x3.0x19 = 0x101,0xffea 0103 029f 039b | | Declare_Subprogram INIT_0398,For_Call ; Debug Table 0x3.0x1a = 0x103,0xffe9 0105 029f 03eb | | Declare_Subprogram INIT_03e8,For_Call ; Debug Table 0x3.0x1b = 0x105,0xffe8 0107 029f 045b | [| Declare_Subprogram INIT_0458,For_Call ; Debug Table 0x3.0x1c = 0x107,0xffe7 0109 029f 049b | | Declare_Subprogram INIT_0498,For_Call ; Debug Table 0x3.0x1d = 0x109,0xffe6 010b 029f 04c3 | | Declare_Subprogram INIT_04c0,For_Call ; Debug Table 0x3.0x1e = 0x10b,0xffe5 010d 029f 04d3 | | Declare_Subprogram INIT_04d0,For_Call 010f BODY_00a8: 010f e5fa | | Load 0x2,-0x6 ; Debug Table 0x3.0x1f = 0x10f,0x1 0110 a40a | | Store_Unchecked 0x2,0xa 0111 e00b | | Load 0x0,0xb ; Debug Table 0x3.0x20 = 0x111,0x2 0112 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0113 4800 |H | Short_Literal 0x0 0114 e5fa | | Load 0x2,-0x6 0115 e00a | | Load 0x0,0xa 0116 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0117 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0118 e00a | | Load 0x0,0xa 0119 1b13 | | Execute Package,Field_Read,Field_Number 0x13 011a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 011b 8425 | % | Call 0x2,0x25 ; Debug Table 0x3.0x21 = 0x11b,0x3 011c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 011d 0000 0000 | | .XXX[0x3] 011f 0000 | | 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 4608 |F | Jump_Case 0x9 ; Debug Table 0x4 = .DEBUG 0x0123,0x0776,0x1005,0x0000,0x0059,0x8235,0x0000,0x0088 0124 7808 |x | Jump 0x12d ; case 0x0 0125 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0126 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0127 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0128 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0129 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 012a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 012b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 012c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8 012d 00da | | Load_Top At_Offset_2 012e 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 012f 0125 | % | Execute Any,Set_Constraint 0130 00da | | Load_Top At_Offset_2 0131 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 0132 1c00 | | Execute_Immediate Run_Utility,0x0 0133 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0134 0000 0000 | | .BLANK 0000[0x4] 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x013b,0x0778,0x1002,0x0000,0x0059,0x8235,0x0000,0x012c ; Debug Table 0x5.0x0 = 0x13b,0x1 013c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 013d e005 | | Load 0x0,0x5 013e 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 013f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6 = .DEBUG 0x0143,0x077c,0x1001,0x0000,0x0059,0x8235,0x0000,0x0142 ; Debug Table 0x6.0x0 = 0x143,0x1 0144 00e2 | | Load_Encached Integer_Cache 0145 e5fe | | Load 0x2,-0x2 0146 e5ff | | Load 0x2,-0x1 0147 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0148 e005 | | Load 0x0,0x5 0149 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 014a 00d2 | | Pop_Control Pop_Count_2 014b c5fd | | Store 0x2,-0x3 014c c5fc | | Store 0x2,-0x4 014d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 014e 0000 0000 | | .XXX[0x2] 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 00db | | Load_Top At_Offset_3 ; Debug Table 0x7 = .DEBUG 0x0153,0x0780,0x1001,0x0000,0x0059,0x8235,0x0000,0x0165 ; Debug Table 0x7.0x0 = 0x153,0x1 0154 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0155 e5fe | | Load 0x2,-0x2 0156 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0157 e5ff | | Load 0x2,-0x1 0158 0272 | r | Execute Discrete,Minus 0159 0248 | H | Execute Discrete,Check_In_Integer 015a 0a01 | | Execute_Immediate Plus,0x1 015b 00e3 | | Load_Encached Natural_Cache 015c 025b | [ | Execute Discrete,Check_In_Type 015d e5fe | | Load 0x2,-0x2 015e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 015f e5ff | | Load 0x2,-0x1 0160 0273 | s | Execute Discrete,Plus 0161 00e4 | | Load_Encached Positive_Cache 0162 025b | [ | Execute Discrete,Check_In_Type 0163 e5fe | | Load 0x2,-0x2 0164 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0165 e005 | | Load 0x0,0x5 0166 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0167 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x016b,0x0784,0x1001,0x0000,0x0059,0x8235,0x0000,0x019a ; Debug Table 0x8.0x0 = 0x16b,0x1 016c 4801 |H | Short_Literal 0x1 016d 821e | | Call 0x1,0x1e 016e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 016f 0000 | | .XXX[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 4603 |F | Jump_Case 0x4 ; Debug Table 0x9 = .DEBUG 0x0173,0x0788,0x1005,0x0000,0x0059,0x8235,0x0000,0x01ac 0174 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0175 7802 |x | Jump 0x178 ; case 0x1 0176 7805 |x | Jump 0x17c ; case 0x2 0177 7809 |x | Jump 0x181 ; case 0x3 0178 00da | | Load_Top At_Offset_2 0179 0091 05fa | | Action Push_String_Extended_Indexed,0x5fa ; "NIL" 017b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 017c 00db | | Load_Top At_Offset_3 017d 00db | | Load_Top At_Offset_3 017e 00e0 | | Load_Encached Standard_Cache 017f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0180 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0181 00da | | Load_Top At_Offset_2 0182 00e0 | | Load_Encached Standard_Cache 0183 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0184 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0185 0000 0000 | | .XXX[0x3] 0187 0000 | | 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 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0xa = .DEBUG 0x018b,0x078a,0x1001,0x0000,0x0059,0x8235,0x0000,0x01b1 ; Debug Table 0xa.0x0 = 0x18b,0x1 018c 0000 0000 | | .BLANK 0000[0x4] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 01b1 | | .CONST 0x01b1 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 000a | | .CONST 0x000a ; Number of locals 0193 INIT_0190: 0193 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0xb = .DEBUG 0x0193,0x078e,0x1001,0x0000,0x0059,0x8235,0x0000,0x020c ; Debug Table 0xb.0x0 = 0x193,0xffff 0194 e00d | | Load 0x0,0xd 0195 e5fd | | Load 0x2,-0x3 0196 4973 |Is | Short_Literal 0x173 0197 00eb | | Load_Encached Diana_Cache 0198 0098 | | Execute Package,Field_Read_Dynamic 0199 181e | | Execute Package,Field_Execute,Field_Number 0x1e 019a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 019b 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x1 = 0x19b,0xfffe 019c 4864 |Hd | Short_Literal 0x64 019d 49a0 |I | Short_Literal 0x1a0 019e 00eb | | Load_Encached Diana_Cache 019f 0098 | | Execute Package,Field_Read_Dynamic 01a0 0334 | 4 | Declare_Variable Array,With_Constraint 01a1 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0x2 = 0x1a1,0xfffd 01a2 4864 |Hd | Short_Literal 0x64 01a3 e006 | | Load 0x0,0x6 01a4 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 01a5 0334 | 4 | Declare_Variable Array,With_Constraint 01a6 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x3 = 0x1a6,0xfffc 01a7 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 01a8 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x4 = 0x1a8,0xfffb 01a9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 01aa 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xb.0x5 = 0x1aa,0xfffa 01ab 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x6 = 0x1ab,0xfff9 01ac e004 | | Load 0x0,0x4 ; Debug Table 0xb.0x7 = 0x1ac,0xfff8 01ad 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01ae 0322 | " | Declare_Variable Record 01af 029f 054b | K| Declare_Subprogram INIT_0548,For_Call ; Debug Table 0xb.0x8 = 0x1af,0xfff7 01b1 BODY_0190: 01b1 e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x9 = 0x1b1,0x1 ; Debug Table 0xb.0xa = 0x1b1,0x401 01b2 021d | | Execute Heap_Access,Is_Null 01b3 6857 |hW | Jump_Zero 0x20b ; Debug Table 0xb.0xb = 0x1b3,0x1 01b4 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0xb.0xc = 0x1b4,0x2 01b5 e402 | | Load 0x2,0x2 ; Debug Table 0xb.0xd = 0x1b5,0x4 01b6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xe = 0x1b6,0x801 01b7 0217 | | Execute Heap_Access,All_Reference 01b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01b9 00d9 | | Load_Top At_Offset_1 01ba e40d | | Load 0x2,0xd ; Debug Table 0xb.0xf = 0x1ba,0xc01 01bb 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xb.0x10 = 0x1bb,0xc02 01bc 00d0 | | Action Swap_Control ; Debug Table 0xb.0x11 = 0x1bc,0xc03 ; Debug Table 0xb.0x12 = 0x1bc,0xc04 01bd 00d1 | | Pop_Control Pop_Count_1 01be 49af |I | Short_Literal 0x1af ; Debug Table 0xb.0x13 = 0x1be,0x801 01bf 00eb | | Load_Encached Diana_Cache 01c0 0096 | | Execute Package,Entry 01c1 00d0 | | Action Swap_Control 01c2 00d1 | | Pop_Control Pop_Count_1 01c3 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0xb.0x14 = 0x1c3,0x4 01c4 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x15 = 0x1c4,0x5 01c5 e004 | | Load 0x0,0x4 01c6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01c7 00da | | Load_Top At_Offset_2 01c8 017d | } | Execute Record,Structure_Write 01c9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0x16 = 0x1c9,0x6 01ca e004 | | Load 0x0,0x4 01cb 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01cc 017f | | Execute Record,Equal 01cd 680c |h | Jump_Zero 0x1da 01ce e406 | | Load 0x2,0x6 ; Debug Table 0xb.0x17 = 0x1ce,0x7 01cf 0c64 | d | Execute_Immediate Greater_Equal,0x64 01d0 6801 |h | Jump_Zero 0x1d2 01d1 840a | | Call 0x2,0xa ; Debug Table 0xb.0x18 = 0x1d1,0x8 01d2 e406 | | Load 0x2,0x6 ; Debug Table 0xb.0x19 = 0x1d2,0x9 01d3 0a01 | | Execute_Immediate Plus,0x1 01d4 c406 | | Store 0x2,0x6 01d5 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1a = 0x1d5,0xa 01d6 e406 | | Load 0x2,0x6 01d7 e403 | | Load 0x2,0x3 01d8 01d6 | | Execute Vector,Field_Write 01d9 782d |x- | Jump 0x207 01da e5fc | | Load 0x2,-0x4 ; Debug Table 0xb.0x1b = 0x1da,0xb ; Debug Table 0xb.0x1c = 0x1da,0xefff 01db 00db | | Load_Top At_Offset_3 01dc e002 | | Load 0x0,0x2 01dd 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 01de e002 | | Load 0x0,0x2 01df 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 01e0 00e3 | | Load_Encached Natural_Cache 01e1 03f1 | | Declare_Variable Discrete,With_Value 01e2 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0x1d = 0x1e2,0xeffe 01e3 4998 |I | Short_Literal 0x198 01e4 00eb | | Load_Encached Diana_Cache 01e5 0096 | | Execute Package,Entry 01e6 00e3 | | Load_Encached Natural_Cache 01e7 03f1 | | Declare_Variable Discrete,With_Value 01e8 e408 | | Load 0x2,0x8 ; Debug Table 0xb.0x1e = 0x1e8,0x1001 01e9 e409 | | Load 0x2,0x9 01ea 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01eb e409 | | Load 0x2,0x9 01ec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01ed e409 | | Load 0x2,0x9 01ee 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01ef e40b | | Load 0x2,0xb 01f0 0273 | s | Execute Discrete,Plus 01f1 00e3 | | Load_Encached Natural_Cache 01f2 025b | [ | Execute Discrete,Check_In_Type 01f3 e5ff | | Load 0x2,-0x1 01f4 e211 | | Load 0x1,0x11 01f5 0119 | | Execute Any,Check_In_Formal_Type 01f6 8213 | | Call 0x1,0x13 01f7 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x1f = 0x1f7,0x1002 01f8 e007 | | Load 0x0,0x7 01f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01fa 0322 | " | Declare_Variable Record 01fb 00db | | Load_Top At_Offset_3 01fc 00d9 | | Load_Top At_Offset_1 01fd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01fe 00da | | Load_Top At_Offset_2 01ff 00d9 | | Load_Top At_Offset_1 0200 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0201 00da | | Load_Top At_Offset_2 0202 00d9 | | Load_Top At_Offset_1 0203 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0204 e007 | | Load 0x0,0x7 0205 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0206 00d2 | | Pop_Control Pop_Count_2 0207 e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x20 = 0x207,0xc ; Debug Table 0xb.0x21 = 0x207,0x1401 0208 0217 | | Execute Heap_Access,All_Reference 0209 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 020a a402 | | Store_Unchecked 0x2,0x2 ; Debug Table 0xb.0x22 = 0x20a,0xc 020b e402 | | Load 0x2,0x2 ; Debug Table 0xb.0x23 = 0x20b,0x3 ; Debug Table 0xb.0x24 = 0x20b,0x1801 020c 021d | | Execute Heap_Access,Is_Null 020d 6fa7 |o | Jump_Zero 0x1b5 ; Debug Table 0xb.0x25 = 0x20d,0x3 020e e405 | | Load 0x2,0x5 ; Debug Table 0xb.0x26 = 0x20e,0xd 020f e406 | | Load 0x2,0x6 0210 027a | z | Execute Discrete,Less_Equal 0211 6801 |h | Jump_Zero 0x213 0212 840a | | Call 0x2,0xa ; Debug Table 0xb.0x27 = 0x212,0xe 0213 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0214 0000 0000 | | .BLANK 0000[0x4] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0234 | 4 | .CONST 0x0234 ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 000a | | .CONST 0x000a ; Number of locals 021b INIT_0218: 021b e005 | | Load 0x0,0x5 ; Debug Table 0xc = .DEBUG 0x021b,0x07e0,0x1001,0x0000,0x0059,0x82a5,0x0000,0x00c1 ; Debug Table 0xc.0x0 = 0x21b,0xffff 021c 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e 021d 0322 | " | Declare_Variable Record 021e e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x1 = 0x21e,0xfffe 021f e007 | | Load 0x0,0x7 0220 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0221 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x2 = 0x221,0xfffd 0222 01dd | | Execute Vector,First 0223 0aff | | Execute_Immediate Plus,-0x1 0224 0248 | H | Execute Discrete,Check_In_Integer 0225 00e2 | | Load_Encached Integer_Cache 0226 03f1 | | Declare_Variable Discrete,With_Value 0227 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x3 = 0x227,0xfffc 0228 4864 |Hd | Short_Literal 0x64 0229 00e9 | | Load_Encached String_Cache 022a 0334 | 4 | Declare_Variable Array,With_Constraint 022b 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xc.0x4 = 0x22b,0xfffb 022c 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x5 = 0x22c,0xfffa 022d 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 022e 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xc.0x6 = 0x22e,0xfff9 022f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0230 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x7 = 0x230,0xfff8 0231 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0232 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xc.0x8 = 0x232,0xfff7 0233 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0234 BODY_0218: 0234 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x9 = 0x234,0x1 0235 e00e | | Load 0x0,0xe 0236 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0237 0092 05fb | | Action Push_String_Extended,0x5fb ; "Progress:" ; Debug Table 0xc.0xa = 0x237,0x2 0239 e00e | | Load 0x0,0xe 023a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 023b e602 | | Load 0x3,0x2 ; Debug Table 0xc.0xb = 0x23b,0x3 023c 60d3 |` | Indirect_Literal Discrete,0x310,{0x00000000, 0x7fffffff} 023d 4801 |H | Short_Literal 0x1 023e e5fd | | Load 0x2,-0x3 023f e005 | | Load 0x0,0x5 0240 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0241 00d1 | | Pop_Control Pop_Count_1 0242 784c |xL | Jump 0x28f 0243 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0xc = 0x243,0x5 0244 6836 |h6 | Jump_Zero 0x27b 0245 781d |x | Jump 0x263 0246 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0xd = 0x246,0x7 0247 6814 |h | Jump_Zero 0x25c 0248 e604 | | Load 0x3,0x4 ; Debug Table 0xc.0xe = 0x248,0x8 0249 0a01 | | Execute_Immediate Plus,0x1 024a 0248 | H | Execute Discrete,Check_In_Integer 024b a604 | | Store_Unchecked 0x3,0x4 024c e604 | | Load 0x3,0x4 ; Debug Table 0xc.0xf = 0x24c,0x9 024d e603 | | Load 0x3,0x3 024e 01dc | | Execute Vector,Last 024f 027d | } | Execute Discrete,Greater 0250 6803 |h | Jump_Zero 0x254 0251 60be |` | Indirect_Literal Discrete,0x310,{0x00000000, 0x7fffffff} ; Debug Table 0xc.0x10 = 0x251,0xa 0252 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0253 7805 |x | Jump 0x259 0254 e604 | | Load 0x3,0x4 ; Debug Table 0xc.0x11 = 0x254,0xb 0255 e603 | | Load 0x3,0x3 0256 01d5 | | Execute Vector,Field_Reference 0257 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0258 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0259 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x12 = 0x259,0xc 025a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 025b 7807 |x | Jump 0x263 025c e604 | | Load 0x3,0x4 ; Debug Table 0xc.0x13 = 0x25c,0xd 025d e603 | | Load 0x3,0x3 025e 01d5 | | Execute Vector,Field_Reference 025f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0260 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0261 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x14 = 0x261,0xe 0262 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0263 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x15 = 0x263,0x6 0264 6fe1 |o | Jump_Zero 0x246 0265 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x16 = 0x265,0xf 0266 0a01 | | Execute_Immediate Plus,0x1 0267 005b | [ | Store_Top Discrete,At_Offset_3 0268 4805 |H | Short_Literal 0x5 ; Debug Table 0xc.0x17 = 0x268,0x10 0269 00db | | Load_Top At_Offset_3 026a e00e | | Load 0x0,0xe 026b 180f | | Execute Package,Field_Execute,Field_Number 0xf 026c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x18 = 0x26c,0x11 026d 6804 |h | Jump_Zero 0x272 026e 4825 |H% | Short_Literal 0x25 ; Debug Table 0xc.0x19 = 0x26e,0x12 026f e00e | | Load 0x0,0xe 0270 180e | | Execute Package,Field_Execute,Field_Number 0xe 0271 7803 |x | Jump 0x275 0272 4820 |H | Short_Literal 0x20 ; Debug Table 0xc.0x1a = 0x272,0x13 0273 e00e | | Load 0x0,0xe 0274 180e | | Execute Package,Field_Execute,Field_Number 0xe 0275 4820 |H | Short_Literal 0x20 ; Debug Table 0xc.0x1b = 0x275,0x14 0276 e00e | | Load 0x0,0xe 0277 180e | | Execute Package,Field_Execute,Field_Number 0xe 0278 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x1c = 0x278,0x15 0279 0aff | | Execute_Immediate Plus,-0x1 027a 0059 | Y | Store_Top Discrete,At_Offset_1 027b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x1d = 0x27b,0x16 027c 00e2 | | Load_Encached Integer_Cache 027d e605 | | Load 0x3,0x5 027e e602 | | Load 0x3,0x2 027f e005 | | Load 0x0,0x5 0280 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0281 00d2 | | Pop_Control Pop_Count_2 0282 c606 | | Store 0x3,0x6 0283 c607 | | Store 0x3,0x7 0284 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x1e = 0x284,0x17 0285 e606 | | Load 0x3,0x6 0286 e605 | | Load 0x3,0x5 0287 01cf | | Execute Vector,Slice_Read 0288 e00e | | Load 0x0,0xe 0289 180d | | Execute Package,Field_Execute,Field_Number 0xd 028a 00db | | Load_Top At_Offset_3 ; Debug Table 0xc.0x1f = 0x28a,0x18 028b 6803 |h | Jump_Zero 0x28f 028c 4801 |H | Short_Literal 0x1 ; Debug Table 0xc.0x20 = 0x28c,0x19 028d e00e | | Load 0x0,0xe 028e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 028f e602 | | Load 0x3,0x2 ; Debug Table 0xc.0x21 = 0x28f,0x4 0290 e005 | | Load 0x0,0x5 0291 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 0292 6fb0 |o | Jump_Zero 0x243 0293 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0294 0000 0000 | | .BLANK 0000[0x4] 0298 ; -------------------------------------------------------------------------------------- 0298 ; SUBPROGRAM 0298 ; -------------------------------------------------------------------------------------- 0298 029f | | .CONST 0x029f ; Address of begin 0299 0004 | | .CONST 0x0004 ; Address of exception handler 029a 0002 | | .CONST 0x0002 ; Number of locals 029b INIT_0298: 029b e004 | | Load 0x0,0x4 ; Debug Table 0xd = .DEBUG 0x029b,0x0826,0x1001,0x0000,0x0059,0x82a5,0x0000,0x01c2 ; Debug Table 0xd.0x0 = 0x29b,0xffff 029c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 029d 00db | | Load_Top At_Offset_3 029e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 029f BODY_0298: 029f 786a |xj | Jump 0x30a 02a0 0092 05fc | | Action Push_String_Extended,0x5fc ; "tree: " ; Debug Table 0xd.0x1 = 0x2a0,0x2 02a2 e00e | | Load 0x0,0xe 02a3 180d | | Execute Package,Field_Execute,Field_Number 0xd 02a4 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x2 = 0x2a4,0x3 02a5 483c |H< | Short_Literal 0x3c 02a6 00da | | Load_Top At_Offset_2 02a7 0217 | | Execute Heap_Access,All_Reference 02a8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x3 = 0x2a9,0x401 02aa 7002 |p | Jump_Nonzero 0x2ad 02ab 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x4 = 0x2ab,0x402 02ac 7826 |x& | Jump 0x2d3 02ad 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x5 = 0x2ad,0x403 02ae 0217 | | Execute Heap_Access,All_Reference 02af 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02b0 6804 |h | Jump_Zero 0x2b5 02b1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x6 = 0x2b1,0x404 02b2 0217 | | Execute Heap_Access,All_Reference 02b3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 02b4 781e |x | Jump 0x2d3 02b5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x7 = 0x2b5,0x405 02b6 e606 | | Load 0x3,0x6 ; Debug Table 0xd.0x8 = 0x2b6,0x801 02b7 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xd.0x9 = 0x2b7,0x802 02b8 00d0 | | Action Swap_Control ; Debug Table 0xd.0xa = 0x2b8,0x803 ; Debug Table 0xd.0xb = 0x2b8,0x804 02b9 00d1 | | Pop_Control Pop_Count_1 02ba 49bb |I | Short_Literal 0x1bb ; Debug Table 0xd.0xc = 0x2ba,0x405 02bb 00eb | | Load_Encached Diana_Cache 02bc 0098 | | Execute Package,Field_Read_Dynamic 02bd 012c | , | Execute Any,Size 02be e009 | | Load 0x0,0x9 02bf 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02c0 025b | [ | Execute Discrete,Check_In_Type 02c1 0273 | s | Execute Discrete,Plus 02c2 00d9 | | Load_Top At_Offset_1 02c3 e607 | | Load 0x3,0x7 ; Debug Table 0xd.0xd = 0x2c3,0xc01 02c4 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xd.0xe = 0x2c4,0xc02 02c5 00d0 | | Action Swap_Control ; Debug Table 0xd.0x10 = 0x2c5,0xc04 ; Debug Table 0xd.0xf = 0x2c5,0xc03 02c6 00d1 | | Pop_Control Pop_Count_1 02c7 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xd.0x11 = 0x2c7,0x804 02c8 00eb | | Load_Encached Diana_Cache 02c9 0098 | | Execute Package,Field_Read_Dynamic 02ca 49c9 |I | Short_Literal 0x1c9 02cb 00eb | | Load_Encached Diana_Cache 02cc 0098 | | Execute Package,Field_Read_Dynamic 02cd 49ca |I | Short_Literal 0x1ca 02ce 00eb | | Load_Encached Diana_Cache 02cf 0095 | | Execute Package,Field_Reference_Dynamic 02d0 e008 | | Load 0x0,0x8 02d1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02d2 7800 |x | Jump 0x2d3 02d3 00d0 | | Action Swap_Control 02d4 00d1 | | Pop_Control Pop_Count_1 02d5 e00f | | Load 0x0,0xf ; Debug Table 0xd.0x12 = 0x2d5,0x3 02d6 180d | | Execute Package,Field_Execute,Field_Number 0xd 02d7 e00e | | Load 0x0,0xe 02d8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02d9 0092 05fd | | Action Push_String_Extended,0x5fd ; "count: " ; Debug Table 0xd.0x13 = 0x2d9,0x4 02db e00e | | Load 0x0,0xe 02dc 180d | | Execute Package,Field_Execute,Field_Number 0xd 02dd 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x14 = 0x2dd,0x5 02de 00d9 | | Load_Top At_Offset_1 02df 0217 | | Execute Heap_Access,All_Reference 02e0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02e1 e00e | | Load 0x0,0xe 02e2 180f | | Execute Package,Field_Execute,Field_Number 0xf 02e3 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x15 = 0x2e3,0x6 02e4 e00e | | Load 0x0,0xe 02e5 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02e6 0092 05fe | | Action Push_String_Extended,0x5fe ; "first: " ; Debug Table 0xd.0x16 = 0x2e6,0x7 02e8 e00e | | Load 0x0,0xe 02e9 180d | | Execute Package,Field_Execute,Field_Number 0xd 02ea 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x17 = 0x2ea,0x8 02eb 00d9 | | Load_Top At_Offset_1 02ec 0217 | | Execute Heap_Access,All_Reference 02ed 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 02ee e00e | | Load 0x0,0xe 02ef 180f | | Execute Package,Field_Execute,Field_Number 0xf 02f0 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x18 = 0x2f0,0x9 02f1 e00e | | Load 0x0,0xe 02f2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02f3 0092 05ff | | Action Push_String_Extended,0x5ff ; "last: " ; Debug Table 0xd.0x19 = 0x2f3,0xa 02f5 e00e | | Load 0x0,0xe 02f6 180d | | Execute Package,Field_Execute,Field_Number 0xd 02f7 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x1a = 0x2f7,0xb 02f8 00d9 | | Load_Top At_Offset_1 02f9 0217 | | Execute Heap_Access,All_Reference 02fa 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 02fb 00da | | Load_Top At_Offset_2 02fc 0217 | | Execute Heap_Access,All_Reference 02fd 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 02fe 0273 | s | Execute Discrete,Plus 02ff 0aff | | Execute_Immediate Plus,-0x1 0300 0248 | H | Execute Discrete,Check_In_Integer 0301 e00e | | Load 0x0,0xe 0302 180f | | Execute Package,Field_Execute,Field_Number 0xf 0303 4802 |H | Short_Literal 0x2 ; Debug Table 0xd.0x1b = 0x303,0xc 0304 e00e | | Load 0x0,0xe 0305 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0306 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x1c = 0x306,0xd 0307 0217 | | Execute Heap_Access,All_Reference 0308 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0309 0031 | 1 | Store_Top Heap_Access,At_Offset_1 030a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x1d = 0x30a,0x1 030b 7794 |w | Jump_Nonzero 0x2a0 030c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 030d 0000 0000 | | .XXX[0x3] 030f 0000 | | 0310 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0314 0000 0000 | | .LITERAL {0x00000000, 0x005982a5} 0318 0000 0000 | | .LITERAL {0x00000000, 0x00598235} 031c 0000 0000 | | .BLANK 0000[0x4] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0323 | # | .CONST 0x0323 ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0001 | | .CONST 0x0001 ; Number of locals 0323 BODY_0320: 0323 INIT_0320: 0323 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x0323,0x0864,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0266 ; Debug Table 0xe.0x0 = 0x323,0x1 0324 e5ff | | Load 0x2,-0x1 0325 e211 | | Load 0x1,0x11 0326 0119 | | Execute Any,Check_In_Formal_Type 0327 8212 | | Call 0x1,0x12 0328 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0329 0000 0000 | | .BLANK 0000[0x7] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0333 | 3 | .CONST 0x0333 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0001 | | .CONST 0x0001 ; Number of locals 0333 BODY_0330: 0333 INIT_0330: 0333 e40b | | Load 0x2,0xb ; Debug Table 0xf = .DEBUG 0x0333,0x0868,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0279 ; Debug Table 0xf.0x0 = 0x333,0x1 0334 680b |h | Jump_Zero 0x340 0335 00da | | Load_Top At_Offset_2 0336 e002 | | Load 0x0,0x2 0337 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0338 180d | | Execute Package,Field_Execute,Field_Number 0xd 0339 6806 |h | Jump_Zero 0x340 033a e5fc | | Load 0x2,-0x4 ; Debug Table 0xf.0x1 = 0x33a,0x2 033b e40c | | Load 0x2,0xc 033c e7ff | | Load 0x3,-0x1 033d 00eb | | Load_Encached Diana_Cache 033e 1875 | u | Execute Package,Field_Execute,Field_Number 0x75 033f a40c | | Store_Unchecked 0x2,0xc 0340 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0341 0000 0000 | | .BLANK 0000[0x7] 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 0358 | X | .CONST 0x0358 ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0006 | | .CONST 0x0006 ; Number of locals 034b INIT_0348: 034b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x10 = .DEBUG 0x034b,0x086e,0x1002,0x0000,0x0059,0x82a5,0x0000,0x02c9 ; Debug Table 0x10.0x0 = 0x34b,0xffff 034c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 034d 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x10.0x1 = 0x34d,0xfffe 034e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 034f e217 | | Load 0x1,0x17 ; Debug Table 0x10.0x2 = 0x34f,0xfffd 0350 e21a | | Load 0x1,0x1a 0351 e217 | | Load 0x1,0x17 0352 e5fc | | Load 0x2,-0x4 0353 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 0354 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0355 e217 | | Load 0x1,0x17 ; Debug Table 0x10.0x3 = 0x355,0xfffc ; Debug Table 0x10.0x4 = 0x355,0xfffb 0356 029f 0583 | | Declare_Subprogram INIT_0580,For_Call ; Debug Table 0x10.0x5 = 0x356,0xfffa ; Debug Table 0x10.0x6 = 0x356,0xfff9 ; Debug Table 0x10.0x7 = 0x356,0xfff8 0358 BODY_0348: 0358 e407 | | Load 0x2,0x7 ; Debug Table 0x10.0x8 = 0x358,0x1 0359 00db | | Load_Top At_Offset_3 035a 0217 | | Execute Heap_Access,All_Reference 035b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 035c e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x9 = 0x35c,0x2 035d 8606 | | Call 0x3,0x6 035e e602 | | Load 0x3,0x2 ; Debug Table 0x10.0xa = 0x35e,0x3 035f 6805 |h | Jump_Zero 0x365 0360 e405 | | Load 0x2,0x5 0361 e603 | | Load 0x3,0x3 0362 8406 | | Call 0x2,0x6 0363 0f00 | | Execute_Immediate Equal,0x0 0364 7801 |x | Jump 0x366 0365 4800 |H | Short_Literal 0x0 0366 a602 | | Store_Unchecked 0x3,0x2 0367 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0xb = 0x367,0x4 0368 e405 | | Load 0x2,0x5 ; Debug Table 0x10.0xc = 0x368,0x401 0369 e407 | | Load 0x2,0x7 036a 00e2 | | Load_Encached Integer_Cache 036b 025e | ^ | Execute Discrete,Convert 036c 00da | | Load_Top At_Offset_2 036d e007 | | Load 0x0,0x7 036e 181e | | Execute Package,Field_Execute,Field_Number 0x1e 036f c407 | | Store 0x2,0x7 0370 00d1 | | Pop_Control Pop_Count_1 0371 00d1 | | Pop_Control Pop_Count_1 0372 e602 | | Load 0x3,0x2 ; Debug Table 0x10.0xd = 0x372,0x5 0373 6805 |h | Jump_Zero 0x379 0374 e405 | | Load 0x2,0x5 0375 4800 |H | Short_Literal 0x0 0376 8406 | | Call 0x2,0x6 0377 0f00 | | Execute_Immediate Equal,0x0 0378 7801 |x | Jump 0x37a 0379 4800 |H | Short_Literal 0x0 037a a602 | | Store_Unchecked 0x3,0x2 037b e405 | | Load 0x2,0x5 ; Debug Table 0x10.0xe = 0x37b,0x6 ; Debug Table 0x10.0xf = 0x37b,0x801 037c e407 | | Load 0x2,0x7 037d 00e2 | | Load_Encached Integer_Cache 037e 025e | ^ | Execute Discrete,Convert 037f 4800 |H | Short_Literal 0x0 0380 e007 | | Load 0x0,0x7 0381 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0382 c407 | | Store 0x2,0x7 0383 00d1 | | Pop_Control Pop_Count_1 0384 e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x10 = 0x384,0x7 0385 00db | | Load_Top At_Offset_3 0386 0217 | | Execute Heap_Access,All_Reference 0387 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0388 e7fe | | Load 0x3,-0x2 ; Debug Table 0x10.0x11 = 0x388,0x8 0389 00db | | Load_Top At_Offset_3 038a 0217 | | Execute Heap_Access,All_Reference 038b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 038c e602 | | Load 0x3,0x2 ; Debug Table 0x10.0x12 = 0x38c,0x9 038d 00db | | Load_Top At_Offset_3 038e 0217 | | Execute Heap_Access,All_Reference 038f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0390 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0x13 = 0x390,0xa 0391 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0392 0000 0000 | | .BLANK 0000[0x6] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039c | | .CONST 0x039c ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0002 | | .CONST 0x0002 ; Number of locals 039b INIT_0398: 039b 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x11 = .DEBUG 0x039b,0x0898,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0415 ; Debug Table 0x11.0x0 = 0x39b,0xffff 039c BODY_0398: 039c e404 | | Load 0x2,0x4 ; Debug Table 0x11.0x1 = 0x39c,0x1 039d e7ff | | Load 0x3,-0x1 039e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 039f e003 | | Load 0x0,0x3 03a0 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 03a1 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x11.0x2 = 0x3a1,0x2 03a2 e7ff | | Load 0x3,-0x1 03a3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03a4 e5fc | | Load 0x2,-0x4 03a5 e7ff | | Load 0x3,-0x1 03a6 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 03a7 e7ff | | Load 0x3,-0x1 03a8 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 03a9 e7ff | | Load 0x3,-0x1 03aa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03ab e7ff | | Load 0x3,-0x1 03ac 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 03ad 4811 |H | Short_Literal 0x11 03ae 4802 |H | Short_Literal 0x2 03af 0099 | | Action Reference_Dynamic 03b0 4812 |H | Short_Literal 0x12 03b1 4802 |H | Short_Literal 0x2 03b2 0099 | | Action Reference_Dynamic 03b3 4813 |H | Short_Literal 0x13 03b4 4802 |H | Short_Literal 0x2 03b5 0099 | | Action Reference_Dynamic 03b6 4814 |H | Short_Literal 0x14 03b7 4802 |H | Short_Literal 0x2 03b8 0099 | | Action Reference_Dynamic 03b9 e415 | | Load 0x2,0x15 03ba e416 | | Load 0x2,0x16 03bb 4817 |H | Short_Literal 0x17 03bc 4802 |H | Short_Literal 0x2 03bd 0099 | | Action Reference_Dynamic 03be e002 | | Load 0x0,0x2 03bf 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 03c0 00d1 | | Pop_Control Pop_Count_1 03c1 0059 | Y | Store_Top Discrete,At_Offset_1 03c2 e409 | | Load 0x2,0x9 ; Debug Table 0x11.0x3 = 0x3c2,0x3 03c3 e7ff | | Load 0x3,-0x1 03c4 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 03c5 4975 |Iu | Short_Literal 0x175 03c6 00eb | | Load_Encached Diana_Cache 03c7 0098 | | Execute Package,Field_Read_Dynamic 03c8 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 03c9 a409 | | Store_Unchecked 0x2,0x9 03ca e5fe | | Load 0x2,-0x2 ; Debug Table 0x11.0x4 = 0x3ca,0x4 03cb e007 | | Load 0x0,0x7 03cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03cd 0322 | " | Declare_Variable Record 03ce e7ff | | Load 0x3,-0x1 03cf 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03d0 00d9 | | Load_Top At_Offset_1 03d1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03d2 e7ff | | Load 0x3,-0x1 03d3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 03d4 00d9 | | Load_Top At_Offset_1 03d5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03d6 00da | | Load_Top At_Offset_2 03d7 00d9 | | Load_Top At_Offset_1 03d8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 03d9 e007 | | Load 0x0,0x7 03da 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03db e408 | | Load 0x2,0x8 ; Debug Table 0x11.0x5 = 0x3db,0x5 03dc 00d9 | | Load_Top At_Offset_1 03dd 0273 | s | Execute Discrete,Plus 03de e7ff | | Load 0x3,-0x1 03df 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 03e0 0272 | r | Execute Discrete,Minus 03e1 0248 | H | Execute Discrete,Check_In_Integer 03e2 a408 | | Store_Unchecked 0x2,0x8 03e3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x11.0x6 = 0x3e3,0x6 03e4 0000 0000 | | .BLANK 0000[0x4] 03e8 ; -------------------------------------------------------------------------------------- 03e8 ; SUBPROGRAM 03e8 ; -------------------------------------------------------------------------------------- 03e8 03f2 | | .CONST 0x03f2 ; Address of begin 03e9 0004 | | .CONST 0x0004 ; Address of exception handler 03ea 0005 | | .CONST 0x0005 ; Number of locals 03eb INIT_03e8: 03eb e001 | | Load 0x0,0x1 ; Debug Table 0x12 = .DEBUG 0x03eb,0x08a8,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0489 ; Debug Table 0x12.0x0 = 0x3eb,0xffff 03ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03ed 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x12.0x1 = 0x3ed,0xfffe 03ee e220 | | Load 0x1,0x20 ; Debug Table 0x12.0x2 = 0x3ee,0xfffd 03ef 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 03f0 e21b | | Load 0x1,0x1b ; Debug Table 0x12.0x3 = 0x3f0,0xfffc 03f1 0322 | " | Declare_Variable Record 03f2 BODY_03e8: 03f2 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x12.0x4 = 0x3f2,0x1 03f3 e004 | | Load 0x0,0x4 03f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03f5 e5fc | | Load 0x2,-0x4 03f6 e5fe | | Load 0x2,-0x2 03f7 e5fb | | Load 0x2,-0x5 03f8 e7ff | | Load 0x3,-0x1 03f9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 03fa e7ff | | Load 0x3,-0x1 03fb 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03fc e002 | | Load 0x0,0x2 03fd 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 03fe e7ff | | Load 0x3,-0x1 03ff 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0400 e7ff | | Load 0x3,-0x1 0401 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0402 e5fd | | Load 0x2,-0x3 ; Debug Table 0x12.0x5 = 0x402,0x2 ; Debug Table 0x12.0x6 = 0x402,0x9 0403 00d9 | | Load_Top At_Offset_1 0404 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0405 e7ff | | Load 0x3,-0x1 ; Debug Table 0x12.0x7 = 0x405,0xa 0406 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0407 00d9 | | Load_Top At_Offset_1 0408 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0409 e7ff | | Load 0x3,-0x1 ; Debug Table 0x12.0x8 = 0x409,0xb 040a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 040b 00d9 | | Load_Top At_Offset_1 040c 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 040d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x9 = 0x40d,0xc 040e 4801 |H | Short_Literal 0x1 040f 821e | | Call 0x1,0x1e 0410 00d1 | | Pop_Control Pop_Count_1 0411 e404 | | Load 0x2,0x4 ; Debug Table 0x12.0xa = 0x411,0xd 0412 e003 | | Load 0x0,0x3 0413 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 0414 e003 | | Load 0x0,0x3 0415 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0416 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0xb = 0x416,0xe 0417 e7ff | | Load 0x3,-0x1 0418 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0419 00da | | Load_Top At_Offset_2 041a 00e1 | | Load_Encached Boolean_Cache 041b 00ef | | Load_Encached Diana_Sequence_Cache 041c e001 | | Load 0x0,0x1 041d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 041e 00ec | | Load_Encached Diana_Tree_Cache 041f e5fb | | Load 0x2,-0x5 0420 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0421 e5fb | | Load 0x2,-0x5 0422 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0423 e7ff | | Load 0x3,-0x1 0424 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0425 0272 | r | Execute Discrete,Minus 0426 0248 | H | Execute Discrete,Check_In_Integer 0427 4800 |H | Short_Literal 0x0 0428 e010 | | Load 0x0,0x10 0429 180d | | Execute Package,Field_Execute,Field_Number 0xd 042a 00e3 | | Load_Encached Natural_Cache 042b 025b | [ | Execute Discrete,Check_In_Type 042c 4801 |H | Short_Literal 0x1 042d e001 | | Load 0x0,0x1 042e 1b13 | | Execute Package,Field_Read,Field_Number 0x13 042f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0430 e00a | | Load 0x0,0xa 0431 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0432 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0433 e210 | | Load 0x1,0x10 0434 4802 |H | Short_Literal 0x2 0435 e7ff | | Load 0x3,-0x1 0436 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0437 e404 | | Load 0x2,0x4 0438 e222 | " | Load 0x1,0x22 0439 1817 | | Execute Package,Field_Execute,Field_Number 0x17 043a e7ff | | Load 0x3,-0x1 043b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 043c c602 | | Store 0x3,0x2 043d e7ff | | Load 0x3,-0x1 043e 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 043f c603 | | Store 0x3,0x3 0440 00d1 | | Pop_Control Pop_Count_1 0441 e7ff | | Load 0x3,-0x1 0442 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0443 005a | Z | Store_Top Discrete,At_Offset_2 0444 e404 | | Load 0x2,0x4 ; Debug Table 0x12.0xc = 0x444,0xf 0445 e003 | | Load 0x0,0x3 0446 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 0447 e7ff | | Load 0x3,-0x1 0448 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0449 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0xd = 0x449,0x10 044a 0f02 | | Execute_Immediate Equal,0x2 044b 6804 |h | Jump_Zero 0x450 044c 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0xe = 0x44c,0x11 ; Debug Table 0x12.0xf = 0x44c,0x13 044d e7ff | | Load 0x3,-0x1 044e 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 044f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0450 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x10 = 0x450,0x14 0451 e7ff | | Load 0x3,-0x1 0452 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0453 e7ff | | Load 0x3,-0x1 ; Debug Table 0x12.0x11 = 0x453,0x15 ; Debug Table 0x12.0x12 = 0x453,0x17 0454 8420 | | Call 0x2,0x20 0455 00d1 | | Pop_Control Pop_Count_1 0456 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0457 0000 | | .XXX[0x1] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 0463 | c | .CONST 0x0463 ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0004 | | .CONST 0x0004 ; Number of locals 045b INIT_0458: 045b e217 | | Load 0x1,0x17 ; Debug Table 0x13 = .DEBUG 0x045b,0x08d0,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0596 ; Debug Table 0x13.0x0 = 0x45b,0xffff 045c e7fe | | Load 0x3,-0x2 045d 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 045e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 045f 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x13.0x1 = 0x45f,0xfffe 0460 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0461 e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x2 = 0x461,0xfffd 0462 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0463 BODY_0458: 0463 e7fe | | Load 0x3,-0x2 ; Debug Table 0x13.0x3 = 0x463,0x1 0464 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0465 e408 | | Load 0x2,0x8 0466 0273 | s | Execute Discrete,Plus 0467 e7fe | | Load 0x3,-0x2 0468 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0469 7813 |x | Jump 0x47d 046a 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x4 = 0x46a,0x3 046b 0219 | | Execute Heap_Access,All_Read 046c 00d8 | | Load_Top At_Offset_0 046d e7fe | | Load 0x3,-0x2 046e 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 046f 8422 | " | Call 0x2,0x22 0470 00d2 | | Pop_Control Pop_Count_2 0471 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x5 = 0x471,0x4 0472 7004 |p | Jump_Nonzero 0x477 0473 00da | | Load_Top At_Offset_2 0474 0217 | | Execute Heap_Access,All_Reference 0475 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 0476 7801 |x | Jump 0x478 0477 4801 |H | Short_Literal 0x1 0478 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0479 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x6 = 0x479,0x5 047a 0217 | | Execute Heap_Access,All_Reference 047b 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 047c 0033 | 3 | Store_Top Heap_Access,At_Offset_3 047d 00da | | Load_Top At_Offset_2 ; Debug Table 0x13.0x7 = 0x47d,0x2 047e 77eb |w | Jump_Nonzero 0x46a 047f e7ff | | Load 0x3,-0x1 ; Debug Table 0x13.0x8 = 0x47f,0x6 0480 680d |h | Jump_Zero 0x48e 0481 e7fe | | Load 0x3,-0x2 ; Debug Table 0x13.0x9 = 0x481,0x7 0482 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0483 6806 |h | Jump_Zero 0x48a 0484 00d9 | | Load_Top At_Offset_1 0485 7004 |p | Jump_Nonzero 0x48a 0486 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0xa = 0x486,0x8 0487 e7fe | | Load 0x3,-0x2 0488 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0489 4502 |E | Exit_Suprogram New_Top_Offset 0x2 048a e7fe | | Load 0x3,-0x2 ; Debug Table 0x13.0xb = 0x48a,0x9 048b 8421 | ! | Call 0x2,0x21 048c 00d1 | | Pop_Control Pop_Count_1 048d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 048e 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0xc = 0x48e,0xa 048f e7fe | | Load 0x3,-0x2 0490 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 0491 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0492 0000 0000 | | .BLANK 0000[0x6] 0498 ; -------------------------------------------------------------------------------------- 0498 ; SUBPROGRAM 0498 ; -------------------------------------------------------------------------------------- 0498 049b | | .CONST 0x049b ; Address of begin 0499 0004 | | .CONST 0x0004 ; Address of exception handler 049a 0001 | | .CONST 0x0001 ; Number of locals 049b BODY_0498: 049b INIT_0498: 049b 00da | | Load_Top At_Offset_2 ; Debug Table 0x14 = .DEBUG 0x049b,0x08ec,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0607 ; Debug Table 0x14.0x0 = 0x49b,0x1 049c 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 049d 7001 |p | Jump_Nonzero 0x49f 049e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x14.0x1 = 0x49e,0x2 049f 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x2 = 0x49f,0x3 04a0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04a1 e408 | | Load 0x2,0x8 04a2 0273 | s | Execute Discrete,Plus 04a3 00db | | Load_Top At_Offset_3 04a4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 04a5 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x3 = 0x4a5,0x4 04a6 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 04a7 6812 |h | Jump_Zero 0x4ba 04a8 e217 | | Load 0x1,0x17 ; Debug Table 0x14.0x4 = 0x4a8,0x5 ; Debug Table 0x14.0x5 = 0x4a8,0xfbff 04a9 00db | | Load_Top At_Offset_3 04aa 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 04ab 0031 | 1 | Store_Top Heap_Access,At_Offset_1 04ac 7809 |x | Jump 0x4b6 04ad 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x6 = 0x4ad,0x402 04ae 0219 | | Execute Heap_Access,All_Read 04af 00d8 | | Load_Top At_Offset_0 04b0 8423 | # | Call 0x2,0x23 04b1 00d2 | | Pop_Control Pop_Count_2 04b2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x7 = 0x4b2,0x403 04b3 0217 | | Execute Heap_Access,All_Reference 04b4 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 04b5 0031 | 1 | Store_Top Heap_Access,At_Offset_1 04b6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x8 = 0x4b6,0x401 04b7 77f5 |w | Jump_Nonzero 0x4ad 04b8 00d1 | | Pop_Control Pop_Count_1 04b9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04ba 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x9 = 0x4ba,0x6 04bb 8420 | | Call 0x2,0x20 04bc 00d1 | | Pop_Control Pop_Count_1 04bd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04be 0000 0000 | | .XXX[0x2] 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; SUBPROGRAM 04c0 ; -------------------------------------------------------------------------------------- 04c0 04c3 | | .CONST 0x04c3 ; Address of begin 04c1 0004 | | .CONST 0x0004 ; Address of exception handler 04c2 0001 | | .CONST 0x0001 ; Number of locals 04c3 BODY_04c0: 04c3 INIT_04c0: 04c3 e402 | | Load 0x2,0x2 ; Debug Table 0x15 = .DEBUG 0x04c3,0x0902,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0652 ; Debug Table 0x15.0x0 = 0x4c3,0x1 04c4 e5fc | | Load 0x2,-0x4 04c5 e008 | | Load 0x0,0x8 04c6 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04c7 e00b | | Load 0x0,0xb ; Debug Table 0x15.0x1 = 0x4c7,0x2 04c8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04c9 4800 |H | Short_Literal 0x0 04ca e403 | | Load 0x2,0x3 04cb e00a | | Load 0x0,0xa 04cc 1b13 | | Execute Package,Field_Read,Field_Number 0x13 04cd 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 04ce 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04cf 0000 | | .XXX[0x1] 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04e6 | | .CONST 0x04e6 ; Address of begin 04d1 053e | > | .CONST 0x053e ; Address of exception handler 04d2 0003 | | .CONST 0x0003 ; Number of locals 04d3 INIT_04d0: 04d3 e002 | | Load 0x0,0x2 ; Debug Table 0x16 = .DEBUG 0x04d3,0x0908,0x1004,0x0000,0x0059,0x82a5,0x0000,0x0759 ; Debug Table 0x16.0x0 = 0x4d3,0xffff 04d4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04d5 0322 | " | Declare_Variable Record 04d6 e5fd | | Load 0x2,-0x3 04d7 e002 | | Load 0x0,0x2 04d8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 04d9 e5fa | | Load 0x2,-0x6 04da e002 | | Load 0x0,0x2 04db 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04dc 00d9 | | Load_Top At_Offset_1 04dd 017d | } | Execute Record,Structure_Write 04de e217 | | Load 0x1,0x17 ; Debug Table 0x16.0x1 = 0x4de,0xfffe 04df 4801 |H | Short_Literal 0x1 04e0 00da | | Load_Top At_Offset_2 04e1 e002 | | Load 0x0,0x2 04e2 181e | | Execute Package,Field_Execute,Field_Number 0x1e 04e3 00da | | Load_Top At_Offset_2 04e4 841f | | Call 0x2,0x1f 04e5 0031 | 1 | Store_Top Heap_Access,At_Offset_1 04e6 BODY_04d0: 04e6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x2 = 0x4e6,0x1 ; Debug Table 0x16.0x3 = 0x4e6,0x3 04e7 0219 | | Execute Heap_Access,All_Read 04e8 4801 |H | Short_Literal 0x1 04e9 8422 | " | Call 0x2,0x22 04ea 00d1 | | Pop_Control Pop_Count_1 04eb 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x4 = 0x4eb,0x4 04ec a408 | | Store_Unchecked 0x2,0x8 04ed 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x5 = 0x4ed,0x5 04ee 0219 | | Execute Heap_Access,All_Read 04ef 8423 | # | Call 0x2,0x23 04f0 00d1 | | Pop_Control Pop_Count_1 04f1 e5fe | | Load 0x2,-0x2 ; Debug Table 0x16.0x6 = 0x4f1,0x6 04f2 e007 | | Load 0x0,0x7 04f3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04f4 7002 |p | Jump_Nonzero 0x4f7 04f5 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x16.0x7 = 0x4f5,0x7 04f6 0257 | W | Execute Discrete,Raise 04f7 e5fa | | Load 0x2,-0x6 ; Debug Table 0x16.0x8 = 0x4f7,0x8 04f8 4998 |I | Short_Literal 0x198 04f9 00eb | | Load_Encached Diana_Cache 04fa 0096 | | Execute Package,Entry 04fb e5fd | | Load 0x2,-0x3 04fc e005 | | Load 0x0,0x5 04fd 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04fe 027e | ~ | Execute Discrete,Not_Equal 04ff 6802 |h | Jump_Zero 0x502 0500 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x16.0x9 = 0x500,0x9 0501 0257 | W | Execute Discrete,Raise 0502 e40c | | Load 0x2,0xc ; Debug Table 0x16.0xa = 0x502,0xa ; Debug Table 0x16.0xb = 0x502,0x401 0503 021d | | Execute Heap_Access,Is_Null 0504 7011 |p | Jump_Nonzero 0x516 ; Debug Table 0x16.0xc = 0x504,0xa 0505 e5fb | | Load 0x2,-0x5 ; Debug Table 0x16.0xd = 0x505,0xb 0506 e5fc | | Load 0x2,-0x4 0507 e5fd | | Load 0x2,-0x3 0508 e5ff | | Load 0x2,-0x1 0509 e211 | | Load 0x1,0x11 050a 0119 | | Execute Any,Check_In_Formal_Type 050b e40c | | Load 0x2,0xc 050c e41a | | Load 0x2,0x1a 050d 481b |H | Short_Literal 0x1b 050e 4802 |H | Short_Literal 0x2 050f 0099 | | Action Reference_Dynamic 0510 481c |H | Short_Literal 0x1c 0511 4802 |H | Short_Literal 0x2 0512 0099 | | Action Reference_Dynamic 0513 e00c | | Load 0x0,0xc 0514 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0515 00d1 | | Pop_Control Pop_Count_1 0516 e409 | | Load 0x2,0x9 ; Debug Table 0x16.0xe = 0x516,0xc ; Debug Table 0x16.0xf = 0x516,0x801 0517 021d | | Execute Heap_Access,Is_Null 0518 6807 |h | Jump_Zero 0x520 ; Debug Table 0x16.0x10 = 0x518,0xc 0519 e00d | | Load 0x0,0xd ; Debug Table 0x16.0x11 = 0x519,0xd 051a e5fa | | Load 0x2,-0x6 051b 4973 |Is | Short_Literal 0x173 051c 00eb | | Load_Encached Diana_Cache 051d 0098 | | Execute Package,Field_Read_Dynamic 051e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 051f 7807 |x | Jump 0x527 0520 e409 | | Load 0x2,0x9 ; Debug Table 0x16.0x12 = 0x520,0xe 0521 e00d | | Load 0x0,0xd 0522 e5fa | | Load 0x2,-0x6 0523 4973 |Is | Short_Literal 0x173 0524 00eb | | Load_Encached Diana_Cache 0525 0098 | | Execute Package,Field_Read_Dynamic 0526 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0527 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x13 = 0x527,0xf 0528 e5fa | | Load 0x2,-0x6 0529 e5fe | | Load 0x2,-0x2 052a e5ff | | Load 0x2,-0x1 052b e211 | | Load 0x1,0x11 052c 0119 | | Execute Any,Check_In_Formal_Type 052d 8223 | # | Call 0x1,0x23 052e e5fa | | Load 0x2,-0x6 ; Debug Table 0x16.0x14 = 0x52e,0x10 052f e40a | | Load 0x2,0xa 0530 021f | | Execute Heap_Access,Equal 0531 700a |p | Jump_Nonzero 0x53c 0532 e40a | | Load 0x2,0xa 0533 e011 | | Load 0x0,0x11 0534 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0535 6806 |h | Jump_Zero 0x53c 0536 e40a | | Load 0x2,0xa ; Debug Table 0x16.0x15 = 0x536,0x11 0537 e011 | | Load 0x0,0x11 0538 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0539 e5fa | | Load 0x2,-0x6 053a e011 | | Load 0x0,0x11 053b 181d | | Execute Package,Field_Execute,Field_Number 0x1d 053c 8424 | $ | Call 0x2,0x24 ; Debug Table 0x16.0x16 = 0x53c,0x12 053d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 053e TRAP_04d0: 053e 0007 | | Action Break_Optional 053f 8424 | $ | Call 0x2,0x24 ; Debug Table 0x16.0x17 = 0x53f,0x13 0540 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x18 = 0x540,0x14 0541 0101 | | Execute Exception,Reraise 0542 0000 0000 | | .BLANK 0000[0x6] 0548 ; -------------------------------------------------------------------------------------- 0548 ; SUBPROGRAM 0548 ; -------------------------------------------------------------------------------------- 0548 054b | K | .CONST 0x054b ; Address of begin 0549 0004 | | .CONST 0x0004 ; Address of exception handler 054a 0001 | | .CONST 0x0001 ; Number of locals 054b BODY_0548: 054b INIT_0548: 054b 7827 |x' | Jump 0x573 ; Debug Table 0x17 = .DEBUG 0x054b,0x093c,0x1001,0x0000,0x0059,0x82f5,0x0000,0x0060 054c e404 | | Load 0x2,0x4 ; Debug Table 0x17.0x0 = 0x54c,0x2 054d 00e4 | | Load_Encached Positive_Cache 054e e5fc | | Load 0x2,-0x4 054f e405 | | Load 0x2,0x5 0550 e406 | | Load 0x2,0x6 0551 e403 | | Load 0x2,0x3 0552 01cf | | Execute Vector,Slice_Read 0553 e002 | | Load 0x0,0x2 0554 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0555 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0556 c407 | | Store 0x2,0x7 0557 00d1 | | Pop_Control Pop_Count_1 0558 e407 | | Load 0x2,0x7 ; Debug Table 0x17.0x1 = 0x558,0x3 0559 e405 | | Load 0x2,0x5 055a 0263 | c | Execute Discrete,Above_Bound 055b 7014 |p | Jump_Nonzero 0x570 055c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x2 = 0x55c,0x4 055d e403 | | Load 0x2,0x3 055e 01d7 | | Execute Vector,Field_Read 055f 00d9 | | Load_Top At_Offset_1 0560 e404 | | Load 0x2,0x4 0561 01d5 | | Execute Vector,Field_Reference 0562 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0563 00da | | Load_Top At_Offset_2 0564 e404 | | Load 0x2,0x4 0565 01d5 | | Execute Vector,Field_Reference 0566 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0567 00db | | Load_Top At_Offset_3 0568 e404 | | Load 0x2,0x4 0569 01d5 | | Execute Vector,Field_Reference 056a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 056b e5ff | | Load 0x2,-0x1 056c e211 | | Load 0x1,0x11 056d 0119 | | Execute Any,Check_In_Formal_Type 056e 8213 | | Call 0x1,0x13 056f 3fec |? | Loop_Increasing 0x55c 0570 e407 | | Load 0x2,0x7 ; Debug Table 0x17.0x3 = 0x570,0x5 0571 0a01 | | Execute_Immediate Plus,0x1 0572 c405 | | Store 0x2,0x5 0573 e405 | | Load 0x2,0x5 ; Debug Table 0x17.0x4 = 0x573,0x1 0574 e406 | | Load 0x2,0x6 0575 027a | z | Execute Discrete,Less_Equal 0576 77d5 |w | Jump_Nonzero 0x54c 0577 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x5 = 0x577,0x6 0578 a405 | | Store_Unchecked 0x2,0x5 0579 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x6 = 0x579,0x7 057a a406 | | Store_Unchecked 0x2,0x6 057b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 057c 0000 0000 | | .BLANK 0000[0x4] 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 0583 | | .CONST 0x0583 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0001 | | .CONST 0x0001 ; Number of locals 0583 BODY_0580: 0583 INIT_0580: 0583 e002 | | Load 0x0,0x2 ; Debug Table 0x18 = .DEBUG 0x0583,0x094c,0x1001,0x0000,0x0059,0x82a5,0x0000,0x031f ; Debug Table 0x18.0x0 = 0x583,0x1 ; Debug Table 0x18.0x1 = 0x583,0xfbff 0584 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0585 0322 | " | Declare_Variable Record 0586 00db | | Load_Top At_Offset_3 0587 e002 | | Load 0x0,0x2 0588 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0589 00d9 | | Load_Top At_Offset_1 058a 017d | } | Execute Record,Structure_Write 058b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x2 = 0x58b,0x401 058c e002 | | Load 0x0,0x2 058d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 058e 6807 |h | Jump_Zero 0x596 058f e603 | | Load 0x3,0x3 ; Debug Table 0x18.0x3 = 0x58f,0x402 0590 e9ff | | Load 0x4,-0x1 0591 e002 | | Load 0x0,0x2 0592 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0593 0273 | s | Execute Discrete,Plus 0594 c603 | | Store 0x3,0x3 0595 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x18.0x4 = 0x595,0x403 0596 4801 |H | Short_Literal 0x1 ; Debug Table 0x18.0x5 = 0x596,0x404 ; Debug Table 0x18.0x6 = 0x596,0x405 ; Debug Table 0x18.0x7 = 0x596,0xf7ff 0597 00d9 | | Load_Top At_Offset_1 0598 e002 | | Load 0x0,0x2 0599 181e | | Execute Package,Field_Execute,Field_Number 0x1e 059a e218 | | Load 0x1,0x18 059b 03f1 | | Declare_Variable Discrete,With_Value 059c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x8 = 0x59c,0x801 059d 7003 |p | Jump_Nonzero 0x5a1 059e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x9 = 0x59e,0x802 059f 8606 | | Call 0x3,0x6 05a0 784e |xN | Jump 0x5ef 05a1 e602 | | Load 0x3,0x2 ; Debug Table 0x18.0xa = 0x5a1,0x803 05a2 6805 |h | Jump_Zero 0x5a8 05a3 e405 | | Load 0x2,0x5 05a4 e603 | | Load 0x3,0x3 05a5 8406 | | Call 0x2,0x6 05a6 0f00 | | Execute_Immediate Equal,0x0 05a7 7801 |x | Jump 0x5a9 05a8 4800 |H | Short_Literal 0x0 05a9 a602 | | Store_Unchecked 0x3,0x2 05aa e603 | | Load 0x3,0x3 ; Debug Table 0x18.0xb = 0x5aa,0x804 05ab e405 | | Load 0x2,0x5 ; Debug Table 0x18.0xc = 0x5ab,0xc01 05ac e407 | | Load 0x2,0x7 05ad 00e2 | | Load_Encached Integer_Cache 05ae 025e | ^ | Execute Discrete,Convert 05af 00da | | Load_Top At_Offset_2 05b0 e007 | | Load 0x0,0x7 05b1 181e | | Execute Package,Field_Execute,Field_Number 0x1e 05b2 c407 | | Store 0x2,0x7 05b3 00d1 | | Pop_Control Pop_Count_1 05b4 00d1 | | Pop_Control Pop_Count_1 05b5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0xd = 0x5b5,0x805 ; Debug Table 0x18.0xe = 0x5b5,0xefff 05b6 e002 | | Load 0x0,0x2 05b7 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 05b8 00e3 | | Load_Encached Natural_Cache 05b9 03f1 | | Declare_Variable Discrete,With_Value 05ba e405 | | Load 0x2,0x5 ; Debug Table 0x18.0xf = 0x5ba,0x1001 05bb 00d9 | | Load_Top At_Offset_1 05bc 8406 | | Call 0x2,0x6 05bd 4602 |F | Jump_Case 0x3 05be 7802 |x | Jump 0x5c1 ; case 0x0 05bf 781b |x | Jump 0x5db ; case 0x1 05c0 780c |x | Jump 0x5cd ; case 0x2 05c1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x10 = 0x5c1,0x1002 05c2 e405 | | Load 0x2,0x5 ; Debug Table 0x18.0x11 = 0x5c2,0x1401 05c3 e407 | | Load 0x2,0x7 05c4 00e2 | | Load_Encached Integer_Cache 05c5 025e | ^ | Execute Discrete,Convert 05c6 00da | | Load_Top At_Offset_2 05c7 e007 | | Load 0x0,0x7 05c8 181e | | Execute Package,Field_Execute,Field_Number 0x1e 05c9 c407 | | Store 0x2,0x7 05ca 00d1 | | Pop_Control Pop_Count_1 05cb 00d1 | | Pop_Control Pop_Count_1 05cc 781f |x | Jump 0x5ec 05cd 4800 |H | Short_Literal 0x0 ; Debug Table 0x18.0x12 = 0x5cd,0x1003 05ce a602 | | Store_Unchecked 0x3,0x2 05cf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x13 = 0x5cf,0x1004 05d0 e405 | | Load 0x2,0x5 ; Debug Table 0x18.0x14 = 0x5d0,0x1801 05d1 e407 | | Load 0x2,0x7 05d2 00e2 | | Load_Encached Integer_Cache 05d3 025e | ^ | Execute Discrete,Convert 05d4 00da | | Load_Top At_Offset_2 05d5 e007 | | Load 0x0,0x7 05d6 181e | | Execute Package,Field_Execute,Field_Number 0x1e 05d7 c407 | | Store 0x2,0x7 05d8 00d1 | | Pop_Control Pop_Count_1 05d9 00d1 | | Pop_Control Pop_Count_1 05da 7811 |x | Jump 0x5ec 05db 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x15 = 0x5db,0x1005 05dc 00db | | Load_Top At_Offset_3 05dd 841f | | Call 0x2,0x1f 05de e605 | | Load 0x3,0x5 ; Debug Table 0x18.0x16 = 0x5de,0x1c01 05df 7005 |p | Jump_Nonzero 0x5e5 05e0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x17 = 0x5e0,0x1c02 05e1 e604 | | Load 0x3,0x4 05e2 0217 | | Execute Heap_Access,All_Reference 05e3 380a |8 | Execute Record,Field_Write,Field_Number 0xa 05e4 7804 |x | Jump 0x5e9 05e5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x18 = 0x5e5,0x1c03 05e6 e605 | | Load 0x3,0x5 05e7 0217 | | Execute Heap_Access,All_Reference 05e8 380b |8 | Execute Record,Field_Write,Field_Number 0xb 05e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x19 = 0x5e9,0x1c04 05ea a605 | | Store_Unchecked 0x3,0x5 05eb 00d1 | | Pop_Control Pop_Count_1 05ec 4800 |H | Short_Literal 0x0 ; Debug Table 0x18.0x1a = 0x5ec,0x1006 05ed a603 | | Store_Unchecked 0x3,0x3 05ee 00d1 | | Pop_Control Pop_Count_1 05ef 00d1 | | Pop_Control Pop_Count_1 05f0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x1b = 0x5f0,0x406 05f1 e002 | | Load 0x0,0x2 05f2 1819 | | Execute Package,Field_Execute,Field_Number 0x19 05f3 00d1 | | Pop_Control Pop_Count_1 05f4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x1c = 0x5f4,0x407 05f5 e002 | | Load 0x0,0x2 05f6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05f7 7001 |p | Jump_Nonzero 0x5f9 05f8 7f9d | | Jump 0x596 05f9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05fa ; -------------------------------------------------------------------------------------- 05fa ; STRING TABLE 05fa ; -------------------------------------------------------------------------------------- 05fa 000e | | .STRTAB 0x000e->0x0601 ; "NIL" 05fb 000f | | .STRTAB 0x000f->0x0602 ; "Progress:" 05fc 0016 | | .STRTAB 0x0016->0x0607 ; "tree: " 05fd 001b | | .STRTAB 0x001b->0x060a ; "count: " 05fe 0020 | | .STRTAB 0x0020->0x060e ; "first: " 05ff 0025 | % | .STRTAB 0x0025->0x0611 ; "last: " 0600 002a | * | .STREND 0x002a->0x0615 0601 4e49 4c50 |NILP| .STRTAB_STRINGS 0615 0000 0000 | | .XXX[0x3] 0617 0000 | | 0618 ; -------------------------------------------------------------------------------------- 0618 ; Debug Table 0618 ; -------------------------------------------------------------------------------------- 0618 0003 0019 | | .CONST 0x0003,0x0019 061a 000b 06e2 | | .DEBUG 0x000b,0x06e2,0x4000,0x0000,0x0059,0x80d5,0x0000,0x0191 0622 0010 06e8 | | .DEBUG 0x0010,0x06e8,0x4000,0x0000,0x0059,0x8235,0x0000,0x0010 062a 0093 0726 | &| .DEBUG 0x0093,0x0726,0x1001,0x0000,0x0059,0x80d5,0x0000,0x01cd 0632 00ab 0730 | 0| .DEBUG 0x00ab,0x0730,0x1001,0x0000,0x0059,0x80d5,0x0000,0x01e5 063a 0123 0776 | # v| .DEBUG 0x0123,0x0776,0x1005,0x0000,0x0059,0x8235,0x0000,0x0088 0642 013b 0778 | ; x| .DEBUG 0x013b,0x0778,0x1002,0x0000,0x0059,0x8235,0x0000,0x012c 064a 0143 077c | C || .DEBUG 0x0143,0x077c,0x1001,0x0000,0x0059,0x8235,0x0000,0x0142 0652 0153 0780 | S | .DEBUG 0x0153,0x0780,0x1001,0x0000,0x0059,0x8235,0x0000,0x0165 065a 016b 0784 | k | .DEBUG 0x016b,0x0784,0x1001,0x0000,0x0059,0x8235,0x0000,0x019a 0662 0173 0788 | s | .DEBUG 0x0173,0x0788,0x1005,0x0000,0x0059,0x8235,0x0000,0x01ac 066a 018b 078a | | .DEBUG 0x018b,0x078a,0x1001,0x0000,0x0059,0x8235,0x0000,0x01b1 0672 0193 078e | | .DEBUG 0x0193,0x078e,0x1001,0x0000,0x0059,0x8235,0x0000,0x020c 067a 021b 07e0 | | .DEBUG 0x021b,0x07e0,0x1001,0x0000,0x0059,0x82a5,0x0000,0x00c1 0682 029b 0826 | &| .DEBUG 0x029b,0x0826,0x1001,0x0000,0x0059,0x82a5,0x0000,0x01c2 068a 0323 0864 | # d| .DEBUG 0x0323,0x0864,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0266 0692 0333 0868 | 3 h| .DEBUG 0x0333,0x0868,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0279 069a 034b 086e | K n| .DEBUG 0x034b,0x086e,0x1002,0x0000,0x0059,0x82a5,0x0000,0x02c9 06a2 039b 0898 | | .DEBUG 0x039b,0x0898,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0415 06aa 03eb 08a8 | | .DEBUG 0x03eb,0x08a8,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0489 06b2 045b 08d0 | [ | .DEBUG 0x045b,0x08d0,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0596 06ba 049b 08ec | | .DEBUG 0x049b,0x08ec,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0607 06c2 04c3 0902 | | .DEBUG 0x04c3,0x0902,0x1001,0x0000,0x0059,0x82a5,0x0000,0x0652 06ca 04d3 0908 | | .DEBUG 0x04d3,0x0908,0x1004,0x0000,0x0059,0x82a5,0x0000,0x0759 06d2 054b 093c | K <| .DEBUG 0x054b,0x093c,0x1001,0x0000,0x0059,0x82f5,0x0000,0x0060 06da 0583 094c | L| .DEBUG 0x0583,0x094c,0x1001,0x0000,0x0059,0x82a5,0x0000,0x031f 06e2 ; -------------------------------------------------------------------------------------- 06e2 ; Debug3 Subtable 0x0 06e2 ; -------------------------------------------------------------------------------------- 06e2 0002 0000 | | .DBG3TAB 0x0002,0x0000 06e4 000b ffff | | .CONST 0x000b,0xffff 06e6 000d fffe | | .CONST 0x000d,0xfffe 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; Debug3 Subtable 0x1 06e8 ; -------------------------------------------------------------------------------------- 06e8 001c 0002 | | .DBG3TAB 0x001c,0x0002 06ea 0010 ffff | | .CONST 0x0010,0xffff 06ec 0012 fffe | | .CONST 0x0012,0xfffe 06ee 0017 fffd | | .CONST 0x0017,0xfffd 06f0 0017 fffc | | .CONST 0x0017,0xfffc 06f2 0017 fffb | | .CONST 0x0017,0xfffb 06f4 0019 fffa | | .CONST 0x0019,0xfffa 06f6 0019 fff9 | | .CONST 0x0019,0xfff9 06f8 0019 fff8 | | .CONST 0x0019,0xfff8 06fa 0019 fff7 | | .CONST 0x0019,0xfff7 06fc 0019 fff6 | | .CONST 0x0019,0xfff6 06fe 001a 0401 | | .CONST 0x001a,0x0401 0700 001b fff6 | | .CONST 0x001b,0xfff6 0702 001c fff5 | | .CONST 0x001c,0xfff5 0704 001c fff4 | | .CONST 0x001c,0xfff4 0706 001c fff3 | | .CONST 0x001c,0xfff3 0708 002f fff2 | / | .CONST 0x002f,0xfff2 070a 0045 0801 | E | .CONST 0x0045,0x0801 070c 0046 fff2 | F | .CONST 0x0046,0xfff2 070e 005b fff1 | [ | .CONST 0x005b,0xfff1 0710 0064 fff0 | d | .CONST 0x0064,0xfff0 0712 0066 ffef | f | .CONST 0x0066,0xffef 0714 0068 ffee | h | .CONST 0x0068,0xffee 0716 006a ffed | j | .CONST 0x006a,0xffed 0718 006c ffff | l | .CONST 0x006c,0xffff 071a 0071 fffe | q | .CONST 0x0071,0xfffe 071c 0073 ffff | s | .CONST 0x0073,0xffff 071e 0075 ffea | u | .CONST 0x0075,0xffea 0720 0084 ffe9 | | .CONST 0x0084,0xffe9 0722 0086 ffe8 | | .CONST 0x0086,0xffe8 0724 0088 ffe7 | | .CONST 0x0088,0xffe7 0726 ; -------------------------------------------------------------------------------------- 0726 ; Debug3 Subtable 0x2 0726 ; -------------------------------------------------------------------------------------- 0726 0001 0003 | | .DBG3TAB 0x0001,0x0003 0728 0093 ffff | | .CONST 0x0093,0xffff 072a 0095 0001 | | .CONST 0x0095,0x0001 072c 009b 0002 | | .CONST 0x009b,0x0002 072e 00a2 0003 | | .CONST 0x00a2,0x0003 0730 ; -------------------------------------------------------------------------------------- 0730 ; Debug3 Subtable 0x3 0730 ; -------------------------------------------------------------------------------------- 0730 001d 0005 | | .DBG3TAB 0x001d,0x0005 0732 00ab ffff | | .CONST 0x00ab,0xffff 0734 00b1 fffe | | .CONST 0x00b1,0xfffe 0736 00bb fffd | | .CONST 0x00bb,0xfffd 0738 00c1 fffc | | .CONST 0x00c1,0xfffc 073a 00ca fffb | | .CONST 0x00ca,0xfffb 073c 00cc fffa | | .CONST 0x00cc,0xfffa 073e 00ce fff9 | | .CONST 0x00ce,0xfff9 0740 00d0 fff8 | | .CONST 0x00d0,0xfff8 0742 00d1 0401 | | .CONST 0x00d1,0x0401 0744 00d2 fff8 | | .CONST 0x00d2,0xfff8 0746 00d3 fff7 | | .CONST 0x00d3,0xfff7 0748 00d4 fff6 | | .CONST 0x00d4,0xfff6 074a 00dc fff5 | | .CONST 0x00dc,0xfff5 074c 00dd 0801 | | .CONST 0x00dd,0x0801 074e 00de fff5 | | .CONST 0x00de,0xfff5 0750 00df fff4 | | .CONST 0x00df,0xfff4 0752 00df fff3 | | .CONST 0x00df,0xfff3 0754 00df fff2 | | .CONST 0x00df,0xfff2 0756 00e1 fff1 | | .CONST 0x00e1,0xfff1 0758 00e3 fff0 | | .CONST 0x00e3,0xfff0 075a 00e3 ffef | | .CONST 0x00e3,0xffef 075c 00e3 ffee | | .CONST 0x00e3,0xffee 075e 00e5 ffed | | .CONST 0x00e5,0xffed 0760 00e7 ffec | | .CONST 0x00e7,0xffec 0762 00f9 ffeb | | .CONST 0x00f9,0xffeb 0764 0101 ffea | | .CONST 0x0101,0xffea 0766 0103 ffe9 | | .CONST 0x0103,0xffe9 0768 0105 ffe8 | | .CONST 0x0105,0xffe8 076a 0107 ffe7 | | .CONST 0x0107,0xffe7 076c 0109 ffe6 | | .CONST 0x0109,0xffe6 076e 010b ffe5 | | .CONST 0x010b,0xffe5 0770 010f 0001 | | .CONST 0x010f,0x0001 0772 0111 0002 | | .CONST 0x0111,0x0002 0774 011b 0003 | | .CONST 0x011b,0x0003 0776 ; -------------------------------------------------------------------------------------- 0776 ; Debug3 Subtable 0x4 0776 ; -------------------------------------------------------------------------------------- 0776 0000 0000 | | .DBG3TAB 0x0000,0x0000 0778 ; -------------------------------------------------------------------------------------- 0778 ; Debug3 Subtable 0x5 0778 ; -------------------------------------------------------------------------------------- 0778 0000 0001 | | .DBG3TAB 0x0000,0x0001 077a 013b 0001 | ; | .CONST 0x013b,0x0001 077c ; -------------------------------------------------------------------------------------- 077c ; Debug3 Subtable 0x6 077c ; -------------------------------------------------------------------------------------- 077c 0000 0001 | | .DBG3TAB 0x0000,0x0001 077e 0143 0001 | C | .CONST 0x0143,0x0001 0780 ; -------------------------------------------------------------------------------------- 0780 ; Debug3 Subtable 0x7 0780 ; -------------------------------------------------------------------------------------- 0780 0000 0001 | | .DBG3TAB 0x0000,0x0001 0782 0153 0001 | S | .CONST 0x0153,0x0001 0784 ; -------------------------------------------------------------------------------------- 0784 ; Debug3 Subtable 0x8 0784 ; -------------------------------------------------------------------------------------- 0784 0000 0001 | | .DBG3TAB 0x0000,0x0001 0786 016b 0001 | k | .CONST 0x016b,0x0001 0788 ; -------------------------------------------------------------------------------------- 0788 ; Debug3 Subtable 0x9 0788 ; -------------------------------------------------------------------------------------- 0788 0000 0000 | | .DBG3TAB 0x0000,0x0000 078a ; -------------------------------------------------------------------------------------- 078a ; Debug3 Subtable 0xa 078a ; -------------------------------------------------------------------------------------- 078a 0000 0001 | | .DBG3TAB 0x0000,0x0001 078c 018b 0001 | | .CONST 0x018b,0x0001 078e ; -------------------------------------------------------------------------------------- 078e ; Debug3 Subtable 0xb 078e ; -------------------------------------------------------------------------------------- 078e 000b 001d | | .DBG3TAB 0x000b,0x001d 0790 0193 ffff | | .CONST 0x0193,0xffff 0792 019b fffe | | .CONST 0x019b,0xfffe 0794 01a1 fffd | | .CONST 0x01a1,0xfffd 0796 01a6 fffc | | .CONST 0x01a6,0xfffc 0798 01a8 fffb | | .CONST 0x01a8,0xfffb 079a 01aa fffa | | .CONST 0x01aa,0xfffa 079c 01ab fff9 | | .CONST 0x01ab,0xfff9 079e 01ac fff8 | | .CONST 0x01ac,0xfff8 07a0 01af fff7 | | .CONST 0x01af,0xfff7 07a2 01b1 0001 | | .CONST 0x01b1,0x0001 07a4 01b1 0401 | | .CONST 0x01b1,0x0401 07a6 01b3 0001 | | .CONST 0x01b3,0x0001 07a8 01b4 0002 | | .CONST 0x01b4,0x0002 07aa 01b5 0004 | | .CONST 0x01b5,0x0004 07ac 01b6 0801 | | .CONST 0x01b6,0x0801 07ae 01ba 0c01 | | .CONST 0x01ba,0x0c01 07b0 01bb 0c02 | | .CONST 0x01bb,0x0c02 07b2 01bc 0c03 | | .CONST 0x01bc,0x0c03 07b4 01bc 0c04 | | .CONST 0x01bc,0x0c04 07b6 01be 0801 | | .CONST 0x01be,0x0801 07b8 01c3 0004 | | .CONST 0x01c3,0x0004 07ba 01c4 0005 | | .CONST 0x01c4,0x0005 07bc 01c9 0006 | | .CONST 0x01c9,0x0006 07be 01ce 0007 | | .CONST 0x01ce,0x0007 07c0 01d1 0008 | | .CONST 0x01d1,0x0008 07c2 01d2 0009 | | .CONST 0x01d2,0x0009 07c4 01d5 000a | | .CONST 0x01d5,0x000a 07c6 01da 000b | | .CONST 0x01da,0x000b 07c8 01da efff | | .CONST 0x01da,0xefff 07ca 01e2 effe | | .CONST 0x01e2,0xeffe 07cc 01e8 1001 | | .CONST 0x01e8,0x1001 07ce 01f7 1002 | | .CONST 0x01f7,0x1002 07d0 0207 000c | | .CONST 0x0207,0x000c 07d2 0207 1401 | | .CONST 0x0207,0x1401 07d4 020a 000c | | .CONST 0x020a,0x000c 07d6 020b 0003 | | .CONST 0x020b,0x0003 07d8 020b 1801 | | .CONST 0x020b,0x1801 07da 020d 0003 | | .CONST 0x020d,0x0003 07dc 020e 000d | | .CONST 0x020e,0x000d 07de 0212 000e | | .CONST 0x0212,0x000e 07e0 ; -------------------------------------------------------------------------------------- 07e0 ; Debug3 Subtable 0xc 07e0 ; -------------------------------------------------------------------------------------- 07e0 0009 0019 | | .DBG3TAB 0x0009,0x0019 07e2 021b ffff | | .CONST 0x021b,0xffff 07e4 021e fffe | | .CONST 0x021e,0xfffe 07e6 0221 fffd | ! | .CONST 0x0221,0xfffd 07e8 0227 fffc | ' | .CONST 0x0227,0xfffc 07ea 022b fffb | + | .CONST 0x022b,0xfffb 07ec 022c fffa | , | .CONST 0x022c,0xfffa 07ee 022e fff9 | . | .CONST 0x022e,0xfff9 07f0 0230 fff8 | 0 | .CONST 0x0230,0xfff8 07f2 0232 fff7 | 2 | .CONST 0x0232,0xfff7 07f4 0234 0001 | 4 | .CONST 0x0234,0x0001 07f6 0237 0002 | 7 | .CONST 0x0237,0x0002 07f8 023b 0003 | ; | .CONST 0x023b,0x0003 07fa 0243 0005 | C | .CONST 0x0243,0x0005 07fc 0246 0007 | F | .CONST 0x0246,0x0007 07fe 0248 0008 | H | .CONST 0x0248,0x0008 0800 024c 0009 | L | .CONST 0x024c,0x0009 0802 0251 000a | Q | .CONST 0x0251,0x000a 0804 0254 000b | T | .CONST 0x0254,0x000b 0806 0259 000c | Y | .CONST 0x0259,0x000c 0808 025c 000d | \ | .CONST 0x025c,0x000d 080a 0261 000e | a | .CONST 0x0261,0x000e 080c 0263 0006 | c | .CONST 0x0263,0x0006 080e 0265 000f | e | .CONST 0x0265,0x000f 0810 0268 0010 | h | .CONST 0x0268,0x0010 0812 026c 0011 | l | .CONST 0x026c,0x0011 0814 026e 0012 | n | .CONST 0x026e,0x0012 0816 0272 0013 | r | .CONST 0x0272,0x0013 0818 0275 0014 | u | .CONST 0x0275,0x0014 081a 0278 0015 | x | .CONST 0x0278,0x0015 081c 027b 0016 | { | .CONST 0x027b,0x0016 081e 0284 0017 | | .CONST 0x0284,0x0017 0820 028a 0018 | | .CONST 0x028a,0x0018 0822 028c 0019 | | .CONST 0x028c,0x0019 0824 028f 0004 | | .CONST 0x028f,0x0004 0826 ; -------------------------------------------------------------------------------------- 0826 ; Debug3 Subtable 0xd 0826 ; -------------------------------------------------------------------------------------- 0826 0001 001d | | .DBG3TAB 0x0001,0x001d 0828 029b ffff | | .CONST 0x029b,0xffff 082a 02a0 0002 | | .CONST 0x02a0,0x0002 082c 02a4 0003 | | .CONST 0x02a4,0x0003 082e 02a9 0401 | | .CONST 0x02a9,0x0401 0830 02ab 0402 | | .CONST 0x02ab,0x0402 0832 02ad 0403 | | .CONST 0x02ad,0x0403 0834 02b1 0404 | | .CONST 0x02b1,0x0404 0836 02b5 0405 | | .CONST 0x02b5,0x0405 0838 02b6 0801 | | .CONST 0x02b6,0x0801 083a 02b7 0802 | | .CONST 0x02b7,0x0802 083c 02b8 0803 | | .CONST 0x02b8,0x0803 083e 02b8 0804 | | .CONST 0x02b8,0x0804 0840 02ba 0405 | | .CONST 0x02ba,0x0405 0842 02c3 0c01 | | .CONST 0x02c3,0x0c01 0844 02c4 0c02 | | .CONST 0x02c4,0x0c02 0846 02c5 0c03 | | .CONST 0x02c5,0x0c03 0848 02c5 0c04 | | .CONST 0x02c5,0x0c04 084a 02c7 0804 | | .CONST 0x02c7,0x0804 084c 02d5 0003 | | .CONST 0x02d5,0x0003 084e 02d9 0004 | | .CONST 0x02d9,0x0004 0850 02dd 0005 | | .CONST 0x02dd,0x0005 0852 02e3 0006 | | .CONST 0x02e3,0x0006 0854 02e6 0007 | | .CONST 0x02e6,0x0007 0856 02ea 0008 | | .CONST 0x02ea,0x0008 0858 02f0 0009 | | .CONST 0x02f0,0x0009 085a 02f3 000a | | .CONST 0x02f3,0x000a 085c 02f7 000b | | .CONST 0x02f7,0x000b 085e 0303 000c | | .CONST 0x0303,0x000c 0860 0306 000d | | .CONST 0x0306,0x000d 0862 030a 0001 | | .CONST 0x030a,0x0001 0864 ; -------------------------------------------------------------------------------------- 0864 ; Debug3 Subtable 0xe 0864 ; -------------------------------------------------------------------------------------- 0864 0000 0001 | | .DBG3TAB 0x0000,0x0001 0866 0323 0001 | # | .CONST 0x0323,0x0001 0868 ; -------------------------------------------------------------------------------------- 0868 ; Debug3 Subtable 0xf 0868 ; -------------------------------------------------------------------------------------- 0868 0000 0002 | | .DBG3TAB 0x0000,0x0002 086a 0333 0001 | 3 | .CONST 0x0333,0x0001 086c 033a 0002 | : | .CONST 0x033a,0x0002 086e ; -------------------------------------------------------------------------------------- 086e ; Debug3 Subtable 0x10 086e ; -------------------------------------------------------------------------------------- 086e 0008 000c | | .DBG3TAB 0x0008,0x000c 0870 034b ffff | K | .CONST 0x034b,0xffff 0872 034d fffe | M | .CONST 0x034d,0xfffe 0874 034f fffd | O | .CONST 0x034f,0xfffd 0876 0355 fffc | U | .CONST 0x0355,0xfffc 0878 0355 fffb | U | .CONST 0x0355,0xfffb 087a 0356 fffa | V | .CONST 0x0356,0xfffa 087c 0356 fff9 | V | .CONST 0x0356,0xfff9 087e 0356 fff8 | V | .CONST 0x0356,0xfff8 0880 0358 0001 | X | .CONST 0x0358,0x0001 0882 035c 0002 | \ | .CONST 0x035c,0x0002 0884 035e 0003 | ^ | .CONST 0x035e,0x0003 0886 0367 0004 | g | .CONST 0x0367,0x0004 0888 0368 0401 | h | .CONST 0x0368,0x0401 088a 0372 0005 | r | .CONST 0x0372,0x0005 088c 037b 0006 | { | .CONST 0x037b,0x0006 088e 037b 0801 | { | .CONST 0x037b,0x0801 0890 0384 0007 | | .CONST 0x0384,0x0007 0892 0388 0008 | | .CONST 0x0388,0x0008 0894 038c 0009 | | .CONST 0x038c,0x0009 0896 0390 000a | | .CONST 0x0390,0x000a 0898 ; -------------------------------------------------------------------------------------- 0898 ; Debug3 Subtable 0x11 0898 ; -------------------------------------------------------------------------------------- 0898 0001 0006 | | .DBG3TAB 0x0001,0x0006 089a 039b ffff | | .CONST 0x039b,0xffff 089c 039c 0001 | | .CONST 0x039c,0x0001 089e 03a1 0002 | | .CONST 0x03a1,0x0002 08a0 03c2 0003 | | .CONST 0x03c2,0x0003 08a2 03ca 0004 | | .CONST 0x03ca,0x0004 08a4 03db 0005 | | .CONST 0x03db,0x0005 08a6 03e3 0006 | | .CONST 0x03e3,0x0006 08a8 ; -------------------------------------------------------------------------------------- 08a8 ; Debug3 Subtable 0x12 08a8 ; -------------------------------------------------------------------------------------- 08a8 0004 000f | | .DBG3TAB 0x0004,0x000f 08aa 03eb ffff | | .CONST 0x03eb,0xffff 08ac 03ed fffe | | .CONST 0x03ed,0xfffe 08ae 03ee fffd | | .CONST 0x03ee,0xfffd 08b0 03f0 fffc | | .CONST 0x03f0,0xfffc 08b2 03f2 0001 | | .CONST 0x03f2,0x0001 08b4 0402 0002 | | .CONST 0x0402,0x0002 08b6 0402 0009 | | .CONST 0x0402,0x0009 08b8 0405 000a | | .CONST 0x0405,0x000a 08ba 0409 000b | | .CONST 0x0409,0x000b 08bc 040d 000c | | .CONST 0x040d,0x000c 08be 0411 000d | | .CONST 0x0411,0x000d 08c0 0416 000e | | .CONST 0x0416,0x000e 08c2 0444 000f | D | .CONST 0x0444,0x000f 08c4 0449 0010 | I | .CONST 0x0449,0x0010 08c6 044c 0011 | L | .CONST 0x044c,0x0011 08c8 044c 0013 | L | .CONST 0x044c,0x0013 08ca 0450 0014 | P | .CONST 0x0450,0x0014 08cc 0453 0015 | S | .CONST 0x0453,0x0015 08ce 0453 0017 | S | .CONST 0x0453,0x0017 08d0 ; -------------------------------------------------------------------------------------- 08d0 ; Debug3 Subtable 0x13 08d0 ; -------------------------------------------------------------------------------------- 08d0 0003 000a | | .DBG3TAB 0x0003,0x000a 08d2 045b ffff | [ | .CONST 0x045b,0xffff 08d4 045f fffe | _ | .CONST 0x045f,0xfffe 08d6 0461 fffd | a | .CONST 0x0461,0xfffd 08d8 0463 0001 | c | .CONST 0x0463,0x0001 08da 046a 0003 | j | .CONST 0x046a,0x0003 08dc 0471 0004 | q | .CONST 0x0471,0x0004 08de 0479 0005 | y | .CONST 0x0479,0x0005 08e0 047d 0002 | } | .CONST 0x047d,0x0002 08e2 047f 0006 | | .CONST 0x047f,0x0006 08e4 0481 0007 | | .CONST 0x0481,0x0007 08e6 0486 0008 | | .CONST 0x0486,0x0008 08e8 048a 0009 | | .CONST 0x048a,0x0009 08ea 048e 000a | | .CONST 0x048e,0x000a 08ec ; -------------------------------------------------------------------------------------- 08ec ; Debug3 Subtable 0x14 08ec ; -------------------------------------------------------------------------------------- 08ec 0001 0009 | | .DBG3TAB 0x0001,0x0009 08ee 049b 0001 | | .CONST 0x049b,0x0001 08f0 049e 0002 | | .CONST 0x049e,0x0002 08f2 049f 0003 | | .CONST 0x049f,0x0003 08f4 04a5 0004 | | .CONST 0x04a5,0x0004 08f6 04a8 0005 | | .CONST 0x04a8,0x0005 08f8 04a8 fbff | | .CONST 0x04a8,0xfbff 08fa 04ad 0402 | | .CONST 0x04ad,0x0402 08fc 04b2 0403 | | .CONST 0x04b2,0x0403 08fe 04b6 0401 | | .CONST 0x04b6,0x0401 0900 04ba 0006 | | .CONST 0x04ba,0x0006 0902 ; -------------------------------------------------------------------------------------- 0902 ; Debug3 Subtable 0x15 0902 ; -------------------------------------------------------------------------------------- 0902 0000 0002 | | .DBG3TAB 0x0000,0x0002 0904 04c3 0001 | | .CONST 0x04c3,0x0001 0906 04c7 0002 | | .CONST 0x04c7,0x0002 0908 ; -------------------------------------------------------------------------------------- 0908 ; Debug3 Subtable 0x16 0908 ; -------------------------------------------------------------------------------------- 0908 0002 0017 | | .DBG3TAB 0x0002,0x0017 090a 04d3 ffff | | .CONST 0x04d3,0xffff 090c 04de fffe | | .CONST 0x04de,0xfffe 090e 04e6 0001 | | .CONST 0x04e6,0x0001 0910 04e6 0003 | | .CONST 0x04e6,0x0003 0912 04eb 0004 | | .CONST 0x04eb,0x0004 0914 04ed 0005 | | .CONST 0x04ed,0x0005 0916 04f1 0006 | | .CONST 0x04f1,0x0006 0918 04f5 0007 | | .CONST 0x04f5,0x0007 091a 04f7 0008 | | .CONST 0x04f7,0x0008 091c 0500 0009 | | .CONST 0x0500,0x0009 091e 0502 000a | | .CONST 0x0502,0x000a 0920 0502 0401 | | .CONST 0x0502,0x0401 0922 0504 000a | | .CONST 0x0504,0x000a 0924 0505 000b | | .CONST 0x0505,0x000b 0926 0516 000c | | .CONST 0x0516,0x000c 0928 0516 0801 | | .CONST 0x0516,0x0801 092a 0518 000c | | .CONST 0x0518,0x000c 092c 0519 000d | | .CONST 0x0519,0x000d 092e 0520 000e | | .CONST 0x0520,0x000e 0930 0527 000f | ' | .CONST 0x0527,0x000f 0932 052e 0010 | . | .CONST 0x052e,0x0010 0934 0536 0011 | 6 | .CONST 0x0536,0x0011 0936 053c 0012 | < | .CONST 0x053c,0x0012 0938 053f 0013 | ? | .CONST 0x053f,0x0013 093a 0540 0014 | @ | .CONST 0x0540,0x0014 093c ; -------------------------------------------------------------------------------------- 093c ; Debug3 Subtable 0x17 093c ; -------------------------------------------------------------------------------------- 093c 0000 0007 | | .DBG3TAB 0x0000,0x0007 093e 054c 0002 | L | .CONST 0x054c,0x0002 0940 0558 0003 | X | .CONST 0x0558,0x0003 0942 055c 0004 | \ | .CONST 0x055c,0x0004 0944 0570 0005 | p | .CONST 0x0570,0x0005 0946 0573 0001 | s | .CONST 0x0573,0x0001 0948 0577 0006 | w | .CONST 0x0577,0x0006 094a 0579 0007 | y | .CONST 0x0579,0x0007 094c ; -------------------------------------------------------------------------------------- 094c ; Debug3 Subtable 0x18 094c ; -------------------------------------------------------------------------------------- 094c 0003 001a | | .DBG3TAB 0x0003,0x001a 094e 0583 0001 | | .CONST 0x0583,0x0001 0950 0583 fbff | | .CONST 0x0583,0xfbff 0952 058b 0401 | | .CONST 0x058b,0x0401 0954 058f 0402 | | .CONST 0x058f,0x0402 0956 0595 0403 | | .CONST 0x0595,0x0403 0958 0596 0404 | | .CONST 0x0596,0x0404 095a 0596 0405 | | .CONST 0x0596,0x0405 095c 0596 f7ff | | .CONST 0x0596,0xf7ff 095e 059c 0801 | | .CONST 0x059c,0x0801 0960 059e 0802 | | .CONST 0x059e,0x0802 0962 05a1 0803 | | .CONST 0x05a1,0x0803 0964 05aa 0804 | | .CONST 0x05aa,0x0804 0966 05ab 0c01 | | .CONST 0x05ab,0x0c01 0968 05b5 0805 | | .CONST 0x05b5,0x0805 096a 05b5 efff | | .CONST 0x05b5,0xefff 096c 05ba 1001 | | .CONST 0x05ba,0x1001 096e 05c1 1002 | | .CONST 0x05c1,0x1002 0970 05c2 1401 | | .CONST 0x05c2,0x1401 0972 05cd 1003 | | .CONST 0x05cd,0x1003 0974 05cf 1004 | | .CONST 0x05cf,0x1004 0976 05d0 1801 | | .CONST 0x05d0,0x1801 0978 05db 1005 | | .CONST 0x05db,0x1005 097a 05de 1c01 | | .CONST 0x05de,0x1c01 097c 05e0 1c02 | | .CONST 0x05e0,0x1c02 097e 05e5 1c03 | | .CONST 0x05e5,0x1c03 0980 05e9 1c04 | | .CONST 0x05e9,0x1c04 0982 05ec 1006 | | .CONST 0x05ec,0x1006 0984 05f0 0406 | | .CONST 0x05f0,0x0406 0986 05f4 0407 | | .CONST 0x05f4,0x0407 0988 0000 0000 | | .BLANK 0000[0x78]