|
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: 6144 (0x1800) Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0670 | p | .CONST 0x0670 ; 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 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0702,0x8000,0x0000,0x0054,0xf855,0x0000,0x0003 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 005b | [ | .CONST 0x005b ; Address of begin 0019 00c9 | | .CONST 0x00c9 ; Address of exception handler 001a 001a | | .CONST 0x001a ; Number of locals 001b INIT_0018: 001b 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001b,0x0704,0x8001,0x0000,0x0054,0xf855,0x0000,0x0003 ; Debug Table 0x1.0x0 = 0x1b,0xffff 001c 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x1c,0xfffe 001d 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x1d,0xfffd 001e 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x1e,0xfffc 001f 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x1f,0xfffb 0020 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x5 = 0x20,0xfffa 0021 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x6 = 0x21,0xfff9 0022 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x7 = 0x22,0xfff8 0023 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x8 = 0x23,0xfff7 0024 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x9 = 0x24,0xfff6 0025 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xa = 0x25,0xfff5 0026 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0027 0322 | " | Declare_Variable Record 0028 00d8 | | Load_Top At_Offset_0 0029 1c00 | | Execute_Immediate Run_Utility,0x0 002a 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x1.0xb = 0x2a,0xfff4 002b 0007 | | Action Break_Optional ; Debug Table 0x1.0xc = 0x2b,0xfff3 002c 0007 | | Action Break_Optional ; Debug Table 0x1.0xd = 0x2c,0xfff2 002d 00a2 0398 | | Action Push_Discrete_Extended ; Debug Table 0x1.0xe = 0x2d,0xfff1 002f 48ab |H | Short_Literal 0xab 0030 00ec | | Load_Encached Diana_Tree_Cache 0031 00ec | | Load_Encached Diana_Tree_Cache 0032 00e5 | | Load_Encached Long_Integer_Cache 0033 00eb | | Load_Encached Diana_Cache 0034 1918 | | Execute Package,Field_Reference,Field_Number 0x18 0035 e002 | | Load 0x0,0x2 0036 0387 | | Declare_Variable Package 0037 00d8 | | Load_Top At_Offset_0 0038 020f | | Execute Module,Activate 0039 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0xf = 0x39,0xfff0 003a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 003b 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call ; Debug Table 0x1.0x10 = 0x3b,0xffef 003d 029f 0103 | | Declare_Subprogram INIT_0100,For_Call ; Debug Table 0x1.0x11 = 0x3d,0xffee 003f 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call ; Debug Table 0x1.0x12 = 0x3f,0xffed 0041 029f 016b | k| Declare_Subprogram INIT_0168,For_Call ; Debug Table 0x1.0x13 = 0x41,0xffec 0043 029f 01d3 | | Declare_Subprogram INIT_01d0,For_Call ; Debug Table 0x1.0x14 = 0x43,0xffeb 0045 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call ; Debug Table 0x1.0x15 = 0x45,0xffea 0047 029f 022b | +| Declare_Subprogram INIT_0228,For_Call ; Debug Table 0x1.0x16 = 0x47,0xffe9 0049 029f 024b | K| Declare_Subprogram INIT_0248,For_Call ; Debug Table 0x1.0x17 = 0x49,0xffe8 004b 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call ; Debug Table 0x1.0x18 = 0x4b,0xffe7 004d 029f 027b | {| Declare_Subprogram INIT_0278,For_Call ; Debug Table 0x1.0x19 = 0x4d,0xffe6 004f 029f 02a3 | | Declare_Subprogram INIT_02a0,For_Call ; Debug Table 0x1.0x1a = 0x4f,0xffe5 0051 029f 03a3 | | Declare_Subprogram INIT_03a0,For_Call ; Debug Table 0x1.0x1b = 0x51,0xffe4 0053 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call ; Debug Table 0x1.0x1c = 0x53,0xffe3 0055 029f 041b | | Declare_Subprogram INIT_0418,For_Call ; Debug Table 0x1.0x1d = 0x55,0xffe2 0057 029f 04a3 | | Declare_Subprogram INIT_04a0,For_Call ; Debug Table 0x1.0x1e = 0x57,0xffe1 0059 029f 05b3 | | Declare_Subprogram INIT_05b0,For_Call ; Debug Table 0x1.0x1f = 0x59,0xffe0 005b BODY_0018: 005b 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x20 = 0x5b,0x1 005c 4801 |H | Short_Literal 0x1 005d e003 | | Load 0x0,0x3 005e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 005f e004 | | Load 0x0,0x4 0060 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0061 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0062 0092 05fc | | Action Push_String_Extended,0x5fc ; "Expand_Names" 0064 e5ff | | Load 0x2,-0x1 0065 e005 | | Load 0x0,0x5 0066 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0067 a404 | | Store_Unchecked 0x2,0x4 0068 0007 | | Action Break_Optional ; Debug Table 0x1.0x21 = 0x68,0x2 0069 e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x22 = 0x69,0x401 006a 021d | | Execute Heap_Access,Is_Null 006b 6801 |h | Jump_Zero 0x6d ; Debug Table 0x1.0x23 = 0x6b,0x2 006c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0x1.0x24 = 0x6c,0x3 006d e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x25 = 0x6d,0x4 006e 841a | | Call 0x2,0x1a 006f a404 | | Store_Unchecked 0x2,0x4 0070 e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x26 = 0x70,0x5 0071 e004 | | Load 0x0,0x4 0072 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 0073 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0074 7005 |p | Jump_Nonzero 0x7a 0075 0092 05fd | | Action Push_String_Extended,0x5fd ; "Expand_Names failed - unit is not source" ; Debug Table 0x1.0x27 = 0x75,0x6 0077 e006 | | Load 0x0,0x6 0078 180d | | Execute Package,Field_Execute,Field_Number 0xd 0079 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0x1.0x28 = 0x79,0x7 007a e407 | | Load 0x2,0x7 ; Debug Table 0x1.0x29 = 0x7a,0x8 007b e404 | | Load 0x2,0x4 007c e007 | | Load 0x0,0x7 007d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007e e001 | | Load 0x0,0x1 007f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0080 c404 | | Store 0x2,0x4 0081 00d1 | | Pop_Control Pop_Count_1 0082 e409 | | Load 0x2,0x9 ; Debug Table 0x1.0x2a = 0x82,0x9 0083 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0084 e003 | | Load 0x0,0x3 0085 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0086 e008 | | Load 0x0,0x8 0087 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0088 e409 | | Load 0x2,0x9 0089 1815 | | Execute Package,Field_Execute,Field_Number 0x15 008a c40a | | Store 0x2,0xa 008b e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x2b = 0x8b,0xa 008c 4974 |It | Short_Literal 0x174 008d 00eb | | Load_Encached Diana_Cache 008e 0098 | | Execute Package,Field_Read_Dynamic 008f 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0090 a405 | | Store_Unchecked 0x2,0x5 0091 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x2c = 0x91,0xb 0092 00e1 | | Load_Encached Boolean_Cache 0093 e405 | | Load 0x2,0x5 0094 e407 | | Load 0x2,0x7 0095 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0096 0092 05fc | | Action Push_String_Extended,0x5fc ; "Expand_Names" 0098 4800 |H | Short_Literal 0x0 0099 4801 |H | Short_Literal 0x1 009a e009 | | Load 0x0,0x9 009b 180d | | Execute Package,Field_Execute,Field_Number 0xd 009c c405 | | Store 0x2,0x5 009d c402 | | Store 0x2,0x2 009e c403 | | Store 0x2,0x3 009f e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x2d = 0x9f,0xc 00a0 7006 |p | Jump_Nonzero 0xa7 00a1 e407 | | Load 0x2,0x7 ; Debug Table 0x1.0x2e = 0xa1,0xd 00a2 4802 |H | Short_Literal 0x2 00a3 e001 | | Load 0x0,0x1 00a4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00a5 00d1 | | Pop_Control Pop_Count_1 00a6 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0x1.0x2f = 0xa6,0xe 00a7 e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x30 = 0xa7,0xf 00a8 00eb | | Load_Encached Diana_Cache 00a9 18ec | | Execute Package,Field_Execute,Field_Number 0xec 00aa a406 | | Store_Unchecked 0x2,0x6 00ab 0007 | | Action Break_Optional ; Debug Table 0x1.0x31 = 0xab,0x10 00ac e406 | | Load 0x2,0x6 ; Debug Table 0x1.0x32 = 0xac,0x801 00ad 021d | | Execute Heap_Access,Is_Null 00ae 6802 |h | Jump_Zero 0xb1 ; Debug Table 0x1.0x33 = 0xae,0x10 00af e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x34 = 0xaf,0x11 00b0 a406 | | Store_Unchecked 0x2,0x6 00b1 e406 | | Load 0x2,0x6 ; Debug Table 0x1.0x35 = 0xb1,0x12 00b2 e407 | | Load 0x2,0x7 00b3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00b4 e00a | | Load 0x0,0xa 00b5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00b6 0007 | | Action Break_Optional ; Debug Table 0x1.0x36 = 0xb6,0x13 00b7 e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x37 = 0xb7,0xc01 00b8 0007 | | Action Break_Optional 00b9 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x1.0x38 = 0xb9,0xc02 00ba 0007 | | Action Break_Optional ; Debug Table 0x1.0x39 = 0xba,0xc03 00bb 0007 | | Action Break_Optional ; Debug Table 0x1.0x3a = 0xbb,0xc04 00bc a408 | | Store_Unchecked 0x2,0x8 ; Debug Table 0x1.0x3b = 0xbc,0x13 00bd e404 | | Load 0x2,0x4 ; Debug Table 0x1.0x3c = 0xbd,0x14 00be 8419 | | Call 0x2,0x19 00bf e406 | | Load 0x2,0x6 ; Debug Table 0x1.0x3d = 0xbf,0x15 00c0 e407 | | Load 0x2,0x7 00c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00c2 e00a | | Load 0x0,0xa 00c3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00c4 e407 | | Load 0x2,0x7 ; Debug Table 0x1.0x3e = 0xc4,0x16 00c5 4800 |H | Short_Literal 0x0 00c6 e001 | | Load 0x0,0x1 00c7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00c8 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00c9 TRAP_0018: 00c9 62ca |b | Indirect_Literal Discrete,0x394,{0x00000000, 0x5793a501} 00ca 010f | | Execute Exception,Equal 00cb 6810 |h | Jump_Zero 0xdc 00cc e00b | | Load 0x0,0xb ; Debug Table 0x1.0x3f = 0xcc,0x17 00cd 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00ce 0092 05fe | | Action Push_String_Extended,0x5fe ; "*** Exception in Expand_Names: Directory_Error" ; Debug Table 0x1.0x40 = 0xce,0x18 00d0 e00b | | Load 0x0,0xb 00d1 180f | | Execute Package,Field_Execute,Field_Number 0xf 00d2 e407 | | Load 0x2,0x7 ; Debug Table 0x1.0x41 = 0xd2,0x19 00d3 4802 |H | Short_Literal 0x2 00d4 e001 | | Load 0x0,0x1 00d5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00d6 00d1 | | Pop_Control Pop_Count_1 00d7 0092 05ff | | Action Push_String_Extended,0x5ff ; "Expand_Names failed" ; Debug Table 0x1.0x42 = 0xd7,0x1a 00d9 e006 | | Load 0x0,0x6 00da 180d | | Execute Package,Field_Execute,Field_Number 0xd 00db 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00dc e00b | | Load 0x0,0xb ; Debug Table 0x1.0x43 = 0xdc,0x1b 00dd 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00de 0092 0600 | | Action Push_String_Extended,0x600 ; "*** Exception in Expand_Names: " ; Debug Table 0x1.0x44 = 0xde,0x1c 00e0 e00c | | Load 0x0,0xc 00e1 180d | | Execute Package,Field_Execute,Field_Number 0xd 00e2 01cc | | Execute Vector,Catenate 00e3 e00b | | Load 0x0,0xb 00e4 180f | | Execute Package,Field_Execute,Field_Number 0xf 00e5 e407 | | Load 0x2,0x7 ; Debug Table 0x1.0x45 = 0xe5,0x1d 00e6 4802 |H | Short_Literal 0x2 00e7 e001 | | Load 0x0,0x1 00e8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00e9 00d1 | | Pop_Control Pop_Count_1 00ea 0092 05ff | | Action Push_String_Extended,0x5ff ; "Expand_Names failed" ; Debug Table 0x1.0x46 = 0xea,0x1e 00ec e006 | | Load 0x0,0x6 00ed 180d | | Execute Package,Field_Execute,Field_Number 0xd 00ee 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00ef 0000 | | .XXX[0x1] 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f4 | | .CONST 0x00f4 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0002 | | .CONST 0x0002 ; Number of locals 00f3 INIT_00f0: 00f3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2 = .DEBUG 0x00f3,0x0794,0x0002,0x0000,0x0057,0x93a5,0x0000,0x00c9 ; Debug Table 0x2.0x0 = 0xf3,0xffff 00f4 BODY_00f0: 00f4 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1 = 0xf4,0x1 00f5 e00d | | Load 0x0,0xd 00f6 180e | | Execute Package,Field_Execute,Field_Number 0xe 00f7 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00f8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x2 = 0xf8,0x2 00f9 e00e | | Load 0x0,0xe 00fa 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 00fb 0031 | 1 | Store_Top Heap_Access,At_Offset_1 00fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x3 = 0xfc,0x3 00fd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00fe 0000 0000 | | .XXX[0x2] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0106 | | .CONST 0x0106 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0003 | | .CONST 0x0003 ; Number of locals 0103 INIT_0100: 0103 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x3 = .DEBUG 0x0103,0x079e,0x0002,0x0000,0x0057,0x93a5,0x0000,0x00f1 ; Debug Table 0x3.0x0 = 0x103,0xffff 0104 e004 | | Load 0x0,0x4 ; Debug Table 0x3.0x1 = 0x104,0xfffe 0105 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0106 BODY_0100: 0106 e004 | | Load 0x0,0x4 ; Debug Table 0x3.0x2 = 0x106,0x1 0107 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0108 e004 | | Load 0x0,0x4 0109 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 010a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 010b e7ff | | Load 0x3,-0x1 010c e004 | | Load 0x0,0x4 010d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 010e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 010f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0110 0059 | Y | Store_Top Discrete,At_Offset_1 0111 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x3 = 0x111,0x2 0112 0b00 | | Execute_Immediate Case_Compare,0x0 0113 7002 |p | Jump_Nonzero 0x116 0114 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x4 = 0x114,0x4 0115 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0116 e7ff | | Load 0x3,-0x1 ; Debug Table 0x3.0x5 = 0x116,0x3 0117 4974 |It | Short_Literal 0x174 0118 00eb | | Load_Encached Diana_Cache 0119 0098 | | Execute Package,Field_Read_Dynamic 011a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 011b 00db | | Load_Top At_Offset_3 011c 021f | | Execute Heap_Access,Equal 011d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 011e 0000 0000 | | .XXX[0x2] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0124 | $ | .CONST 0x0124 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0002 | | .CONST 0x0002 ; Number of locals 0123 INIT_0120: 0123 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x0123,0x07ac,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0134 ; Debug Table 0x4.0x0 = 0x123,0xffff 0124 BODY_0120: 0124 0007 | | Action Break_Optional ; Debug Table 0x4.0x1 = 0x124,0x1 0125 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x2 = 0x125,0x401 0126 0007 | | Action Break_Optional 0127 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x3 = 0x127,0x402 0128 0007 | | Action Break_Optional ; Debug Table 0x4.0x4 = 0x128,0x403 0129 0007 | | Action Break_Optional ; Debug Table 0x4.0x5 = 0x129,0x404 012a 0b29 | ) | Execute_Immediate Case_Compare,0x29 ; Debug Table 0x4.0x6 = 0x12a,0x1 012b 7008 |p | Jump_Nonzero 0x134 012c 0b2c | , | Execute_Immediate Case_Compare,0x2c 012d 701f |p | Jump_Nonzero 0x14d 012e 0b21 | ! | Execute_Immediate Case_Compare,0x21 012f 701d |p | Jump_Nonzero 0x14d 0130 0b33 | 3 | Execute_Immediate Case_Compare,0x33 0131 701b |p | Jump_Nonzero 0x14d 0132 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x7 = 0x132,0xa 0133 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0134 e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x8 = 0x134,0x2 0135 00eb | | Load_Encached Diana_Cache 0136 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0137 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0138 0007 | | Action Break_Optional ; Debug Table 0x4.0x9 = 0x138,0x3 0139 e602 | | Load 0x3,0x2 ; Debug Table 0x4.0xa = 0x139,0x801 013a 0007 | | Action Break_Optional 013b 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0xb = 0x13b,0x802 013c 0007 | | Action Break_Optional ; Debug Table 0x4.0xc = 0x13c,0x803 013d 0007 | | Action Break_Optional ; Debug Table 0x4.0xd = 0x13d,0x804 013e 0b3e | > | Execute_Immediate Case_Compare,0x3e ; Debug Table 0x4.0xe = 0x13e,0x3 013f 7002 |p | Jump_Nonzero 0x142 0140 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xf = 0x140,0x5 0141 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0142 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x10 = 0x142,0x4 0143 00eb | | Load_Encached Diana_Cache 0144 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 0145 e605 | | Load 0x3,0x5 ; Debug Table 0x4.0x11 = 0x145,0xc01 0146 0007 | | Action Break_Optional 0147 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x12 = 0x147,0xc02 0148 0007 | | Action Break_Optional ; Debug Table 0x4.0x13 = 0x148,0xc03 0149 00d0 | | Action Swap_Control ; Debug Table 0x4.0x14 = 0x149,0xc04 014a 00d1 | | Pop_Control Pop_Count_1 014b 0f36 | 6 | Execute_Immediate Equal,0x36 ; Debug Table 0x4.0x15 = 0x14b,0x4 014c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 014d e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x16 = 0x14d,0x6 014e 00eb | | Load_Encached Diana_Cache 014f 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0150 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0151 0007 | | Action Break_Optional ; Debug Table 0x4.0x17 = 0x151,0x7 0152 e602 | | Load 0x3,0x2 ; Debug Table 0x4.0x18 = 0x152,0x1001 0153 0007 | | Action Break_Optional 0154 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x19 = 0x154,0x1002 0155 0007 | | Action Break_Optional ; Debug Table 0x4.0x1a = 0x155,0x1003 0156 0007 | | Action Break_Optional ; Debug Table 0x4.0x1b = 0x156,0x1004 0157 0b3d | = | Execute_Immediate Case_Compare,0x3d ; Debug Table 0x4.0x1c = 0x157,0x7 0158 7002 |p | Jump_Nonzero 0x15b 0159 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1d = 0x159,0x9 015a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 015b 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x1e = 0x15b,0x8 015c 00eb | | Load_Encached Diana_Cache 015d 18e4 | | Execute Package,Field_Execute,Field_Number 0xe4 015e e605 | | Load 0x3,0x5 ; Debug Table 0x4.0x1f = 0x15e,0x1401 015f 0007 | | Action Break_Optional 0160 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x4.0x20 = 0x160,0x1402 0161 0007 | | Action Break_Optional ; Debug Table 0x4.0x21 = 0x161,0x1403 0162 00d0 | | Action Swap_Control ; Debug Table 0x4.0x22 = 0x162,0x1404 0163 00d1 | | Pop_Control Pop_Count_1 0164 0f36 | 6 | Execute_Immediate Equal,0x36 ; Debug Table 0x4.0x23 = 0x164,0x8 0165 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0166 0000 0000 | | .XXX[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 0x5 = .DEBUG 0x016b,0x07f6,0x0002,0x0000,0x0057,0x93a5,0x0000,0x01c6 ; Debug Table 0x5.0x0 = 0x16b,0x1 016c 840c | | Call 0x2,0xc 016d 6838 |h8 | Jump_Zero 0x1a6 016e 0007 | | Action Break_Optional ; Debug Table 0x5.0x1 = 0x16e,0x2 016f 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x2 = 0x16f,0xfbff 0170 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x3 = 0x170,0xfbfe 0171 e7ff | | Load 0x3,-0x1 ; Debug Table 0x5.0x4 = 0x171,0xfbfd 0172 e004 | | Load 0x0,0x4 0173 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0174 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0175 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x5 = 0x175,0x401 0176 00d9 | | Load_Top At_Offset_1 0177 0092 0601 | | Action Push_String_Extended,0x601 ; "[BLOCK]." 0179 e00f | | Load 0x0,0xf 017a 181f | | Execute Package,Field_Execute,Field_Number 0x1f 017b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 017c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x6 = 0x17c,0x402 017d 0c01 | | Execute_Immediate Greater_Equal,0x1 017e 6808 |h | Jump_Zero 0x187 017f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x7 = 0x17f,0x403 0180 0a01 | | Execute_Immediate Plus,0x1 0181 0248 | H | Execute Discrete,Check_In_Integer 0182 00d9 | | Load_Top At_Offset_1 0183 01dc | | Execute Vector,Last 0184 00da | | Load_Top At_Offset_2 0185 01cf | | Execute Vector,Slice_Read 0186 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0187 e5fd | | Load 0x2,-0x3 ; Debug Table 0x5.0x8 = 0x187,0x404 0188 701b |p | Jump_Nonzero 0x1a4 0189 e7ff | | Load 0x3,-0x1 ; Debug Table 0x5.0x9 = 0x189,0x801 018a 0007 | | Action Break_Optional 018b 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x5.0xa = 0x18b,0x802 018c 0007 | | Action Break_Optional ; Debug Table 0x5.0xb = 0x18c,0x803 018d 0007 | | Action Break_Optional ; Debug Table 0x5.0xc = 0x18d,0x804 018e e408 | | Load 0x2,0x8 ; Debug Table 0x5.0xd = 0x18e,0x404 018f 021f | | Execute Heap_Access,Equal 0190 6813 |h | Jump_Zero 0x1a4 0191 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xe = 0x191,0x405 0192 00d9 | | Load_Top At_Offset_1 0193 482e |H. | Short_Literal 0x2e 0194 e00f | | Load 0x0,0xf 0195 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0196 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0197 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0xf = 0x197,0x406 0198 0c01 | | Execute_Immediate Greater_Equal,0x1 0199 6808 |h | Jump_Zero 0x1a2 019a 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x10 = 0x19a,0x407 019b 0a01 | | Execute_Immediate Plus,0x1 019c 0248 | H | Execute Discrete,Check_In_Integer 019d 00d9 | | Load_Top At_Offset_1 019e 01dc | | Execute Vector,Last 019f 00da | | Load_Top At_Offset_2 01a0 01cf | | Execute Vector,Slice_Read 01a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x11 = 0x1a2,0x408 01a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x12 = 0x1a4,0x409 01a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01a6 0007 | | Action Break_Optional ; Debug Table 0x5.0x13 = 0x1a6,0x3 01a7 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x14 = 0x1a7,0xf3ff 01a8 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x15 = 0x1a8,0xf3fe 01a9 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x5.0x16 = 0x1a9,0xf3fd 01aa e7ff | | Load 0x3,-0x1 ; Debug Table 0x5.0x17 = 0x1aa,0xf3fc 01ab e004 | | Load 0x0,0x4 01ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 01ad 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 01ae e7ff | | Load 0x3,-0x1 ; Debug Table 0x5.0x18 = 0x1ae,0xc01 01af 4974 |It | Short_Literal 0x174 01b0 00eb | | Load_Encached Diana_Cache 01b1 0098 | | Execute Package,Field_Read_Dynamic 01b2 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01b3 a602 | | Store_Unchecked 0x3,0x2 01b4 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x19 = 0x1b4,0xc02 01b5 e010 | | Load 0x0,0x10 01b6 180e | | Execute Package,Field_Execute,Field_Number 0xe 01b7 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01b8 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x1a = 0x1b8,0xc03 01b9 840d | | Call 0x2,0xd 01ba 6812 |h | Jump_Zero 0x1cd 01bb 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x1b = 0x1bb,0xc04 01bc 00d9 | | Load_Top At_Offset_1 01bd 482e |H. | Short_Literal 0x2e 01be e00f | | Load 0x0,0xf 01bf 181e | | Execute Package,Field_Execute,Field_Number 0x1e 01c0 0a01 | | Execute_Immediate Plus,0x1 01c1 005a | Z | Store_Top Discrete,At_Offset_2 01c2 482e |H. | Short_Literal 0x2e ; Debug Table 0x5.0x1c = 0x1c2,0xc05 01c3 00db | | Load_Top At_Offset_3 01c4 840e | | Call 0x2,0xe 01c5 01cb | | Execute Vector,Append 01c6 00da | | Load_Top At_Offset_2 01c7 00da | | Load_Top At_Offset_2 01c8 01dc | | Execute Vector,Last 01c9 00db | | Load_Top At_Offset_3 01ca 01cf | | Execute Vector,Slice_Read 01cb 01cc | | Execute Vector,Catenate 01cc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01cd 61c2 |a | Indirect_Literal Discrete,0x390,{0x00000000, 0x5793a502} ; Debug Table 0x5.0x1d = 0x1cd,0xc06 01ce 0257 | W | Execute Discrete,Raise 01cf 0000 | | .XXX[0x1] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x01d3,0x0834,0x0002,0x0000,0x0057,0x93a5,0x0000,0x02b3 ; Debug Table 0x6.0x0 = 0x1d3,0x1 01d4 01db | | Execute Vector,Length 01d5 0d03 | | Execute_Immediate Less,0x3 01d6 6819 |h | Jump_Zero 0x1f0 01d7 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x1 = 0x1d7,0x2 01d8 01dd | | Execute Vector,First 01d9 00db | | Load_Top At_Offset_3 01da 01d7 | | Execute Vector,Field_Read 01db 0b2b | + | Execute_Immediate Case_Compare,0x2b 01dc 7009 |p | Jump_Nonzero 0x1e6 01dd 0b2d | - | Execute_Immediate Case_Compare,0x2d 01de 7007 |p | Jump_Nonzero 0x1e6 01df 0b3d | = | Execute_Immediate Case_Compare,0x3d 01e0 7005 |p | Jump_Nonzero 0x1e6 01e1 0b3c | < | Execute_Immediate Case_Compare,0x3c 01e2 7003 |p | Jump_Nonzero 0x1e6 01e3 0b3e | > | Execute_Immediate Case_Compare,0x3e 01e4 7001 |p | Jump_Nonzero 0x1e6 01e5 7809 |x | Jump 0x1ef ; Debug Table 0x6.0x2 = 0x1e5,0x4 01e6 4822 |H" | Short_Literal 0x22 ; Debug Table 0x6.0x3 = 0x1e6,0x3 01e7 4822 |H" | Short_Literal 0x22 01e8 e7ff | | Load 0x3,-0x1 01e9 01ca | | Execute Vector,Prepend 01ea 01cb | | Execute Vector,Append 01eb 4817 |H | Short_Literal 0x17 01ec 00eb | | Load_Encached Diana_Cache 01ed 187a | z | Execute Package,Field_Execute,Field_Number 0x7a 01ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ef 00d1 | | Pop_Control Pop_Count_1 01f0 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x4 = 0x1f0,0x5 01f1 4817 |H | Short_Literal 0x17 01f2 00eb | | Load_Encached Diana_Cache 01f3 187a | z | Execute Package,Field_Execute,Field_Number 0x7a 01f4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01f5 0000 0000 | | .XXX[0x3] 01f7 0000 | | 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x01fb,0x0840,0x0002,0x0000,0x0057,0x93a5,0x0000,0x02fd ; Debug Table 0x7.0x0 = 0x1fb,0x1 01fc 01dd | | Execute Vector,First 01fd 00db | | Load_Top At_Offset_3 01fe 01dc | | Execute Vector,Last 01ff 0264 | d | Execute Discrete,Below_Bound 0200 7022 |p" | Jump_Nonzero 0x223 0201 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x1 = 0x201,0x2 0202 e7ff | | Load 0x3,-0x1 0203 01d7 | | Execute Vector,Field_Read 0204 0f2e | . | Execute_Immediate Equal,0x2e 0205 6814 |h | Jump_Zero 0x21a 0206 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x2 = 0x206,0x3 0207 0a01 | | Execute_Immediate Plus,0x1 0208 0248 | H | Execute Discrete,Check_In_Integer 0209 e7ff | | Load 0x3,-0x1 020a 01dc | | Execute Vector,Last 020b e7ff | | Load 0x3,-0x1 020c 01cf | | Execute Vector,Slice_Read 020d 840f | | Call 0x2,0xf 020e e7ff | | Load 0x3,-0x1 020f 01dd | | Execute Vector,First 0210 00da | | Load_Top At_Offset_2 0211 0aff | | Execute_Immediate Plus,-0x1 0212 0248 | H | Execute Discrete,Check_In_Integer 0213 e7ff | | Load 0x3,-0x1 0214 01cf | | Execute Vector,Slice_Read 0215 8410 | | Call 0x2,0x10 0216 4812 |H | Short_Literal 0x12 0217 00eb | | Load_Encached Diana_Cache 0218 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 0219 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 021a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x3 = 0x21a,0x4 021b e7ff | | Load 0x3,-0x1 021c 01dd | | Execute Vector,First 021d 027f | | Execute Discrete,Equal 021e 6803 |h | Jump_Zero 0x222 021f e7ff | | Load 0x3,-0x1 ; Debug Table 0x7.0x4 = 0x21f,0x5 0220 840f | | Call 0x2,0xf 0221 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0222 37de |7 | Loop_Decreasing 0x201 0223 4831 |H1 | Short_Literal 0x31 0224 0257 | W | Execute Discrete,Raise 0225 0000 0000 | | .XXX[0x3] 0227 0000 | | 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022c | , | .CONST 0x022c ; Address of begin 0229 0234 | 4 | .CONST 0x0234 ; Address of exception handler 022a 0002 | | .CONST 0x0002 ; Number of locals 022b INIT_0228: 022b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8 = .DEBUG 0x022b,0x084c,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0355 ; Debug Table 0x8.0x0 = 0x22b,0xffff 022c BODY_0228: 022c 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1 = 0x22c,0x1 022d e40a | | Load 0x2,0xa 022e e409 | | Load 0x2,0x9 022f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0230 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0231 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x2 = 0x231,0x2 0232 840b | | Call 0x2,0xb 0233 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0234 TRAP_0228: 0234 e409 | | Load 0x2,0x9 0235 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0236 010f | | Execute Exception,Equal 0237 680d |h | Jump_Zero 0x245 0238 e7ff | | Load 0x3,-0x1 ; Debug Table 0x8.0x3 = 0x238,0x3 0239 840e | | Call 0x2,0xe 023a 8410 | | Call 0x2,0x10 023b 0032 | 2 | Store_Top Heap_Access,At_Offset_2 023c 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x4 = 0x23c,0x4 023d 00da | | Load_Top At_Offset_2 023e e7ff | | Load 0x3,-0x1 023f e40a | | Load 0x2,0xa 0240 e409 | | Load 0x2,0x9 0241 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0242 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x5 = 0x242,0x5 0243 840b | | Call 0x2,0xb 0244 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0245 0100 | | Execute Exception,Raise 0246 0000 0000 | | .XXX[0x2] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024c | L | .CONST 0x024c ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0002 | | .CONST 0x0002 ; Number of locals 024b INIT_0248: 024b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x024b,0x085a,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0397 ; Debug Table 0x9.0x0 = 0x24b,0xffff 024c BODY_0248: 024c 0092 0602 | | Action Push_String_Extended,0x602 ; "STANDARD" ; Debug Table 0x9.0x1 = 0x24c,0x1 024e 4817 |H | Short_Literal 0x17 024f 00eb | | Load_Encached Diana_Cache 0250 187a | z | Execute Package,Field_Execute,Field_Number 0x7a 0251 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0252 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x2 = 0x252,0x2 0253 840b | | Call 0x2,0xb 0254 00d9 | | Load_Top At_Offset_1 0255 4812 |H | Short_Literal 0x12 0256 00eb | | Load_Encached Diana_Cache 0257 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 0258 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0259 0000 0000 | | .BLANK 0000[0x7] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 026e | n | .CONST 0x026e ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 e407 | | Load 0x2,0x7 ; Debug Table 0xa = .DEBUG 0x0263,0x0862,0x0002,0x0000,0x0057,0x93a5,0x0000,0x03c8 ; Debug Table 0xa.0x0 = 0x263,0x1 0264 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0265 4800 |H | Short_Literal 0x0 0266 e7ff | | Load 0x3,-0x1 0267 4976 |Iv | Short_Literal 0x176 0268 00eb | | Load_Encached Diana_Cache 0269 0098 | | Execute Package,Field_Read_Dynamic 026a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 026b e011 | | Load 0x0,0x11 026c 180e | | Execute Package,Field_Execute,Field_Number 0xe 026d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 026e TRAP_0260: 026e 0007 | | Action Break_Optional 026f 0007 | | Action Break_Optional ; Debug Table 0xa.0x1 = 0x26f,0x2 0270 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x2 = 0x270,0x401 0271 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xa.0x3 = 0x271,0x2 0272 0000 0000 | | .BLANK 0000[0x6] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027c | | | .CONST 0x027c ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0002 | | .CONST 0x0002 ; Number of locals 027b INIT_0278: 027b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb = .DEBUG 0x027b,0x086c,0x0002,0x0000,0x0057,0x93a5,0x0000,0x03f9 ; Debug Table 0xb.0x0 = 0x27b,0xffff 027c BODY_0278: 027c 0007 | | Action Break_Optional ; Debug Table 0xb.0x1 = 0x27c,0x1 027d e7ff | | Load 0x3,-0x1 ; Debug Table 0xb.0x2 = 0x27d,0x401 027e 0007 | | Action Break_Optional 027f 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xb.0x3 = 0x27f,0x402 0280 0007 | | Action Break_Optional ; Debug Table 0xb.0x4 = 0x280,0x403 0281 0007 | | Action Break_Optional ; Debug Table 0xb.0x5 = 0x281,0x404 0282 0007 | | Action Break_Optional ; Debug Table 0xb.0x6 = 0x282,0x1 0283 e7fe | | Load 0x3,-0x2 ; Debug Table 0xb.0x7 = 0x283,0x801 0284 0007 | | Action Break_Optional 0285 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xb.0x8 = 0x285,0x802 0286 0007 | | Action Break_Optional ; Debug Table 0xb.0x9 = 0x286,0x803 0287 0007 | | Action Break_Optional ; Debug Table 0xb.0xa = 0x287,0x804 0288 021e | | Execute Heap_Access,Maximum ; Debug Table 0xb.0xb = 0x288,0x404 0289 6802 |h | Jump_Zero 0x28c 028a 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0xc = 0x28a,0x2 028b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 028c e7fe | | Load 0x3,-0x2 ; Debug Table 0xb.0xd = 0x28c,0x3 028d 0031 | 1 | Store_Top Heap_Access,At_Offset_1 028e 780a |x | Jump 0x299 028f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xe = 0x28f,0x5 0290 e7ff | | Load 0x3,-0x1 0291 021f | | Execute Heap_Access,Equal 0292 6802 |h | Jump_Zero 0x295 0293 4801 |H | Short_Literal 0x1 ; Debug Table 0xb.0xf = 0x293,0x6 0294 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0295 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x10 = 0x295,0x7 0296 00eb | | Load_Encached Diana_Cache 0297 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0298 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0299 0007 | | Action Break_Optional ; Debug Table 0xb.0x11 = 0x299,0x4 029a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x12 = 0x29a,0xc01 029b 021d | | Execute Heap_Access,Is_Null 029c 6ff2 |o | Jump_Zero 0x28f ; Debug Table 0xb.0x13 = 0x29c,0x4 029d 4800 |H | Short_Literal 0x0 ; Debug Table 0xb.0x14 = 0x29d,0x8 029e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 029f 0000 | | .XXX[0x1] 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; SUBPROGRAM 02a0 ; -------------------------------------------------------------------------------------- 02a0 02af | | .CONST 0x02af ; Address of begin 02a1 0004 | | .CONST 0x0004 ; Address of exception handler 02a2 0007 | | .CONST 0x0007 ; Number of locals 02a3 INIT_02a0: 02a3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc = .DEBUG 0x02a3,0x0898,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0450 ; Debug Table 0xc.0x0 = 0x2a3,0xffff 02a4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x1 = 0x2a4,0xfffe 02a5 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x2 = 0x2a5,0xfffd 02a6 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x3 = 0x2a6,0xfffc 02a7 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x4 = 0x2a7,0xfffb 02a8 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 02a9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02aa 02c7 | | Declare_Variable Any 02ab 00d8 | | Load_Top At_Offset_0 02ac 1c00 | | Execute_Immediate Run_Utility,0x0 02ad e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x5 = 0x2ad,0xfffa 02ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02af BODY_02a0: 02af e7ff | | Load 0x3,-0x1 ; Debug Table 0xc.0x6 = 0x2af,0x1 02b0 a602 | | Store_Unchecked 0x3,0x2 02b1 e602 | | Load 0x3,0x2 ; Debug Table 0xc.0x7 = 0x2b1,0x2 02b2 00eb | | Load_Encached Diana_Cache 02b3 18ec | | Execute Package,Field_Execute,Field_Number 0xec 02b4 a603 | | Store_Unchecked 0x3,0x3 02b5 0007 | | Action Break_Optional ; Debug Table 0xc.0x8 = 0x2b5,0x3 02b6 0007 | | Action Break_Optional ; Debug Table 0xc.0x9 = 0x2b6,0x4 02b7 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0xa = 0x2b7,0x401 02b8 0007 | | Action Break_Optional 02b9 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xc.0xb = 0x2b9,0x402 02ba 0007 | | Action Break_Optional ; Debug Table 0xc.0xc = 0x2ba,0x403 02bb 0007 | | Action Break_Optional ; Debug Table 0xc.0xd = 0x2bb,0x404 02bc 0b00 | | Execute_Immediate Case_Compare,0x0 ; Debug Table 0xc.0xe = 0x2bc,0x4 02bd 7017 |p | Jump_Nonzero 0x2d5 02be 0b84 | | Execute_Immediate Case_Compare,0x84 02bf 7017 |p | Jump_Nonzero 0x2d7 02c0 0b95 | | Execute_Immediate Case_Compare,0x95 02c1 7018 |p | Jump_Nonzero 0x2da 02c2 0b48 | H | Execute_Immediate Case_Compare,0x48 02c3 7019 |p | Jump_Nonzero 0x2dd 02c4 0b47 | G | Execute_Immediate Case_Compare,0x47 02c5 7017 |p | Jump_Nonzero 0x2dd 02c6 0b8c | | Execute_Immediate Case_Compare,0x8c 02c7 7026 |p& | Jump_Nonzero 0x2ee 02c8 0b91 | | Execute_Immediate Case_Compare,0x91 02c9 7024 |p$ | Jump_Nonzero 0x2ee 02ca 0b7b | { | Execute_Immediate Case_Compare,0x7b 02cb 7028 |p( | Jump_Nonzero 0x2f4 02cc 0b7a | z | Execute_Immediate Case_Compare,0x7a 02cd 7026 |p& | Jump_Nonzero 0x2f4 02ce 0b41 | A | Execute_Immediate Case_Compare,0x41 02cf 705d |p] | Jump_Nonzero 0x32d 02d0 0b97 | | Execute_Immediate Case_Compare,0x97 02d1 7061 |pa | Jump_Nonzero 0x333 02d2 0b89 | | Execute_Immediate Case_Compare,0x89 02d3 706b |pk | Jump_Nonzero 0x33f 02d4 787d |x} | Jump 0x352 ; Debug Table 0xc.0xf = 0x2d4,0x23 02d5 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xc.0x10 = 0x2d5,0x5 02d6 7883 |x | Jump 0x35a 02d7 0007 | | Action Break_Optional ; Debug Table 0xc.0x11 = 0x2d7,0x6 02d8 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x12 = 0x2d8,0x801 02d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xc.0x13 = 0x2d9,0x6 02da 0007 | | Action Break_Optional ; Debug Table 0xc.0x14 = 0x2da,0x7 02db 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x15 = 0x2db,0xc01 02dc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xc.0x16 = 0x2dc,0x7 02dd e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x17 = 0x2dd,0x8 02de 00eb | | Load_Encached Diana_Cache 02df 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 02e0 a605 | | Store_Unchecked 0x3,0x5 02e1 0007 | | Action Break_Optional ; Debug Table 0xc.0x18 = 0x2e1,0x9 02e2 e605 | | Load 0x3,0x5 ; Debug Table 0xc.0x19 = 0x2e2,0x1001 02e3 0007 | | Action Break_Optional 02e4 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xc.0x1a = 0x2e4,0x1002 02e5 0007 | | Action Break_Optional ; Debug Table 0xc.0x1b = 0x2e5,0x1003 02e6 0007 | | Action Break_Optional ; Debug Table 0xc.0x1c = 0x2e6,0x1004 02e7 0f77 | w | Execute_Immediate Equal,0x77 ; Debug Table 0xc.0x1d = 0x2e7,0x9 02e8 6803 |h | Jump_Zero 0x2ec 02e9 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x1e = 0x2e9,0xa 02ea 8413 | | Call 0x2,0x13 02eb a605 | | Store_Unchecked 0x3,0x5 02ec 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xc.0x1f = 0x2ec,0xb 02ed 786c |xl | Jump 0x35a 02ee e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x20 = 0x2ee,0xc 02ef 00eb | | Load_Encached Diana_Cache 02f0 18ec | | Execute Package,Field_Execute,Field_Number 0xec 02f1 a605 | | Store_Unchecked 0x3,0x5 02f2 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xc.0x21 = 0x2f2,0xd 02f3 7866 |xf | Jump 0x35a 02f4 0007 | | Action Break_Optional ; Debug Table 0xc.0x22 = 0x2f4,0xe 02f5 e7ff | | Load 0x3,-0x1 ; Debug Table 0xc.0x23 = 0x2f5,0x1401 02f6 0007 | | Action Break_Optional 02f7 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xc.0x24 = 0x2f7,0x1402 02f8 0007 | | Action Break_Optional ; Debug Table 0xc.0x25 = 0x2f8,0x1403 02f9 0007 | | Action Break_Optional ; Debug Table 0xc.0x26 = 0x2f9,0x1404 02fa 0b23 | # | Execute_Immediate Case_Compare,0x23 ; Debug Table 0xc.0x27 = 0x2fa,0xe 02fb 7005 |p | Jump_Nonzero 0x301 02fc 0b25 | % | Execute_Immediate Case_Compare,0x25 02fd 7003 |p | Jump_Nonzero 0x301 02fe 0b24 | $ | Execute_Immediate Case_Compare,0x24 02ff 7001 |p | Jump_Nonzero 0x301 0300 782a |x* | Jump 0x32b ; Debug Table 0xc.0x28 = 0x300,0x18 0301 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x29 = 0x301,0xf 0302 00eb | | Load_Encached Diana_Cache 0303 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0304 a604 | | Store_Unchecked 0x3,0x4 0305 0007 | | Action Break_Optional ; Debug Table 0xc.0x2a = 0x305,0x10 0306 e604 | | Load 0x3,0x4 ; Debug Table 0xc.0x2b = 0x306,0x1801 0307 0007 | | Action Break_Optional 0308 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xc.0x2c = 0x308,0x1802 0309 0007 | | Action Break_Optional ; Debug Table 0xc.0x2d = 0x309,0x1803 030a 0007 | | Action Break_Optional ; Debug Table 0xc.0x2e = 0x30a,0x1804 030b 0b48 | H | Execute_Immediate Case_Compare,0x48 ; Debug Table 0xc.0x2f = 0x30b,0x10 030c 7006 |p | Jump_Nonzero 0x313 030d 0b3d | = | Execute_Immediate Case_Compare,0x3d 030e 7014 |p | Jump_Nonzero 0x323 030f 0b41 | A | Execute_Immediate Case_Compare,0x41 0310 7015 |p | Jump_Nonzero 0x326 0311 48e2 |H | Short_Literal 0xe2 ; Debug Table 0xc.0x30 = 0x311,0x16 0312 0257 | W | Execute Discrete,Raise 0313 e604 | | Load 0x3,0x4 ; Debug Table 0xc.0x31 = 0x313,0x11 0314 00eb | | Load_Encached Diana_Cache 0315 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 0316 a605 | | Store_Unchecked 0x3,0x5 0317 0007 | | Action Break_Optional ; Debug Table 0xc.0x32 = 0x317,0x12 0318 e605 | | Load 0x3,0x5 ; Debug Table 0xc.0x33 = 0x318,0x1c01 0319 0007 | | Action Break_Optional 031a 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xc.0x34 = 0x31a,0x1c02 031b 0007 | | Action Break_Optional ; Debug Table 0xc.0x35 = 0x31b,0x1c03 031c 0007 | | Action Break_Optional ; Debug Table 0xc.0x36 = 0x31c,0x1c04 031d 0f77 | w | Execute_Immediate Equal,0x77 ; Debug Table 0xc.0x37 = 0x31d,0x12 031e 6809 |h | Jump_Zero 0x328 031f e604 | | Load 0x3,0x4 ; Debug Table 0xc.0x38 = 0x31f,0x13 0320 8413 | | Call 0x2,0x13 0321 a605 | | Store_Unchecked 0x3,0x5 0322 7805 |x | Jump 0x328 0323 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x39 = 0x323,0x14 0324 a605 | | Store_Unchecked 0x3,0x5 0325 7802 |x | Jump 0x328 0326 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x3a = 0x326,0x15 0327 a605 | | Store_Unchecked 0x3,0x5 0328 00d1 | | Pop_Control Pop_Count_1 0329 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0xc.0x3b = 0x329,0x17 032a 782f |x/ | Jump 0x35a 032b 00d1 | | Pop_Control Pop_Count_1 032c 7825 |x% | Jump 0x352 032d e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x3c = 0x32d,0x19 032e 00eb | | Load_Encached Diana_Cache 032f 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 0330 a605 | | Store_Unchecked 0x3,0x5 0331 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xc.0x3d = 0x331,0x1a 0332 7827 |x' | Jump 0x35a 0333 0007 | | Action Break_Optional ; Debug Table 0xc.0x3e = 0x333,0x1b 0334 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x3f = 0x334,0x2001 0335 0007 | | Action Break_Optional 0336 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xc.0x40 = 0x336,0x2002 0337 0007 | | Action Break_Optional ; Debug Table 0xc.0x41 = 0x337,0x2003 0338 0007 | | Action Break_Optional ; Debug Table 0xc.0x42 = 0x338,0x2004 0339 0f4e | N | Execute_Immediate Equal,0x4e ; Debug Table 0xc.0x43 = 0x339,0x1b 033a 6817 |h | Jump_Zero 0x352 033b e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x44 = 0x33b,0x1c 033c a605 | | Store_Unchecked 0x3,0x5 033d 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xc.0x45 = 0x33d,0x1d 033e 781b |x | Jump 0x35a 033f e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x46 = 0x33f,0x1e 0340 00eb | | Load_Encached Diana_Cache 0341 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0342 a605 | | Store_Unchecked 0x3,0x5 0343 0007 | | Action Break_Optional ; Debug Table 0xc.0x47 = 0x343,0x1f 0344 e605 | | Load 0x3,0x5 ; Debug Table 0xc.0x48 = 0x344,0x2401 0345 0007 | | Action Break_Optional 0346 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xc.0x49 = 0x346,0x2402 0347 0007 | | Action Break_Optional ; Debug Table 0xc.0x4a = 0x347,0x2403 0348 0007 | | Action Break_Optional ; Debug Table 0xc.0x4b = 0x348,0x2404 0349 0b4e | N | Execute_Immediate Case_Compare,0x4e ; Debug Table 0xc.0x4c = 0x349,0x1f 034a 7004 |p | Jump_Nonzero 0x34f 034b 0b4f | O | Execute_Immediate Case_Compare,0x4f 034c 7004 |p | Jump_Nonzero 0x351 034d 48e2 |H | Short_Literal 0xe2 ; Debug Table 0xc.0x4d = 0x34d,0x22 034e 0257 | W | Execute Discrete,Raise 034f 00d2 | | Pop_Control Pop_Count_2 ; Debug Table 0xc.0x4e = 0x34f,0x20 0350 7809 |x | Jump 0x35a 0351 00d1 | | Pop_Control Pop_Count_1 0352 00d1 | | Pop_Control Pop_Count_1 0353 e603 | | Load 0x3,0x3 ; Debug Table 0xc.0x4f = 0x353,0x24 0354 a602 | | Store_Unchecked 0x3,0x2 0355 e602 | | Load 0x3,0x2 ; Debug Table 0xc.0x50 = 0x355,0x25 0356 00eb | | Load_Encached Diana_Cache 0357 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0358 a603 | | Store_Unchecked 0x3,0x3 0359 7f5c | \ | Jump 0x2b6 035a 0007 | | Action Break_Optional ; Debug Table 0xc.0x51 = 0x35a,0x26 035b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x52 = 0x35b,0x2801 035c 021d | | Execute Heap_Access,Is_Null 035d 682e |h. | Jump_Zero 0x38c ; Debug Table 0xc.0x53 = 0x35d,0x26 035e e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x54 = 0x35e,0x27 035f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0360 00da | | Load_Top At_Offset_2 0361 0120 | | Execute Any,Is_Value 0362 6804 |h | Jump_Zero 0x367 0363 e004 | | Load 0x0,0x4 0364 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0365 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0366 7801 |x | Jump 0x368 0367 00da | | Load_Top At_Offset_2 0368 e602 | | Load 0x3,0x2 0369 e004 | | Load 0x0,0x4 036a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 036b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 036c c606 | | Store 0x3,0x6 036d 0059 | Y | Store_Top Discrete,At_Offset_1 036e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x55 = 0x36e,0x28 036f 6803 |h | Jump_Zero 0x373 0370 0007 | | Action Break_Optional ; Debug Table 0xc.0x56 = 0x370,0x29 0371 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x57 = 0x371,0x2c01 0372 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xc.0x58 = 0x372,0x29 0373 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x59 = 0x373,0x2a 0374 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0375 e004 | | Load 0x0,0x4 0376 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0377 4800 |H | Short_Literal 0x0 0378 e407 | | Load 0x2,0x7 0379 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 037a 4800 |H | Short_Literal 0x0 037b e606 | | Load 0x3,0x6 037c e004 | | Load 0x0,0x4 037d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 037e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 037f e004 | | Load 0x0,0x4 0380 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 0381 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0382 c602 | | Store 0x3,0x2 0383 0059 | Y | Store_Top Discrete,At_Offset_1 0384 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x5a = 0x384,0x2b 0385 6803 |h | Jump_Zero 0x389 0386 0007 | | Action Break_Optional ; Debug Table 0xc.0x5b = 0x386,0x2c 0387 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x5c = 0x387,0x3001 0388 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xc.0x5d = 0x388,0x2c 0389 e602 | | Load 0x3,0x2 ; Debug Table 0xc.0x5e = 0x389,0x2d 038a 8415 | | Call 0x2,0x15 038b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 038c 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x5f = 0x38c,0x2e 038d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 038e 0000 0000 | | .XXX[0x2] 0390 0000 0000 | | .LITERAL {0x00000000, 0x5793a502} 0394 0000 0000 | | .LITERAL {0x00000000, 0x5793a501} 0398 0000 0000 | | .XXX[0x4] 039a 0057 93a5 | W | 039c 0000 0000 | | .BLANK 0000[0x4] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a5 | | .CONST 0x03a5 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0002 | | .CONST 0x0002 ; Number of locals 03a3 INIT_03a0: 03a3 00eb | | Load_Encached Diana_Cache ; Debug Table 0xd = .DEBUG 0x03a3,0x095a,0x0002,0x0000,0x0057,0x93a5,0x0000,0x061d ; Debug Table 0xd.0x0 = 0x3a3,0xffff 03a4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03a5 BODY_03a0: 03a5 0007 | | Action Break_Optional ; Debug Table 0xd.0x1 = 0x3a5,0x1 03a6 e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0x2 = 0x3a6,0x401 03a7 0007 | | Action Break_Optional 03a8 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xd.0x3 = 0x3a8,0x402 03a9 0007 | | Action Break_Optional ; Debug Table 0xd.0x4 = 0x3a9,0x403 03aa 0007 | | Action Break_Optional ; Debug Table 0xd.0x5 = 0x3aa,0x404 03ab 0b7c | | | Execute_Immediate Case_Compare,0x7c ; Debug Table 0xd.0x6 = 0x3ab,0x1 03ac 7006 |p | Jump_Nonzero 0x3b3 03ad 0b7a | z | Execute_Immediate Case_Compare,0x7a 03ae 7006 |p | Jump_Nonzero 0x3b5 03af 0b7b | { | Execute_Immediate Case_Compare,0x7b 03b0 7004 |p | Jump_Nonzero 0x3b5 03b1 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x7 = 0x3b1,0x5 03b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03b3 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x8 = 0x3b3,0x2 03b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03b5 e7ff | | Load 0x3,-0x1 ; Debug Table 0xd.0x9 = 0x3b5,0x3 03b6 00eb | | Load_Encached Diana_Cache 03b7 18ec | | Execute Package,Field_Execute,Field_Number 0xec 03b8 e604 | | Load 0x3,0x4 ; Debug Table 0xd.0xa = 0x3b8,0x801 03b9 0007 | | Action Break_Optional 03ba 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xd.0xb = 0x3ba,0x802 03bb 0007 | | Action Break_Optional ; Debug Table 0xd.0xc = 0x3bb,0x803 03bc 00d0 | | Action Swap_Control ; Debug Table 0xd.0xd = 0x3bc,0x804 03bd 00d1 | | Pop_Control Pop_Count_1 03be 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 ; Debug Table 0xd.0xe = 0x3be,0x3 03bf 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0xf = 0x3bf,0x4 03c0 0f41 | A | Execute_Immediate Equal,0x41 03c1 7003 |p | Jump_Nonzero 0x3c5 03c2 00d9 | | Load_Top At_Offset_1 03c3 0f3d | = | Execute_Immediate Equal,0x3d 03c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03c5 4801 |H | Short_Literal 0x1 03c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03c7 0000 | | .XXX[0x1] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03ce | | .CONST 0x03ce ; Address of begin 03c9 040c | | .CONST 0x040c ; Address of exception handler 03ca 0004 | | .CONST 0x0004 ; Number of locals 03cb INIT_03c8: 03cb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe = .DEBUG 0x03cb,0x097c,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0670 ; Debug Table 0xe.0x0 = 0x3cb,0xffff 03cc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe.0x1 = 0x3cc,0xfffe 03cd 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe.0x2 = 0x3cd,0xfffd 03ce BODY_03c8: 03ce e7ff | | Load 0x3,-0x1 ; Debug Table 0xe.0x3 = 0x3ce,0x1 03cf 8415 | | Call 0x2,0x15 03d0 0032 | 2 | Store_Top Heap_Access,At_Offset_2 03d1 0007 | | Action Break_Optional ; Debug Table 0xe.0x4 = 0x3d1,0x2 03d2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x5 = 0x3d2,0x401 03d3 021d | | Execute Heap_Access,Is_Null 03d4 6802 |h | Jump_Zero 0x3d7 ; Debug Table 0xe.0x6 = 0x3d4,0x2 03d5 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x7 = 0x3d5,0x3 03d6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03d7 e7fe | | Load 0x3,-0x2 ; Debug Table 0xe.0x8 = 0x3d7,0x4 03d8 8415 | | Call 0x2,0x15 03d9 0031 | 1 | Store_Top Heap_Access,At_Offset_1 03da 0007 | | Action Break_Optional ; Debug Table 0xe.0x9 = 0x3da,0x5 03db 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0xa = 0x3db,0x801 03dc 021d | | Execute Heap_Access,Is_Null 03dd 6802 |h | Jump_Zero 0x3e0 ; Debug Table 0xe.0xb = 0x3dd,0x5 03de 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0xc = 0x3de,0x6 03df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03e0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0xd = 0x3e0,0x7 03e1 00da | | Load_Top At_Offset_2 03e2 8414 | | Call 0x2,0x14 03e3 6802 |h | Jump_Zero 0x3e6 03e4 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0xe = 0x3e4,0x8 03e5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03e6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0xf = 0x3e6,0x9 03e7 8416 | | Call 0x2,0x16 03e8 6821 |h! | Jump_Zero 0x40a 03e9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x10 = 0x3e9,0xa 03ea 00eb | | Load_Encached Diana_Cache 03eb 18ec | | Execute Package,Field_Execute,Field_Number 0xec 03ec 8413 | | Call 0x2,0x13 03ed 0033 | 3 | Store_Top Heap_Access,At_Offset_3 03ee 0007 | | Action Break_Optional ; Debug Table 0xe.0x11 = 0x3ee,0xb 03ef 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x12 = 0x3ef,0xc01 03f0 021d | | Execute Heap_Access,Is_Null 03f1 6812 |h | Jump_Zero 0x404 ; Debug Table 0xe.0x13 = 0x3f1,0xb 03f2 0007 | | Action Break_Optional ; Debug Table 0xe.0x14 = 0x3f2,0xc 03f3 e603 | | Load 0x3,0x3 ; Debug Table 0xe.0x15 = 0x3f3,0x1001 03f4 0007 | | Action Break_Optional 03f5 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xe.0x16 = 0x3f5,0x1002 03f6 0007 | | Action Break_Optional ; Debug Table 0xe.0x17 = 0x3f6,0x1003 03f7 0007 | | Action Break_Optional ; Debug Table 0xe.0x18 = 0x3f7,0x1004 03f8 0007 | | Action Break_Optional ; Debug Table 0xe.0x19 = 0x3f8,0xc 03f9 e604 | | Load 0x3,0x4 ; Debug Table 0xe.0x1a = 0x3f9,0x1401 03fa 0007 | | Action Break_Optional 03fb 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xe.0x1b = 0x3fb,0x1402 03fc 0007 | | Action Break_Optional ; Debug Table 0xe.0x1c = 0x3fc,0x1403 03fd 0007 | | Action Break_Optional ; Debug Table 0xe.0x1d = 0x3fd,0x1404 03fe 021f | | Execute Heap_Access,Equal ; Debug Table 0xe.0x1e = 0x3fe,0x1004 03ff 6802 |h | Jump_Zero 0x402 0400 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x1f = 0x400,0xd 0401 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0402 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x20 = 0x402,0xe 0403 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0404 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x21 = 0x404,0xf 0405 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0406 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x22 = 0x406,0x10 0407 00da | | Load_Top At_Offset_2 0408 8414 | | Call 0x2,0x14 0409 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 040a 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x23 = 0x40a,0x11 040b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 040c TRAP_03c8: 040c 0007 | | Action Break_Optional 040d e00b | | Load 0x0,0xb ; Debug Table 0xe.0x24 = 0x40d,0x12 040e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 040f 0092 0603 | | Action Push_String_Extended,0x603 ; "Exception in Expand_Names.In_Same_Scope: " ; Debug Table 0xe.0x25 = 0x40f,0x13 0411 e00c | | Load 0x0,0xc 0412 180d | | Execute Package,Field_Execute,Field_Number 0xd 0413 01cc | | Execute Vector,Catenate 0414 e00b | | Load 0x0,0xb 0415 180f | | Execute Package,Field_Execute,Field_Number 0xf 0416 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x26 = 0x416,0x14 0417 0101 | | Execute Exception,Reraise 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 041d | | .CONST 0x041d ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 0003 | | .CONST 0x0003 ; Number of locals 041b INIT_0418: 041b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf = .DEBUG 0x041b,0x09cc,0x0002,0x0000,0x0057,0x93a5,0x0000,0x071e ; Debug Table 0xf.0x0 = 0x41b,0xffff 041c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x1 = 0x41c,0xfffe 041d BODY_0418: 041d 0007 | | Action Break_Optional ; Debug Table 0xf.0x2 = 0x41d,0x1 041e e7ff | | Load 0x3,-0x1 ; Debug Table 0xf.0x3 = 0x41e,0x401 041f 0007 | | Action Break_Optional 0420 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xf.0x4 = 0x420,0x402 0421 0007 | | Action Break_Optional ; Debug Table 0xf.0x5 = 0x421,0x403 0422 0007 | | Action Break_Optional ; Debug Table 0xf.0x6 = 0x422,0x404 0423 0b15 | | Execute_Immediate Case_Compare,0x15 ; Debug Table 0xf.0x7 = 0x423,0x1 0424 7005 |p | Jump_Nonzero 0x42a 0425 0b14 | | Execute_Immediate Case_Compare,0x14 0426 701e |p | Jump_Nonzero 0x445 0427 0007 | | Action Break_Optional ; Debug Table 0xf.0x8 = 0x427,0xa 0428 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x9 = 0x428,0x801 0429 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xf.0xa = 0x429,0xa 042a e7ff | | Load 0x3,-0x1 ; Debug Table 0xf.0xb = 0x42a,0x2 042b e010 | | Load 0x0,0x10 042c 188c | | Execute Package,Field_Execute,Field_Number 0x8c 042d 6814 |h | Jump_Zero 0x442 042e e7ff | | Load 0x3,-0x1 ; Debug Table 0xf.0xc = 0x42e,0x3 042f e010 | | Load 0x0,0x10 0430 188b | | Execute Package,Field_Execute,Field_Number 0x8b 0431 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0432 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0xd = 0x432,0x4 0433 00eb | | Load_Encached Diana_Cache 0434 18fa | | Execute Package,Field_Execute,Field_Number 0xfa 0435 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0436 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0xe = 0x436,0x5 0437 e010 | | Load 0x0,0x10 0438 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0439 7003 |p | Jump_Nonzero 0x43d 043a 0007 | | Action Break_Optional ; Debug Table 0xf.0xf = 0x43a,0x6 043b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x10 = 0x43b,0xc01 043c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xf.0x11 = 0x43c,0x6 043d 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x12 = 0x43d,0x7 043e e010 | | Load 0x0,0x10 043f 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0440 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0441 7807 |x | Jump 0x449 0442 0007 | | Action Break_Optional ; Debug Table 0xf.0x13 = 0x442,0x8 0443 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x14 = 0x443,0x1001 0444 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xf.0x15 = 0x444,0x8 0445 e7ff | | Load 0x3,-0x1 ; Debug Table 0xf.0x16 = 0x445,0x9 0446 00eb | | Load_Encached Diana_Cache 0447 18fa | | Execute Package,Field_Execute,Field_Number 0xfa 0448 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0449 00d1 | | Pop_Control Pop_Count_1 044a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x17 = 0x44a,0xb 044b 8415 | | Call 0x2,0x15 044c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 044d 0007 | | Action Break_Optional ; Debug Table 0xf.0x18 = 0x44d,0xc 044e 0007 | | Action Break_Optional ; Debug Table 0xf.0x19 = 0x44e,0xd 044f e602 | | Load 0x3,0x2 ; Debug Table 0xf.0x1a = 0x44f,0x1401 0450 0007 | | Action Break_Optional 0451 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xf.0x1b = 0x451,0x1402 0452 0007 | | Action Break_Optional ; Debug Table 0xf.0x1c = 0x452,0x1403 0453 0007 | | Action Break_Optional ; Debug Table 0xf.0x1d = 0x453,0x1404 0454 0b00 | | Execute_Immediate Case_Compare,0x0 ; Debug Table 0xf.0x1e = 0x454,0xd 0455 700b |p | Jump_Nonzero 0x461 0456 0b48 | H | Execute_Immediate Case_Compare,0x48 0457 700c |p | Jump_Nonzero 0x464 0458 0b47 | G | Execute_Immediate Case_Compare,0x47 0459 700a |p | Jump_Nonzero 0x464 045a 0b46 | F | Execute_Immediate Case_Compare,0x46 045b 7008 |p | Jump_Nonzero 0x464 045c 0b3e | > | Execute_Immediate Case_Compare,0x3e 045d 7006 |p | Jump_Nonzero 0x464 045e 0b7c | | | Execute_Immediate Case_Compare,0x7c 045f 700c |p | Jump_Nonzero 0x46c 0460 7815 |x | Jump 0x476 ; Debug Table 0xf.0x1f = 0x460,0x14 0461 0007 | | Action Break_Optional ; Debug Table 0xf.0x20 = 0x461,0xe 0462 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x21 = 0x462,0x1801 0463 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0xf.0x22 = 0x463,0xe 0464 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x23 = 0x464,0xf 0465 4976 |Iv | Short_Literal 0x176 0466 00eb | | Load_Encached Diana_Cache 0467 0098 | | Execute Package,Field_Read_Dynamic 0468 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0469 0033 | 3 | Store_Top Heap_Access,At_Offset_3 046a 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xf.0x24 = 0x46a,0x10 046b 7810 |x | Jump 0x47c 046c 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x25 = 0x46c,0x11 046d e010 | | Load 0x0,0x10 046e 180d | | Execute Package,Field_Execute,Field_Number 0xd 046f 6806 |h | Jump_Zero 0x476 0470 00da | | Load_Top At_Offset_2 ; Debug Table 0xf.0x26 = 0x470,0x12 0471 e010 | | Load 0x0,0x10 0472 180e | | Execute Package,Field_Execute,Field_Number 0xe 0473 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0474 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0xf.0x27 = 0x474,0x13 0475 7806 |x | Jump 0x47c 0476 00d1 | | Pop_Control Pop_Count_1 0477 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x28 = 0x477,0x15 0478 00eb | | Load_Encached Diana_Cache 0479 18ec | | Execute Package,Field_Execute,Field_Number 0xec 047a 0032 | 2 | Store_Top Heap_Access,At_Offset_2 047b 7fd2 | | Jump 0x44e 047c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x29 = 0x47c,0x16 047d e012 | | Load 0x0,0x12 047e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 047f 021f | | Execute Heap_Access,Equal 0480 680f |h | Jump_Zero 0x490 0481 e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x2a = 0x481,0x17 0482 6809 |h | Jump_Zero 0x48c 0483 e7ff | | Load 0x3,-0x1 ; Debug Table 0xf.0x2b = 0x483,0x18 0484 00eb | | Load_Encached Diana_Cache 0485 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0486 4814 |H | Short_Literal 0x14 0487 00eb | | Load_Encached Diana_Cache 0488 1879 | y | Execute Package,Field_Execute,Field_Number 0x79 0489 8412 | | Call 0x2,0x12 048a 0031 | 1 | Store_Top Heap_Access,At_Offset_1 048b 7811 |x | Jump 0x49d 048c 0007 | | Action Break_Optional ; Debug Table 0xf.0x2c = 0x48c,0x19 048d 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x2d = 0x48d,0x1c01 048e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0xf.0x2e = 0x48e,0x19 048f 780d |x | Jump 0x49d 0490 e7ff | | Load 0x3,-0x1 ; Debug Table 0xf.0x2f = 0x490,0x1a 0491 00eb | | Load_Encached Diana_Cache 0492 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0493 4814 |H | Short_Literal 0x14 0494 00eb | | Load_Encached Diana_Cache 0495 1879 | y | Execute Package,Field_Execute,Field_Number 0x79 0496 00da | | Load_Top At_Offset_2 0497 840e | | Call 0x2,0xe 0498 8410 | | Call 0x2,0x10 0499 4812 |H | Short_Literal 0x12 049a 00eb | | Load_Encached Diana_Cache 049b 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 049c 0031 | 1 | Store_Top Heap_Access,At_Offset_1 049d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x30 = 0x49d,0x1b 049e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 049f 0000 | | .XXX[0x1] 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a3 | | .CONST 0x04a3 ; Address of begin 04a1 0004 | | .CONST 0x0004 ; Address of exception handler 04a2 0001 | | .CONST 0x0001 ; Number of locals 04a3 BODY_04a0: 04a3 INIT_04a0: 04a3 0007 | | Action Break_Optional ; Debug Table 0x10 = .DEBUG 0x04a3,0x0a30,0x0001,0x0000,0x0057,0x93a5,0x0000,0x083c ; Debug Table 0x10.0x0 = 0x4a3,0x1 04a4 e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x1 = 0x4a4,0x401 04a5 0007 | | Action Break_Optional 04a6 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x10.0x2 = 0x4a6,0x402 04a7 0007 | | Action Break_Optional ; Debug Table 0x10.0x3 = 0x4a7,0x403 04a8 0007 | | Action Break_Optional ; Debug Table 0x10.0x4 = 0x4a8,0x404 04a9 0ba7 | | Execute_Immediate Case_Compare,0xa7 ; Debug Table 0x10.0x5 = 0x4a9,0x1 04aa 708c |p | Jump_Nonzero 0x537 04ab 0ba9 | | Execute_Immediate Case_Compare,0xa9 04ac 708f |p | Jump_Nonzero 0x53c 04ad 0b14 | | Execute_Immediate Case_Compare,0x14 04ae 7092 |p | Jump_Nonzero 0x541 04af 0b15 | | Execute_Immediate Case_Compare,0x15 04b0 7090 |p | Jump_Nonzero 0x541 04b1 0b17 | | Execute_Immediate Case_Compare,0x17 04b2 70a1 |p | Jump_Nonzero 0x554 04b3 0b16 | | Execute_Immediate Case_Compare,0x16 04b4 709f |p | Jump_Nonzero 0x554 04b5 0b12 | | Execute_Immediate Case_Compare,0x12 04b6 70e5 |p | Jump_Nonzero 0x59c 04b7 0b4c | L | Execute_Immediate Case_Compare,0x4c 04b8 70e8 |p | Jump_Nonzero 0x5a1 04b9 0007 | | Action Break_Optional ; Debug Table 0x10.0x6 = 0x4b9,0xa 04ba e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x7 = 0x4ba,0x801 04bb 0007 | | Action Break_Optional 04bc 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x10.0x8 = 0x4bc,0x802 04bd 0007 | | Action Break_Optional ; Debug Table 0x10.0x9 = 0x4bd,0x803 04be 0007 | | Action Break_Optional ; Debug Table 0x10.0xa = 0x4be,0x804 04bf 0007 | | Action Break_Optional ; Debug Table 0x10.0xb = 0x4bf,0xa 04c0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0xc = 0x4c0,0xc01 04c1 49e2 |I | Short_Literal 0x1e2 04c2 00eb | | Load_Encached Diana_Cache 04c3 0098 | | Execute Package,Field_Read_Dynamic 04c4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04c5 7800 |x | Jump 0x4c6 04c6 00d0 | | Action Swap_Control 04c7 00d1 | | Pop_Control Pop_Count_1 04c8 4604 |F | Jump_Case 0x5 ; Debug Table 0x10.0xd = 0x4c8,0xa 04c9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x0 04ca 7803 |x | Jump 0x4ce ; case 0x1 04cb 7807 |x | Jump 0x4d3 ; case 0x2 04cc 780f |x | Jump 0x4dc ; case 0x3 04cd 781b |x | Jump 0x4e9 ; case 0x4 04ce 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0xe = 0x4ce,0xc 04cf 00eb | | Load_Encached Diana_Cache 04d0 1885 | | Execute Package,Field_Execute,Field_Number 0x85 04d1 8419 | | Call 0x2,0x19 04d2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04d3 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0xf = 0x4d3,0xd 04d4 00eb | | Load_Encached Diana_Cache 04d5 1885 | | Execute Package,Field_Execute,Field_Number 0x85 04d6 8419 | | Call 0x2,0x19 04d7 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x10 = 0x4d7,0xe 04d8 00eb | | Load_Encached Diana_Cache 04d9 1886 | | Execute Package,Field_Execute,Field_Number 0x86 04da 8419 | | Call 0x2,0x19 04db 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04dc 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x11 = 0x4dc,0xf 04dd 00eb | | Load_Encached Diana_Cache 04de 1885 | | Execute Package,Field_Execute,Field_Number 0x85 04df 8419 | | Call 0x2,0x19 04e0 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x12 = 0x4e0,0x10 04e1 00eb | | Load_Encached Diana_Cache 04e2 1886 | | Execute Package,Field_Execute,Field_Number 0x86 04e3 8419 | | Call 0x2,0x19 04e4 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x13 = 0x4e4,0x11 04e5 00eb | | Load_Encached Diana_Cache 04e6 1887 | | Execute Package,Field_Execute,Field_Number 0x87 04e7 8419 | | Call 0x2,0x19 04e8 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04e9 0007 | | Action Break_Optional ; Debug Table 0x10.0x14 = 0x4e9,0x12 04ea 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x10.0x15 = 0x4ea,0xefff 04eb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x10.0x16 = 0x4eb,0xeffe 04ec e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x17 = 0x4ec,0x1001 04ed 00eb | | Load_Encached Diana_Cache 04ee 1888 | | Execute Package,Field_Execute,Field_Number 0x88 04ef 0032 | 2 | Store_Top Heap_Access,At_Offset_2 04f0 7840 |x@ | Jump 0x531 04f1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x18 = 0x4f1,0x1003 04f2 0007 | | Action Break_Optional 04f3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x19 = 0x4f3,0x1401 04f4 7002 |p | Jump_Nonzero 0x4f7 04f5 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x10.0x1a = 0x4f5,0x1402 04f6 782c |x, | Jump 0x523 04f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x1b = 0x4f7,0x1403 04f8 0217 | | Execute Heap_Access,All_Reference 04f9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04fa 6804 |h | Jump_Zero 0x4ff 04fb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x1c = 0x4fb,0x1404 04fc 0217 | | Execute Heap_Access,All_Reference 04fd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04fe 7824 |x$ | Jump 0x523 04ff 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x1d = 0x4ff,0x1405 0500 0007 | | Action Break_Optional 0501 e606 | | Load 0x3,0x6 ; Debug Table 0x10.0x1e = 0x501,0x1801 0502 0007 | | Action Break_Optional 0503 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0x10.0x1f = 0x503,0x1802 0504 0007 | | Action Break_Optional ; Debug Table 0x10.0x20 = 0x504,0x1803 0505 00d0 | | Action Swap_Control ; Debug Table 0x10.0x21 = 0x505,0x1804 0506 00d1 | | Pop_Control Pop_Count_1 0507 49bb |I | Short_Literal 0x1bb ; Debug Table 0x10.0x22 = 0x507,0x1405 0508 00eb | | Load_Encached Diana_Cache 0509 0098 | | Execute Package,Field_Read_Dynamic 050a 012c | , | Execute Any,Size 050b e013 | | Load 0x0,0x13 050c 1b17 | | Execute Package,Field_Read,Field_Number 0x17 050d 025b | [ | Execute Discrete,Check_In_Type 050e 0273 | s | Execute Discrete,Plus 050f 00d9 | | Load_Top At_Offset_1 0510 0007 | | Action Break_Optional 0511 e607 | | Load 0x3,0x7 ; Debug Table 0x10.0x23 = 0x511,0x1c01 0512 0007 | | Action Break_Optional 0513 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0x10.0x24 = 0x513,0x1c02 0514 0007 | | Action Break_Optional ; Debug Table 0x10.0x25 = 0x514,0x1c03 0515 00d0 | | Action Swap_Control ; Debug Table 0x10.0x26 = 0x515,0x1c04 0516 00d1 | | Pop_Control Pop_Count_1 0517 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0x10.0x27 = 0x517,0x1804 0518 00eb | | Load_Encached Diana_Cache 0519 0098 | | Execute Package,Field_Read_Dynamic 051a 49c9 |I | Short_Literal 0x1c9 051b 00eb | | Load_Encached Diana_Cache 051c 0098 | | Execute Package,Field_Read_Dynamic 051d 49ca |I | Short_Literal 0x1ca 051e 00eb | | Load_Encached Diana_Cache 051f 0095 | | Execute Package,Field_Reference_Dynamic 0520 e014 | | Load 0x0,0x14 0521 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0522 7800 |x | Jump 0x523 0523 00d0 | | Action Swap_Control 0524 00d1 | | Pop_Control Pop_Count_1 0525 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0x10.0x28 = 0x525,0x1003 0526 0007 | | Action Break_Optional ; Debug Table 0x10.0x29 = 0x526,0x1004 0527 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x2a = 0x527,0x2001 0528 7002 |p | Jump_Nonzero 0x52b 0529 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x10.0x2b = 0x529,0x2002 052a 7803 |x | Jump 0x52e 052b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x2c = 0x52b,0x2003 052c 0217 | | Execute Heap_Access,All_Reference 052d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 052e 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0x10.0x2d = 0x52e,0x1004 052f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x2e = 0x52f,0x1005 0530 8419 | | Call 0x2,0x19 0531 0007 | | Action Break_Optional ; Debug Table 0x10.0x2f = 0x531,0x1002 0532 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x30 = 0x532,0x2401 0533 021d | | Execute Heap_Access,Is_Null 0534 6fbc |o | Jump_Zero 0x4f1 ; Debug Table 0x10.0x31 = 0x534,0x1002 0535 00d2 | | Pop_Control Pop_Count_2 0536 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0537 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x32 = 0x537,0x2 0538 00eb | | Load_Encached Diana_Cache 0539 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5 053a 8419 | | Call 0x2,0x19 053b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 053c 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x33 = 0x53c,0x3 053d 00eb | | Load_Encached Diana_Cache 053e 18b2 | | Execute Package,Field_Execute,Field_Number 0xb2 053f 8419 | | Call 0x2,0x19 0540 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0541 e5fc | | Load 0x2,-0x4 ; Debug Table 0x10.0x34 = 0x541,0x4 0542 6866 |hf | Jump_Zero 0x5a9 0543 0007 | | Action Break_Optional ; Debug Table 0x10.0x35 = 0x543,0x5 0544 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x10.0x36 = 0x544,0xd7ff 0545 e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x37 = 0x545,0x2801 0546 8418 | | Call 0x2,0x18 0547 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0548 0007 | | Action Break_Optional ; Debug Table 0x10.0x38 = 0x548,0x2802 0549 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x39 = 0x549,0x2c01 054a 021d | | Execute Heap_Access,Is_Null 054b 7006 |p | Jump_Nonzero 0x552 ; Debug Table 0x10.0x3a = 0x54b,0x2802 054c e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x3b = 0x54c,0x2803 054d 00d9 | | Load_Top At_Offset_1 054e 4974 |It | Short_Literal 0x174 054f 00eb | | Load_Encached Diana_Cache 0550 0098 | | Execute Package,Field_Read_Dynamic 0551 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0552 00d1 | | Pop_Control Pop_Count_1 0553 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0554 0007 | | Action Break_Optional ; Debug Table 0x10.0x3c = 0x554,0x6 0555 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x10.0x3d = 0x555,0xcfff 0556 e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x3e = 0x556,0x3001 0557 4976 |Iv | Short_Literal 0x176 0558 00eb | | Load_Encached Diana_Cache 0559 0098 | | Execute Package,Field_Read_Dynamic 055a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 055b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 055c 0007 | | Action Break_Optional ; Debug Table 0x10.0x3f = 0x55c,0x3002 055d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x40 = 0x55d,0x3401 055e 021d | | Execute Heap_Access,Is_Null 055f 7004 |p | Jump_Nonzero 0x564 ; Debug Table 0x10.0x41 = 0x55f,0x3002 0560 00d8 | | Load_Top At_Offset_0 0561 e7ff | | Load 0x3,-0x1 0562 021f | | Execute Heap_Access,Equal 0563 6801 |h | Jump_Zero 0x565 0564 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x10.0x42 = 0x564,0x3003 0565 0007 | | Action Break_Optional ; Debug Table 0x10.0x43 = 0x565,0x3004 0566 e603 | | Load 0x3,0x3 ; Debug Table 0x10.0x44 = 0x566,0x3801 0567 0007 | | Action Break_Optional 0568 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x10.0x45 = 0x568,0x3802 0569 0007 | | Action Break_Optional ; Debug Table 0x10.0x46 = 0x569,0x3803 056a 0007 | | Action Break_Optional ; Debug Table 0x10.0x47 = 0x56a,0x3804 056b 0f26 | & | Execute_Immediate Equal,0x26 ; Debug Table 0x10.0x48 = 0x56b,0x3004 056c 6801 |h | Jump_Zero 0x56e 056d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x10.0x49 = 0x56d,0x3005 056e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x4a = 0x56e,0x3006 056f e012 | | Load 0x0,0x12 0570 180d | | Execute Package,Field_Execute,Field_Number 0xd 0571 6813 |h | Jump_Zero 0x585 0572 e5fe | | Load 0x2,-0x2 ; Debug Table 0x10.0x4b = 0x572,0x3007 0573 6826 |h& | Jump_Zero 0x59a 0574 00d8 | | Load_Top At_Offset_0 0575 00eb | | Load_Encached Diana_Cache 0576 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0577 00eb | | Load_Encached Diana_Cache 0578 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0579 0092 0602 | | Action Push_String_Extended,0x602 ; "STANDARD" 057b 01de | | Execute Vector,Not_Equal 057c 681d |h | Jump_Zero 0x59a 057d e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x4c = 0x57d,0x3008 057e e7ff | | Load 0x3,-0x1 057f 8412 | | Call 0x2,0x12 0580 4974 |It | Short_Literal 0x174 0581 00eb | | Load_Encached Diana_Cache 0582 0098 | | Execute Package,Field_Read_Dynamic 0583 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0584 7815 |x | Jump 0x59a 0585 e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x4d = 0x585,0x3009 0586 00d9 | | Load_Top At_Offset_1 0587 8417 | | Call 0x2,0x17 0588 680a |h | Jump_Zero 0x593 0589 e5fd | | Load 0x2,-0x3 ; Debug Table 0x10.0x4e = 0x589,0x300a 058a 680f |h | Jump_Zero 0x59a 058b e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x4f = 0x58b,0x300b 058c 00d9 | | Load_Top At_Offset_1 058d 8411 | | Call 0x2,0x11 058e 4974 |It | Short_Literal 0x174 058f 00eb | | Load_Encached Diana_Cache 0590 0098 | | Execute Package,Field_Read_Dynamic 0591 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0592 7807 |x | Jump 0x59a 0593 e7ff | | Load 0x3,-0x1 ; Debug Table 0x10.0x50 = 0x593,0x300c 0594 00d9 | | Load_Top At_Offset_1 0595 8411 | | Call 0x2,0x11 0596 4974 |It | Short_Literal 0x174 0597 00eb | | Load_Encached Diana_Cache 0598 0098 | | Execute Package,Field_Read_Dynamic 0599 1811 | | Execute Package,Field_Execute,Field_Number 0x11 059a 00d1 | | Pop_Control Pop_Count_1 059b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 059c 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x51 = 0x59c,0x7 059d 00eb | | Load_Encached Diana_Cache 059e 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 059f 8419 | | Call 0x2,0x19 05a0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05a1 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x52 = 0x5a1,0x8 05a2 00eb | | Load_Encached Diana_Cache 05a3 18da | | Execute Package,Field_Execute,Field_Number 0xda 05a4 8419 | | Call 0x2,0x19 05a5 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x53 = 0x5a5,0x9 05a6 00eb | | Load_Encached Diana_Cache 05a7 18e1 | | Execute Package,Field_Execute,Field_Number 0xe1 05a8 8419 | | Call 0x2,0x19 05a9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05aa 0000 0000 | | .BLANK 0000[0x6] 05b0 ; -------------------------------------------------------------------------------------- 05b0 ; SUBPROGRAM 05b0 ; -------------------------------------------------------------------------------------- 05b0 05b5 | | .CONST 0x05b5 ; Address of begin 05b1 0004 | | .CONST 0x0004 ; Address of exception handler 05b2 0003 | | .CONST 0x0003 ; Number of locals 05b3 INIT_05b0: 05b3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x11 = .DEBUG 0x05b3,0x0ada,0x0002,0x0000,0x0057,0x93a5,0x0000,0x09f6 ; Debug Table 0x11.0x0 = 0x5b3,0xffff 05b4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x11.0x1 = 0x5b4,0xfffe 05b5 BODY_05b0: 05b5 0007 | | Action Break_Optional ; Debug Table 0x11.0x2 = 0x5b5,0x1 05b6 e7ff | | Load 0x3,-0x1 ; Debug Table 0x11.0x3 = 0x5b6,0x401 05b7 0007 | | Action Break_Optional 05b8 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x11.0x4 = 0x5b8,0x402 05b9 0007 | | Action Break_Optional ; Debug Table 0x11.0x5 = 0x5b9,0x403 05ba 0007 | | Action Break_Optional ; Debug Table 0x11.0x6 = 0x5ba,0x404 05bb 0b21 | ! | Execute_Immediate Case_Compare,0x21 ; Debug Table 0x11.0x7 = 0x5bb,0x1 05bc 7011 |p | Jump_Nonzero 0x5ce 05bd 0b22 | " | Execute_Immediate Case_Compare,0x22 05be 700f |p | Jump_Nonzero 0x5ce 05bf 0b29 | ) | Execute_Immediate Case_Compare,0x29 05c0 700d |p | Jump_Nonzero 0x5ce 05c1 0b2c | , | Execute_Immediate Case_Compare,0x2c 05c2 700b |p | Jump_Nonzero 0x5ce 05c3 0b2e | . | Execute_Immediate Case_Compare,0x2e 05c4 7009 |p | Jump_Nonzero 0x5ce 05c5 0b1f | | Execute_Immediate Case_Compare,0x1f 05c6 7007 |p | Jump_Nonzero 0x5ce 05c7 0b30 | 0 | Execute_Immediate Case_Compare,0x30 05c8 700a |p | Jump_Nonzero 0x5d3 05c9 0b2f | / | Execute_Immediate Case_Compare,0x2f 05ca 701a |p | Jump_Nonzero 0x5e5 05cb e7ff | | Load 0x3,-0x1 ; Debug Table 0x11.0x8 = 0x5cb,0xb 05cc 0033 | 3 | Store_Top Heap_Access,At_Offset_3 05cd 782b |x+ | Jump 0x5f9 05ce e7ff | | Load 0x3,-0x1 ; Debug Table 0x11.0x9 = 0x5ce,0x2 05cf 00eb | | Load_Encached Diana_Cache 05d0 18ec | | Execute Package,Field_Execute,Field_Number 0xec 05d1 0033 | 3 | Store_Top Heap_Access,At_Offset_3 05d2 7826 |x& | Jump 0x5f9 05d3 e7ff | | Load 0x3,-0x1 ; Debug Table 0x11.0xa = 0x5d3,0x3 05d4 00eb | | Load_Encached Diana_Cache 05d5 18ec | | Execute Package,Field_Execute,Field_Number 0xec 05d6 0032 | 2 | Store_Top Heap_Access,At_Offset_2 05d7 0007 | | Action Break_Optional ; Debug Table 0x11.0xb = 0x5d7,0x4 05d8 e603 | | Load 0x3,0x3 ; Debug Table 0x11.0xc = 0x5d8,0x801 05d9 0007 | | Action Break_Optional 05da 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x11.0xd = 0x5da,0x802 05db 0007 | | Action Break_Optional ; Debug Table 0x11.0xe = 0x5db,0x803 05dc 0007 | | Action Break_Optional ; Debug Table 0x11.0xf = 0x5dc,0x804 05dd 0f3f | ? | Execute_Immediate Equal,0x3f ; Debug Table 0x11.0x10 = 0x5dd,0x4 05de 6803 |h | Jump_Zero 0x5e2 05df 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x11.0x11 = 0x5df,0x5 05e0 0033 | 3 | Store_Top Heap_Access,At_Offset_3 05e1 7817 |x | Jump 0x5f9 05e2 e7ff | | Load 0x3,-0x1 ; Debug Table 0x11.0x12 = 0x5e2,0x6 05e3 0033 | 3 | Store_Top Heap_Access,At_Offset_3 05e4 7814 |x | Jump 0x5f9 05e5 e7ff | | Load 0x3,-0x1 ; Debug Table 0x11.0x13 = 0x5e5,0x7 05e6 00eb | | Load_Encached Diana_Cache 05e7 18ec | | Execute Package,Field_Execute,Field_Number 0xec 05e8 0032 | 2 | Store_Top Heap_Access,At_Offset_2 05e9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x11.0x14 = 0x5e9,0x8 05ea 00eb | | Load_Encached Diana_Cache 05eb 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 05ec e605 | | Load 0x3,0x5 ; Debug Table 0x11.0x15 = 0x5ec,0xc01 05ed 0007 | | Action Break_Optional 05ee 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x11.0x16 = 0x5ee,0xc02 05ef 0007 | | Action Break_Optional ; Debug Table 0x11.0x17 = 0x5ef,0xc03 05f0 00d0 | | Action Swap_Control ; Debug Table 0x11.0x18 = 0x5f0,0xc04 05f1 00d1 | | Pop_Control Pop_Count_1 05f2 0f73 | s | Execute_Immediate Equal,0x73 ; Debug Table 0x11.0x19 = 0x5f2,0x8 05f3 6803 |h | Jump_Zero 0x5f7 05f4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x11.0x1a = 0x5f4,0x9 05f5 0033 | 3 | Store_Top Heap_Access,At_Offset_3 05f6 7802 |x | Jump 0x5f9 05f7 e7ff | | Load 0x3,-0x1 ; Debug Table 0x11.0x1b = 0x5f7,0xa 05f8 0033 | 3 | Store_Top Heap_Access,At_Offset_3 05f9 00d1 | | Pop_Control Pop_Count_1 05fa 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x11.0x1c = 0x5fa,0xc 05fb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05fc ; -------------------------------------------------------------------------------------- 05fc ; STRING TABLE 05fc ; -------------------------------------------------------------------------------------- 05fc 0012 | | .STRTAB 0x0012->0x0605 ; "Expand_Names" 05fd 001c | | .STRTAB 0x001c->0x060b ; "Expand_Names failed - unit is not source" 05fe 0042 | B | .STRTAB 0x0042->0x061f ; "*** Exception in Expand_Names: Directory_Error" 05ff 006e | n | .STRTAB 0x006e->0x0636 ; "Expand_Names failed" 0600 007f | | .STRTAB 0x007f->0x063f ; "*** Exception in Expand_Names: " 0601 009c | | .STRTAB 0x009c->0x064f ; "[BLOCK]." 0602 00a2 | | .STRTAB 0x00a2->0x0653 ; "STANDARD" 0603 00a8 | | .STRTAB 0x00a8->0x0657 ; "Exception in Expand_Names.In_Same_Scope: " 0604 00cf | | .STREND 0x00cf->0x066b 0605 4578 7061 |Expa| .STRTAB_STRINGS 066c 0000 0000 | | .BLANK 0000[0x4] 0670 ; -------------------------------------------------------------------------------------- 0670 ; Debug Table 0670 ; -------------------------------------------------------------------------------------- 0670 0003 0012 | | .CONST 0x0003,0x0012 0672 000b 0702 | | .DEBUG 0x000b,0x0702,0x8000,0x0000,0x0054,0xf855,0x0000,0x0003 067a 001b 0704 | | .DEBUG 0x001b,0x0704,0x8001,0x0000,0x0054,0xf855,0x0000,0x0003 0682 00f3 0794 | | .DEBUG 0x00f3,0x0794,0x0002,0x0000,0x0057,0x93a5,0x0000,0x00c9 068a 0103 079e | | .DEBUG 0x0103,0x079e,0x0002,0x0000,0x0057,0x93a5,0x0000,0x00f1 0692 0123 07ac | # | .DEBUG 0x0123,0x07ac,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0134 069a 016b 07f6 | k | .DEBUG 0x016b,0x07f6,0x0002,0x0000,0x0057,0x93a5,0x0000,0x01c6 06a2 01d3 0834 | 4| .DEBUG 0x01d3,0x0834,0x0002,0x0000,0x0057,0x93a5,0x0000,0x02b3 06aa 01fb 0840 | @| .DEBUG 0x01fb,0x0840,0x0002,0x0000,0x0057,0x93a5,0x0000,0x02fd 06b2 022b 084c | + L| .DEBUG 0x022b,0x084c,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0355 06ba 024b 085a | K Z| .DEBUG 0x024b,0x085a,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0397 06c2 0263 0862 | c b| .DEBUG 0x0263,0x0862,0x0002,0x0000,0x0057,0x93a5,0x0000,0x03c8 06ca 027b 086c | { l| .DEBUG 0x027b,0x086c,0x0002,0x0000,0x0057,0x93a5,0x0000,0x03f9 06d2 02a3 0898 | | .DEBUG 0x02a3,0x0898,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0450 06da 03a3 095a | Z| .DEBUG 0x03a3,0x095a,0x0002,0x0000,0x0057,0x93a5,0x0000,0x061d 06e2 03cb 097c | || .DEBUG 0x03cb,0x097c,0x0002,0x0000,0x0057,0x93a5,0x0000,0x0670 06ea 041b 09cc | | .DEBUG 0x041b,0x09cc,0x0002,0x0000,0x0057,0x93a5,0x0000,0x071e 06f2 04a3 0a30 | 0| .DEBUG 0x04a3,0x0a30,0x0001,0x0000,0x0057,0x93a5,0x0000,0x083c 06fa 05b3 0ada | | .DEBUG 0x05b3,0x0ada,0x0002,0x0000,0x0057,0x93a5,0x0000,0x09f6 0702 ; -------------------------------------------------------------------------------------- 0702 ; Debug3 Subtable 0x0 0702 ; -------------------------------------------------------------------------------------- 0702 0000 0000 | | .DBG3TAB 0x0000,0x0000 0704 ; -------------------------------------------------------------------------------------- 0704 ; Debug3 Subtable 0x1 0704 ; -------------------------------------------------------------------------------------- 0704 0020 0027 | '| .DBG3TAB 0x0020,0x0027 0706 001b ffff | | .CONST 0x001b,0xffff 0708 001c fffe | | .CONST 0x001c,0xfffe 070a 001d fffd | | .CONST 0x001d,0xfffd 070c 001e fffc | | .CONST 0x001e,0xfffc 070e 001f fffb | | .CONST 0x001f,0xfffb 0710 0020 fffa | | .CONST 0x0020,0xfffa 0712 0021 fff9 | ! | .CONST 0x0021,0xfff9 0714 0022 fff8 | " | .CONST 0x0022,0xfff8 0716 0023 fff7 | # | .CONST 0x0023,0xfff7 0718 0024 fff6 | $ | .CONST 0x0024,0xfff6 071a 0025 fff5 | % | .CONST 0x0025,0xfff5 071c 002a fff4 | * | .CONST 0x002a,0xfff4 071e 002b fff3 | + | .CONST 0x002b,0xfff3 0720 002c fff2 | , | .CONST 0x002c,0xfff2 0722 002d fff1 | - | .CONST 0x002d,0xfff1 0724 0039 fff0 | 9 | .CONST 0x0039,0xfff0 0726 003b ffef | ; | .CONST 0x003b,0xffef 0728 003d ffee | = | .CONST 0x003d,0xffee 072a 003f ffed | ? | .CONST 0x003f,0xffed 072c 0041 ffec | A | .CONST 0x0041,0xffec 072e 0043 ffeb | C | .CONST 0x0043,0xffeb 0730 0045 ffea | E | .CONST 0x0045,0xffea 0732 0047 ffe9 | G | .CONST 0x0047,0xffe9 0734 0049 ffe8 | I | .CONST 0x0049,0xffe8 0736 004b ffe7 | K | .CONST 0x004b,0xffe7 0738 004d ffe6 | M | .CONST 0x004d,0xffe6 073a 004f ffe5 | O | .CONST 0x004f,0xffe5 073c 0051 ffe4 | Q | .CONST 0x0051,0xffe4 073e 0053 ffe3 | S | .CONST 0x0053,0xffe3 0740 0055 ffe2 | U | .CONST 0x0055,0xffe2 0742 0057 ffe1 | W | .CONST 0x0057,0xffe1 0744 0059 ffe0 | Y | .CONST 0x0059,0xffe0 0746 005b 0001 | [ | .CONST 0x005b,0x0001 0748 0068 0002 | h | .CONST 0x0068,0x0002 074a 0069 0401 | i | .CONST 0x0069,0x0401 074c 006b 0002 | k | .CONST 0x006b,0x0002 074e 006c 0003 | l | .CONST 0x006c,0x0003 0750 006d 0004 | m | .CONST 0x006d,0x0004 0752 0070 0005 | p | .CONST 0x0070,0x0005 0754 0075 0006 | u | .CONST 0x0075,0x0006 0756 0079 0007 | y | .CONST 0x0079,0x0007 0758 007a 0008 | z | .CONST 0x007a,0x0008 075a 0082 0009 | | .CONST 0x0082,0x0009 075c 008b 000a | | .CONST 0x008b,0x000a 075e 0091 000b | | .CONST 0x0091,0x000b 0760 009f 000c | | .CONST 0x009f,0x000c 0762 00a1 000d | | .CONST 0x00a1,0x000d 0764 00a6 000e | | .CONST 0x00a6,0x000e 0766 00a7 000f | | .CONST 0x00a7,0x000f 0768 00ab 0010 | | .CONST 0x00ab,0x0010 076a 00ac 0801 | | .CONST 0x00ac,0x0801 076c 00ae 0010 | | .CONST 0x00ae,0x0010 076e 00af 0011 | | .CONST 0x00af,0x0011 0770 00b1 0012 | | .CONST 0x00b1,0x0012 0772 00b6 0013 | | .CONST 0x00b6,0x0013 0774 00b7 0c01 | | .CONST 0x00b7,0x0c01 0776 00b9 0c02 | | .CONST 0x00b9,0x0c02 0778 00ba 0c03 | | .CONST 0x00ba,0x0c03 077a 00bb 0c04 | | .CONST 0x00bb,0x0c04 077c 00bc 0013 | | .CONST 0x00bc,0x0013 077e 00bd 0014 | | .CONST 0x00bd,0x0014 0780 00bf 0015 | | .CONST 0x00bf,0x0015 0782 00c4 0016 | | .CONST 0x00c4,0x0016 0784 00cc 0017 | | .CONST 0x00cc,0x0017 0786 00ce 0018 | | .CONST 0x00ce,0x0018 0788 00d2 0019 | | .CONST 0x00d2,0x0019 078a 00d7 001a | | .CONST 0x00d7,0x001a 078c 00dc 001b | | .CONST 0x00dc,0x001b 078e 00de 001c | | .CONST 0x00de,0x001c 0790 00e5 001d | | .CONST 0x00e5,0x001d 0792 00ea 001e | | .CONST 0x00ea,0x001e 0794 ; -------------------------------------------------------------------------------------- 0794 ; Debug3 Subtable 0x2 0794 ; -------------------------------------------------------------------------------------- 0794 0001 0003 | | .DBG3TAB 0x0001,0x0003 0796 00f3 ffff | | .CONST 0x00f3,0xffff 0798 00f4 0001 | | .CONST 0x00f4,0x0001 079a 00f8 0002 | | .CONST 0x00f8,0x0002 079c 00fc 0003 | | .CONST 0x00fc,0x0003 079e ; -------------------------------------------------------------------------------------- 079e ; Debug3 Subtable 0x3 079e ; -------------------------------------------------------------------------------------- 079e 0002 0004 | | .DBG3TAB 0x0002,0x0004 07a0 0103 ffff | | .CONST 0x0103,0xffff 07a2 0104 fffe | | .CONST 0x0104,0xfffe 07a4 0106 0001 | | .CONST 0x0106,0x0001 07a6 0111 0002 | | .CONST 0x0111,0x0002 07a8 0114 0004 | | .CONST 0x0114,0x0004 07aa 0116 0003 | | .CONST 0x0116,0x0003 07ac ; -------------------------------------------------------------------------------------- 07ac ; Debug3 Subtable 0x4 07ac ; -------------------------------------------------------------------------------------- 07ac 0001 0023 | #| .DBG3TAB 0x0001,0x0023 07ae 0123 ffff | # | .CONST 0x0123,0xffff 07b0 0124 0001 | $ | .CONST 0x0124,0x0001 07b2 0125 0401 | % | .CONST 0x0125,0x0401 07b4 0127 0402 | ' | .CONST 0x0127,0x0402 07b6 0128 0403 | ( | .CONST 0x0128,0x0403 07b8 0129 0404 | ) | .CONST 0x0129,0x0404 07ba 012a 0001 | * | .CONST 0x012a,0x0001 07bc 0132 000a | 2 | .CONST 0x0132,0x000a 07be 0134 0002 | 4 | .CONST 0x0134,0x0002 07c0 0138 0003 | 8 | .CONST 0x0138,0x0003 07c2 0139 0801 | 9 | .CONST 0x0139,0x0801 07c4 013b 0802 | ; | .CONST 0x013b,0x0802 07c6 013c 0803 | < | .CONST 0x013c,0x0803 07c8 013d 0804 | = | .CONST 0x013d,0x0804 07ca 013e 0003 | > | .CONST 0x013e,0x0003 07cc 0140 0005 | @ | .CONST 0x0140,0x0005 07ce 0142 0004 | B | .CONST 0x0142,0x0004 07d0 0145 0c01 | E | .CONST 0x0145,0x0c01 07d2 0147 0c02 | G | .CONST 0x0147,0x0c02 07d4 0148 0c03 | H | .CONST 0x0148,0x0c03 07d6 0149 0c04 | I | .CONST 0x0149,0x0c04 07d8 014b 0004 | K | .CONST 0x014b,0x0004 07da 014d 0006 | M | .CONST 0x014d,0x0006 07dc 0151 0007 | Q | .CONST 0x0151,0x0007 07de 0152 1001 | R | .CONST 0x0152,0x1001 07e0 0154 1002 | T | .CONST 0x0154,0x1002 07e2 0155 1003 | U | .CONST 0x0155,0x1003 07e4 0156 1004 | V | .CONST 0x0156,0x1004 07e6 0157 0007 | W | .CONST 0x0157,0x0007 07e8 0159 0009 | Y | .CONST 0x0159,0x0009 07ea 015b 0008 | [ | .CONST 0x015b,0x0008 07ec 015e 1401 | ^ | .CONST 0x015e,0x1401 07ee 0160 1402 | ` | .CONST 0x0160,0x1402 07f0 0161 1403 | a | .CONST 0x0161,0x1403 07f2 0162 1404 | b | .CONST 0x0162,0x1404 07f4 0164 0008 | d | .CONST 0x0164,0x0008 07f6 ; -------------------------------------------------------------------------------------- 07f6 ; Debug3 Subtable 0x5 07f6 ; -------------------------------------------------------------------------------------- 07f6 0007 0017 | | .DBG3TAB 0x0007,0x0017 07f8 016b 0001 | k | .CONST 0x016b,0x0001 07fa 016e 0002 | n | .CONST 0x016e,0x0002 07fc 016f fbff | o | .CONST 0x016f,0xfbff 07fe 0170 fbfe | p | .CONST 0x0170,0xfbfe 0800 0171 fbfd | q | .CONST 0x0171,0xfbfd 0802 0175 0401 | u | .CONST 0x0175,0x0401 0804 017c 0402 | | | .CONST 0x017c,0x0402 0806 017f 0403 | | .CONST 0x017f,0x0403 0808 0187 0404 | | .CONST 0x0187,0x0404 080a 0189 0801 | | .CONST 0x0189,0x0801 080c 018b 0802 | | .CONST 0x018b,0x0802 080e 018c 0803 | | .CONST 0x018c,0x0803 0810 018d 0804 | | .CONST 0x018d,0x0804 0812 018e 0404 | | .CONST 0x018e,0x0404 0814 0191 0405 | | .CONST 0x0191,0x0405 0816 0197 0406 | | .CONST 0x0197,0x0406 0818 019a 0407 | | .CONST 0x019a,0x0407 081a 01a2 0408 | | .CONST 0x01a2,0x0408 081c 01a4 0409 | | .CONST 0x01a4,0x0409 081e 01a6 0003 | | .CONST 0x01a6,0x0003 0820 01a7 f3ff | | .CONST 0x01a7,0xf3ff 0822 01a8 f3fe | | .CONST 0x01a8,0xf3fe 0824 01a9 f3fd | | .CONST 0x01a9,0xf3fd 0826 01aa f3fc | | .CONST 0x01aa,0xf3fc 0828 01ae 0c01 | | .CONST 0x01ae,0x0c01 082a 01b4 0c02 | | .CONST 0x01b4,0x0c02 082c 01b8 0c03 | | .CONST 0x01b8,0x0c03 082e 01bb 0c04 | | .CONST 0x01bb,0x0c04 0830 01c2 0c05 | | .CONST 0x01c2,0x0c05 0832 01cd 0c06 | | .CONST 0x01cd,0x0c06 0834 ; -------------------------------------------------------------------------------------- 0834 ; Debug3 Subtable 0x6 0834 ; -------------------------------------------------------------------------------------- 0834 0000 0005 | | .DBG3TAB 0x0000,0x0005 0836 01d3 0001 | | .CONST 0x01d3,0x0001 0838 01d7 0002 | | .CONST 0x01d7,0x0002 083a 01e5 0004 | | .CONST 0x01e5,0x0004 083c 01e6 0003 | | .CONST 0x01e6,0x0003 083e 01f0 0005 | | .CONST 0x01f0,0x0005 0840 ; -------------------------------------------------------------------------------------- 0840 ; Debug3 Subtable 0x7 0840 ; -------------------------------------------------------------------------------------- 0840 0000 0005 | | .DBG3TAB 0x0000,0x0005 0842 01fb 0001 | | .CONST 0x01fb,0x0001 0844 0201 0002 | | .CONST 0x0201,0x0002 0846 0206 0003 | | .CONST 0x0206,0x0003 0848 021a 0004 | | .CONST 0x021a,0x0004 084a 021f 0005 | | .CONST 0x021f,0x0005 084c ; -------------------------------------------------------------------------------------- 084c ; Debug3 Subtable 0x8 084c ; -------------------------------------------------------------------------------------- 084c 0001 0005 | | .DBG3TAB 0x0001,0x0005 084e 022b ffff | + | .CONST 0x022b,0xffff 0850 022c 0001 | , | .CONST 0x022c,0x0001 0852 0231 0002 | 1 | .CONST 0x0231,0x0002 0854 0238 0003 | 8 | .CONST 0x0238,0x0003 0856 023c 0004 | < | .CONST 0x023c,0x0004 0858 0242 0005 | B | .CONST 0x0242,0x0005 085a ; -------------------------------------------------------------------------------------- 085a ; Debug3 Subtable 0x9 085a ; -------------------------------------------------------------------------------------- 085a 0001 0002 | | .DBG3TAB 0x0001,0x0002 085c 024b ffff | K | .CONST 0x024b,0xffff 085e 024c 0001 | L | .CONST 0x024c,0x0001 0860 0252 0002 | R | .CONST 0x0252,0x0002 0862 ; -------------------------------------------------------------------------------------- 0862 ; Debug3 Subtable 0xa 0862 ; -------------------------------------------------------------------------------------- 0862 0000 0004 | | .DBG3TAB 0x0000,0x0004 0864 0263 0001 | c | .CONST 0x0263,0x0001 0866 026f 0002 | o | .CONST 0x026f,0x0002 0868 0270 0401 | p | .CONST 0x0270,0x0401 086a 0271 0002 | q | .CONST 0x0271,0x0002 086c ; -------------------------------------------------------------------------------------- 086c ; Debug3 Subtable 0xb 086c ; -------------------------------------------------------------------------------------- 086c 0001 0014 | | .DBG3TAB 0x0001,0x0014 086e 027b ffff | { | .CONST 0x027b,0xffff 0870 027c 0001 | | | .CONST 0x027c,0x0001 0872 027d 0401 | } | .CONST 0x027d,0x0401 0874 027f 0402 | | .CONST 0x027f,0x0402 0876 0280 0403 | | .CONST 0x0280,0x0403 0878 0281 0404 | | .CONST 0x0281,0x0404 087a 0282 0001 | | .CONST 0x0282,0x0001 087c 0283 0801 | | .CONST 0x0283,0x0801 087e 0285 0802 | | .CONST 0x0285,0x0802 0880 0286 0803 | | .CONST 0x0286,0x0803 0882 0287 0804 | | .CONST 0x0287,0x0804 0884 0288 0404 | | .CONST 0x0288,0x0404 0886 028a 0002 | | .CONST 0x028a,0x0002 0888 028c 0003 | | .CONST 0x028c,0x0003 088a 028f 0005 | | .CONST 0x028f,0x0005 088c 0293 0006 | | .CONST 0x0293,0x0006 088e 0295 0007 | | .CONST 0x0295,0x0007 0890 0299 0004 | | .CONST 0x0299,0x0004 0892 029a 0c01 | | .CONST 0x029a,0x0c01 0894 029c 0004 | | .CONST 0x029c,0x0004 0896 029d 0008 | | .CONST 0x029d,0x0008 0898 ; -------------------------------------------------------------------------------------- 0898 ; Debug3 Subtable 0xc 0898 ; -------------------------------------------------------------------------------------- 0898 0006 005a | Z| .DBG3TAB 0x0006,0x005a 089a 02a3 ffff | | .CONST 0x02a3,0xffff 089c 02a4 fffe | | .CONST 0x02a4,0xfffe 089e 02a5 fffd | | .CONST 0x02a5,0xfffd 08a0 02a6 fffc | | .CONST 0x02a6,0xfffc 08a2 02a7 fffb | | .CONST 0x02a7,0xfffb 08a4 02ad fffa | | .CONST 0x02ad,0xfffa 08a6 02af 0001 | | .CONST 0x02af,0x0001 08a8 02b1 0002 | | .CONST 0x02b1,0x0002 08aa 02b5 0003 | | .CONST 0x02b5,0x0003 08ac 02b6 0004 | | .CONST 0x02b6,0x0004 08ae 02b7 0401 | | .CONST 0x02b7,0x0401 08b0 02b9 0402 | | .CONST 0x02b9,0x0402 08b2 02ba 0403 | | .CONST 0x02ba,0x0403 08b4 02bb 0404 | | .CONST 0x02bb,0x0404 08b6 02bc 0004 | | .CONST 0x02bc,0x0004 08b8 02d4 0023 | #| .CONST 0x02d4,0x0023 08ba 02d5 0005 | | .CONST 0x02d5,0x0005 08bc 02d7 0006 | | .CONST 0x02d7,0x0006 08be 02d8 0801 | | .CONST 0x02d8,0x0801 08c0 02d9 0006 | | .CONST 0x02d9,0x0006 08c2 02da 0007 | | .CONST 0x02da,0x0007 08c4 02db 0c01 | | .CONST 0x02db,0x0c01 08c6 02dc 0007 | | .CONST 0x02dc,0x0007 08c8 02dd 0008 | | .CONST 0x02dd,0x0008 08ca 02e1 0009 | | .CONST 0x02e1,0x0009 08cc 02e2 1001 | | .CONST 0x02e2,0x1001 08ce 02e4 1002 | | .CONST 0x02e4,0x1002 08d0 02e5 1003 | | .CONST 0x02e5,0x1003 08d2 02e6 1004 | | .CONST 0x02e6,0x1004 08d4 02e7 0009 | | .CONST 0x02e7,0x0009 08d6 02e9 000a | | .CONST 0x02e9,0x000a 08d8 02ec 000b | | .CONST 0x02ec,0x000b 08da 02ee 000c | | .CONST 0x02ee,0x000c 08dc 02f2 000d | | .CONST 0x02f2,0x000d 08de 02f4 000e | | .CONST 0x02f4,0x000e 08e0 02f5 1401 | | .CONST 0x02f5,0x1401 08e2 02f7 1402 | | .CONST 0x02f7,0x1402 08e4 02f8 1403 | | .CONST 0x02f8,0x1403 08e6 02f9 1404 | | .CONST 0x02f9,0x1404 08e8 02fa 000e | | .CONST 0x02fa,0x000e 08ea 0300 0018 | | .CONST 0x0300,0x0018 08ec 0301 000f | | .CONST 0x0301,0x000f 08ee 0305 0010 | | .CONST 0x0305,0x0010 08f0 0306 1801 | | .CONST 0x0306,0x1801 08f2 0308 1802 | | .CONST 0x0308,0x1802 08f4 0309 1803 | | .CONST 0x0309,0x1803 08f6 030a 1804 | | .CONST 0x030a,0x1804 08f8 030b 0010 | | .CONST 0x030b,0x0010 08fa 0311 0016 | | .CONST 0x0311,0x0016 08fc 0313 0011 | | .CONST 0x0313,0x0011 08fe 0317 0012 | | .CONST 0x0317,0x0012 0900 0318 1c01 | | .CONST 0x0318,0x1c01 0902 031a 1c02 | | .CONST 0x031a,0x1c02 0904 031b 1c03 | | .CONST 0x031b,0x1c03 0906 031c 1c04 | | .CONST 0x031c,0x1c04 0908 031d 0012 | | .CONST 0x031d,0x0012 090a 031f 0013 | | .CONST 0x031f,0x0013 090c 0323 0014 | # | .CONST 0x0323,0x0014 090e 0326 0015 | & | .CONST 0x0326,0x0015 0910 0329 0017 | ) | .CONST 0x0329,0x0017 0912 032d 0019 | - | .CONST 0x032d,0x0019 0914 0331 001a | 1 | .CONST 0x0331,0x001a 0916 0333 001b | 3 | .CONST 0x0333,0x001b 0918 0334 2001 | 4 | .CONST 0x0334,0x2001 091a 0336 2002 | 6 | .CONST 0x0336,0x2002 091c 0337 2003 | 7 | .CONST 0x0337,0x2003 091e 0338 2004 | 8 | .CONST 0x0338,0x2004 0920 0339 001b | 9 | .CONST 0x0339,0x001b 0922 033b 001c | ; | .CONST 0x033b,0x001c 0924 033d 001d | = | .CONST 0x033d,0x001d 0926 033f 001e | ? | .CONST 0x033f,0x001e 0928 0343 001f | C | .CONST 0x0343,0x001f 092a 0344 2401 | D$ | .CONST 0x0344,0x2401 092c 0346 2402 | F$ | .CONST 0x0346,0x2402 092e 0347 2403 | G$ | .CONST 0x0347,0x2403 0930 0348 2404 | H$ | .CONST 0x0348,0x2404 0932 0349 001f | I | .CONST 0x0349,0x001f 0934 034d 0022 | M "| .CONST 0x034d,0x0022 0936 034f 0020 | O | .CONST 0x034f,0x0020 0938 0353 0024 | S $| .CONST 0x0353,0x0024 093a 0355 0025 | U %| .CONST 0x0355,0x0025 093c 035a 0026 | Z &| .CONST 0x035a,0x0026 093e 035b 2801 | [( | .CONST 0x035b,0x2801 0940 035d 0026 | ] &| .CONST 0x035d,0x0026 0942 035e 0027 | ^ '| .CONST 0x035e,0x0027 0944 036e 0028 | n (| .CONST 0x036e,0x0028 0946 0370 0029 | p )| .CONST 0x0370,0x0029 0948 0371 2c01 | q, | .CONST 0x0371,0x2c01 094a 0372 0029 | r )| .CONST 0x0372,0x0029 094c 0373 002a | s *| .CONST 0x0373,0x002a 094e 0384 002b | +| .CONST 0x0384,0x002b 0950 0386 002c | ,| .CONST 0x0386,0x002c 0952 0387 3001 | 0 | .CONST 0x0387,0x3001 0954 0388 002c | ,| .CONST 0x0388,0x002c 0956 0389 002d | -| .CONST 0x0389,0x002d 0958 038c 002e | .| .CONST 0x038c,0x002e 095a ; -------------------------------------------------------------------------------------- 095a ; Debug3 Subtable 0xd 095a ; -------------------------------------------------------------------------------------- 095a 0001 000f | | .DBG3TAB 0x0001,0x000f 095c 03a3 ffff | | .CONST 0x03a3,0xffff 095e 03a5 0001 | | .CONST 0x03a5,0x0001 0960 03a6 0401 | | .CONST 0x03a6,0x0401 0962 03a8 0402 | | .CONST 0x03a8,0x0402 0964 03a9 0403 | | .CONST 0x03a9,0x0403 0966 03aa 0404 | | .CONST 0x03aa,0x0404 0968 03ab 0001 | | .CONST 0x03ab,0x0001 096a 03b1 0005 | | .CONST 0x03b1,0x0005 096c 03b3 0002 | | .CONST 0x03b3,0x0002 096e 03b5 0003 | | .CONST 0x03b5,0x0003 0970 03b8 0801 | | .CONST 0x03b8,0x0801 0972 03ba 0802 | | .CONST 0x03ba,0x0802 0974 03bb 0803 | | .CONST 0x03bb,0x0803 0976 03bc 0804 | | .CONST 0x03bc,0x0804 0978 03be 0003 | | .CONST 0x03be,0x0003 097a 03bf 0004 | | .CONST 0x03bf,0x0004 097c ; -------------------------------------------------------------------------------------- 097c ; Debug3 Subtable 0xe 097c ; -------------------------------------------------------------------------------------- 097c 0003 0024 | $| .DBG3TAB 0x0003,0x0024 097e 03cb ffff | | .CONST 0x03cb,0xffff 0980 03cc fffe | | .CONST 0x03cc,0xfffe 0982 03cd fffd | | .CONST 0x03cd,0xfffd 0984 03ce 0001 | | .CONST 0x03ce,0x0001 0986 03d1 0002 | | .CONST 0x03d1,0x0002 0988 03d2 0401 | | .CONST 0x03d2,0x0401 098a 03d4 0002 | | .CONST 0x03d4,0x0002 098c 03d5 0003 | | .CONST 0x03d5,0x0003 098e 03d7 0004 | | .CONST 0x03d7,0x0004 0990 03da 0005 | | .CONST 0x03da,0x0005 0992 03db 0801 | | .CONST 0x03db,0x0801 0994 03dd 0005 | | .CONST 0x03dd,0x0005 0996 03de 0006 | | .CONST 0x03de,0x0006 0998 03e0 0007 | | .CONST 0x03e0,0x0007 099a 03e4 0008 | | .CONST 0x03e4,0x0008 099c 03e6 0009 | | .CONST 0x03e6,0x0009 099e 03e9 000a | | .CONST 0x03e9,0x000a 09a0 03ee 000b | | .CONST 0x03ee,0x000b 09a2 03ef 0c01 | | .CONST 0x03ef,0x0c01 09a4 03f1 000b | | .CONST 0x03f1,0x000b 09a6 03f2 000c | | .CONST 0x03f2,0x000c 09a8 03f3 1001 | | .CONST 0x03f3,0x1001 09aa 03f5 1002 | | .CONST 0x03f5,0x1002 09ac 03f6 1003 | | .CONST 0x03f6,0x1003 09ae 03f7 1004 | | .CONST 0x03f7,0x1004 09b0 03f8 000c | | .CONST 0x03f8,0x000c 09b2 03f9 1401 | | .CONST 0x03f9,0x1401 09b4 03fb 1402 | | .CONST 0x03fb,0x1402 09b6 03fc 1403 | | .CONST 0x03fc,0x1403 09b8 03fd 1404 | | .CONST 0x03fd,0x1404 09ba 03fe 1004 | | .CONST 0x03fe,0x1004 09bc 0400 000d | | .CONST 0x0400,0x000d 09be 0402 000e | | .CONST 0x0402,0x000e 09c0 0404 000f | | .CONST 0x0404,0x000f 09c2 0406 0010 | | .CONST 0x0406,0x0010 09c4 040a 0011 | | .CONST 0x040a,0x0011 09c6 040d 0012 | | .CONST 0x040d,0x0012 09c8 040f 0013 | | .CONST 0x040f,0x0013 09ca 0416 0014 | | .CONST 0x0416,0x0014 09cc ; -------------------------------------------------------------------------------------- 09cc ; Debug3 Subtable 0xf 09cc ; -------------------------------------------------------------------------------------- 09cc 0002 002f | /| .DBG3TAB 0x0002,0x002f 09ce 041b ffff | | .CONST 0x041b,0xffff 09d0 041c fffe | | .CONST 0x041c,0xfffe 09d2 041d 0001 | | .CONST 0x041d,0x0001 09d4 041e 0401 | | .CONST 0x041e,0x0401 09d6 0420 0402 | | .CONST 0x0420,0x0402 09d8 0421 0403 | ! | .CONST 0x0421,0x0403 09da 0422 0404 | " | .CONST 0x0422,0x0404 09dc 0423 0001 | # | .CONST 0x0423,0x0001 09de 0427 000a | ' | .CONST 0x0427,0x000a 09e0 0428 0801 | ( | .CONST 0x0428,0x0801 09e2 0429 000a | ) | .CONST 0x0429,0x000a 09e4 042a 0002 | * | .CONST 0x042a,0x0002 09e6 042e 0003 | . | .CONST 0x042e,0x0003 09e8 0432 0004 | 2 | .CONST 0x0432,0x0004 09ea 0436 0005 | 6 | .CONST 0x0436,0x0005 09ec 043a 0006 | : | .CONST 0x043a,0x0006 09ee 043b 0c01 | ; | .CONST 0x043b,0x0c01 09f0 043c 0006 | < | .CONST 0x043c,0x0006 09f2 043d 0007 | = | .CONST 0x043d,0x0007 09f4 0442 0008 | B | .CONST 0x0442,0x0008 09f6 0443 1001 | C | .CONST 0x0443,0x1001 09f8 0444 0008 | D | .CONST 0x0444,0x0008 09fa 0445 0009 | E | .CONST 0x0445,0x0009 09fc 044a 000b | J | .CONST 0x044a,0x000b 09fe 044d 000c | M | .CONST 0x044d,0x000c 0a00 044e 000d | N | .CONST 0x044e,0x000d 0a02 044f 1401 | O | .CONST 0x044f,0x1401 0a04 0451 1402 | Q | .CONST 0x0451,0x1402 0a06 0452 1403 | R | .CONST 0x0452,0x1403 0a08 0453 1404 | S | .CONST 0x0453,0x1404 0a0a 0454 000d | T | .CONST 0x0454,0x000d 0a0c 0460 0014 | ` | .CONST 0x0460,0x0014 0a0e 0461 000e | a | .CONST 0x0461,0x000e 0a10 0462 1801 | b | .CONST 0x0462,0x1801 0a12 0463 000e | c | .CONST 0x0463,0x000e 0a14 0464 000f | d | .CONST 0x0464,0x000f 0a16 046a 0010 | j | .CONST 0x046a,0x0010 0a18 046c 0011 | l | .CONST 0x046c,0x0011 0a1a 0470 0012 | p | .CONST 0x0470,0x0012 0a1c 0474 0013 | t | .CONST 0x0474,0x0013 0a1e 0477 0015 | w | .CONST 0x0477,0x0015 0a20 047c 0016 | | | .CONST 0x047c,0x0016 0a22 0481 0017 | | .CONST 0x0481,0x0017 0a24 0483 0018 | | .CONST 0x0483,0x0018 0a26 048c 0019 | | .CONST 0x048c,0x0019 0a28 048d 1c01 | | .CONST 0x048d,0x1c01 0a2a 048e 0019 | | .CONST 0x048e,0x0019 0a2c 0490 001a | | .CONST 0x0490,0x001a 0a2e 049d 001b | | .CONST 0x049d,0x001b 0a30 ; -------------------------------------------------------------------------------------- 0a30 ; Debug3 Subtable 0x10 0a30 ; -------------------------------------------------------------------------------------- 0a30 0004 0050 | P| .DBG3TAB 0x0004,0x0050 0a32 04a3 0001 | | .CONST 0x04a3,0x0001 0a34 04a4 0401 | | .CONST 0x04a4,0x0401 0a36 04a6 0402 | | .CONST 0x04a6,0x0402 0a38 04a7 0403 | | .CONST 0x04a7,0x0403 0a3a 04a8 0404 | | .CONST 0x04a8,0x0404 0a3c 04a9 0001 | | .CONST 0x04a9,0x0001 0a3e 04b9 000a | | .CONST 0x04b9,0x000a 0a40 04ba 0801 | | .CONST 0x04ba,0x0801 0a42 04bc 0802 | | .CONST 0x04bc,0x0802 0a44 04bd 0803 | | .CONST 0x04bd,0x0803 0a46 04be 0804 | | .CONST 0x04be,0x0804 0a48 04bf 000a | | .CONST 0x04bf,0x000a 0a4a 04c0 0c01 | | .CONST 0x04c0,0x0c01 0a4c 04c8 000a | | .CONST 0x04c8,0x000a 0a4e 04ce 000c | | .CONST 0x04ce,0x000c 0a50 04d3 000d | | .CONST 0x04d3,0x000d 0a52 04d7 000e | | .CONST 0x04d7,0x000e 0a54 04dc 000f | | .CONST 0x04dc,0x000f 0a56 04e0 0010 | | .CONST 0x04e0,0x0010 0a58 04e4 0011 | | .CONST 0x04e4,0x0011 0a5a 04e9 0012 | | .CONST 0x04e9,0x0012 0a5c 04ea efff | | .CONST 0x04ea,0xefff 0a5e 04eb effe | | .CONST 0x04eb,0xeffe 0a60 04ec 1001 | | .CONST 0x04ec,0x1001 0a62 04f1 1003 | | .CONST 0x04f1,0x1003 0a64 04f3 1401 | | .CONST 0x04f3,0x1401 0a66 04f5 1402 | | .CONST 0x04f5,0x1402 0a68 04f7 1403 | | .CONST 0x04f7,0x1403 0a6a 04fb 1404 | | .CONST 0x04fb,0x1404 0a6c 04ff 1405 | | .CONST 0x04ff,0x1405 0a6e 0501 1801 | | .CONST 0x0501,0x1801 0a70 0503 1802 | | .CONST 0x0503,0x1802 0a72 0504 1803 | | .CONST 0x0504,0x1803 0a74 0505 1804 | | .CONST 0x0505,0x1804 0a76 0507 1405 | | .CONST 0x0507,0x1405 0a78 0511 1c01 | | .CONST 0x0511,0x1c01 0a7a 0513 1c02 | | .CONST 0x0513,0x1c02 0a7c 0514 1c03 | | .CONST 0x0514,0x1c03 0a7e 0515 1c04 | | .CONST 0x0515,0x1c04 0a80 0517 1804 | | .CONST 0x0517,0x1804 0a82 0525 1003 | % | .CONST 0x0525,0x1003 0a84 0526 1004 | & | .CONST 0x0526,0x1004 0a86 0527 2001 | ' | .CONST 0x0527,0x2001 0a88 0529 2002 | ) | .CONST 0x0529,0x2002 0a8a 052b 2003 | + | .CONST 0x052b,0x2003 0a8c 052e 1004 | . | .CONST 0x052e,0x1004 0a8e 052f 1005 | / | .CONST 0x052f,0x1005 0a90 0531 1002 | 1 | .CONST 0x0531,0x1002 0a92 0532 2401 | 2$ | .CONST 0x0532,0x2401 0a94 0534 1002 | 4 | .CONST 0x0534,0x1002 0a96 0537 0002 | 7 | .CONST 0x0537,0x0002 0a98 053c 0003 | < | .CONST 0x053c,0x0003 0a9a 0541 0004 | A | .CONST 0x0541,0x0004 0a9c 0543 0005 | C | .CONST 0x0543,0x0005 0a9e 0544 d7ff | D | .CONST 0x0544,0xd7ff 0aa0 0545 2801 | E( | .CONST 0x0545,0x2801 0aa2 0548 2802 | H( | .CONST 0x0548,0x2802 0aa4 0549 2c01 | I, | .CONST 0x0549,0x2c01 0aa6 054b 2802 | K( | .CONST 0x054b,0x2802 0aa8 054c 2803 | L( | .CONST 0x054c,0x2803 0aaa 0554 0006 | T | .CONST 0x0554,0x0006 0aac 0555 cfff | U | .CONST 0x0555,0xcfff 0aae 0556 3001 | V0 | .CONST 0x0556,0x3001 0ab0 055c 3002 | \0 | .CONST 0x055c,0x3002 0ab2 055d 3401 | ]4 | .CONST 0x055d,0x3401 0ab4 055f 3002 | _0 | .CONST 0x055f,0x3002 0ab6 0564 3003 | d0 | .CONST 0x0564,0x3003 0ab8 0565 3004 | e0 | .CONST 0x0565,0x3004 0aba 0566 3801 | f8 | .CONST 0x0566,0x3801 0abc 0568 3802 | h8 | .CONST 0x0568,0x3802 0abe 0569 3803 | i8 | .CONST 0x0569,0x3803 0ac0 056a 3804 | j8 | .CONST 0x056a,0x3804 0ac2 056b 3004 | k0 | .CONST 0x056b,0x3004 0ac4 056d 3005 | m0 | .CONST 0x056d,0x3005 0ac6 056e 3006 | n0 | .CONST 0x056e,0x3006 0ac8 0572 3007 | r0 | .CONST 0x0572,0x3007 0aca 057d 3008 | }0 | .CONST 0x057d,0x3008 0acc 0585 3009 | 0 | .CONST 0x0585,0x3009 0ace 0589 300a | 0 | .CONST 0x0589,0x300a 0ad0 058b 300b | 0 | .CONST 0x058b,0x300b 0ad2 0593 300c | 0 | .CONST 0x0593,0x300c 0ad4 059c 0007 | | .CONST 0x059c,0x0007 0ad6 05a1 0008 | | .CONST 0x05a1,0x0008 0ad8 05a5 0009 | | .CONST 0x05a5,0x0009 0ada ; -------------------------------------------------------------------------------------- 0ada ; Debug3 Subtable 0x11 0ada ; -------------------------------------------------------------------------------------- 0ada 0002 001b | | .DBG3TAB 0x0002,0x001b 0adc 05b3 ffff | | .CONST 0x05b3,0xffff 0ade 05b4 fffe | | .CONST 0x05b4,0xfffe 0ae0 05b5 0001 | | .CONST 0x05b5,0x0001 0ae2 05b6 0401 | | .CONST 0x05b6,0x0401 0ae4 05b8 0402 | | .CONST 0x05b8,0x0402 0ae6 05b9 0403 | | .CONST 0x05b9,0x0403 0ae8 05ba 0404 | | .CONST 0x05ba,0x0404 0aea 05bb 0001 | | .CONST 0x05bb,0x0001 0aec 05cb 000b | | .CONST 0x05cb,0x000b 0aee 05ce 0002 | | .CONST 0x05ce,0x0002 0af0 05d3 0003 | | .CONST 0x05d3,0x0003 0af2 05d7 0004 | | .CONST 0x05d7,0x0004 0af4 05d8 0801 | | .CONST 0x05d8,0x0801 0af6 05da 0802 | | .CONST 0x05da,0x0802 0af8 05db 0803 | | .CONST 0x05db,0x0803 0afa 05dc 0804 | | .CONST 0x05dc,0x0804 0afc 05dd 0004 | | .CONST 0x05dd,0x0004 0afe 05df 0005 | | .CONST 0x05df,0x0005 0b00 05e2 0006 | | .CONST 0x05e2,0x0006 0b02 05e5 0007 | | .CONST 0x05e5,0x0007 0b04 05e9 0008 | | .CONST 0x05e9,0x0008 0b06 05ec 0c01 | | .CONST 0x05ec,0x0c01 0b08 05ee 0c02 | | .CONST 0x05ee,0x0c02 0b0a 05ef 0c03 | | .CONST 0x05ef,0x0c03 0b0c 05f0 0c04 | | .CONST 0x05f0,0x0c04 0b0e 05f2 0008 | | .CONST 0x05f2,0x0008 0b10 05f4 0009 | | .CONST 0x05f4,0x0009 0b12 05f7 000a | | .CONST 0x05f7,0x000a 0b14 05fa 000c | | .CONST 0x05fa,0x000c 0b16 0000 0000 | | .BLANK 0000[0xea]