|
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 - metrics - download
Length: 3072 (0xc00)
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 02e0 | | .CONST 0x02e0 ; 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 0002 | | .CONST 0x0002 ; 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 For_Outer_Call,Visible,Unelaborated,INIT_0018 ; Debug Table 0x0 = .DEBUG 0x000b,0x034a,0x8000,0x0000,0x0057,0x9415,0x0000,0x0005
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 003d | = | .CONST 0x003d ; Address of begin
0019 004f | O | .CONST 0x004f ; Address of exception handler
001a 000e | | .CONST 0x000e ; Number of locals
001b INIT_0018:
001b 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001b,0x034c,0x8001,0x0000,0x0057,0x9415,0x0000,0x0005
; Debug Table 0x1.0x0 = 0x1b,0xffff
001c e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x1 = 0x1c,0xfffe
001d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001e 0322 | " | Declare_Variable Record
001f 00d8 | | Load_Top At_Offset_0
0020 1c00 | | Execute_Immediate Run_Utility,0x0
0021 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1.0x2 = 0x21,0xfffd
0022 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x22,0xfffc
0023 029f 0073 | s| Declare_Subprogram For_Call,INIT_0070 ; Debug Table 0x1.0x4 = 0x23,0xfffb
0025 029f 00a3 | | Declare_Subprogram For_Call,INIT_00a0 ; Debug Table 0x1.0x5 = 0x25,0xfffa
0027 029f 00cb | | Declare_Subprogram For_Call,INIT_00c8 ; Debug Table 0x1.0x6 = 0x27,0xfff9
0029 029f 00f3 | | Declare_Subprogram For_Call,INIT_00f0 ; Debug Table 0x1.0x7 = 0x29,0xfff8
002b 029f 0103 | | Declare_Subprogram For_Call,INIT_0100 ; Debug Table 0x1.0x8 = 0x2b,0xfff7
002d 029f 012b | +| Declare_Subprogram For_Call,INIT_0128 ; Debug Table 0x1.0x9 = 0x2d,0xfff6
002f 029f 014b | K| Declare_Subprogram For_Call,INIT_0148 ; Debug Table 0x1.0xa = 0x2f,0xfff5
0031 029e 0173 | s| Declare_Subprogram For_Call,Unelaborated,INIT_0170 ; Debug Table 0x1.0xb = 0x31,0xfff4
0033 029f 019b | | Declare_Subprogram For_Call,INIT_0198 ; Debug Table 0x1.0xc = 0x33,0xfff3
0035 029f 021b | | Declare_Subprogram For_Call,INIT_0218 ; Debug Table 0x1.0xd = 0x35,0xfff2
0037 029f 027b | {| Declare_Subprogram For_Call,INIT_0278 ; Debug Table 0x1.0xe = 0x37,0xfff1
0039 480b |H | Short_Literal 0xb ; Debug Table 0x1.0xf = 0x39,0xfff0
003a 4802 |H | Short_Literal 0x2
003b 0099 | | Action Reference_Dynamic
003c 00c7 | | Action Elaborate_Subprogram
003d BODY_0018:
003d e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x10 = 0x3d,0x1
003e e5ff | | Load 0x2,-0x1
003f e002 | | Load 0x0,0x2
0040 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0041 e001 | | Load 0x0,0x1
0042 180e | | Execute Package,Field_Execute,Field_Number 0xe
0043 c5ff | | Store 0x2,-0x1
0044 00d1 | | Pop_Control Pop_Count_1
0045 e5ff | | Load 0x2,-0x1 ; Debug Table 0x1.0x11 = 0x45,0x2
0046 8404 | | Call 0x2,0x4
0047 a403 | | Store_Unchecked 0x2,0x3
0048 e403 | | Load 0x2,0x3 ; Debug Table 0x1.0x12 = 0x48,0x3
0049 840b | | Call 0x2,0xb
004a e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x13 = 0x4a,0x4
004b 4800 |H | Short_Literal 0x0
004c e001 | | Load 0x0,0x1
004d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
004e 4501 |E | Exit_Subprogram 0x1
004f TRAP_0018:
004f 6250 |bP | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x57949501}
0050 010f | | Execute Exception,Equal
0051 680a |h | Jump_Zero 0x5c
0052 e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x14 = 0x52,0x5
0053 4800 |H | Short_Literal 0x0
0054 e001 | | Load 0x0,0x1
0055 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0056 00d1 | | Pop_Control Pop_Count_1
0057 0092 02a4 | | Action Push_String_Extended,0x2a4 ; "Private_Part failed - only packages visible parts have private parts"
; Debug Table 0x1.0x15 = 0x57,0x6
0059 e003 | | Load 0x0,0x3
005a 180d | | Execute Package,Field_Execute,Field_Number 0xd
005b 4501 |E | Exit_Subprogram 0x1
005c e402 | | Load 0x2,0x2 ; Debug Table 0x1.0x16 = 0x5c,0x7
005d 4800 |H | Short_Literal 0x0
005e e001 | | Load 0x0,0x1
005f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0060 00d1 | | Pop_Control Pop_Count_1
0061 e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x17 = 0x61,0x8
0062 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0063 0092 02a5 | | Action Push_String_Extended,0x2a5 ; "*** Exception in Build_Private:"
; Debug Table 0x1.0x18 = 0x63,0x9
0065 e005 | | Load 0x0,0x5
0066 180d | | Execute Package,Field_Execute,Field_Number 0xd
0067 01cc | | Execute Vector,Catenate
0068 e004 | | Load 0x0,0x4
0069 180f | | Execute Package,Field_Execute,Field_Number 0xf
006a 4501 |E | Exit_Subprogram 0x1
006b 0000 0000 | | .BLANK 0000[0x5]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 0007 | | Action Break_Optional ; Debug Table 0x2 = .DEBUG 0x0073,0x0380,0x0002,0x0000,0x0057,0x9495,0x0000,0x0029
; Debug Table 0x2.0x0 = 0x73,0x1
0074 e7ff | | Load 0x3,-0x1 ; Debug Table 0x2.0x1 = 0x74,0x401
0075 0007 | | Action Break_Optional
0076 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x2.0x2 = 0x76,0x402
0077 0007 | | Action Break_Optional ; Debug Table 0x2.0x3 = 0x77,0x403
0078 0007 | | Action Break_Optional ; Debug Table 0x2.0x4 = 0x78,0x404
0079 0b3e | > | Execute_Immediate Case_Compare,0x3e ; Debug Table 0x2.0x5 = 0x79,0x1
007a 7008 |p | Jump_Nonzero 0x83
007b 0b49 | I | Execute_Immediate Case_Compare,0x49
007c 7008 |p | Jump_Nonzero 0x85
007d 0ba8 | | Execute_Immediate Case_Compare,0xa8
007e 700b |p | Jump_Nonzero 0x8a
007f 0b41 | A | Execute_Immediate Case_Compare,0x41
0080 700e |p | Jump_Nonzero 0x8f
0081 621e |b | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x57949501} ; Debug Table 0x2.0x6 = 0x81,0x8
0082 0257 | W | Execute Discrete,Raise
0083 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x7 = 0x83,0x2
0084 4401 |D | Exit_Subprogram With_Result,0x1
0085 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x8 = 0x85,0x3
0086 00eb | | Load_Encached Diana_Cache
0087 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
0088 8404 | | Call 0x2,0x4
0089 4401 |D | Exit_Subprogram With_Result,0x1
008a 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x9 = 0x8a,0x4
008b 00eb | | Load_Encached Diana_Cache
008c 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
008d 8404 | | Call 0x2,0x4
008e 4401 |D | Exit_Subprogram With_Result,0x1
008f 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0xa = 0x8f,0x5
0090 00eb | | Load_Encached Diana_Cache
0091 18cc | | Execute Package,Field_Execute,Field_Number 0xcc
0092 e603 | | Load 0x3,0x3 ; Debug Table 0x2.0xb = 0x92,0x801
0093 0007 | | Action Break_Optional
0094 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x2.0xc = 0x94,0x802
0095 0007 | | Action Break_Optional ; Debug Table 0x2.0xd = 0x95,0x803
0096 00d0 | | Action Swap_Control ; Debug Table 0x2.0xe = 0x96,0x804
0097 00d1 | | Pop_Control Pop_Count_1
0098 0b7c | | | Execute_Immediate Case_Compare,0x7c ; Debug Table 0x2.0xf = 0x98,0x5
0099 7002 |p | Jump_Nonzero 0x9c
009a 6205 |b | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x57949501} ; Debug Table 0x2.0x10 = 0x9a,0x7
009b 0257 | W | Execute Discrete,Raise
009c e7ff | | Load 0x3,-0x1 ; Debug Table 0x2.0x11 = 0x9c,0x6
009d 4401 |D | Exit_Subprogram With_Result,0x1
009e 0000 0000 | | .XXX[0x2]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 0007 | | Action Break_Optional ; Debug Table 0x3 = .DEBUG 0x00a3,0x03a6,0x0002,0x0000,0x0057,0x9495,0x0000,0x0091
; Debug Table 0x3.0x0 = 0xa3,0x1
00a4 e7fe | | Load 0x3,-0x2 ; Debug Table 0x3.0x1 = 0xa4,0x401
00a5 0007 | | Action Break_Optional
00a6 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x3.0x2 = 0xa6,0x402
00a7 0007 | | Action Break_Optional ; Debug Table 0x3.0x3 = 0xa7,0x403
00a8 0007 | | Action Break_Optional ; Debug Table 0x3.0x4 = 0xa8,0x404
00a9 0b00 | | Execute_Immediate Case_Compare,0x0 ; Debug Table 0x3.0x5 = 0xa9,0x1
00aa 7015 |p | Jump_Nonzero 0xc0
00ab 0007 | | Action Break_Optional ; Debug Table 0x3.0x6 = 0xab,0x3
00ac 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x7 = 0xac,0x801
00ad 021d | | Execute Heap_Access,Is_Null
00ae 6806 |h | Jump_Zero 0xb5 ; Debug Table 0x3.0x8 = 0xae,0x3
00af 0007 | | Action Break_Optional ; Debug Table 0x3.0x9 = 0xaf,0x4
00b0 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x3.0xa = 0xb0,0xc01
00b1 e7fe | | Load 0x3,-0x2 ; Debug Table 0x3.0xb = 0xb1,0x4
00b2 00eb | | Load_Encached Diana_Cache
00b3 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
00b4 4402 |D | Exit_Subprogram With_Result,0x2
00b5 0007 | | Action Break_Optional ; Debug Table 0x3.0xc = 0xb5,0x5
00b6 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x3.0xd = 0xb6,0x1001
00b7 e7fe | | Load 0x3,-0x2 ; Debug Table 0x3.0xe = 0xb7,0x5
00b8 00eb | | Load_Encached Diana_Cache
00b9 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
00ba e7ff | | Load 0x3,-0x1
00bb 4975 |Iu | Short_Literal 0x175
00bc 00eb | | Load_Encached Diana_Cache
00bd 0098 | | Execute Package,Field_Read_Dynamic
00be 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00bf 4402 |D | Exit_Subprogram With_Result,0x2
00c0 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xf = 0xc0,0x2
00c1 4402 |D | Exit_Subprogram With_Result,0x2
00c2 0000 0000 | | .BLANK 0000[0x6]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cd | | .CONST 0x00cd ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0003 | | .CONST 0x0003 ; Number of locals
00cb INIT_00c8:
00cb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x00cb,0x03c8,0x0002,0x0000,0x0057,0x9495,0x0000,0x00eb
; Debug Table 0x4.0x0 = 0xcb,0xffff
00cc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x1 = 0xcc,0xfffe
00cd BODY_00c8:
00cd e7ff | | Load 0x3,-0x1 ; Debug Table 0x4.0x2 = 0xcd,0x1
00ce 00eb | | Load_Encached Diana_Cache
00cf 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
00d0 4974 |It | Short_Literal 0x174
00d1 00eb | | Load_Encached Diana_Cache
00d2 0098 | | Execute Package,Field_Read_Dynamic
00d3 180d | | Execute Package,Field_Execute,Field_Number 0xd
00d4 4866 |Hf | Short_Literal 0x66
00d5 00eb | | Load_Encached Diana_Cache
00d6 187c | | | Execute Package,Field_Execute,Field_Number 0x7c
00d7 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00d8 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0x3 = 0xd8,0x2
00d9 e006 | | Load 0x0,0x6
00da 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00db 00d9 | | Load_Top At_Offset_1
00dc e7ff | | Load 0x3,-0x1
00dd 00eb | | Load_Encached Diana_Cache
00de 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0
00df 4974 |It | Short_Literal 0x174
00e0 00eb | | Load_Encached Diana_Cache
00e1 0098 | | Execute Package,Field_Read_Dynamic
00e2 180d | | Execute Package,Field_Execute,Field_Number 0xd
00e3 4838 |H8 | Short_Literal 0x38
00e4 00eb | | Load_Encached Diana_Cache
00e5 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
00e6 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00e7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x4 = 0xe7,0x3
00e8 4401 |D | Exit_Subprogram With_Result,0x1
00e9 0000 0000 | | .BLANK 0000[0x7]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3 | | .CONST 0x00f3 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0001 | | .CONST 0x0001 ; Number of locals
00f3 BODY_00f0:
00f3 INIT_00f0:
00f3 0007 | | Action Break_Optional ; Debug Table 0x5 = .DEBUG 0x00f3,0x03d4,0x0002,0x0000,0x0057,0x9495,0x0000,0x013e
; Debug Table 0x5.0x0 = 0xf3,0x1
00f4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x1 = 0xf4,0x401
00f5 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x5.0x2 = 0xf5,0x1
00f6 e006 | | Load 0x0,0x6
00f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00f8 4866 |Hf | Short_Literal 0x66
00f9 00eb | | Load_Encached Diana_Cache
00fa 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
00fb 486d |Hm | Short_Literal 0x6d
00fc 00eb | | Load_Encached Diana_Cache
00fd 187c | | | Execute Package,Field_Execute,Field_Number 0x7c
00fe 00ca | | Action Exit_Nullary_Function
00ff 0000 | | .XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 0007 | | Action Break_Optional ; Debug Table 0x6 = .DEBUG 0x0103,0x03dc,0x0002,0x0000,0x0057,0x9495,0x0000,0x0160
; Debug Table 0x6.0x0 = 0x103,0x1
0104 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x6.0x1 = 0x104,0x401
0105 0007 | | Action Break_Optional ; Debug Table 0x6.0x2 = 0x105,0x1
0106 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0x3 = 0x106,0x801
0107 0007 | | Action Break_Optional ; Debug Table 0x6.0x4 = 0x107,0x401
0108 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6.0x5 = 0x108,0xc01
0109 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x6.0x6 = 0x109,0x801
010a e006 | | Load 0x0,0x6
010b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
010c 4866 |Hf | Short_Literal 0x66
010d 00eb | | Load_Encached Diana_Cache
010e 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
010f 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x6.0x7 = 0x10f,0x1001
0110 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x6.0x8 = 0x110,0xc01
0111 e006 | | Load 0x0,0x6
0112 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0113 00eb | | Load_Encached Diana_Cache
0114 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
0115 4890 |H | Short_Literal 0x90
0116 00eb | | Load_Encached Diana_Cache
0117 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0118 4839 |H9 | Short_Literal 0x39
0119 00eb | | Load_Encached Diana_Cache
011a 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
011b 00eb | | Load_Encached Diana_Cache
011c 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
011d 4872 |Hr | Short_Literal 0x72
011e 00eb | | Load_Encached Diana_Cache
011f 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0120 00ca | | Action Exit_Nullary_Function
0121 0000 0000 | | .BLANK 0000[0x7]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012c | , | .CONST 0x012c ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0002 | | .CONST 0x0002 ; Number of locals
012b INIT_0128:
012b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x7 = .DEBUG 0x012b,0x03f0,0x0001,0x0000,0x0057,0x9495,0x0000,0x01a8
; Debug Table 0x7.0x0 = 0x12b,0xffff
012c BODY_0128:
012c 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x1 = 0x12c,0x1
012d 00eb | | Load_Encached Diana_Cache
012e 18eb | | Execute Package,Field_Execute,Field_Number 0xeb
012f 00eb | | Load_Encached Diana_Cache
0130 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0131 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0132 0007 | | Action Break_Optional ; Debug Table 0x7.0x2 = 0x132,0x2
0133 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x3 = 0x133,0x401
0134 021d | | Execute Heap_Access,Is_Null
0135 6806 |h | Jump_Zero 0x13c ; Debug Table 0x7.0x4 = 0x135,0x2
0136 8407 | | Call 0x2,0x7 ; Debug Table 0x7.0x5 = 0x136,0x3
0137 e7ff | | Load 0x3,-0x1
0138 4949 |II | Short_Literal 0x149
0139 00eb | | Load_Encached Diana_Cache
013a 0096 | | Execute Package,Field_Execute_Dynamic
013b 4501 |E | Exit_Subprogram 0x1
013c 8408 | | Call 0x2,0x8 ; Debug Table 0x7.0x6 = 0x13c,0x4
013d e7ff | | Load 0x3,-0x1
013e 4949 |II | Short_Literal 0x149
013f 00eb | | Load_Encached Diana_Cache
0140 0096 | | Execute Package,Field_Execute_Dynamic
0141 4501 |E | Exit_Subprogram 0x1
0142 0000 0000 | | .BLANK 0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014d | M | .CONST 0x014d ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0003 | | .CONST 0x0003 ; Number of locals
014b INIT_0148:
014b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8 = .DEBUG 0x014b,0x0400,0x0002,0x0000,0x0057,0x9495,0x0000,0x01e3
; Debug Table 0x8.0x0 = 0x14b,0xffff
014c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x1 = 0x14c,0xfffe
014d BODY_0148:
014d e7ff | | Load 0x3,-0x1 ; Debug Table 0x8.0x2 = 0x14d,0x1
014e 00eb | | Load_Encached Diana_Cache
014f 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8
0150 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0151 0007 | | Action Break_Optional ; Debug Table 0x8.0x3 = 0x151,0x2
0152 e602 | | Load 0x3,0x2 ; Debug Table 0x8.0x4 = 0x152,0x401
0153 0007 | | Action Break_Optional
0154 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x8.0x5 = 0x154,0x402
0155 0007 | | Action Break_Optional ; Debug Table 0x8.0x6 = 0x155,0x403
0156 0007 | | Action Break_Optional ; Debug Table 0x8.0x7 = 0x156,0x404
0157 0b71 | q | Execute_Immediate Case_Compare,0x71 ; Debug Table 0x8.0x8 = 0x157,0x2
0158 7005 |p | Jump_Nonzero 0x15e
0159 0b70 | p | Execute_Immediate Case_Compare,0x70
015a 7003 |p | Jump_Nonzero 0x15e
015b 0007 | | Action Break_Optional ; Debug Table 0x8.0x9 = 0x15b,0x6
015c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0xa = 0x15c,0x801
015d 4401 |D | Exit_Subprogram With_Result,0x1 ; Debug Table 0x8.0xb = 0x15d,0x6
015e e7ff | | Load 0x3,-0x1 ; Debug Table 0x8.0xc = 0x15e,0x3
015f 4974 |It | Short_Literal 0x174
0160 00eb | | Load_Encached Diana_Cache
0161 0098 | | Execute Package,Field_Read_Dynamic
0162 180d | | Execute Package,Field_Execute,Field_Number 0xd
0163 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0164 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0xd = 0x164,0x4
0165 8409 | | Call 0x2,0x9
0166 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0167 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0xe = 0x167,0x5
0168 4401 |D | Exit_Subprogram With_Result,0x1
0169 0000 0000 | | .BLANK 0000[0x7]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0174 | t | .CONST 0x0174 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0002 | | .CONST 0x0002 ; Number of locals
0173 INIT_0170:
0173 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x0173,0x0420,0x0001,0x0000,0x0057,0x9495,0x0000,0x0233
; Debug Table 0x9.0x0 = 0x173,0xffff
0174 BODY_0170:
0174 0007 | | Action Break_Optional ; Debug Table 0x9.0x1 = 0x174,0x1
0175 e7ff | | Load 0x3,-0x1 ; Debug Table 0x9.0x2 = 0x175,0x401
0176 0007 | | Action Break_Optional
0177 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0x3 = 0x177,0x402
0178 0007 | | Action Break_Optional ; Debug Table 0x9.0x4 = 0x178,0x403
0179 0007 | | Action Break_Optional ; Debug Table 0x9.0x5 = 0x179,0x404
017a 0b3e | > | Execute_Immediate Case_Compare,0x3e ; Debug Table 0x9.0x6 = 0x17a,0x1
017b 7003 |p | Jump_Nonzero 0x17f
017c 0b41 | A | Execute_Immediate Case_Compare,0x41
017d 7006 |p | Jump_Nonzero 0x184
017e 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x9.0x7 = 0x17e,0x4
017f e7ff | | Load 0x3,-0x1 ; Debug Table 0x9.0x8 = 0x17f,0x2
0180 00eb | | Load_Encached Diana_Cache
0181 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8
0182 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0183 7804 |x | Jump 0x188
0184 e7ff | | Load 0x3,-0x1 ; Debug Table 0x9.0x9 = 0x184,0x3
0185 00eb | | Load_Encached Diana_Cache
0186 18cc | | Execute Package,Field_Execute,Field_Number 0xcc
0187 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0188 00d1 | | Pop_Control Pop_Count_1
0189 0007 | | Action Break_Optional ; Debug Table 0x9.0xa = 0x189,0x5
018a e602 | | Load 0x3,0x2 ; Debug Table 0x9.0xb = 0x18a,0x801
018b 0007 | | Action Break_Optional
018c 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0x9.0xc = 0x18c,0x802
018d 0007 | | Action Break_Optional ; Debug Table 0x9.0xd = 0x18d,0x803
018e 0007 | | Action Break_Optional ; Debug Table 0x9.0xe = 0x18e,0x804
018f 0b7c | | | Execute_Immediate Case_Compare,0x7c ; Debug Table 0x9.0xf = 0x18f,0x5
0190 7001 |p | Jump_Nonzero 0x192
0191 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x9.0x10 = 0x191,0x7
0192 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x11 = 0x192,0x6
0193 840e | | Call 0x2,0xe
0194 4502 |E | Exit_Subprogram 0x2
0195 0000 0000 | | .XXX[0x3]
0197 0000 | |
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a1 | | .CONST 0x01a1 ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0005 | | .CONST 0x0005 ; Number of locals
019b INIT_0198:
019b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xa = .DEBUG 0x019b,0x0446,0x0001,0x0000,0x0057,0x9495,0x0000,0x023d
; Debug Table 0xa.0x0 = 0x19b,0xffff
019c 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xa.0x1 = 0x19c,0x401
019d 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0xa.0x2 = 0x19d,0xffff
019e 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xa.0x3 = 0x19e,0xfffe
019f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x4 = 0x19f,0xfffd
01a0 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x5 = 0x1a0,0xfffc
01a1 BODY_0198:
01a1 e7ff | | Load 0x3,-0x1 ; Debug Table 0xa.0x6 = 0x1a1,0x1
01a2 00eb | | Load_Encached Diana_Cache
01a3 18bd | | Execute Package,Field_Execute,Field_Number 0xbd
01a4 00eb | | Load_Encached Diana_Cache
01a5 1889 | | Execute Package,Field_Execute,Field_Number 0x89
01a6 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01a7 785c |x\ | Jump 0x204
01a8 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x7 = 0x1a8,0x3
01a9 0007 | | Action Break_Optional
01aa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x8 = 0x1aa,0x801
01ab 7002 |p | Jump_Nonzero 0x1ae
01ac 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x9 = 0x1ac,0x802
01ad 782c |x, | Jump 0x1da
01ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xa = 0x1ae,0x803
01af 0217 | | Execute Heap_Access,All_Reference
01b0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01b1 6804 |h | Jump_Zero 0x1b6
01b2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xb = 0x1b2,0x804
01b3 0217 | | Execute Heap_Access,All_Reference
01b4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01b5 7824 |x$ | Jump 0x1da
01b6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xc = 0x1b6,0x805
01b7 0007 | | Action Break_Optional
01b8 e607 | | Load 0x3,0x7 ; Debug Table 0xa.0xd = 0x1b8,0xc01
01b9 0007 | | Action Break_Optional
01ba 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xa.0xe = 0x1ba,0xc02
01bb 0007 | | Action Break_Optional ; Debug Table 0xa.0xf = 0x1bb,0xc03
01bc 00d0 | | Action Swap_Control ; Debug Table 0xa.0x10 = 0x1bc,0xc04
01bd 00d1 | | Pop_Control Pop_Count_1
01be 49bb |I | Short_Literal 0x1bb ; Debug Table 0xa.0x11 = 0x1be,0x805
01bf 00eb | | Load_Encached Diana_Cache
01c0 0098 | | Execute Package,Field_Read_Dynamic
01c1 012c | , | Execute Any,Size
01c2 e007 | | Load 0x0,0x7
01c3 1b17 | | Execute Package,Field_Read,Field_Number 0x17
01c4 025b | [ | Execute Discrete,Check_In_Type
01c5 0273 | s | Execute Discrete,Plus
01c6 00d9 | | Load_Top At_Offset_1
01c7 0007 | | Action Break_Optional
01c8 e608 | | Load 0x3,0x8 ; Debug Table 0xa.0x12 = 0x1c8,0x1001
01c9 0007 | | Action Break_Optional
01ca 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xa.0x13 = 0x1ca,0x1002
01cb 0007 | | Action Break_Optional ; Debug Table 0xa.0x14 = 0x1cb,0x1003
01cc 00d0 | | Action Swap_Control ; Debug Table 0xa.0x15 = 0x1cc,0x1004
01cd 00d1 | | Pop_Control Pop_Count_1
01ce 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xa.0x16 = 0x1ce,0xc04
01cf 00eb | | Load_Encached Diana_Cache
01d0 0098 | | Execute Package,Field_Read_Dynamic
01d1 49c9 |I | Short_Literal 0x1c9
01d2 00eb | | Load_Encached Diana_Cache
01d3 0098 | | Execute Package,Field_Read_Dynamic
01d4 49ca |I | Short_Literal 0x1ca
01d5 00eb | | Load_Encached Diana_Cache
01d6 0095 | | Execute Package,Field_Reference_Dynamic
01d7 e008 | | Load 0x0,0x8
01d8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01d9 7800 |x | Jump 0x1da
01da 00d0 | | Action Swap_Control
01db 00d1 | | Pop_Control Pop_Count_1
01dc 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0xa.0x17 = 0x1dc,0x3
01dd 0007 | | Action Break_Optional ; Debug Table 0xa.0x18 = 0x1dd,0x4
01de 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x19 = 0x1de,0x1401
01df 7002 |p | Jump_Nonzero 0x1e2
01e0 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xa.0x1a = 0x1e0,0x1402
01e1 7803 |x | Jump 0x1e5
01e2 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x1b = 0x1e2,0x1403
01e3 0217 | | Execute Heap_Access,All_Reference
01e4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01e5 0033 | 3 | Store_Top Heap_Access,At_Offset_3 ; Debug Table 0xa.0x1c = 0x1e5,0x4
01e6 0007 | | Action Break_Optional ; Debug Table 0xa.0x1d = 0x1e6,0x5
01e7 e604 | | Load 0x3,0x4 ; Debug Table 0xa.0x1e = 0x1e7,0x1801
01e8 0007 | | Action Break_Optional
01e9 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xa.0x1f = 0x1e9,0x1802
01ea 0007 | | Action Break_Optional ; Debug Table 0xa.0x20 = 0x1ea,0x1803
01eb 0007 | | Action Break_Optional ; Debug Table 0xa.0x21 = 0x1eb,0x1804
01ec 0b02 | | Execute_Immediate Case_Compare,0x2 ; Debug Table 0xa.0x22 = 0x1ec,0x5
01ed 7007 |p | Jump_Nonzero 0x1f5
01ee 0b3b | ; | Execute_Immediate Case_Compare,0x3b
01ef 700b |p | Jump_Nonzero 0x1fb
01f0 0b3e | > | Execute_Immediate Case_Compare,0x3e
01f1 700f |p | Jump_Nonzero 0x201
01f2 0b41 | A | Execute_Immediate Case_Compare,0x41
01f3 700d |p | Jump_Nonzero 0x201
01f4 780e |x | Jump 0x203 ; Debug Table 0xa.0x23 = 0x1f4,0x9
01f5 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x24 = 0x1f5,0x6
01f6 8406 | | Call 0x2,0x6
01f7 e602 | | Load 0x3,0x2
01f8 8405 | | Call 0x2,0x5
01f9 a602 | | Store_Unchecked 0x3,0x2
01fa 7808 |x | Jump 0x203
01fb 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x25 = 0x1fb,0x7
01fc 840a | | Call 0x2,0xa
01fd e602 | | Load 0x3,0x2
01fe 8405 | | Call 0x2,0x5
01ff a602 | | Store_Unchecked 0x3,0x2
0200 7802 |x | Jump 0x203
0201 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x26 = 0x201,0x8
0202 840b | | Call 0x2,0xb
0203 00d1 | | Pop_Control Pop_Count_1
0204 0007 | | Action Break_Optional ; Debug Table 0xa.0x27 = 0x204,0x2
0205 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x28 = 0x205,0x1c01
0206 021d | | Execute Heap_Access,Is_Null
0207 6fa0 |o | Jump_Zero 0x1a8 ; Debug Table 0xa.0x29 = 0x207,0x2
0208 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x2a = 0x208,0xa
0209 488c |H | Short_Literal 0x8c
020a 00eb | | Load_Encached Diana_Cache
020b 187f | | Execute Package,Field_Execute,Field_Number 0x7f
020c 0031 | 1 | Store_Top Heap_Access,At_Offset_1
020d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x2b = 0x20d,0xb
020e e7ff | | Load 0x3,-0x1
020f e402 | | Load 0x2,0x2
0210 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0211 e009 | | Load 0x0,0x9
0212 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0213 4502 |E | Exit_Subprogram 0x2
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021f | | .CONST 0x021f ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0003 | | .CONST 0x0003 ; Number of locals
021b INIT_0218:
021b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb = .DEBUG 0x021b,0x04a0,0x0001,0x0000,0x0057,0x9495,0x0000,0x02e8
; Debug Table 0xb.0x0 = 0x21b,0xffff
021c 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb.0x1 = 0x21c,0xfffe
021d e7ff | | Load 0x3,-0x1
021e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
021f BODY_0218:
021f 784c |xL | Jump 0x26c
0220 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x2 = 0x220,0x2
0221 0007 | | Action Break_Optional
0222 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x3 = 0x222,0x401
0223 7002 |p | Jump_Nonzero 0x226
0224 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x4 = 0x224,0x402
0225 782c |x, | Jump 0x252
0226 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x5 = 0x226,0x403
0227 0217 | | Execute Heap_Access,All_Reference
0228 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0229 6804 |h | Jump_Zero 0x22e
022a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x6 = 0x22a,0x404
022b 0217 | | Execute Heap_Access,All_Reference
022c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
022d 7824 |x$ | Jump 0x252
022e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x7 = 0x22e,0x405
022f 0007 | | Action Break_Optional
0230 e605 | | Load 0x3,0x5 ; Debug Table 0xb.0x8 = 0x230,0x801
0231 0007 | | Action Break_Optional
0232 0148 | H | Execute Heap_Access,Get_Offset ; Debug Table 0xb.0x9 = 0x232,0x802
0233 0007 | | Action Break_Optional ; Debug Table 0xb.0xa = 0x233,0x803
0234 00d0 | | Action Swap_Control ; Debug Table 0xb.0xb = 0x234,0x804
0235 00d1 | | Pop_Control Pop_Count_1
0236 49bb |I | Short_Literal 0x1bb ; Debug Table 0xb.0xc = 0x236,0x405
0237 00eb | | Load_Encached Diana_Cache
0238 0098 | | Execute Package,Field_Read_Dynamic
0239 012c | , | Execute Any,Size
023a e007 | | Load 0x0,0x7
023b 1b17 | | Execute Package,Field_Read,Field_Number 0x17
023c 025b | [ | Execute Discrete,Check_In_Type
023d 0273 | s | Execute Discrete,Plus
023e 00d9 | | Load_Top At_Offset_1
023f 0007 | | Action Break_Optional
0240 e606 | | Load 0x3,0x6 ; Debug Table 0xb.0xd = 0x240,0xc01
0241 0007 | | Action Break_Optional
0242 0210 | | Execute Heap_Access,Get_Segment ; Debug Table 0xb.0xe = 0x242,0xc02
0243 0007 | | Action Break_Optional ; Debug Table 0xb.0xf = 0x243,0xc03
0244 00d0 | | Action Swap_Control ; Debug Table 0xb.0x10 = 0x244,0xc04
0245 00d1 | | Pop_Control Pop_Count_1
0246 49c8 |I | Short_Literal 0x1c8 ; Debug Table 0xb.0x11 = 0x246,0x804
0247 00eb | | Load_Encached Diana_Cache
0248 0098 | | Execute Package,Field_Read_Dynamic
0249 49c9 |I | Short_Literal 0x1c9
024a 00eb | | Load_Encached Diana_Cache
024b 0098 | | Execute Package,Field_Read_Dynamic
024c 49ca |I | Short_Literal 0x1ca
024d 00eb | | Load_Encached Diana_Cache
024e 0095 | | Execute Package,Field_Reference_Dynamic
024f e008 | | Load 0x0,0x8
0250 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0251 7800 |x | Jump 0x252
0252 00d0 | | Action Swap_Control
0253 00d1 | | Pop_Control Pop_Count_1
0254 0032 | 2 | Store_Top Heap_Access,At_Offset_2 ; Debug Table 0xb.0x12 = 0x254,0x2
0255 0007 | | Action Break_Optional ; Debug Table 0xb.0x13 = 0x255,0x3
0256 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x14 = 0x256,0x1001
0257 7002 |p | Jump_Nonzero 0x25a
0258 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xb.0x15 = 0x258,0x1002
0259 7803 |x | Jump 0x25d
025a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x16 = 0x25a,0x1003
025b 0217 | | Execute Heap_Access,All_Reference
025c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
025d 0031 | 1 | Store_Top Heap_Access,At_Offset_1 ; Debug Table 0xb.0x17 = 0x25d,0x3
025e 0007 | | Action Break_Optional ; Debug Table 0xb.0x18 = 0x25e,0x4
025f e602 | | Load 0x3,0x2 ; Debug Table 0xb.0x19 = 0x25f,0x1401
0260 0007 | | Action Break_Optional
0261 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xb.0x1a = 0x261,0x1402
0262 0007 | | Action Break_Optional ; Debug Table 0xb.0x1b = 0x262,0x1403
0263 0007 | | Action Break_Optional ; Debug Table 0xb.0x1c = 0x263,0x1404
0264 0b3e | > | Execute_Immediate Case_Compare,0x3e ; Debug Table 0xb.0x1d = 0x264,0x4
0265 7003 |p | Jump_Nonzero 0x269
0266 0b41 | A | Execute_Immediate Case_Compare,0x41
0267 7001 |p | Jump_Nonzero 0x269
0268 7802 |x | Jump 0x26b ; Debug Table 0xb.0x1e = 0x268,0x6
0269 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1f = 0x269,0x5
026a 840b | | Call 0x2,0xb
026b 00d1 | | Pop_Control Pop_Count_1
026c 0007 | | Action Break_Optional ; Debug Table 0xb.0x20 = 0x26c,0x1
026d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x21 = 0x26d,0x1801
026e 021d | | Execute Heap_Access,Is_Null
026f 6fb0 |o | Jump_Zero 0x220 ; Debug Table 0xb.0x22 = 0x26f,0x1
0270 4502 |E | Exit_Subprogram 0x2
0271 0000 0000 | | .BLANK 0000[0x7]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027e | ~ | .CONST 0x027e ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0004 | | .CONST 0x0004 ; Number of locals
027b INIT_0278:
027b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xc = .DEBUG 0x027b,0x04e8,0x0001,0x0000,0x0057,0x9495,0x0000,0x033b
; Debug Table 0xc.0x0 = 0x27b,0xffff
027c 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0xc.0x1 = 0x27c,0xfffe
027d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xc.0x2 = 0x27d,0xfffd
027e BODY_0278:
027e e7ff | | Load 0x3,-0x1 ; Debug Table 0xc.0x3 = 0x27e,0x1
027f 00eb | | Load_Encached Diana_Cache
0280 18be | | Execute Package,Field_Execute,Field_Number 0xbe
0281 00eb | | Load_Encached Diana_Cache
0282 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0283 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x4 = 0x283,0x401
0284 021d | | Execute Heap_Access,Is_Null
0285 00d0 | | Action Swap_Control
0286 00d1 | | Pop_Control Pop_Count_1
0287 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 ; Debug Table 0xc.0x5 = 0x287,0x1
0288 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x6 = 0x288,0x2
0289 6803 |h | Jump_Zero 0x28d
028a e7ff | | Load 0x3,-0x1 ; Debug Table 0xc.0x7 = 0x28a,0x3
028b 840c | | Call 0x2,0xc
028c 4502 |E | Exit_Subprogram 0x2
028d e7ff | | Load 0x3,-0x1 ; Debug Table 0xc.0x8 = 0x28d,0x4
028e 00eb | | Load_Encached Diana_Cache
028f 18bd | | Execute Package,Field_Execute,Field_Number 0xbd
0290 00eb | | Load_Encached Diana_Cache
0291 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0292 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0293 e7ff | | Load 0x3,-0x1 ; Debug Table 0xc.0x9 = 0x293,0x5
0294 00eb | | Load_Encached Diana_Cache
0295 18be | | Execute Package,Field_Execute,Field_Number 0xbe
0296 00eb | | Load_Encached Diana_Cache
0297 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0298 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0299 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0xa = 0x299,0x6
029a 840d | | Call 0x2,0xd
029b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0xb = 0x29b,0x7
029c 840d | | Call 0x2,0xd
029d 4502 |E | Exit_Subprogram 0x2
029e 0000 0000 | | .XXX[0x2]
02a0 0000 0000 | | .LITERAL {0x00000000, 0x57949501}
02a4 ; --------------------------------------------------------------------------------------
02a4 ; STRING TABLE
02a4 ; --------------------------------------------------------------------------------------
02a4 0006 | | .STRTAB 0x0006->0x02a7 ; "Private_Part failed - only packages visible parts have private parts"
02a5 0048 | H | .STRTAB 0x0048->0x02c9 ; "*** Exception in Build_Private:"
02a6 0065 | e | .STREND 0x0065->0x02d8
02a7 5072 6976 |Priv| .STRTAB_STRINGS
02d9 0000 0000 | | .BLANK 0000[0x7]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; Debug Table
02e0 ; --------------------------------------------------------------------------------------
02e0 0003 000d | | .CONST 0x0003,0x000d
02e2 000b 034a | J| .DEBUG 0x000b,0x034a,0x8000,0x0000,0x0057,0x9415,0x0000,0x0005
02ea 001b 034c | L| .DEBUG 0x001b,0x034c,0x8001,0x0000,0x0057,0x9415,0x0000,0x0005
02f2 0073 0380 | s | .DEBUG 0x0073,0x0380,0x0002,0x0000,0x0057,0x9495,0x0000,0x0029
02fa 00a3 03a6 | | .DEBUG 0x00a3,0x03a6,0x0002,0x0000,0x0057,0x9495,0x0000,0x0091
0302 00cb 03c8 | | .DEBUG 0x00cb,0x03c8,0x0002,0x0000,0x0057,0x9495,0x0000,0x00eb
030a 00f3 03d4 | | .DEBUG 0x00f3,0x03d4,0x0002,0x0000,0x0057,0x9495,0x0000,0x013e
0312 0103 03dc | | .DEBUG 0x0103,0x03dc,0x0002,0x0000,0x0057,0x9495,0x0000,0x0160
031a 012b 03f0 | + | .DEBUG 0x012b,0x03f0,0x0001,0x0000,0x0057,0x9495,0x0000,0x01a8
0322 014b 0400 | K | .DEBUG 0x014b,0x0400,0x0002,0x0000,0x0057,0x9495,0x0000,0x01e3
032a 0173 0420 | s | .DEBUG 0x0173,0x0420,0x0001,0x0000,0x0057,0x9495,0x0000,0x0233
0332 019b 0446 | F| .DEBUG 0x019b,0x0446,0x0001,0x0000,0x0057,0x9495,0x0000,0x023d
033a 021b 04a0 | | .DEBUG 0x021b,0x04a0,0x0001,0x0000,0x0057,0x9495,0x0000,0x02e8
0342 027b 04e8 | { | .DEBUG 0x027b,0x04e8,0x0001,0x0000,0x0057,0x9495,0x0000,0x033b
034a ; --------------------------------------------------------------------------------------
034a ; Debug3 Subtable 0x0
034a ; --------------------------------------------------------------------------------------
034a 0000 0000 | | .DBG3TAB 0x0000,0x0000
034c ; --------------------------------------------------------------------------------------
034c ; Debug3 Subtable 0x1
034c ; --------------------------------------------------------------------------------------
034c 0010 0009 | | .DBG3TAB 0x0010,0x0009
034e 001b ffff | | .CONST 0x001b,0xffff
0350 001c fffe | | .CONST 0x001c,0xfffe
0352 0021 fffd | ! | .CONST 0x0021,0xfffd
0354 0022 fffc | " | .CONST 0x0022,0xfffc
0356 0023 fffb | # | .CONST 0x0023,0xfffb
0358 0025 fffa | % | .CONST 0x0025,0xfffa
035a 0027 fff9 | ' | .CONST 0x0027,0xfff9
035c 0029 fff8 | ) | .CONST 0x0029,0xfff8
035e 002b fff7 | + | .CONST 0x002b,0xfff7
0360 002d fff6 | - | .CONST 0x002d,0xfff6
0362 002f fff5 | / | .CONST 0x002f,0xfff5
0364 0031 fff4 | 1 | .CONST 0x0031,0xfff4
0366 0033 fff3 | 3 | .CONST 0x0033,0xfff3
0368 0035 fff2 | 5 | .CONST 0x0035,0xfff2
036a 0037 fff1 | 7 | .CONST 0x0037,0xfff1
036c 0039 fff0 | 9 | .CONST 0x0039,0xfff0
036e 003d 0001 | = | .CONST 0x003d,0x0001
0370 0045 0002 | E | .CONST 0x0045,0x0002
0372 0048 0003 | H | .CONST 0x0048,0x0003
0374 004a 0004 | J | .CONST 0x004a,0x0004
0376 0052 0005 | R | .CONST 0x0052,0x0005
0378 0057 0006 | W | .CONST 0x0057,0x0006
037a 005c 0007 | \ | .CONST 0x005c,0x0007
037c 0061 0008 | a | .CONST 0x0061,0x0008
037e 0063 0009 | c | .CONST 0x0063,0x0009
0380 ; --------------------------------------------------------------------------------------
0380 ; Debug3 Subtable 0x2
0380 ; --------------------------------------------------------------------------------------
0380 0000 0012 | | .DBG3TAB 0x0000,0x0012
0382 0073 0001 | s | .CONST 0x0073,0x0001
0384 0074 0401 | t | .CONST 0x0074,0x0401
0386 0076 0402 | v | .CONST 0x0076,0x0402
0388 0077 0403 | w | .CONST 0x0077,0x0403
038a 0078 0404 | x | .CONST 0x0078,0x0404
038c 0079 0001 | y | .CONST 0x0079,0x0001
038e 0081 0008 | | .CONST 0x0081,0x0008
0390 0083 0002 | | .CONST 0x0083,0x0002
0392 0085 0003 | | .CONST 0x0085,0x0003
0394 008a 0004 | | .CONST 0x008a,0x0004
0396 008f 0005 | | .CONST 0x008f,0x0005
0398 0092 0801 | | .CONST 0x0092,0x0801
039a 0094 0802 | | .CONST 0x0094,0x0802
039c 0095 0803 | | .CONST 0x0095,0x0803
039e 0096 0804 | | .CONST 0x0096,0x0804
03a0 0098 0005 | | .CONST 0x0098,0x0005
03a2 009a 0007 | | .CONST 0x009a,0x0007
03a4 009c 0006 | | .CONST 0x009c,0x0006
03a6 ; --------------------------------------------------------------------------------------
03a6 ; Debug3 Subtable 0x3
03a6 ; --------------------------------------------------------------------------------------
03a6 0000 0010 | | .DBG3TAB 0x0000,0x0010
03a8 00a3 0001 | | .CONST 0x00a3,0x0001
03aa 00a4 0401 | | .CONST 0x00a4,0x0401
03ac 00a6 0402 | | .CONST 0x00a6,0x0402
03ae 00a7 0403 | | .CONST 0x00a7,0x0403
03b0 00a8 0404 | | .CONST 0x00a8,0x0404
03b2 00a9 0001 | | .CONST 0x00a9,0x0001
03b4 00ab 0003 | | .CONST 0x00ab,0x0003
03b6 00ac 0801 | | .CONST 0x00ac,0x0801
03b8 00ae 0003 | | .CONST 0x00ae,0x0003
03ba 00af 0004 | | .CONST 0x00af,0x0004
03bc 00b0 0c01 | | .CONST 0x00b0,0x0c01
03be 00b1 0004 | | .CONST 0x00b1,0x0004
03c0 00b5 0005 | | .CONST 0x00b5,0x0005
03c2 00b6 1001 | | .CONST 0x00b6,0x1001
03c4 00b7 0005 | | .CONST 0x00b7,0x0005
03c6 00c0 0002 | | .CONST 0x00c0,0x0002
03c8 ; --------------------------------------------------------------------------------------
03c8 ; Debug3 Subtable 0x4
03c8 ; --------------------------------------------------------------------------------------
03c8 0002 0003 | | .DBG3TAB 0x0002,0x0003
03ca 00cb ffff | | .CONST 0x00cb,0xffff
03cc 00cc fffe | | .CONST 0x00cc,0xfffe
03ce 00cd 0001 | | .CONST 0x00cd,0x0001
03d0 00d8 0002 | | .CONST 0x00d8,0x0002
03d2 00e7 0003 | | .CONST 0x00e7,0x0003
03d4 ; --------------------------------------------------------------------------------------
03d4 ; Debug3 Subtable 0x5
03d4 ; --------------------------------------------------------------------------------------
03d4 0000 0003 | | .DBG3TAB 0x0000,0x0003
03d6 00f3 0001 | | .CONST 0x00f3,0x0001
03d8 00f4 0401 | | .CONST 0x00f4,0x0401
03da 00f5 0001 | | .CONST 0x00f5,0x0001
03dc ; --------------------------------------------------------------------------------------
03dc ; Debug3 Subtable 0x6
03dc ; --------------------------------------------------------------------------------------
03dc 0000 0009 | | .DBG3TAB 0x0000,0x0009
03de 0103 0001 | | .CONST 0x0103,0x0001
03e0 0104 0401 | | .CONST 0x0104,0x0401
03e2 0105 0001 | | .CONST 0x0105,0x0001
03e4 0106 0801 | | .CONST 0x0106,0x0801
03e6 0107 0401 | | .CONST 0x0107,0x0401
03e8 0108 0c01 | | .CONST 0x0108,0x0c01
03ea 0109 0801 | | .CONST 0x0109,0x0801
03ec 010f 1001 | | .CONST 0x010f,0x1001
03ee 0110 0c01 | | .CONST 0x0110,0x0c01
03f0 ; --------------------------------------------------------------------------------------
03f0 ; Debug3 Subtable 0x7
03f0 ; --------------------------------------------------------------------------------------
03f0 0001 0006 | | .DBG3TAB 0x0001,0x0006
03f2 012b ffff | + | .CONST 0x012b,0xffff
03f4 012c 0001 | , | .CONST 0x012c,0x0001
03f6 0132 0002 | 2 | .CONST 0x0132,0x0002
03f8 0133 0401 | 3 | .CONST 0x0133,0x0401
03fa 0135 0002 | 5 | .CONST 0x0135,0x0002
03fc 0136 0003 | 6 | .CONST 0x0136,0x0003
03fe 013c 0004 | < | .CONST 0x013c,0x0004
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug3 Subtable 0x8
0400 ; --------------------------------------------------------------------------------------
0400 0002 000d | | .DBG3TAB 0x0002,0x000d
0402 014b ffff | K | .CONST 0x014b,0xffff
0404 014c fffe | L | .CONST 0x014c,0xfffe
0406 014d 0001 | M | .CONST 0x014d,0x0001
0408 0151 0002 | Q | .CONST 0x0151,0x0002
040a 0152 0401 | R | .CONST 0x0152,0x0401
040c 0154 0402 | T | .CONST 0x0154,0x0402
040e 0155 0403 | U | .CONST 0x0155,0x0403
0410 0156 0404 | V | .CONST 0x0156,0x0404
0412 0157 0002 | W | .CONST 0x0157,0x0002
0414 015b 0006 | [ | .CONST 0x015b,0x0006
0416 015c 0801 | \ | .CONST 0x015c,0x0801
0418 015d 0006 | ] | .CONST 0x015d,0x0006
041a 015e 0003 | ^ | .CONST 0x015e,0x0003
041c 0164 0004 | d | .CONST 0x0164,0x0004
041e 0167 0005 | g | .CONST 0x0167,0x0005
0420 ; --------------------------------------------------------------------------------------
0420 ; Debug3 Subtable 0x9
0420 ; --------------------------------------------------------------------------------------
0420 0001 0011 | | .DBG3TAB 0x0001,0x0011
0422 0173 ffff | s | .CONST 0x0173,0xffff
0424 0174 0001 | t | .CONST 0x0174,0x0001
0426 0175 0401 | u | .CONST 0x0175,0x0401
0428 0177 0402 | w | .CONST 0x0177,0x0402
042a 0178 0403 | x | .CONST 0x0178,0x0403
042c 0179 0404 | y | .CONST 0x0179,0x0404
042e 017a 0001 | z | .CONST 0x017a,0x0001
0430 017e 0004 | ~ | .CONST 0x017e,0x0004
0432 017f 0002 | | .CONST 0x017f,0x0002
0434 0184 0003 | | .CONST 0x0184,0x0003
0436 0189 0005 | | .CONST 0x0189,0x0005
0438 018a 0801 | | .CONST 0x018a,0x0801
043a 018c 0802 | | .CONST 0x018c,0x0802
043c 018d 0803 | | .CONST 0x018d,0x0803
043e 018e 0804 | | .CONST 0x018e,0x0804
0440 018f 0005 | | .CONST 0x018f,0x0005
0442 0191 0007 | | .CONST 0x0191,0x0007
0444 0192 0006 | | .CONST 0x0192,0x0006
0446 ; --------------------------------------------------------------------------------------
0446 ; Debug3 Subtable 0xa
0446 ; --------------------------------------------------------------------------------------
0446 0005 0027 | '| .DBG3TAB 0x0005,0x0027
0448 019b ffff | | .CONST 0x019b,0xffff
044a 019c 0401 | | .CONST 0x019c,0x0401
044c 019d ffff | | .CONST 0x019d,0xffff
044e 019e fffe | | .CONST 0x019e,0xfffe
0450 019f fffd | | .CONST 0x019f,0xfffd
0452 01a0 fffc | | .CONST 0x01a0,0xfffc
0454 01a1 0001 | | .CONST 0x01a1,0x0001
0456 01a8 0003 | | .CONST 0x01a8,0x0003
0458 01aa 0801 | | .CONST 0x01aa,0x0801
045a 01ac 0802 | | .CONST 0x01ac,0x0802
045c 01ae 0803 | | .CONST 0x01ae,0x0803
045e 01b2 0804 | | .CONST 0x01b2,0x0804
0460 01b6 0805 | | .CONST 0x01b6,0x0805
0462 01b8 0c01 | | .CONST 0x01b8,0x0c01
0464 01ba 0c02 | | .CONST 0x01ba,0x0c02
0466 01bb 0c03 | | .CONST 0x01bb,0x0c03
0468 01bc 0c04 | | .CONST 0x01bc,0x0c04
046a 01be 0805 | | .CONST 0x01be,0x0805
046c 01c8 1001 | | .CONST 0x01c8,0x1001
046e 01ca 1002 | | .CONST 0x01ca,0x1002
0470 01cb 1003 | | .CONST 0x01cb,0x1003
0472 01cc 1004 | | .CONST 0x01cc,0x1004
0474 01ce 0c04 | | .CONST 0x01ce,0x0c04
0476 01dc 0003 | | .CONST 0x01dc,0x0003
0478 01dd 0004 | | .CONST 0x01dd,0x0004
047a 01de 1401 | | .CONST 0x01de,0x1401
047c 01e0 1402 | | .CONST 0x01e0,0x1402
047e 01e2 1403 | | .CONST 0x01e2,0x1403
0480 01e5 0004 | | .CONST 0x01e5,0x0004
0482 01e6 0005 | | .CONST 0x01e6,0x0005
0484 01e7 1801 | | .CONST 0x01e7,0x1801
0486 01e9 1802 | | .CONST 0x01e9,0x1802
0488 01ea 1803 | | .CONST 0x01ea,0x1803
048a 01eb 1804 | | .CONST 0x01eb,0x1804
048c 01ec 0005 | | .CONST 0x01ec,0x0005
048e 01f4 0009 | | .CONST 0x01f4,0x0009
0490 01f5 0006 | | .CONST 0x01f5,0x0006
0492 01fb 0007 | | .CONST 0x01fb,0x0007
0494 0201 0008 | | .CONST 0x0201,0x0008
0496 0204 0002 | | .CONST 0x0204,0x0002
0498 0205 1c01 | | .CONST 0x0205,0x1c01
049a 0207 0002 | | .CONST 0x0207,0x0002
049c 0208 000a | | .CONST 0x0208,0x000a
049e 020d 000b | | .CONST 0x020d,0x000b
04a0 ; --------------------------------------------------------------------------------------
04a0 ; Debug3 Subtable 0xb
04a0 ; --------------------------------------------------------------------------------------
04a0 0002 0021 | !| .DBG3TAB 0x0002,0x0021
04a2 021b ffff | | .CONST 0x021b,0xffff
04a4 021c fffe | | .CONST 0x021c,0xfffe
04a6 0220 0002 | | .CONST 0x0220,0x0002
04a8 0222 0401 | " | .CONST 0x0222,0x0401
04aa 0224 0402 | $ | .CONST 0x0224,0x0402
04ac 0226 0403 | & | .CONST 0x0226,0x0403
04ae 022a 0404 | * | .CONST 0x022a,0x0404
04b0 022e 0405 | . | .CONST 0x022e,0x0405
04b2 0230 0801 | 0 | .CONST 0x0230,0x0801
04b4 0232 0802 | 2 | .CONST 0x0232,0x0802
04b6 0233 0803 | 3 | .CONST 0x0233,0x0803
04b8 0234 0804 | 4 | .CONST 0x0234,0x0804
04ba 0236 0405 | 6 | .CONST 0x0236,0x0405
04bc 0240 0c01 | @ | .CONST 0x0240,0x0c01
04be 0242 0c02 | B | .CONST 0x0242,0x0c02
04c0 0243 0c03 | C | .CONST 0x0243,0x0c03
04c2 0244 0c04 | D | .CONST 0x0244,0x0c04
04c4 0246 0804 | F | .CONST 0x0246,0x0804
04c6 0254 0002 | T | .CONST 0x0254,0x0002
04c8 0255 0003 | U | .CONST 0x0255,0x0003
04ca 0256 1001 | V | .CONST 0x0256,0x1001
04cc 0258 1002 | X | .CONST 0x0258,0x1002
04ce 025a 1003 | Z | .CONST 0x025a,0x1003
04d0 025d 0003 | ] | .CONST 0x025d,0x0003
04d2 025e 0004 | ^ | .CONST 0x025e,0x0004
04d4 025f 1401 | _ | .CONST 0x025f,0x1401
04d6 0261 1402 | a | .CONST 0x0261,0x1402
04d8 0262 1403 | b | .CONST 0x0262,0x1403
04da 0263 1404 | c | .CONST 0x0263,0x1404
04dc 0264 0004 | d | .CONST 0x0264,0x0004
04de 0268 0006 | h | .CONST 0x0268,0x0006
04e0 0269 0005 | i | .CONST 0x0269,0x0005
04e2 026c 0001 | l | .CONST 0x026c,0x0001
04e4 026d 1801 | m | .CONST 0x026d,0x1801
04e6 026f 0001 | o | .CONST 0x026f,0x0001
04e8 ; --------------------------------------------------------------------------------------
04e8 ; Debug3 Subtable 0xc
04e8 ; --------------------------------------------------------------------------------------
04e8 0003 0009 | | .DBG3TAB 0x0003,0x0009
04ea 027b ffff | { | .CONST 0x027b,0xffff
04ec 027c fffe | | | .CONST 0x027c,0xfffe
04ee 027d fffd | } | .CONST 0x027d,0xfffd
04f0 027e 0001 | ~ | .CONST 0x027e,0x0001
04f2 0283 0401 | | .CONST 0x0283,0x0401
04f4 0287 0001 | | .CONST 0x0287,0x0001
04f6 0288 0002 | | .CONST 0x0288,0x0002
04f8 028a 0003 | | .CONST 0x028a,0x0003
04fa 028d 0004 | | .CONST 0x028d,0x0004
04fc 0293 0005 | | .CONST 0x0293,0x0005
04fe 0299 0006 | | .CONST 0x0299,0x0006
0500 029b 0007 | | .CONST 0x029b,0x0007
0502 0000 0000 | | .BLANK 0000[0xfe]