|
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: 7168 (0x1c00)
Notes: 00_class, 580b_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 580b |X | .CONST 0x580b ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 09a8 | | .CONST 0x09a8 ; 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 0006 | | .CONST 0x0006 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0071 | q | .CONST 0x0071 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0029 | ) | .CONST 0x0029 ; Number of locals
000b INIT_0008:
000b 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0a8a,0x8000,0x0000,0x0038,0xc6c6,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 00bf | | Action Accept_Activation
0022 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0022,0x0aa2,0x8000,0x0000,0x0039,0x3556,0x0000,0x001f
; Debug Table 0x1.0x0 = 0x22,0xffff
0023 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x23,0xfffe
0024 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x24,0xfffd
0025 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x25,0xfffc
0026 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x26,0xfffb
0027 190e | | Execute Package,Field_Reference,Field_Number 0xe
0028 0007 | | Action Break_Optional
0029 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x5 = 0x29,0xfffa
002a 1910 | | Execute Package,Field_Reference,Field_Number 0x10
002b 0007 | | Action Break_Optional
002c e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x6 = 0x2c,0xfff9
002d 191e | | Execute Package,Field_Reference,Field_Number 0x1e
002e 0007 | | Action Break_Optional
002f e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x7 = 0x2f,0xfff8
0030 1918 | | Execute Package,Field_Reference,Field_Number 0x18
0031 0007 | | Action Break_Optional
0032 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x8 = 0x32,0xfff7
0033 191a | | Execute Package,Field_Reference,Field_Number 0x1a
0034 0007 | | Action Break_Optional
0035 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x9 = 0x35,0xfff6
0036 484d |HM | Short_Literal 0x4d
0037 00e9 | | Load_Encached String_Cache
0038 035b | [ | Declare_Type Array,Constrained
0039 0337 | 7 | Declare_Variable Array
003a 484d |HM | Short_Literal 0x4d
003b 4801 |H | Short_Literal 0x1
003c 483d |H= | Short_Literal 0x3d
003d 00d9 | | Load_Top At_Offset_1
003e e21d | | Load 0x1,0x1d
003f 01d6 | | Execute Vector,Field_Write
0040 3ffb |? | Loop_Increasing 0x3c
0041 029d 038b | | Declare_Subprogram INIT_0388,For_Outer_Call ; Debug Table 0x1.0xa = 0x41,0xfff5
0043 029d 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call ; Debug Table 0x1.0xb = 0x43,0xfff4
0045 029b 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Unelaborated ; Debug Table 0x1.0xc = 0x45,0xfff3
0047 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x1.0xd = 0x47,0xfff2
0048 00c7 | | Action Elaborate_Subprogram
0049 029d 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call ; Debug Table 0x1.0xe = 0x49,0xfff1
004b 029d 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call ; Debug Table 0x1.0xf = 0x4b,0xfff0
004d 029d 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call ; Debug Table 0x1.0x10 = 0x4d,0xffef
004f 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x11 = 0x4f,0xffee
0050 00c7 | | Action Elaborate_Subprogram
0051 029d 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call ; Debug Table 0x1.0x12 = 0x51,0xffed
0053 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x13 = 0x53,0xffec
0054 00c7 | | Action Elaborate_Subprogram
0055 029d 051b | | Declare_Subprogram INIT_0518,For_Outer_Call ; Debug Table 0x1.0x14 = 0x55,0xffeb
0057 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x15 = 0x57,0xffea
0058 00c7 | | Action Elaborate_Subprogram
0059 029d 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call ; Debug Table 0x1.0x16 = 0x59,0xffe9
005b 029d 060b | | Declare_Subprogram INIT_0608,For_Outer_Call ; Debug Table 0x1.0x17 = 0x5b,0xffe8
005d 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x18 = 0x5d,0xffe7
005e 00c7 | | Action Elaborate_Subprogram
005f 029d 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call ; Debug Table 0x1.0x19 = 0x5f,0xffe6
0061 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x1a = 0x61,0xffe5
0062 00c7 | | Action Elaborate_Subprogram
0063 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x1b = 0x63,0xffe4
0064 00c7 | | Action Elaborate_Subprogram
0065 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x1c = 0x65,0xffe3
0066 00c7 | | Action Elaborate_Subprogram
0067 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x1d = 0x67,0xffe2
0068 00c7 | | Action Elaborate_Subprogram
0069 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x1e = 0x69,0xffe1
006a 00c7 | | Action Elaborate_Subprogram
006b 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x1f = 0x6b,0xffe0
006c 00c7 | | Action Elaborate_Subprogram
006d 029d 077b | {| Declare_Subprogram INIT_0778,For_Outer_Call ; Debug Table 0x1.0x20 = 0x6d,0xffdf
006f 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x21 = 0x6f,0xffde
0070 00c7 | | Action Elaborate_Subprogram
0071 BODY_0008:
0071 00bc | | Action Signal_Activated
0072 00bb | | Action Signal_Completion
0073 0000 0000 | | .BLANK 0000[0x5]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 008e | | .CONST 0x008e ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0005 | | .CONST 0x0005 ; Number of locals
007b INIT_0078:
007b e003 | | Load 0x0,0x3 ; Debug Table 0x2 = .DEBUG 0x007b,0x0ae8,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0006
; Debug Table 0x2.0x0 = 0x7b,0xffff
007c 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
007d 02c7 | | Declare_Variable Any
007e 00db | | Load_Top At_Offset_3
007f e004 | | Load 0x0,0x4
0080 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0081 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0082 e004 | | Load 0x0,0x4
0083 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0084 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0085 c402 | | Store 0x2,0x2
0086 e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x1 = 0x86,0xfffe
0087 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
0088 02c7 | | Declare_Variable Any
0089 00d8 | | Load_Top At_Offset_0
008a 1c00 | | Execute_Immediate Run_Utility,0x0
008b 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x2.0x2 = 0x8b,0xfffd
008c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
008d 00e8 | | Load_Encached Character_Cache ; Debug Table 0x2.0x3 = 0x8d,0xfffc
008e BODY_0078:
008e 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x4 = 0x8e,0x1
008f e003 | | Load 0x0,0x3
0090 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0091 6805 |h | Jump_Zero 0x97
0092 0092 085a | Z| Action Push_String_Extended,0x85a ; "map ptr is nil"
; Debug Table 0x2.0x5 = 0x92,0x2
0094 8218 | | Call 0x1,0x18
0095 8219 | | Call 0x1,0x19 ; Debug Table 0x2.0x6 = 0x95,0x3
0096 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x2.0x7 = 0x96,0x4
0097 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x8 = 0x97,0x5
0098 0120 | | Execute Any,Is_Value
0099 6803 |h | Jump_Zero 0x9d
009a e003 | | Load 0x0,0x3
009b 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
009c 7801 |x | Jump 0x9e
009d 00da | | Load_Top At_Offset_2
009e 821b | | Call 0x1,0x1b
009f e402 | | Load 0x2,0x2
00a0 e003 | | Load 0x0,0x3
00a1 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
00a2 c403 | | Store 0x2,0x3
00a3 00cf | | Action Mark_Auxiliary
00a4 7829 |x) | Jump 0xce
00a5 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x9 = 0xa5,0x7
00a6 e5fe | | Load 0x2,-0x2
00a7 027f | | Execute Discrete,Equal
00a8 6819 |h | Jump_Zero 0xc2
00a9 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0xa = 0xa9,0x8
00aa 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00ab 8219 | | Call 0x1,0x19 ; Debug Table 0x2.0xb = 0xab,0x9
00ac 0092 085b | [| Action Push_String_Extended,0x85b ; "--- more (y/n): "
; Debug Table 0x2.0xc = 0xac,0xa
00ae 8218 | | Call 0x1,0x18
00af 00e8 | | Load_Encached Character_Cache ; Debug Table 0x2.0xd = 0xaf,0xb
00b0 e002 | | Load 0x0,0x2
00b1 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00b2 005a | Z | Store_Top Discrete,At_Offset_2
00b3 8219 | | Call 0x1,0x19 ; Debug Table 0x2.0xe = 0xb3,0xc
00b4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0xf = 0xb4,0xd
00b5 0b59 | Y | Execute_Immediate Case_Compare,0x59
00b6 7006 |p | Jump_Nonzero 0xbd
00b7 0b0d | | Execute_Immediate Case_Compare,0xd
00b8 7004 |p | Jump_Nonzero 0xbd
00b9 0b0a | | Execute_Immediate Case_Compare,0xa
00ba 7002 |p | Jump_Nonzero 0xbd
00bb 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x2.0x10 = 0xbb,0xf
00bc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00bd e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x11 = 0xbd,0xe
00be 8225 | % | Call 0x1,0x25
00bf c403 | | Store 0x2,0x3
00c0 00d1 | | Pop_Control Pop_Count_1
00c1 7807 |x | Jump 0xc9
00c2 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x12 = 0xc2,0x10
00c3 0a01 | | Execute_Immediate Plus,0x1
00c4 0248 | H | Execute Discrete,Check_In_Integer
00c5 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00c6 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x13 = 0xc6,0x11
00c7 8225 | % | Call 0x1,0x25
00c8 c403 | | Store 0x2,0x3
00c9 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x14 = 0xc9,0x12
00ca e003 | | Load 0x0,0x3
00cb 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
00cc c403 | | Store 0x2,0x3
00cd 00c9 | | Action Pop_Auxiliary_Loop
00ce 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x15 = 0xce,0x6
00cf e003 | | Load 0x0,0x3
00d0 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
00d1 6fd3 |o | Jump_Zero 0xa5
00d2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00d3 0000 0000 | | .BLANK 0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00dd | | .CONST 0x00dd ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0002 | | .CONST 0x0002 ; Number of locals
00db INIT_00d8:
00db 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x3 = .DEBUG 0x00db,0x0b16,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0015
; Debug Table 0x3.0x0 = 0xdb,0xffff
00dc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00dd BODY_00d8:
00dd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1 = 0xdd,0x1
00de e5ff | | Load 0x2,-0x1
00df 8226 | & | Call 0x1,0x26
00e0 0059 | Y | Store_Top Discrete,At_Offset_1
00e1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00e2 0000 0000 | | .BLANK 0000[0x6]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00f6 | | .CONST 0x00f6 ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0008 | | .CONST 0x0008 ; Number of locals
00eb INIT_00e8:
00eb 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x4 = .DEBUG 0x00eb,0x0b1c,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x001f
; Debug Table 0x4.0x0 = 0xeb,0xffff
00ec 00c6 | | Action Check_Subprogram_Elaborated
00ed 00e2 | | Load_Encached Integer_Cache
00ee 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
00ef 62b0 |b | Indirect_Literal Discrete,0x3a0,{0x00000000, 0x00393556}
00f0 62ab |b | Indirect_Literal Discrete,0x39c,{0x00000000, 0x00000bc5}
00f1 4806 |H | Short_Literal 0x6
00f2 0007 | | Action Break_Optional
00f3 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x4.0x1 = 0xf3,0xfffe
00f4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00f5 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x4.0x2 = 0xf5,0xfffd
00f6 BODY_00e8:
00f6 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x4.0x3 = 0xf6,0x1
00f7 00da | | Load_Top At_Offset_2
00f8 e5ff | | Load 0x2,-0x1
00f9 e402 | | Load 0x2,0x2
00fa 4803 |H | Short_Literal 0x3
00fb 4802 |H | Short_Literal 0x2
00fc 0099 | | Action Reference_Dynamic
00fd 4804 |H | Short_Literal 0x4
00fe 4802 |H | Short_Literal 0x2
00ff 0099 | | Action Reference_Dynamic
0100 8220 | | Call 0x1,0x20
0101 005b | [ | Store_Top Discrete,At_Offset_3
0102 0059 | Y | Store_Top Discrete,At_Offset_1
0103 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x4 = 0x103,0x2
0104 0c01 | | Execute_Immediate Greater_Equal,0x1
0105 680b |h | Jump_Zero 0x111
0106 8219 | | Call 0x1,0x19 ; Debug Table 0x4.0x5 = 0x106,0x3
0107 0092 085c | \| Action Push_String_Extended,0x85c ; "average import_table size: "
; Debug Table 0x4.0x6 = 0x107,0x4
0109 00da | | Load_Top At_Offset_2
010a 00da | | Load_Top At_Offset_2
010b 0270 | p | Execute Discrete,Divide
010c 00e0 | | Load_Encached Standard_Cache
010d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
010e 01cc | | Execute Vector,Catenate
010f 8218 | | Call 0x1,0x18
0110 8219 | | Call 0x1,0x19 ; Debug Table 0x4.0x7 = 0x110,0x5
0111 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0112 0000 0000 | | .BLANK 0000[0x6]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 012f | / | .CONST 0x012f ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0007 | | .CONST 0x0007 ; Number of locals
011b INIT_0118:
011b e003 | | Load 0x0,0x3 ; Debug Table 0x5 = .DEBUG 0x011b,0x0b2e,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0027
; Debug Table 0x5.0x0 = 0x11b,0xffff
011c 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
011d 02c7 | | Declare_Variable Any
011e 00d8 | | Load_Top At_Offset_0
011f 1c00 | | Execute_Immediate Run_Utility,0x0
0120 e004 | | Load 0x0,0x4 ; Debug Table 0x5.0x1 = 0x120,0xfffe
0121 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0122 02c7 | | Declare_Variable Any
0123 00d8 | | Load_Top At_Offset_0
0124 1c00 | | Execute_Immediate Run_Utility,0x0
0125 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0x2 = 0x125,0xfffd
0126 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a
0127 02c7 | | Declare_Variable Any
0128 00d8 | | Load_Top At_Offset_0
0129 1c00 | | Execute_Immediate Run_Utility,0x0
012a e005 | | Load 0x0,0x5 ; Debug Table 0x5.0x3 = 0x12a,0xfffc
012b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012c 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x5.0x4 = 0x12c,0xfffb
012d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
012e 00e8 | | Load_Encached Character_Cache ; Debug Table 0x5.0x5 = 0x12e,0xfffa
012f BODY_0118:
012f e005 | | Load 0x0,0x5 ; Debug Table 0x5.0x6 = 0x12f,0x1
0130 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0131 e403 | | Load 0x2,0x3
0132 0120 | | Execute Any,Is_Value
0133 6803 |h | Jump_Zero 0x137
0134 e004 | | Load 0x0,0x4
0135 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0136 7801 |x | Jump 0x138
0137 e403 | | Load 0x2,0x3
0138 e006 | | Load 0x0,0x6
0139 1b0e | | Execute Package,Field_Read,Field_Number 0xe
013a 4800 |H | Short_Literal 0x0
013b 4800 |H | Short_Literal 0x0
013c e007 | | Load 0x0,0x7
013d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
013e 4800 |H | Short_Literal 0x0
013f e5ff | | Load 0x2,-0x1
0140 e004 | | Load 0x0,0x4
0141 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0142 c403 | | Store 0x2,0x3
0143 005b | [ | Store_Top Discrete,At_Offset_3
0144 e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x7 = 0x144,0x2
0145 e004 | | Load 0x0,0x4
0146 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0147 680b |h | Jump_Zero 0x153
0148 0092 085d | ]| Action Push_String_Extended,0x85d ; "data base is nil, status = "
; Debug Table 0x5.0x8 = 0x148,0x3
014a 00db | | Load_Top At_Offset_3
014b e005 | | Load 0x0,0x5
014c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014d 025e | ^ | Execute Discrete,Convert
014e 1c01 | | Execute_Immediate Run_Utility,0x1
014f 01cc | | Execute Vector,Catenate
0150 8218 | | Call 0x1,0x18
0151 8219 | | Call 0x1,0x19 ; Debug Table 0x5.0x9 = 0x151,0x4
0152 4508 |E | Exit_Suprogram New_Top_Offset 0x8 ; Debug Table 0x5.0xa = 0x152,0x5
0153 e403 | | Load 0x2,0x3 ; Debug Table 0x5.0xb = 0x153,0x6
0154 e004 | | Load 0x0,0x4
0155 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0156 c402 | | Store 0x2,0x2
0157 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0xc = 0x157,0x7
0158 0120 | | Execute Any,Is_Value
0159 6803 |h | Jump_Zero 0x15d
015a e003 | | Load 0x0,0x3
015b 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a
015c 7801 |x | Jump 0x15e
015d 00db | | Load_Top At_Offset_3
015e 821b | | Call 0x1,0x1b
015f e402 | | Load 0x2,0x2
0160 e003 | | Load 0x0,0x3
0161 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0162 c404 | | Store 0x2,0x4
0163 00cf | | Action Mark_Auxiliary
0164 7828 |x( | Jump 0x18d
0165 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0xd = 0x165,0x9
0166 e5f9 | | Load 0x2,-0x7
0167 027f | | Execute Discrete,Equal
0168 6815 |h | Jump_Zero 0x17e
0169 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xe = 0x169,0xa
016a 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
016b 8219 | | Call 0x1,0x19 ; Debug Table 0x5.0xf = 0x16b,0xb
016c 0092 085b | [| Action Push_String_Extended,0x85b ; "--- more (y/n): "
; Debug Table 0x5.0x10 = 0x16c,0xc
016e 8218 | | Call 0x1,0x18
016f 00e8 | | Load_Encached Character_Cache ; Debug Table 0x5.0x11 = 0x16f,0xd
0170 e002 | | Load 0x0,0x2
0171 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0172 005a | Z | Store_Top Discrete,At_Offset_2
0173 8219 | | Call 0x1,0x19 ; Debug Table 0x5.0x12 = 0x173,0xe
0174 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x13 = 0x174,0xf
0175 0b59 | Y | Execute_Immediate Case_Compare,0x59
0176 7006 |p | Jump_Nonzero 0x17d
0177 0b0d | | Execute_Immediate Case_Compare,0xd
0178 7004 |p | Jump_Nonzero 0x17d
0179 0b0a | | Execute_Immediate Case_Compare,0xa
017a 7002 |p | Jump_Nonzero 0x17d
017b 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x5.0x14 = 0x17b,0x11
017c 4508 |E | Exit_Suprogram New_Top_Offset 0x8
017d 00d1 | | Pop_Control Pop_Count_1
017e 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x15 = 0x17e,0x12
017f e404 | | Load 0x2,0x4
0180 e5fa | | Load 0x2,-0x6
0181 e5fb | | Load 0x2,-0x5
0182 e5fc | | Load 0x2,-0x4
0183 e5fd | | Load 0x2,-0x3
0184 e5fe | | Load 0x2,-0x2
0185 8227 | ' | Call 0x1,0x27
0186 c404 | | Store 0x2,0x4
0187 005b | [ | Store_Top Discrete,At_Offset_3
0188 e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x16 = 0x188,0x13
0189 e003 | | Load 0x0,0x3
018a 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
018b c404 | | Store 0x2,0x4
018c 00c9 | | Action Pop_Auxiliary_Loop
018d e404 | | Load 0x2,0x4 ; Debug Table 0x5.0x17 = 0x18d,0x8
018e e003 | | Load 0x0,0x3
018f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0190 6fd4 |o | Jump_Zero 0x165
0191 4508 |E | Exit_Suprogram New_Top_Offset 0x8
0192 0000 0000 | | .BLANK 0000[0x6]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019d | | .CONST 0x019d ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0002 | | .CONST 0x0002 ; Number of locals
019b INIT_0198:
019b 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x6 = .DEBUG 0x019b,0x0b60,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x004b
; Debug Table 0x6.0x0 = 0x19b,0xffff
019c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
019d BODY_0198:
019d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0x19d,0x1
019e e5ff | | Load 0x2,-0x1
019f 8228 | ( | Call 0x1,0x28
01a0 0059 | Y | Store_Top Discrete,At_Offset_1
01a1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01a2 0000 0000 | | .BLANK 0000[0x6]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b6 | | .CONST 0x01b6 ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0008 | | .CONST 0x0008 ; Number of locals
01ab INIT_01a8:
01ab 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x7 = .DEBUG 0x01ab,0x0b66,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0055
; Debug Table 0x7.0x0 = 0x1ab,0xffff
01ac 00c6 | | Action Check_Subprogram_Elaborated
01ad 00e2 | | Load_Encached Integer_Cache
01ae 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
01af 61f0 |a | Indirect_Literal Discrete,0x3a0,{0x00000000, 0x00393556}
01b0 61e7 |a | Indirect_Literal Discrete,0x398,{0x00000000, 0x00000c09}
01b1 4806 |H | Short_Literal 0x6
01b2 0007 | | Action Break_Optional
01b3 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x7.0x1 = 0x1b3,0xfffe
01b4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01b5 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x7.0x2 = 0x1b5,0xfffd
01b6 BODY_01a8:
01b6 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x7.0x3 = 0x1b6,0x1
01b7 00da | | Load_Top At_Offset_2
01b8 e5ff | | Load 0x2,-0x1
01b9 e402 | | Load 0x2,0x2
01ba 4803 |H | Short_Literal 0x3
01bb 4802 |H | Short_Literal 0x2
01bc 0099 | | Action Reference_Dynamic
01bd 4804 |H | Short_Literal 0x4
01be 4802 |H | Short_Literal 0x2
01bf 0099 | | Action Reference_Dynamic
01c0 8220 | | Call 0x1,0x20
01c1 005b | [ | Store_Top Discrete,At_Offset_3
01c2 0059 | Y | Store_Top Discrete,At_Offset_1
01c3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x4 = 0x1c3,0x2
01c4 0c01 | | Execute_Immediate Greater_Equal,0x1
01c5 680b |h | Jump_Zero 0x1d1
01c6 8219 | | Call 0x1,0x19 ; Debug Table 0x7.0x5 = 0x1c6,0x3
01c7 0092 085e | ^| Action Push_String_Extended,0x85e ; "average ph db size: "
; Debug Table 0x7.0x6 = 0x1c7,0x4
01c9 00da | | Load_Top At_Offset_2
01ca 00da | | Load_Top At_Offset_2
01cb 0270 | p | Execute Discrete,Divide
01cc 00e0 | | Load_Encached Standard_Cache
01cd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ce 01cc | | Execute Vector,Catenate
01cf 8218 | | Call 0x1,0x18
01d0 8219 | | Call 0x1,0x19 ; Debug Table 0x7.0x7 = 0x1d0,0x5
01d1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01d2 0000 0000 | | .BLANK 0000[0x6]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01e8 | | .CONST 0x01e8 ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0006 | | .CONST 0x0006 ; Number of locals
01db INIT_01d8:
01db 4801 |H | Short_Literal 0x1 ; Debug Table 0x8 = .DEBUG 0x01db,0x0b78,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x005d
; Debug Table 0x8.0x0 = 0x1db,0xffff
01dc 4864 |Hd | Short_Literal 0x64
01dd 00e9 | | Load_Encached String_Cache
01de 0334 | 4 | Declare_Variable Array,With_Constraint
01df 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x8.0x1 = 0x1df,0xfffe
01e0 e003 | | Load 0x0,0x3 ; Debug Table 0x8.0x2 = 0x1e0,0xfffd
01e1 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
01e2 02c7 | | Declare_Variable Any
01e3 00d8 | | Load_Top At_Offset_0
01e4 1c00 | | Execute_Immediate Run_Utility,0x0
01e5 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x3 = 0x1e5,0xfffc
01e6 029f 07c3 | | Declare_Subprogram INIT_07c0,For_Call
01e8 BODY_01d8:
01e8 00be | | Action Activate_Tasks
01e9 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x8.0x4 = 0x1e9,0x1
01ea e402 | | Load 0x2,0x2
01eb 4801 |H | Short_Literal 0x1
01ec e002 | | Load 0x0,0x2
01ed 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01ee 00d1 | | Pop_Control Pop_Count_1
01ef c403 | | Store 0x2,0x3
01f0 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x5 = 0x1f0,0x2
01f1 7005 |p | Jump_Nonzero 0x1f7
01f2 0092 085f | _| Action Push_String_Extended,0x85f ; "no argument given"
; Debug Table 0x8.0x6 = 0x1f2,0x3
01f4 8218 | | Call 0x1,0x18
01f5 8219 | | Call 0x1,0x19 ; Debug Table 0x8.0x7 = 0x1f5,0x4
01f6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x8 = 0x1f6,0x5
01f7 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x9 = 0x1f7,0x6
01f8 0120 | | Execute Any,Is_Value
01f9 6803 |h | Jump_Zero 0x1fd
01fa e003 | | Load 0x0,0x3
01fb 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
01fc 7801 |x | Jump 0x1fe
01fd 00da | | Load_Top At_Offset_2
01fe e003 | | Load 0x0,0x3
01ff 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0200 c404 | | Store 0x2,0x4
0201 00cf | | Action Mark_Auxiliary
0202 780a |x | Jump 0x20d
0203 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xa = 0x203,0x8
0204 e003 | | Load 0x0,0x3
0205 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0206 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0207 8406 | | Call 0x2,0x6 ; Debug Table 0x8.0xb = 0x207,0x9
0208 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xc = 0x208,0xa
0209 e003 | | Load 0x0,0x3
020a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
020b c404 | | Store 0x2,0x4
020c 00c9 | | Action Pop_Auxiliary_Loop
020d 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xd = 0x20d,0x7
020e e003 | | Load 0x0,0x3
020f 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0210 6ff2 |o | Jump_Zero 0x203
0211 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0212 0000 0000 | | .BLANK 0000[0x6]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021e | | .CONST 0x021e ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0004 | | .CONST 0x0004 ; Number of locals
021b INIT_0218:
021b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x021b,0x0b96,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0061
; Debug Table 0x9.0x0 = 0x21b,0xffff
021c 039d | | Declare_Variable Heap_Access,Duplicate
021d 039d | | Declare_Variable Heap_Access,Duplicate
021e BODY_0218:
021e e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x1 = 0x21e,0x1
021f 00eb | | Load_Encached Diana_Cache
0220 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0221 0ba8 | | Execute_Immediate Case_Compare,0xa8
0222 702e |p. | Jump_Nonzero 0x251
0223 0b49 | I | Execute_Immediate Case_Compare,0x49
0224 7033 |p3 | Jump_Nonzero 0x258
0225 0b3e | > | Execute_Immediate Case_Compare,0x3e
0226 7038 |p8 | Jump_Nonzero 0x25f
0227 0b47 | G | Execute_Immediate Case_Compare,0x47
0228 704b |pK | Jump_Nonzero 0x274
0229 0b48 | H | Execute_Immediate Case_Compare,0x48
022a 7049 |pI | Jump_Nonzero 0x274
022b 0b46 | F | Execute_Immediate Case_Compare,0x46
022c 7047 |pG | Jump_Nonzero 0x274
022d 0b41 | A | Execute_Immediate Case_Compare,0x41
022e 705c |p\ | Jump_Nonzero 0x28b
022f 0b7c | | | Execute_Immediate Case_Compare,0x7c
0230 7076 |pv | Jump_Nonzero 0x2a7
0231 0b7b | { | Execute_Immediate Case_Compare,0x7b
0232 7082 |p | Jump_Nonzero 0x2b5
0233 0b7a | z | Execute_Immediate Case_Compare,0x7a
0234 7080 |p | Jump_Nonzero 0x2b5
0235 0b8c | | Execute_Immediate Case_Compare,0x8c
0236 7085 |p | Jump_Nonzero 0x2bc
0237 0b91 | | Execute_Immediate Case_Compare,0x91
0238 7083 |p | Jump_Nonzero 0x2bc
0239 0b94 | | Execute_Immediate Case_Compare,0x94
023a 7081 |p | Jump_Nonzero 0x2bc
023b 0b8f | | Execute_Immediate Case_Compare,0x8f
023c 707f |p | Jump_Nonzero 0x2bc
023d 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x2 = 0x23d,0x17
023e e5ff | | Load 0x2,-0x1
023f 4976 |Iv | Short_Literal 0x176
0240 00eb | | Load_Encached Diana_Cache
0241 0098 | | Execute Package,Field_Read_Dynamic
0242 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0243 a402 | | Store_Unchecked 0x2,0x2
0244 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x3 = 0x244,0x18
0245 00eb | | Load_Encached Diana_Cache
0246 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0247 6802 |h | Jump_Zero 0x24a
0248 821a | | Call 0x1,0x1a ; Debug Table 0x9.0x4 = 0x248,0x19
0249 4504 |E | Exit_Suprogram New_Top_Offset 0x4
024a 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x5 = 0x24a,0x1a
024b e5fd | | Load 0x2,-0x3
024c e5fe | | Load 0x2,-0x2
024d 4800 |H | Short_Literal 0x0
024e e402 | | Load 0x2,0x2
024f 8223 | # | Call 0x1,0x23
0250 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0251 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x6 = 0x251,0x2
0252 e5fe | | Load 0x2,-0x2
0253 e5ff | | Load 0x2,-0x1
0254 00eb | | Load_Encached Diana_Cache
0255 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0256 8214 | | Call 0x1,0x14
0257 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0258 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x7 = 0x258,0x3
0259 e5fe | | Load 0x2,-0x2
025a e5ff | | Load 0x2,-0x1
025b 00eb | | Load_Encached Diana_Cache
025c 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
025d 8214 | | Call 0x1,0x14
025e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
025f e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x8 = 0x25f,0x4
0260 00eb | | Load_Encached Diana_Cache
0261 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8
0262 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0263 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x9 = 0x263,0x5
0264 00eb | | Load_Encached Diana_Cache
0265 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0266 0f77 | w | Execute_Immediate Equal,0x77
0267 6807 |h | Jump_Zero 0x26f
0268 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0xa = 0x268,0x6
0269 e5fe | | Load 0x2,-0x2
026a e5ff | | Load 0x2,-0x1
026b e008 | | Load 0x0,0x8
026c 180e | | Execute Package,Field_Execute,Field_Number 0xe
026d 8214 | | Call 0x1,0x14
026e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
026f e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0xb = 0x26f,0x7
0270 e5fe | | Load 0x2,-0x2
0271 e403 | | Load 0x2,0x3
0272 8214 | | Call 0x1,0x14
0273 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0274 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0xc = 0x274,0x8
0275 00eb | | Load_Encached Diana_Cache
0276 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
0277 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0278 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0xd = 0x278,0x9
0279 00eb | | Load_Encached Diana_Cache
027a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
027b 0f77 | w | Execute_Immediate Equal,0x77
027c 6807 |h | Jump_Zero 0x284
027d e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0xe = 0x27d,0xa
027e e5fe | | Load 0x2,-0x2
027f e5ff | | Load 0x2,-0x1
0280 e008 | | Load 0x0,0x8
0281 180e | | Execute Package,Field_Execute,Field_Number 0xe
0282 8214 | | Call 0x1,0x14
0283 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0284 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0xf = 0x284,0xb
0285 e5fe | | Load 0x2,-0x2
0286 00db | | Load_Top At_Offset_3
0287 00eb | | Load_Encached Diana_Cache
0288 18d1 | | Execute Package,Field_Execute,Field_Number 0xd1
0289 8224 | $ | Call 0x1,0x24
028a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
028b e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x10 = 0x28b,0xc
028c 00eb | | Load_Encached Diana_Cache
028d 18cc | | Execute Package,Field_Execute,Field_Number 0xcc
028e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
028f 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x11 = 0x28f,0xd
0290 00eb | | Load_Encached Diana_Cache
0291 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0292 0f77 | w | Execute_Immediate Equal,0x77
0293 6807 |h | Jump_Zero 0x29b
0294 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x12 = 0x294,0xe
0295 e5fe | | Load 0x2,-0x2
0296 e5ff | | Load 0x2,-0x1
0297 e008 | | Load 0x0,0x8
0298 180e | | Execute Package,Field_Execute,Field_Number 0xe
0299 8214 | | Call 0x1,0x14
029a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
029b e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x13 = 0x29b,0xf
029c e5fe | | Load 0x2,-0x2
029d e5ff | | Load 0x2,-0x1
029e 00eb | | Load_Encached Diana_Cache
029f 18cd | | Execute Package,Field_Execute,Field_Number 0xcd
02a0 8214 | | Call 0x1,0x14
02a1 8219 | | Call 0x1,0x19 ; Debug Table 0x9.0x14 = 0x2a1,0x10
02a2 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x15 = 0x2a2,0x11
02a3 e5fe | | Load 0x2,-0x2
02a4 e403 | | Load 0x2,0x3
02a5 8214 | | Call 0x1,0x14
02a6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02a7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x16 = 0x2a7,0x12
02a8 e5fe | | Load 0x2,-0x2
02a9 e5ff | | Load 0x2,-0x1
02aa 00eb | | Load_Encached Diana_Cache
02ab 18bd | | Execute Package,Field_Execute,Field_Number 0xbd
02ac 8224 | $ | Call 0x1,0x24
02ad 8219 | | Call 0x1,0x19 ; Debug Table 0x9.0x17 = 0x2ad,0x13
02ae e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x18 = 0x2ae,0x14
02af e5fe | | Load 0x2,-0x2
02b0 e5ff | | Load 0x2,-0x1
02b1 00eb | | Load_Encached Diana_Cache
02b2 18be | | Execute Package,Field_Execute,Field_Number 0xbe
02b3 8224 | $ | Call 0x1,0x24
02b4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02b5 e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x19 = 0x2b5,0x15
02b6 e5fe | | Load 0x2,-0x2
02b7 e5ff | | Load 0x2,-0x1
02b8 00eb | | Load_Encached Diana_Cache
02b9 18da | | Execute Package,Field_Execute,Field_Number 0xda
02ba 8214 | | Call 0x1,0x14
02bb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02bc e5fd | | Load 0x2,-0x3 ; Debug Table 0x9.0x1a = 0x2bc,0x16
02bd e5fe | | Load 0x2,-0x2
02be e5ff | | Load 0x2,-0x1
02bf 8224 | $ | Call 0x1,0x24
02c0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
02c1 0000 0000 | | .BLANK 0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02d2 | | .CONST 0x02d2 ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0004 | | .CONST 0x0004 ; Number of locals
02cb INIT_02c8:
02cb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa = .DEBUG 0x02cb,0x0bce,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0073
; Debug Table 0xa.0x0 = 0x2cb,0xffff
02cc 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xa.0x1 = 0x2cc,0xfffe
02cd e006 | | Load 0x0,0x6 ; Debug Table 0xa.0x2 = 0x2cd,0xfffd
02ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02cf 02c7 | | Declare_Variable Any
02d0 00d8 | | Load_Top At_Offset_0
02d1 1c00 | | Execute_Immediate Run_Utility,0x0
02d2 BODY_02c8:
02d2 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x3 = 0x2d2,0x1
02d3 00eb | | Load_Encached Diana_Cache
02d4 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02d5 6803 |h | Jump_Zero 0x2d9
02d6 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x4 = 0x2d6,0x2
02d7 0033 | 3 | Store_Top Heap_Access,At_Offset_3
02d8 780d |x | Jump 0x2e6
02d9 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x5 = 0x2d9,0x3
02da e5ff | | Load 0x2,-0x1
02db 4976 |Iv | Short_Literal 0x176
02dc 00eb | | Load_Encached Diana_Cache
02dd 0098 | | Execute Package,Field_Read_Dynamic
02de 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02df 0033 | 3 | Store_Top Heap_Access,At_Offset_3
02e0 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x6 = 0x2e0,0x4
02e1 00eb | | Load_Encached Diana_Cache
02e2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02e3 6802 |h | Jump_Zero 0x2e6
02e4 821a | | Call 0x1,0x1a ; Debug Table 0xa.0x7 = 0x2e4,0x5
02e5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0xa.0x8 = 0x2e5,0x6
02e6 00cf | | Action Mark_Auxiliary
02e7 4806 |H | Short_Literal 0x6 ; Debug Table 0xa.0x9 = 0x2e7,0x7
02e8 4800 |H | Short_Literal 0x0
02e9 0007 | | Action Break_Optional
02ea 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xa = 0x2ea,0x8
02eb e5fd | | Load 0x2,-0x3
02ec e5fe | | Load 0x2,-0x2
02ed 00db | | Load_Top At_Offset_3
02ee 0f01 | | Execute_Immediate Equal,0x1
02ef 0f00 | | Execute_Immediate Equal,0x0
02f0 e402 | | Load 0x2,0x2
02f1 8223 | # | Call 0x1,0x23
02f2 00c8 | | Action Pop_Auxiliary_Range
02f3 3ff6 |? | Loop_Increasing 0x2ea
02f4 00ce | | Action Pop_Auxiliary
02f5 e009 | | Load 0x0,0x9 ; Debug Table 0xa.0xb = 0x2f5,0x9
02f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02f7 821c | | Call 0x1,0x1c
02f8 e006 | | Load 0x0,0x6
02f9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02fa c404 | | Store 0x2,0x4
02fb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0xc = 0x2fb,0xa
02fc 00db | | Load_Top At_Offset_3
02fd e003 | | Load 0x0,0x3
02fe 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02ff 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0300 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0xd = 0x300,0xb
0301 00eb | | Load_Encached Diana_Cache
0302 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0303 701c |p | Jump_Nonzero 0x320
0304 484d |HM | Short_Literal 0x4d ; Debug Table 0xa.0xe = 0x304,0xc
0305 00db | | Load_Top At_Offset_3
0306 e001 | | Load 0x0,0x1
0307 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0308 0092 0860 | `| Action Push_String_Extended,0x860 ; " subordinates: "
; Debug Table 0xa.0xf = 0x308,0xd
030a 8218 | | Call 0x1,0x18
030b 00cf | | Action Mark_Auxiliary
030c 780d |x | Jump 0x31a
030d 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x10 = 0x30d,0xf
030e 00eb | | Load_Encached Diana_Cache
030f 1872 | r | Execute Package,Field_Execute,Field_Number 0x72
0310 e001 | | Load 0x0,0x1
0311 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0312 0092 0861 | a| Action Push_String_Extended,0x861 ; " "
; Debug Table 0xa.0x11 = 0x312,0x10
0314 8218 | | Call 0x1,0x18
0315 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x12 = 0x315,0x11
0316 00eb | | Load_Encached Diana_Cache
0317 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
0318 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0319 00c9 | | Action Pop_Auxiliary_Loop
031a 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x13 = 0x31a,0xe
031b 00eb | | Load_Encached Diana_Cache
031c 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
031d 6fef |o | Jump_Zero 0x30d
031e 00ce | | Action Pop_Auxiliary
031f 8219 | | Call 0x1,0x19 ; Debug Table 0xa.0x14 = 0x31f,0x12
0320 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x15 = 0x320,0x13
0321 4801 |H | Short_Literal 0x1
0322 4801 |H | Short_Literal 0x1
0323 821c | | Call 0x1,0x1c
0324 e006 | | Load 0x0,0x6
0325 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0326 c404 | | Store 0x2,0x4
0327 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0334 | 4 | .CONST 0x0334 ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0006 | | .CONST 0x0006 ; Number of locals
032b INIT_0328:
032b 4801 |H | Short_Literal 0x1 ; Debug Table 0xb = .DEBUG 0x032b,0x0bfc,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0085
; Debug Table 0xb.0x0 = 0x32b,0xffff
032c 4864 |Hd | Short_Literal 0x64
032d 00e9 | | Load_Encached String_Cache
032e 0334 | 4 | Declare_Variable Array,With_Constraint
032f 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xb.0x1 = 0x32f,0xfffe
0330 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xb.0x2 = 0x330,0xfffd
0331 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x3 = 0x331,0xfffc
0332 e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0x4 = 0x332,0xfffb
0333 0007 | | Action Break_Optional
0334 BODY_0328:
0334 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xb.0x5 = 0x334,0x1
0335 e402 | | Load 0x2,0x2
0336 4801 |H | Short_Literal 0x1
0337 e002 | | Load 0x0,0x2
0338 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0339 00d1 | | Pop_Control Pop_Count_1
033a c403 | | Store 0x2,0x3
033b e00a | | Load 0x0,0xa ; Debug Table 0xb.0x6 = 0x33b,0x2
033c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
033d 4801 |H | Short_Literal 0x1
033e e403 | | Load 0x2,0x3
033f e402 | | Load 0x2,0x2
0340 01cf | | Execute Vector,Slice_Read
0341 00eb | | Load_Encached Diana_Cache
0342 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0343 00da | | Load_Top At_Offset_2
0344 00eb | | Load_Encached Diana_Cache
0345 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0346 00eb | | Load_Encached Diana_Cache
0347 1888 | | Execute Package,Field_Execute,Field_Number 0x88
0348 00db | | Load_Top At_Offset_3
0349 4975 |Iu | Short_Literal 0x175
034a 00eb | | Load_Encached Diana_Cache
034b 0098 | | Execute Package,Field_Read_Dynamic
034c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
034d 00e3 | | Load_Encached Natural_Cache
034e 025b | [ | Execute Discrete,Check_In_Type
034f 00db | | Load_Top At_Offset_3
0350 00eb | | Load_Encached Diana_Cache
0351 18ec | | Execute Package,Field_Execute,Field_Number 0xec
0352 e00a | | Load 0x0,0xa
0353 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0354 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0355 00cf | | Action Mark_Auxiliary
0356 780c |x | Jump 0x363
0357 484d |HM | Short_Literal 0x4d ; Debug Table 0xb.0x7 = 0x357,0x4
0358 e404 | | Load 0x2,0x4
0359 00eb | | Load_Encached Diana_Cache
035a 1872 | r | Execute Package,Field_Execute,Field_Number 0x72
035b e001 | | Load 0x0,0x1
035c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
035d 8219 | | Call 0x1,0x19 ; Debug Table 0xb.0x8 = 0x35d,0x5
035e 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0x9 = 0x35e,0x6
035f 00eb | | Load_Encached Diana_Cache
0360 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
0361 a404 | | Store_Unchecked 0x2,0x4
0362 00c9 | | Action Pop_Auxiliary_Loop
0363 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0xa = 0x363,0x3
0364 00eb | | Load_Encached Diana_Cache
0365 1871 | q | Execute Package,Field_Execute,Field_Number 0x71
0366 6ff0 |o | Jump_Zero 0x357
0367 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 0376 | v | .CONST 0x0376 ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0008 | | .CONST 0x0008 ; Number of locals
036b INIT_0368:
036b 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0xc = .DEBUG 0x036b,0x0c14,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x008f
; Debug Table 0xc.0x0 = 0x36b,0xffff
036c 00c6 | | Action Check_Subprogram_Elaborated
036d 00e2 | | Load_Encached Integer_Cache
036e 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
036f 6030 |`0 | Indirect_Literal Discrete,0x3a0,{0x00000000, 0x00393556}
0370 6023 |`# | Indirect_Literal Discrete,0x394,{0x00000000, 0x00000dfc}
0371 4806 |H | Short_Literal 0x6
0372 0007 | | Action Break_Optional
0373 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xc.0x1 = 0x373,0xfffe
0374 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0375 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xc.0x2 = 0x375,0xfffd
0376 BODY_0368:
0376 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xc.0x3 = 0x376,0x1
0377 00da | | Load_Top At_Offset_2
0378 e5ff | | Load 0x2,-0x1
0379 e402 | | Load 0x2,0x2
037a 4803 |H | Short_Literal 0x3
037b 4802 |H | Short_Literal 0x2
037c 0099 | | Action Reference_Dynamic
037d 4804 |H | Short_Literal 0x4
037e 4802 |H | Short_Literal 0x2
037f 0099 | | Action Reference_Dynamic
0380 8220 | | Call 0x1,0x20
0381 005b | [ | Store_Top Discrete,At_Offset_3
0382 0059 | Y | Store_Top Discrete,At_Offset_1
0383 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0384 0000 0000 | | .BLANK 0000[0x4]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 8219 | | Call 0x1,0x19 ; Debug Table 0xd = .DEBUG 0x038b,0x0c1e,0x0001,0x0000,0x0039,0x3556,0x0000,0x0074
; Debug Table 0xd.0x0 = 0x38b,0x1
038c 0092 0862 | b| Action Push_String_Extended,0x862 ; "*** exception: "
; Debug Table 0xd.0x1 = 0x38c,0x2
038e 00db | | Load_Top At_Offset_3
038f 01cc | | Execute Vector,Catenate
0390 8218 | | Call 0x1,0x18
0391 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0392 0000 0000 | | .XXX[0x2]
0394 0000 0000 | | .LITERAL {0x00000000, 0x00000dfc}
0398 0000 0000 | | .LITERAL {0x00000000, 0x00000c09}
039c 0000 0000 | | .LITERAL {0x00000000, 0x00000bc5}
03a0 0000 0000 | | .LITERAL {0x00000000, 0x00393556}
03a4 0000 0000 | | .BLANK 0000[0x4]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x03ab,0x0c24,0x0001,0x0000,0x0039,0x3556,0x0000,0x008e
; Debug Table 0xe.0x0 = 0x3ab,0x1
03ac 680f |h | Jump_Zero 0x3bc
03ad 0092 0863 | c| Action Push_String_Extended,0x863 ; "*** error status: "
; Debug Table 0xe.0x1 = 0x3ad,0x2
03af 00db | | Load_Top At_Offset_3
03b0 e00b | | Load 0x0,0xb
03b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03b2 025e | ^ | Execute Discrete,Convert
03b3 1c01 | | Execute_Immediate Run_Utility,0x1
03b4 01cc | | Execute Vector,Catenate
03b5 0092 0864 | d| Action Push_String_Extended,0x864 ; " while "
03b7 01cc | | Execute Vector,Catenate
03b8 e5fe | | Load 0x2,-0x2
03b9 01cc | | Execute Vector,Catenate
03ba 8218 | | Call 0x1,0x18
03bb 8219 | | Call 0x1,0x19 ; Debug Table 0xe.0x2 = 0x3bb,0x3
03bc 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03bd 0000 0000 | | .XXX[0x3]
03bf 0000 | |
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03de | | .CONST 0x03de ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0009 | | .CONST 0x0009 ; Number of locals
03c3 INIT_03c0:
03c3 e00b | | Load 0x0,0xb ; Debug Table 0xf = .DEBUG 0x03c3,0x0c2c,0x2801,0x0002,0x0039,0x3556,0x0000,0x00c8
; Debug Table 0xf.0x0 = 0x3c3,0xffff
03c4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03c5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03c6 e00b | | Load 0x0,0xb ; Debug Table 0xf.0x1 = 0x3c6,0xfffe
03c7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03c8 02c7 | | Declare_Variable Any
03c9 00d8 | | Load_Top At_Offset_0
03ca 1c00 | | Execute_Immediate Run_Utility,0x0
03cb e00b | | Load 0x0,0xb ; Debug Table 0xf.0x2 = 0x3cb,0xfffd
03cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03cd 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf.0x3 = 0x3cd,0xfffc
03ce e00b | | Load 0x0,0xb ; Debug Table 0xf.0x4 = 0x3ce,0xfffb
03cf 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03d0 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
03d1 02c7 | | Declare_Variable Any
03d2 00d8 | | Load_Top At_Offset_0
03d3 1c00 | | Execute_Immediate Run_Utility,0x0
03d4 e00b | | Load 0x0,0xb ; Debug Table 0xf.0x5 = 0x3d4,0xfffa
03d5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03d6 1b18 | | Execute Package,Field_Read,Field_Number 0x18
03d7 02c7 | | Declare_Variable Any
03d8 00d8 | | Load_Top At_Offset_0
03d9 1c00 | | Execute_Immediate Run_Utility,0x0
03da 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xf.0x6 = 0x3da,0xfff9
03db 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
03dc 029f 07db | | Declare_Subprogram INIT_07d8,For_Call
03de BODY_03c0:
03de e00b | | Load 0x0,0xb ; Debug Table 0xf.0x7 = 0x3de,0x1
03df 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03e0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03e1 00db | | Load_Top At_Offset_3
03e2 0120 | | Execute Any,Is_Value
03e3 6804 |h | Jump_Zero 0x3e8
03e4 e00b | | Load 0x0,0xb
03e5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03e6 1b18 | | Execute Package,Field_Read,Field_Number 0x18
03e7 7801 |x | Jump 0x3e9
03e8 00db | | Load_Top At_Offset_3
03e9 628e |b | Indirect_Literal Discrete,0x678,{0x00000000, 0x00028000}
03ea e006 | | Load 0x0,0x6
03eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ec e00c | | Load 0x0,0xc
03ed 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03ee e00d | | Load 0x0,0xd
03ef 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03f0 4801 |H | Short_Literal 0x1
03f1 4800 |H | Short_Literal 0x0
03f2 e00c | | Load 0x0,0xc
03f3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
03f4 e00b | | Load 0x0,0xb
03f5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03f6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03f7 e5fc | | Load 0x2,-0x4
03f8 0092 0865 | e| Action Push_String_Extended,0x865 ; "'C(ada)"
03fa 01cc | | Execute Vector,Catenate
03fb e00b | | Load 0x0,0xb
03fc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03fd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
03fe c407 | | Store 0x2,0x7
03ff c402 | | Store 0x2,0x2
0400 e402 | | Load 0x2,0x2 ; Debug Table 0xf.0x8 = 0x400,0x2
0401 6811 |h | Jump_Zero 0x413
0402 0092 0866 | f| Action Push_String_Extended,0x866 ; "*** error resolving "
; Debug Table 0xf.0x9 = 0x402,0x3
0404 e5fc | | Load 0x2,-0x4
0405 01cc | | Execute Vector,Catenate
0406 0092 0867 | g| Action Push_String_Extended,0x867 ; ", status = "
0408 01cc | | Execute Vector,Catenate
0409 e402 | | Load 0x2,0x2
040a e00b | | Load 0x0,0xb
040b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
040c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
040d 025e | ^ | Execute Discrete,Convert
040e 1c01 | | Execute_Immediate Run_Utility,0x1
040f 01cc | | Execute Vector,Catenate
0410 8218 | | Call 0x1,0x18
0411 8219 | | Call 0x1,0x19 ; Debug Table 0xf.0xa = 0x411,0x4
0412 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0xf.0xb = 0x412,0x5
0413 00cf | | Action Mark_Auxiliary
0414 7807 |x | Jump 0x41c
0415 8409 | | Call 0x2,0x9 ; Debug Table 0xf.0xc = 0x415,0x7
0416 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0xd = 0x416,0x8
0417 e00b | | Load 0x0,0xb
0418 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0419 181d | | Execute Package,Field_Execute,Field_Number 0x1d
041a c407 | | Store 0x2,0x7
041b 00c9 | | Action Pop_Auxiliary_Loop
041c 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0xe = 0x41c,0x6
041d e00b | | Load 0x0,0xb
041e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
041f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0420 6ff4 |o | Jump_Zero 0x415
0421 00ce | | Action Pop_Auxiliary
0422 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0xf = 0x422,0x9
0423 a5fa | | Store_Unchecked 0x2,-0x6
0424 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0425 0000 0000 | | .XXX[0x3]
0427 0000 | |
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b | + | .CONST 0x042b ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0001 | | .CONST 0x0001 ; Number of locals
042b BODY_0428:
042b INIT_0428:
042b 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x042b,0x0c4e,0x0001,0x0000,0x0039,0x3556,0x0000,0x01ff
; Debug Table 0x10.0x0 = 0x42b,0x1
042c 4606 |F | Jump_Case 0x7
042d 780a |x | Jump 0x438 ; case 0x0
042e 7805 |x | Jump 0x434 ; case 0x1
042f 780c |x | Jump 0x43c ; case 0x2
0430 780f |x | Jump 0x440 ; case 0x3
0431 7812 |x | Jump 0x444 ; case 0x4
0432 7815 |x | Jump 0x448 ; case 0x5
0433 7818 |x | Jump 0x44c ; case 0x6
0434 0092 0868 | h| Action Push_String_Extended,0x868 ; " referencers: "
; Debug Table 0x10.0x1 = 0x434,0x2
0436 8218 | | Call 0x1,0x18
0437 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0438 0092 0869 | i| Action Push_String_Extended,0x869 ; " refs_in_use: "
; Debug Table 0x10.0x2 = 0x438,0x3
043a 8218 | | Call 0x1,0x18
043b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
043c 0092 086a | j| Action Push_String_Extended,0x86a ; " refs_by_sel_wis: "
; Debug Table 0x10.0x3 = 0x43c,0x4
043e 8218 | | Call 0x1,0x18
043f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0440 0092 086b | k| Action Push_String_Extended,0x86b ; " refs_by_sel_ois: "
; Debug Table 0x10.0x4 = 0x440,0x5
0442 8218 | | Call 0x1,0x18
0443 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0444 0092 086c | l| Action Push_String_Extended,0x86c ; " sees_used_ns_via_uc: "
; Debug Table 0x10.0x5 = 0x444,0x6
0446 8218 | | Call 0x1,0x18
0447 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0448 0092 086d | m| Action Push_String_Extended,0x86d ; " subordinate_to: "
; Debug Table 0x10.0x6 = 0x448,0x7
044a 8218 | | Call 0x1,0x18
044b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
044c 0092 086e | n| Action Push_String_Extended,0x86e ; " refs_code_seg"
; Debug Table 0x10.0x7 = 0x44c,0x8
044e 8218 | | Call 0x1,0x18
044f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0464 | d | .CONST 0x0464 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 0005 | | .CONST 0x0005 ; Number of locals
0453 INIT_0450:
0453 e003 | | Load 0x0,0x3 ; Debug Table 0x11 = .DEBUG 0x0453,0x0c60,0x0001,0x0000,0x0039,0x3556,0x0000,0x025b
; Debug Table 0x11.0x0 = 0x453,0xffff
0454 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0455 02c7 | | Declare_Variable Any
0456 00db | | Load_Top At_Offset_3
0457 c402 | | Store 0x2,0x2
0458 e007 | | Load 0x0,0x7 ; Debug Table 0x11.0x1 = 0x458,0xfffe
0459 1b0f | | Execute Package,Field_Read,Field_Number 0xf
045a 02ff | | Declare_Variable Variant_Record
045b 00d8 | | Load_Top At_Offset_0
045c 1c00 | | Execute_Immediate Run_Utility,0x0
045d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11.0x2 = 0x45d,0xfffd
045e e004 | | Load 0x0,0x4 ; Debug Table 0x11.0x3 = 0x45e,0xfffc
045f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0460 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0461 02c7 | | Declare_Variable Any
0462 00d8 | | Load_Top At_Offset_0
0463 1c00 | | Execute_Immediate Run_Utility,0x0
0464 BODY_0450:
0464 00cf | | Action Mark_Auxiliary
0465 784d |xM | Jump 0x4b3
0466 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x4 = 0x466,0x2
0467 e003 | | Load 0x0,0x3
0468 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0469 e403 | | Load 0x2,0x3
046a 016d | m | Execute Variant_Record,Structure_Write
046b e5fe | | Load 0x2,-0x2 ; Debug Table 0x11.0x5 = 0x46b,0x3
046c 6826 |h& | Jump_Zero 0x493
046d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11.0x6 = 0x46d,0x4
046e 00da | | Load_Top At_Offset_2
046f 0120 | | Execute Any,Is_Value
0470 6804 |h | Jump_Zero 0x475
0471 e004 | | Load 0x0,0x4
0472 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0473 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0474 7801 |x | Jump 0x476
0475 00da | | Load_Top At_Offset_2
0476 e006 | | Load 0x0,0x6
0477 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0478 e403 | | Load 0x2,0x3
0479 e008 | | Load 0x0,0x8
047a 180f | | Execute Package,Field_Execute,Field_Number 0xf
047b c405 | | Store 0x2,0x5
047c 005b | [ | Store_Top Discrete,At_Offset_3
047d 00da | | Load_Top At_Offset_2 ; Debug Table 0x11.0x7 = 0x47d,0x5
047e 680d |h | Jump_Zero 0x48c
047f 8219 | | Call 0x1,0x19 ; Debug Table 0x11.0x8 = 0x47f,0x6
0480 484d |HM | Short_Literal 0x4d ; Debug Table 0x11.0x9 = 0x480,0x7
0481 00da | | Load_Top At_Offset_2
0482 e004 | | Load 0x0,0x4
0483 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0484 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0485 4976 |Iv | Short_Literal 0x176
0486 00eb | | Load_Encached Diana_Cache
0487 0098 | | Execute Package,Field_Read_Dynamic
0488 180f | | Execute Package,Field_Execute,Field_Number 0xf
0489 e001 | | Load 0x0,0x1
048a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
048b 7822 |x" | Jump 0x4ae
048c e5fd | | Load 0x2,-0x3 ; Debug Table 0x11.0xa = 0x48c,0x8
048d 7020 |p | Jump_Nonzero 0x4ae
048e 8219 | | Call 0x1,0x19 ; Debug Table 0x11.0xb = 0x48e,0x9
048f 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0xc = 0x48f,0xa
0490 e001 | | Load 0x0,0x1
0491 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0492 781b |x | Jump 0x4ae
0493 e5fd | | Load 0x2,-0x3 ; Debug Table 0x11.0xd = 0x493,0xb
0494 6816 |h | Jump_Zero 0x4ab
0495 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11.0xe = 0x495,0xc
0496 00da | | Load_Top At_Offset_2
0497 0120 | | Execute Any,Is_Value
0498 6804 |h | Jump_Zero 0x49d
0499 e004 | | Load 0x0,0x4
049a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
049b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
049c 7801 |x | Jump 0x49e
049d 00da | | Load_Top At_Offset_2
049e e006 | | Load 0x0,0x6
049f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04a0 e403 | | Load 0x2,0x3
04a1 e008 | | Load 0x0,0x8
04a2 180f | | Execute Package,Field_Execute,Field_Number 0xf
04a3 c405 | | Store 0x2,0x5
04a4 005b | [ | Store_Top Discrete,At_Offset_3
04a5 00da | | Load_Top At_Offset_2 ; Debug Table 0x11.0xf = 0x4a5,0xd
04a6 6807 |h | Jump_Zero 0x4ae
04a7 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x10 = 0x4a7,0xe
04a8 e001 | | Load 0x0,0x1
04a9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04aa 7803 |x | Jump 0x4ae
04ab 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x11 = 0x4ab,0xf
04ac e001 | | Load 0x0,0x1
04ad 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04ae e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x12 = 0x4ae,0x10
04af e003 | | Load 0x0,0x3
04b0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04b1 c402 | | Store 0x2,0x2
04b2 00c9 | | Action Pop_Auxiliary_Loop
04b3 e402 | | Load 0x2,0x2 ; Debug Table 0x11.0x13 = 0x4b3,0x1
04b4 e003 | | Load 0x0,0x3
04b5 181d | | Execute Package,Field_Execute,Field_Number 0x1d
04b6 6faf |o | Jump_Zero 0x466
04b7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04c9 | | .CONST 0x04c9 ; Address of begin
04b9 04ed | | .CONST 0x04ed ; Address of exception handler
04ba 0003 | | .CONST 0x0003 ; Number of locals
04bb INIT_04b8:
04bb e006 | | Load 0x0,0x6 ; Debug Table 0x12 = .DEBUG 0x04bb,0x0c8a,0x0001,0x0000,0x0039,0x3556,0x0000,0x02f7
; Debug Table 0x12.0x0 = 0x4bb,0xffff
04bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04bd 02c7 | | Declare_Variable Any
04be e009 | | Load 0x0,0x9
04bf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04c0 821c | | Call 0x1,0x1c
04c1 e006 | | Load 0x0,0x6
04c2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04c3 c402 | | Store 0x2,0x2
04c4 e003 | | Load 0x0,0x3 ; Debug Table 0x12.0x1 = 0x4c4,0xfffe
04c5 1b19 | | Execute Package,Field_Read,Field_Number 0x19
04c6 02c7 | | Declare_Variable Any
04c7 00d8 | | Load_Top At_Offset_0
04c8 1c00 | | Execute_Immediate Run_Utility,0x0
04c9 BODY_04b8:
04c9 821b | | Call 0x1,0x1b ; Debug Table 0x12.0x2 = 0x4c9,0x1
04ca 00da | | Load_Top At_Offset_2
04cb e5ff | | Load 0x2,-0x1
04cc e5fb | | Load 0x2,-0x5
04cd e003 | | Load 0x0,0x3
04ce 181a | | Execute Package,Field_Execute,Field_Number 0x1a
04cf c403 | | Store 0x2,0x3
04d0 e5fe | | Load 0x2,-0x2 ; Debug Table 0x12.0x3 = 0x4d0,0x2
04d1 6804 |h | Jump_Zero 0x4d6
04d2 00d8 | | Load_Top At_Offset_0
04d3 e003 | | Load 0x0,0x3
04d4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
04d5 7801 |x | Jump 0x4d7
04d6 4800 |H | Short_Literal 0x0
04d7 700d |p | Jump_Nonzero 0x4e5
04d8 8219 | | Call 0x1,0x19 ; Debug Table 0x12.0x4 = 0x4d8,0x3
04d9 484d |HM | Short_Literal 0x4d ; Debug Table 0x12.0x5 = 0x4d9,0x4
04da e5ff | | Load 0x2,-0x1
04db e001 | | Load 0x0,0x1
04dc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04dd 8219 | | Call 0x1,0x19 ; Debug Table 0x12.0x6 = 0x4dd,0x5
04de e5fb | | Load 0x2,-0x5 ; Debug Table 0x12.0x7 = 0x4de,0x6
04df 8221 | ! | Call 0x1,0x21
04e0 e5fc | | Load 0x2,-0x4 ; Debug Table 0x12.0x8 = 0x4e0,0x7
04e1 e5fd | | Load 0x2,-0x3
04e2 00da | | Load_Top At_Offset_2
04e3 8222 | " | Call 0x1,0x22
04e4 8219 | | Call 0x1,0x19 ; Debug Table 0x12.0x9 = 0x4e4,0x8
04e5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0xa = 0x4e5,0x9
04e6 4801 |H | Short_Literal 0x1
04e7 4801 |H | Short_Literal 0x1
04e8 821c | | Call 0x1,0x1c
04e9 e006 | | Load 0x0,0x6
04ea 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04eb c402 | | Store 0x2,0x2
04ec 4506 |E | Exit_Suprogram New_Top_Offset 0x6
04ed TRAP_04b8:
04ed 0007 | | Action Break_Optional
04ee 00da | | Load_Top At_Offset_2 ; Debug Table 0x12.0xb = 0x4ee,0xa
04ef 4801 |H | Short_Literal 0x1
04f0 4800 |H | Short_Literal 0x0
04f1 821c | | Call 0x1,0x1c
04f2 e006 | | Load 0x0,0x6
04f3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04f4 c402 | | Store 0x2,0x2
04f5 4506 |E | Exit_Suprogram New_Top_Offset 0x6
04f6 0000 0000 | | .XXX[0x2]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 0504 | | .CONST 0x0504 ; Address of begin
04f9 0004 | | .CONST 0x0004 ; Address of exception handler
04fa 0002 | | .CONST 0x0002 ; Number of locals
04fb INIT_04f8:
04fb 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0x13 = .DEBUG 0x04fb,0x0ca4,0x0001,0x0000,0x0039,0x3556,0x0000,0x0439
; Debug Table 0x13.0x0 = 0x4fb,0xffff
04fc 00eb | | Load_Encached Diana_Cache
04fd 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
04fe e5ff | | Load 0x2,-0x1
04ff 4976 |Iv | Short_Literal 0x176
0500 00eb | | Load_Encached Diana_Cache
0501 0098 | | Execute Package,Field_Read_Dynamic
0502 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0503 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0504 BODY_04f8:
0504 00cf | | Action Mark_Auxiliary
0505 780d |x | Jump 0x513
0506 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x1 = 0x506,0x2
0507 e5fd | | Load 0x2,-0x3
0508 e5fe | | Load 0x2,-0x2
0509 4801 |H | Short_Literal 0x1
050a e402 | | Load 0x2,0x2
050b 00eb | | Load_Encached Diana_Cache
050c 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
050d 8223 | # | Call 0x1,0x23
050e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x2 = 0x50e,0x3
050f 00eb | | Load_Encached Diana_Cache
0510 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
0511 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0512 00c9 | | Action Pop_Auxiliary_Loop
0513 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x3 = 0x513,0x1
0514 00eb | | Load_Encached Diana_Cache
0515 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0516 6fef |o | Jump_Zero 0x506
0517 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 0525 | % | .CONST 0x0525 ; Address of begin
0519 0560 | ` | .CONST 0x0560 ; Address of exception handler
051a 0005 | | .CONST 0x0005 ; Number of locals
051b INIT_0518:
051b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x14 = .DEBUG 0x051b,0x0cae,0x0001,0x0000,0x0039,0x3556,0x0000,0x05e4
; Debug Table 0x14.0x0 = 0x51b,0xffff
051c 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x1 = 0x51c,0xfffe
051d e003 | | Load 0x0,0x3 ; Debug Table 0x14.0x2 = 0x51d,0xfffd
051e 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
051f 0337 | 7 | Declare_Variable Array
0520 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x3 = 0x520,0xfffc
0521 4804 |H | Short_Literal 0x4
0522 00e9 | | Load_Encached String_Cache
0523 0334 | 4 | Declare_Variable Array,With_Constraint
0524 5157 |QW | Indirect_Literal Any,0x67c,{0x20202020, 0x20202020}
0525 BODY_0518:
0525 e5ff | | Load 0x2,-0x1 ; Debug Table 0x14.0x4 = 0x525,0x1
0526 e003 | | Load 0x0,0x3
0527 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0528 a402 | | Store_Unchecked 0x2,0x2
0529 e5ff | | Load 0x2,-0x1 ; Debug Table 0x14.0x5 = 0x529,0x2
052a e003 | | Load 0x0,0x3
052b 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
052c 00da | | Load_Top At_Offset_2
052d 01d4 | | Execute Vector,Structure_Write
052e 00cf | | Action Mark_Auxiliary
052f 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x6 = 0x52f,0x3
0530 01d9 | | Execute Vector,Reverse_Bounds
0531 0007 | | Action Break_Optional
0532 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x7 = 0x532,0x4
0533 e404 | | Load 0x2,0x4
0534 01d7 | | Execute Vector,Field_Read
0535 6819 |h | Jump_Zero 0x54f
0536 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x8 = 0x536,0x5
0537 4603 |F | Jump_Case 0x4
0538 7808 |x | Jump 0x541 ; case 0x0
0539 7802 |x | Jump 0x53c ; case 0x1
053a 780b |x | Jump 0x546 ; case 0x2
053b 780f |x | Jump 0x54b ; case 0x3
053c 4864 |Hd | Short_Literal 0x64 ; Debug Table 0x14.0x9 = 0x53c,0x6
053d 4801 |H | Short_Literal 0x1
053e e405 | | Load 0x2,0x5
053f 01d6 | | Execute Vector,Field_Write
0540 780e |x | Jump 0x54f
0541 4875 |Hu | Short_Literal 0x75 ; Debug Table 0x14.0xa = 0x541,0x7
0542 4802 |H | Short_Literal 0x2
0543 e405 | | Load 0x2,0x5
0544 01d6 | | Execute Vector,Field_Write
0545 7809 |x | Jump 0x54f
0546 4877 |Hw | Short_Literal 0x77 ; Debug Table 0x14.0xb = 0x546,0x8
0547 4803 |H | Short_Literal 0x3
0548 e405 | | Load 0x2,0x5
0549 01d6 | | Execute Vector,Field_Write
054a 7804 |x | Jump 0x54f
054b 486f |Ho | Short_Literal 0x6f ; Debug Table 0x14.0xc = 0x54b,0x9
054c 4804 |H | Short_Literal 0x4
054d e405 | | Load 0x2,0x5
054e 01d6 | | Execute Vector,Field_Write
054f 00c8 | | Action Pop_Auxiliary_Range
0550 3fe1 |? | Loop_Increasing 0x532
0551 00ce | | Action Pop_Auxiliary
0552 0092 086f | o| Action Push_String_Extended,0x86f ; "["
; Debug Table 0x14.0xd = 0x552,0xb
0554 00d9 | | Load_Top At_Offset_1
0555 01cc | | Execute Vector,Catenate
0556 0092 0870 | p| Action Push_String_Extended,0x870 ; "] "
0558 01cc | | Execute Vector,Catenate
0559 8218 | | Call 0x1,0x18
055a 4846 |HF | Short_Literal 0x46 ; Debug Table 0x14.0xe = 0x55a,0xc
055b e402 | | Load 0x2,0x2
055c e001 | | Load 0x0,0x1
055d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
055e 8219 | | Call 0x1,0x19 ; Debug Table 0x14.0xf = 0x55e,0xd
055f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0560 TRAP_0518:
0560 0007 | | Action Break_Optional
0561 e00e | | Load 0x0,0xe ; Debug Table 0x14.0x10 = 0x561,0xe
0562 180d | | Execute Package,Field_Execute,Field_Number 0xd
0563 821e | | Call 0x1,0x1e
0564 8219 | | Call 0x1,0x19 ; Debug Table 0x14.0x11 = 0x564,0xf
0565 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0566 0000 0000 | | .XXX[0x2]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 0595 | | .CONST 0x0595 ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0009 | | .CONST 0x0009 ; Number of locals
056b INIT_0568:
056b e003 | | Load 0x0,0x3 ; Debug Table 0x15 = .DEBUG 0x056b,0x0cd4,0x0001,0x0000,0x0039,0x3556,0x0000,0x0725
; Debug Table 0x15.0x0 = 0x56b,0xffff
056c 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
056d 02c7 | | Declare_Variable Any
056e 00db | | Load_Top At_Offset_3
056f e004 | | Load 0x0,0x4
0570 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0571 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0572 e004 | | Load 0x0,0x4
0573 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0574 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0575 c402 | | Store 0x2,0x2
0576 e003 | | Load 0x0,0x3 ; Debug Table 0x15.0x1 = 0x576,0xfffe
0577 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
0578 02c7 | | Declare_Variable Any
0579 00d8 | | Load_Top At_Offset_0
057a 1c00 | | Execute_Immediate Run_Utility,0x0
057b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x2 = 0x57b,0xfffd
057c 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x15.0x3 = 0x57c,0xfffc
057d e003 | | Load 0x0,0x3 ; Debug Table 0x15.0x4 = 0x57d,0xfffb
057e 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
057f 0337 | 7 | Declare_Variable Array
0580 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x15.0x5 = 0x580,0xfffa
0581 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0582 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x6 = 0x582,0xfff9
0583 4803 |H | Short_Literal 0x3
0584 00e2 | | Load_Encached Integer_Cache
0585 02a0 | | Declare_Subprogram Null_Subprogram
0586 4801 |H | Short_Literal 0x1
0587 035d | ] | Declare_Type Array,Defined
0588 00d8 | | Load_Top At_Offset_0
0589 0337 | 7 | Declare_Variable Array
058a 00d8 | | Load_Top At_Offset_0
058b 0337 | 7 | Declare_Variable Array
058c 4803 |H | Short_Literal 0x3
058d 4800 |H | Short_Literal 0x0
058e 4800 |H | Short_Literal 0x0
058f 00d9 | | Load_Top At_Offset_1
0590 e40a | | Load 0x2,0xa
0591 01d6 | | Execute Vector,Field_Write
0592 3ffb |? | Loop_Increasing 0x58e
0593 00d9 | | Load_Top At_Offset_1
0594 01d4 | | Execute Vector,Structure_Write
0595 BODY_0568:
0595 e402 | | Load 0x2,0x2 ; Debug Table 0x15.0x7 = 0x595,0x1
0596 e003 | | Load 0x0,0x3
0597 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0598 6805 |h | Jump_Zero 0x59e
0599 0092 085a | Z| Action Push_String_Extended,0x85a ; "map ptr is nil"
; Debug Table 0x15.0x8 = 0x599,0x2
059b 8218 | | Call 0x1,0x18
059c 8219 | | Call 0x1,0x19 ; Debug Table 0x15.0x9 = 0x59c,0x3
059d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x15.0xa = 0x59d,0x4
059e e403 | | Load 0x2,0x3 ; Debug Table 0x15.0xb = 0x59e,0x5
059f 0120 | | Execute Any,Is_Value
05a0 6803 |h | Jump_Zero 0x5a4
05a1 e003 | | Load 0x0,0x3
05a2 1b37 | 7 | Execute Package,Field_Read,Field_Number 0x37
05a3 7801 |x | Jump 0x5a5
05a4 e403 | | Load 0x2,0x3
05a5 821b | | Call 0x1,0x1b
05a6 e402 | | Load 0x2,0x2
05a7 e003 | | Load 0x0,0x3
05a8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
05a9 c403 | | Store 0x2,0x3
05aa 00cf | | Action Mark_Auxiliary
05ab 7824 |x$ | Jump 0x5d0
05ac e403 | | Load 0x2,0x3 ; Debug Table 0x15.0xc = 0x5ac,0x7
05ad e003 | | Load 0x0,0x3
05ae 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
05af a404 | | Store_Unchecked 0x2,0x4
05b0 e403 | | Load 0x2,0x3 ; Debug Table 0x15.0xd = 0x5b0,0x8
05b1 e003 | | Load 0x0,0x3
05b2 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
05b3 e406 | | Load 0x2,0x6
05b4 01d4 | | Execute Vector,Structure_Write
05b5 00db | | Load_Top At_Offset_3 ; Debug Table 0x15.0xe = 0x5b5,0x9
05b6 0a01 | | Execute_Immediate Plus,0x1
05b7 0248 | H | Execute Discrete,Check_In_Integer
05b8 a407 | | Store_Unchecked 0x2,0x7
05b9 00cf | | Action Mark_Auxiliary
05ba e406 | | Load 0x2,0x6 ; Debug Table 0x15.0xf = 0x5ba,0xa
05bb 01d9 | | Execute Vector,Reverse_Bounds
05bc 0007 | | Action Break_Optional
05bd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x10 = 0x5bd,0xb
05be e406 | | Load 0x2,0x6
05bf 01d7 | | Execute Vector,Field_Read
05c0 6807 |h | Jump_Zero 0x5c8
05c1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x11 = 0x5c1,0xc
05c2 e409 | | Load 0x2,0x9
05c3 01d7 | | Execute Vector,Field_Read
05c4 0a01 | | Execute_Immediate Plus,0x1
05c5 00d9 | | Load_Top At_Offset_1
05c6 e409 | | Load 0x2,0x9
05c7 01d6 | | Execute Vector,Field_Write
05c8 00c8 | | Action Pop_Auxiliary_Range
05c9 3ff3 |? | Loop_Increasing 0x5bd
05ca 00ce | | Action Pop_Auxiliary
05cb e403 | | Load 0x2,0x3 ; Debug Table 0x15.0x12 = 0x5cb,0xd
05cc e003 | | Load 0x0,0x3
05cd 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
05ce c403 | | Store 0x2,0x3
05cf 00c9 | | Action Pop_Auxiliary_Loop
05d0 e403 | | Load 0x2,0x3 ; Debug Table 0x15.0x13 = 0x5d0,0x6
05d1 e003 | | Load 0x0,0x3
05d2 183c | < | Execute Package,Field_Execute,Field_Number 0x3c
05d3 6fd8 |o | Jump_Zero 0x5ac
05d4 00ce | | Action Pop_Auxiliary
05d5 0092 0871 | q| Action Push_String_Extended,0x871 ; "# of entries: "
; Debug Table 0x15.0x14 = 0x5d5,0xe
05d7 00db | | Load_Top At_Offset_3
05d8 00e0 | | Load_Encached Standard_Cache
05d9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05da 01cc | | Execute Vector,Catenate
05db 8218 | | Call 0x1,0x18
05dc 8219 | | Call 0x1,0x19 ; Debug Table 0x15.0x15 = 0x5dc,0xf
05dd 00cf | | Action Mark_Auxiliary
05de 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x16 = 0x5de,0x10
05df 01d9 | | Execute Vector,Reverse_Bounds
05e0 0007 | | Action Break_Optional
05e1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x17 = 0x5e1,0x11
05e2 e409 | | Load 0x2,0x9
05e3 01d7 | | Execute Vector,Field_Read
05e4 0c01 | | Execute_Immediate Greater_Equal,0x1
05e5 6814 |h | Jump_Zero 0x5fa
05e6 0092 0872 | r| Action Push_String_Extended,0x872 ; "# "
; Debug Table 0x15.0x18 = 0x5e6,0x12
05e8 00d9 | | Load_Top At_Offset_1
05e9 e003 | | Load 0x0,0x3
05ea 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
05eb 0122 | " | Execute Any,Make_Root_Type
05ec 025e | ^ | Execute Discrete,Convert
05ed 1c01 | | Execute_Immediate Run_Utility,0x1
05ee 01cc | | Execute Vector,Catenate
05ef 0092 0873 | s| Action Push_String_Extended,0x873 ; ": "
05f1 01cc | | Execute Vector,Catenate
05f2 00d9 | | Load_Top At_Offset_1
05f3 e409 | | Load 0x2,0x9
05f4 01d7 | | Execute Vector,Field_Read
05f5 00e0 | | Load_Encached Standard_Cache
05f6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05f7 01cc | | Execute Vector,Catenate
05f8 8218 | | Call 0x1,0x18
05f9 8219 | | Call 0x1,0x19 ; Debug Table 0x15.0x19 = 0x5f9,0x13
05fa 00c8 | | Action Pop_Auxiliary_Range
05fb 3fe5 |? | Loop_Increasing 0x5e1
05fc 00ce | | Action Pop_Auxiliary
05fd e5fe | | Load 0x2,-0x2 ; Debug Table 0x15.0x1a = 0x5fd,0x14
05fe 00db | | Load_Top At_Offset_3
05ff 0273 | s | Execute Discrete,Plus
0600 0248 | H | Execute Discrete,Check_In_Integer
0601 a5fe | | Store_Unchecked 0x2,-0x2
0602 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0603 0000 0000 | | .BLANK 0000[0x5]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060f | | .CONST 0x060f ; Address of begin
0609 0672 | r | .CONST 0x0672 ; Address of exception handler
060a 0003 | | .CONST 0x0003 ; Number of locals
060b INIT_0608:
060b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16 = .DEBUG 0x060b,0x0d0c,0x0001,0x0000,0x0039,0x3556,0x0000,0x081e
; Debug Table 0x16.0x0 = 0x60b,0xffff
060c e003 | | Load 0x0,0x3 ; Debug Table 0x16.0x1 = 0x60c,0xfffe
060d 1b49 | I | Execute Package,Field_Read,Field_Number 0x49
060e 0322 | " | Declare_Variable Record
060f BODY_0608:
060f e5fa | | Load 0x2,-0x6 ; Debug Table 0x16.0x2 = 0x60f,0x1
0610 e003 | | Load 0x0,0x3
0611 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
0612 00d9 | | Load_Top At_Offset_1
0613 017d | } | Execute Record,Structure_Write
0614 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x3 = 0x614,0x2
0615 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0616 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0617 e5fb | | Load 0x2,-0x5 ; Debug Table 0x16.0x4 = 0x617,0x3
0618 01db | | Execute Vector,Length
0619 0c01 | | Execute_Immediate Greater_Equal,0x1
061a 680a |h | Jump_Zero 0x625
061b 00d9 | | Load_Top At_Offset_1
061c 00eb | | Load_Encached Diana_Cache
061d 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
061e 00eb | | Load_Encached Diana_Cache
061f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0620 e5fb | | Load 0x2,-0x5
0621 e00f | | Load 0x0,0xf
0622 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0623 7001 |p | Jump_Nonzero 0x625
0624 4506 |E | Exit_Suprogram New_Top_Offset 0x6 ; Debug Table 0x16.0x5 = 0x624,0x4
0625 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x6 = 0x625,0x5
0626 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0627 4804 |H | Short_Literal 0x4
0628 0272 | r | Execute Discrete,Minus
0629 4601 |F | Jump_Case 0x2
062a 7804 |x | Jump 0x62f ; case 0x0
062b 7800 |x | Jump 0x62c ; case 0x1
062c e5fe | | Load 0x2,-0x2 ; Debug Table 0x16.0x7 = 0x62c,0x6
062d 7004 |p | Jump_Nonzero 0x632
062e 4506 |E | Exit_Suprogram New_Top_Offset 0x6 ; Debug Table 0x16.0x8 = 0x62e,0x7
062f e5ff | | Load 0x2,-0x1 ; Debug Table 0x16.0x9 = 0x62f,0x8
0630 7001 |p | Jump_Nonzero 0x632
0631 4506 |E | Exit_Suprogram New_Top_Offset 0x6 ; Debug Table 0x16.0xa = 0x631,0x9
0632 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0xb = 0x632,0xb
0633 e003 | | Load 0x0,0x3
0634 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0635 180e | | Execute Package,Field_Execute,Field_Number 0xe
0636 6811 |h | Jump_Zero 0x648
0637 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0xc = 0x637,0xc
0638 680e |h | Jump_Zero 0x647
0639 8219 | | Call 0x1,0x19 ; Debug Table 0x16.0xd = 0x639,0xd
063a 0092 0874 | t| Action Push_String_Extended,0x874 ; "\x22"
; Debug Table 0x16.0xe = 0x63a,0xe
063c 00da | | Load_Top At_Offset_2
063d 00eb | | Load_Encached Diana_Cache
063e 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
063f 00eb | | Load_Encached Diana_Cache
0640 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0641 01cc | | Execute Vector,Catenate
0642 0092 0874 | t| Action Push_String_Extended,0x874 ; "\x22"
0644 01cc | | Execute Vector,Catenate
0645 8218 | | Call 0x1,0x18
0646 780a |x | Jump 0x651
0647 4506 |E | Exit_Suprogram New_Top_Offset 0x6 ; Debug Table 0x16.0xf = 0x647,0xf
0648 e5fc | | Load 0x2,-0x4 ; Debug Table 0x16.0x10 = 0x648,0x10
0649 6806 |h | Jump_Zero 0x650
064a 8219 | | Call 0x1,0x19 ; Debug Table 0x16.0x11 = 0x64a,0x11
064b 484d |HM | Short_Literal 0x4d ; Debug Table 0x16.0x12 = 0x64b,0x12
064c 00da | | Load_Top At_Offset_2
064d e001 | | Load 0x0,0x1
064e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
064f 7801 |x | Jump 0x651
0650 4506 |E | Exit_Suprogram New_Top_Offset 0x6 ; Debug Table 0x16.0x13 = 0x650,0x13
0651 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x16.0x14 = 0x651,0x14
0652 0a01 | | Execute_Immediate Plus,0x1
0653 0248 | H | Execute Discrete,Check_In_Integer
0654 a5f9 | | Store_Unchecked 0x2,-0x7
0655 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x15 = 0x655,0x15
0656 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0657 4804 |H | Short_Literal 0x4
0658 0272 | r | Execute Discrete,Minus
0659 4601 |F | Jump_Case 0x2
065a 780c |x | Jump 0x667 ; case 0x0
065b 7800 |x | Jump 0x65c ; case 0x1
065c 0092 0875 | u| Action Push_String_Extended,0x875 ; " subordinates:"
; Debug Table 0x16.0x16 = 0x65c,0x16
065e 8218 | | Call 0x1,0x18
065f 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x17 = 0x65f,0x17
0660 4801 |H | Short_Literal 0x1
0661 e5fa | | Load 0x2,-0x6
0662 e003 | | Load 0x0,0x3
0663 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0664 8222 | " | Call 0x1,0x22
0665 8219 | | Call 0x1,0x19 ; Debug Table 0x16.0x18 = 0x665,0x18
0666 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0667 0092 0876 | v| Action Push_String_Extended,0x876 ; " sunvuc:"
; Debug Table 0x16.0x19 = 0x667,0x19
0669 8218 | | Call 0x1,0x18
066a 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x1a = 0x66a,0x1a
066b 4801 |H | Short_Literal 0x1
066c e5fa | | Load 0x2,-0x6
066d e003 | | Load 0x0,0x3
066e 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
066f 8222 | " | Call 0x1,0x22
0670 8219 | | Call 0x1,0x19 ; Debug Table 0x16.0x1b = 0x670,0x1b
0671 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0672 TRAP_0608:
0672 0007 | | Action Break_Optional
0673 e00e | | Load 0x0,0xe ; Debug Table 0x16.0x1c = 0x673,0x1d
0674 180d | | Execute Package,Field_Execute,Field_Number 0xd
0675 821e | | Call 0x1,0x1e
0676 8219 | | Call 0x1,0x19 ; Debug Table 0x16.0x1d = 0x676,0x1e
0677 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0678 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
067c 2020 2020 | | .LITERAL {0x20202020, 0x20202020}
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 06cb | | .CONST 0x06cb ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0011 | | .CONST 0x0011 ; Number of locals
0683 INIT_0680:
0683 e003 | | Load 0x0,0x3 ; Debug Table 0x17 = .DEBUG 0x0683,0x0d4a,0x0001,0x0000,0x0039,0x3556,0x0000,0x09fa
; Debug Table 0x17.0x0 = 0x683,0xffff
0684 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
0685 02c7 | | Declare_Variable Any
0686 00d8 | | Load_Top At_Offset_0
0687 1c00 | | Execute_Immediate Run_Utility,0x0
0688 e004 | | Load 0x0,0x4 ; Debug Table 0x17.0x1 = 0x688,0xfffe
0689 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
068a 02c7 | | Declare_Variable Any
068b 00d8 | | Load_Top At_Offset_0
068c 1c00 | | Execute_Immediate Run_Utility,0x0
068d e003 | | Load 0x0,0x3 ; Debug Table 0x17.0x2 = 0x68d,0xfffd
068e 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a
068f 02c7 | | Declare_Variable Any
0690 00d8 | | Load_Top At_Offset_0
0691 1c00 | | Execute_Immediate Run_Utility,0x0
0692 e005 | | Load 0x0,0x5 ; Debug Table 0x17.0x3 = 0x692,0xfffc
0693 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0694 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x17.0x4 = 0x694,0xfffb
0695 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0696 00e8 | | Load_Encached Character_Cache ; Debug Table 0x17.0x5 = 0x696,0xfffa
0697 4804 |H | Short_Literal 0x4 ; Debug Table 0x17.0x6 = 0x697,0xfff9
0698 4805 |H | Short_Literal 0x5
0699 00e2 | | Load_Encached Integer_Cache
069a 02a0 | | Declare_Subprogram Null_Subprogram
069b 4801 |H | Short_Literal 0x1
069c 035d | ] | Declare_Type Array,Defined
069d 00d8 | | Load_Top At_Offset_0
069e 0337 | 7 | Declare_Variable Array
069f 00d8 | | Load_Top At_Offset_0
06a0 0337 | 7 | Declare_Variable Array
06a1 4800 |H | Short_Literal 0x0
06a2 4804 |H | Short_Literal 0x4
06a3 00da | | Load_Top At_Offset_2
06a4 01d6 | | Execute Vector,Field_Write
06a5 4800 |H | Short_Literal 0x0
06a6 4805 |H | Short_Literal 0x5
06a7 00da | | Load_Top At_Offset_2
06a8 01d6 | | Execute Vector,Field_Write
06a9 00d9 | | Load_Top At_Offset_1
06aa 01d4 | | Execute Vector,Structure_Write
06ab 4804 |H | Short_Literal 0x4 ; Debug Table 0x17.0x7 = 0x6ab,0xfff8
06ac 4805 |H | Short_Literal 0x5
06ad 00e2 | | Load_Encached Integer_Cache
06ae 02a0 | | Declare_Subprogram Null_Subprogram
06af 4801 |H | Short_Literal 0x1
06b0 035d | ] | Declare_Type Array,Defined
06b1 00d8 | | Load_Top At_Offset_0
06b2 0337 | 7 | Declare_Variable Array
06b3 00d8 | | Load_Top At_Offset_0
06b4 0337 | 7 | Declare_Variable Array
06b5 4800 |H | Short_Literal 0x0
06b6 4804 |H | Short_Literal 0x4
06b7 00da | | Load_Top At_Offset_2
06b8 01d6 | | Execute Vector,Field_Write
06b9 4800 |H | Short_Literal 0x0
06ba 4805 |H | Short_Literal 0x5
06bb 00da | | Load_Top At_Offset_2
06bc 01d6 | | Execute Vector,Field_Write
06bd 00d9 | | Load_Top At_Offset_1
06be 01d4 | | Execute Vector,Structure_Write
06bf 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x17.0x8 = 0x6bf,0xfff7
06c0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06c1 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x17.0x9 = 0x6c1,0xfff6
06c2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06c3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x17.0xa = 0x6c3,0xfff5
06c4 e003 | | Load 0x0,0x3 ; Debug Table 0x17.0xb = 0x6c4,0xfff4
06c5 1b49 | I | Execute Package,Field_Read,Field_Number 0x49
06c6 0322 | " | Declare_Variable Record
06c7 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x17.0xc = 0x6c7,0xfff3
06c8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06c9 029f 0833 | 3| Declare_Subprogram INIT_0830,For_Call
06cb BODY_0680:
06cb e005 | | Load 0x0,0x5 ; Debug Table 0x17.0xd = 0x6cb,0x1
06cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06cd e403 | | Load 0x2,0x3
06ce 0120 | | Execute Any,Is_Value
06cf 6803 |h | Jump_Zero 0x6d3
06d0 e004 | | Load 0x0,0x4
06d1 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
06d2 7801 |x | Jump 0x6d4
06d3 e403 | | Load 0x2,0x3
06d4 e006 | | Load 0x0,0x6
06d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06d6 4800 |H | Short_Literal 0x0
06d7 4800 |H | Short_Literal 0x0
06d8 e007 | | Load 0x0,0x7
06d9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06da 4800 |H | Short_Literal 0x0
06db e5ff | | Load 0x2,-0x1
06dc e004 | | Load 0x0,0x4
06dd 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
06de c403 | | Store 0x2,0x3
06df c405 | | Store 0x2,0x5
06e0 e403 | | Load 0x2,0x3 ; Debug Table 0x17.0xe = 0x6e0,0x2
06e1 e004 | | Load 0x0,0x4
06e2 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
06e3 680b |h | Jump_Zero 0x6ef
06e4 0092 085d | ]| Action Push_String_Extended,0x85d ; "data base is nil, status = "
; Debug Table 0x17.0xf = 0x6e4,0x3
06e6 e405 | | Load 0x2,0x5
06e7 e005 | | Load 0x0,0x5
06e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06e9 025e | ^ | Execute Discrete,Convert
06ea 1c01 | | Execute_Immediate Run_Utility,0x1
06eb 01cc | | Execute Vector,Catenate
06ec 8218 | | Call 0x1,0x18
06ed 8219 | | Call 0x1,0x19 ; Debug Table 0x17.0x10 = 0x6ed,0x4
06ee 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x17.0x11 = 0x6ee,0x5
06ef e403 | | Load 0x2,0x3 ; Debug Table 0x17.0x12 = 0x6ef,0x6
06f0 e004 | | Load 0x0,0x4
06f1 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
06f2 c402 | | Store 0x2,0x2
06f3 e404 | | Load 0x2,0x4 ; Debug Table 0x17.0x13 = 0x6f3,0x7
06f4 0120 | | Execute Any,Is_Value
06f5 6803 |h | Jump_Zero 0x6f9
06f6 e003 | | Load 0x0,0x3
06f7 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a
06f8 7801 |x | Jump 0x6fa
06f9 e404 | | Load 0x2,0x4
06fa 821b | | Call 0x1,0x1b
06fb e402 | | Load 0x2,0x2
06fc e003 | | Load 0x0,0x3
06fd 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
06fe c404 | | Store 0x2,0x4
06ff 00cf | | Action Mark_Auxiliary
0700 7806 |x | Jump 0x707
0701 8411 | | Call 0x2,0x11 ; Debug Table 0x17.0x14 = 0x701,0x9
0702 e404 | | Load 0x2,0x4 ; Debug Table 0x17.0x15 = 0x702,0xa
0703 e003 | | Load 0x0,0x3
0704 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0705 c404 | | Store 0x2,0x4
0706 00c9 | | Action Pop_Auxiliary_Loop
0707 e404 | | Load 0x2,0x4 ; Debug Table 0x17.0x16 = 0x707,0x8
0708 e003 | | Load 0x0,0x3
0709 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
070a 6ff6 |o | Jump_Zero 0x701
070b 00c9 | | Action Pop_Auxiliary_Loop
070c 4805 |H | Short_Literal 0x5 ; Debug Table 0x17.0x17 = 0x70c,0xb
070d 4804 |H | Short_Literal 0x4
070e 0007 | | Action Break_Optional
070f e40c | | Load 0x2,0xc ; Debug Table 0x17.0x18 = 0x70f,0xc
0710 00d9 | | Load_Top At_Offset_1
0711 e409 | | Load 0x2,0x9
0712 01d7 | | Execute Vector,Field_Read
0713 0273 | s | Execute Discrete,Plus
0714 0248 | H | Execute Discrete,Check_In_Integer
0715 a40c | | Store_Unchecked 0x2,0xc
0716 e40d | | Load 0x2,0xd ; Debug Table 0x17.0x19 = 0x716,0xd
0717 00d9 | | Load_Top At_Offset_1
0718 e40b | | Load 0x2,0xb
0719 01d7 | | Execute Vector,Field_Read
071a 0273 | s | Execute Discrete,Plus
071b 0248 | H | Execute Discrete,Check_In_Integer
071c a40d | | Store_Unchecked 0x2,0xd
071d 00c8 | | Action Pop_Auxiliary_Range
071e 3ff0 |? | Loop_Increasing 0x70f
071f 00ce | | Action Pop_Auxiliary
0720 0092 0877 | w| Action Push_String_Extended,0x877 ; "# placeholders: "
; Debug Table 0x17.0x1a = 0x720,0xe
0722 e40c | | Load 0x2,0xc
0723 00e0 | | Load_Encached Standard_Cache
0724 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0725 01cc | | Execute Vector,Catenate
0726 8218 | | Call 0x1,0x18
0727 8219 | | Call 0x1,0x19 ; Debug Table 0x17.0x1b = 0x727,0xf
0728 0092 0878 | x| Action Push_String_Extended,0x878 ; " # subordinate relations:"
; Debug Table 0x17.0x1c = 0x728,0x10
072a 4805 |H | Short_Literal 0x5
072b e409 | | Load 0x2,0x9
072c 01d7 | | Execute Vector,Field_Read
072d 00e0 | | Load_Encached Standard_Cache
072e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
072f 01cc | | Execute Vector,Catenate
0730 8218 | | Call 0x1,0x18
0731 8219 | | Call 0x1,0x19 ; Debug Table 0x17.0x1d = 0x731,0x11
0732 0092 0879 | y| Action Push_String_Extended,0x879 ; " # sunvucs relations: "
; Debug Table 0x17.0x1e = 0x732,0x12
0734 4804 |H | Short_Literal 0x4
0735 e409 | | Load 0x2,0x9
0736 01d7 | | Execute Vector,Field_Read
0737 00e0 | | Load_Encached Standard_Cache
0738 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0739 01cc | | Execute Vector,Catenate
073a 8218 | | Call 0x1,0x18
073b 8219 | | Call 0x1,0x19 ; Debug Table 0x17.0x1f = 0x73b,0x13
073c e40d | | Load 0x2,0xd ; Debug Table 0x17.0x20 = 0x73c,0x14
073d 0c01 | | Execute_Immediate Greater_Equal,0x1
073e 681c |h | Jump_Zero 0x75b
073f 0092 087a | z| Action Push_String_Extended,0x87a ; "# non placeholders: "
; Debug Table 0x17.0x21 = 0x73f,0x15
0741 e40d | | Load 0x2,0xd
0742 00e0 | | Load_Encached Standard_Cache
0743 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0744 01cc | | Execute Vector,Catenate
0745 8218 | | Call 0x1,0x18
0746 8219 | | Call 0x1,0x19 ; Debug Table 0x17.0x22 = 0x746,0x16
0747 0092 0878 | x| Action Push_String_Extended,0x878 ; " # subordinate relations:"
; Debug Table 0x17.0x23 = 0x747,0x17
0749 4805 |H | Short_Literal 0x5
074a e40b | | Load 0x2,0xb
074b 01d7 | | Execute Vector,Field_Read
074c 00e0 | | Load_Encached Standard_Cache
074d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
074e 01cc | | Execute Vector,Catenate
074f 8218 | | Call 0x1,0x18
0750 8219 | | Call 0x1,0x19 ; Debug Table 0x17.0x24 = 0x750,0x18
0751 0092 0879 | y| Action Push_String_Extended,0x879 ; " # sunvucs relations: "
; Debug Table 0x17.0x25 = 0x751,0x19
0753 4804 |H | Short_Literal 0x4
0754 e40b | | Load 0x2,0xb
0755 01d7 | | Execute Vector,Field_Read
0756 00e0 | | Load_Encached Standard_Cache
0757 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0758 01cc | | Execute Vector,Catenate
0759 8218 | | Call 0x1,0x18
075a 8219 | | Call 0x1,0x19 ; Debug Table 0x17.0x26 = 0x75a,0x1a
075b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x17.0x27 = 0x75b,0x1b
075c 0c01 | | Execute_Immediate Greater_Equal,0x1
075d 6808 |h | Jump_Zero 0x766
075e 0092 087b | {| Action Push_String_Extended,0x87b ; "# nonexistents: "
; Debug Table 0x17.0x28 = 0x75e,0x1c
0760 00da | | Load_Top At_Offset_2
0761 00e0 | | Load_Encached Standard_Cache
0762 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0763 01cc | | Execute Vector,Catenate
0764 8218 | | Call 0x1,0x18
0765 8219 | | Call 0x1,0x19 ; Debug Table 0x17.0x29 = 0x765,0x1d
0766 e5fe | | Load 0x2,-0x2 ; Debug Table 0x17.0x2a = 0x766,0x1e
0767 e40c | | Load 0x2,0xc
0768 0273 | s | Execute Discrete,Plus
0769 0248 | H | Execute Discrete,Check_In_Integer
076a e40d | | Load 0x2,0xd
076b 0273 | s | Execute Discrete,Plus
076c 00da | | Load_Top At_Offset_2
076d 0273 | s | Execute Discrete,Plus
076e 0248 | H | Execute Discrete,Check_In_Integer
076f a5fe | | Store_Unchecked 0x2,-0x2
0770 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0771 0000 0000 | | .BLANK 0000[0x7]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 0782 | | .CONST 0x0782 ; Address of begin
0779 0004 | | .CONST 0x0004 ; Address of exception handler
077a 0003 | | .CONST 0x0003 ; Number of locals
077b INIT_0778:
077b e004 | | Load 0x0,0x4 ; Debug Table 0x18 = .DEBUG 0x077b,0x0da2,0x0001,0x0000,0x0039,0x3556,0x0000,0x0d80
; Debug Table 0x18.0x0 = 0x77b,0xffff
077c 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
077d 02c7 | | Declare_Variable Any
077e 00d8 | | Load_Top At_Offset_0
077f 1c00 | | Execute_Immediate Run_Utility,0x0
0780 e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x1 = 0x780,0xfffe
0781 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0782 BODY_0778:
0782 e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x2 = 0x782,0x1
0783 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0784 00da | | Load_Top At_Offset_2
0785 0120 | | Execute Any,Is_Value
0786 6803 |h | Jump_Zero 0x78a
0787 e004 | | Load 0x0,0x4
0788 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0789 7801 |x | Jump 0x78b
078a 00da | | Load_Top At_Offset_2
078b e006 | | Load 0x0,0x6
078c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
078d 4800 |H | Short_Literal 0x0
078e 4800 |H | Short_Literal 0x0
078f e007 | | Load 0x0,0x7
0790 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0791 4800 |H | Short_Literal 0x0
0792 e5ff | | Load 0x2,-0x1
0793 e004 | | Load 0x0,0x4
0794 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0795 c402 | | Store 0x2,0x2
0796 0059 | Y | Store_Top Discrete,At_Offset_1
0797 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x3 = 0x797,0x2
0798 e004 | | Load 0x0,0x4
0799 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
079a 701f |p | Jump_Nonzero 0x7ba
079b e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x4 = 0x79b,0x3
079c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
079d e006 | | Load 0x0,0x6
079e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
079f 4800 |H | Short_Literal 0x0
07a0 e402 | | Load 0x2,0x2
07a1 e004 | | Load 0x0,0x4
07a2 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
07a3 e004 | | Load 0x0,0x4
07a4 1b13 | | Execute Package,Field_Read,Field_Number 0x13
07a5 181d | | Execute Package,Field_Execute,Field_Number 0x1d
07a6 e004 | | Load 0x0,0x4
07a7 1819 | | Execute Package,Field_Execute,Field_Number 0x19
07a8 0059 | Y | Store_Top Discrete,At_Offset_1
07a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x5 = 0x7a9,0x4
07aa 680f |h | Jump_Zero 0x7ba
07ab 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x6 = 0x7ab,0x5
07ac e005 | | Load 0x0,0x5
07ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ae 025e | ^ | Execute Discrete,Convert
07af 1c01 | | Execute_Immediate Run_Utility,0x1
07b0 0092 087c | || Action Push_String_Extended,0x87c ; " while destroying ph db for "
07b2 01cc | | Execute Vector,Catenate
07b3 e5ff | | Load 0x2,-0x1
07b4 e00b | | Load 0x0,0xb
07b5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07b6 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
07b7 01cc | | Execute Vector,Catenate
07b8 8218 | | Call 0x1,0x18
07b9 8219 | | Call 0x1,0x19 ; Debug Table 0x18.0x7 = 0x7b9,0x6
07ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2
07bb 0000 0000 | | .BLANK 0000[0x5]
07c0 ; --------------------------------------------------------------------------------------
07c0 ; SUBPROGRAM
07c0 ; --------------------------------------------------------------------------------------
07c0 07c3 | | .CONST 0x07c3 ; Address of begin
07c1 07d4 | | .CONST 0x07d4 ; Address of exception handler
07c2 0001 | | .CONST 0x0001 ; Number of locals
07c3 BODY_07c0:
07c3 INIT_07c0:
07c3 e405 | | Load 0x2,0x5 ; Debug Table 0x19 = .DEBUG 0x07c3,0x0db4,0x0004,0x0000,0x0039,0x3556,0x0000,0x0ced
; Debug Table 0x19.0x0 = 0x7c3,0x1
07c4 00eb | | Load_Encached Diana_Cache
07c5 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
07c6 00eb | | Load_Encached Diana_Cache
07c7 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
07c8 4801 |H | Short_Literal 0x1
07c9 e403 | | Load 0x2,0x3
07ca e402 | | Load 0x2,0x2
07cb 01cf | | Execute Vector,Slice_Read
07cc e00f | | Load 0x0,0xf
07cd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
07ce 6804 |h | Jump_Zero 0x7d3
07cf 4800 |H | Short_Literal 0x0 ; Debug Table 0x19.0x1 = 0x7cf,0x2
07d0 4801 |H | Short_Literal 0x1
07d1 e405 | | Load 0x2,0x5
07d2 8215 | | Call 0x1,0x15
07d3 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07d4 TRAP_07c0:
07d4 0007 | | Action Break_Optional
07d5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x19.0x2 = 0x7d5,0x3
07d6 0000 0000 | | .XXX[0x2]
07d8 ; --------------------------------------------------------------------------------------
07d8 ; SUBPROGRAM
07d8 ; --------------------------------------------------------------------------------------
07d8 07db | | .CONST 0x07db ; Address of begin
07d9 082b | + | .CONST 0x082b ; Address of exception handler
07da 0001 | | .CONST 0x0001 ; Number of locals
07db BODY_07d8:
07db INIT_07d8:
07db e00b | | Load 0x0,0xb ; Debug Table 0x1a = .DEBUG 0x07db,0x0dbc,0x0804,0x0002,0x0039,0x3556,0x0000,0x01ed
; Debug Table 0x1a.0x0 = 0x7db,0x1
07dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07dd e403 | | Load 0x2,0x3
07de 0120 | | Execute Any,Is_Value
07df 6803 |h | Jump_Zero 0x7e3
07e0 e00b | | Load 0x0,0xb
07e1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07e2 7801 |x | Jump 0x7e4
07e3 e403 | | Load 0x2,0x3
07e4 e407 | | Load 0x2,0x7
07e5 e00b | | Load 0x0,0xb
07e6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07e7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
07e8 c403 | | Store 0x2,0x3
07e9 c404 | | Store 0x2,0x4
07ea 0092 087d | }| Action Push_String_Extended,0x87d ; "getting object from iterator"
; Debug Table 0x1a.0x1 = 0x7ea,0x2
07ec e404 | | Load 0x2,0x4
07ed 821f | | Call 0x1,0x1f
07ee e00b | | Load 0x0,0xb ; Debug Table 0x1a.0x2 = 0x7ee,0x3
07ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f0 e406 | | Load 0x2,0x6
07f1 0120 | | Execute Any,Is_Value
07f2 6804 |h | Jump_Zero 0x7f7
07f3 e00b | | Load 0x0,0xb
07f4 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
07f5 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
07f6 7801 |x | Jump 0x7f8
07f7 e406 | | Load 0x2,0x6
07f8 e00b | | Load 0x0,0xb
07f9 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
07fa 1b16 | | Execute Package,Field_Read,Field_Number 0x16
07fb 667c |f| | Indirect_Literal Discrete,0x678,{0x00000000, 0x00028000}
07fc 4801 |H | Short_Literal 0x1
07fd 4800 |H | Short_Literal 0x0
07fe 4800 |H | Short_Literal 0x0
07ff e006 | | Load 0x0,0x6
0800 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0801 4800 |H | Short_Literal 0x0
0802 e403 | | Load 0x2,0x3
0803 e00b | | Load 0x0,0xb
0804 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0805 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0806 e00b | | Load 0x0,0xb
0807 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0808 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0809 c405 | | Store 0x2,0x5
080a c406 | | Store 0x2,0x6
080b c404 | | Store 0x2,0x4
080c 0092 087e | ~| Action Push_String_Extended,0x87e ; "opening ada unit"
; Debug Table 0x1a.0x3 = 0x80c,0x4
080e e404 | | Load 0x2,0x4
080f 821f | | Call 0x1,0x1f
0810 e405 | | Load 0x2,0x5 ; Debug Table 0x1a.0x4 = 0x810,0x5
0811 e00b | | Load 0x0,0xb
0812 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a
0813 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0814 6815 |h | Jump_Zero 0x82a
0815 8219 | | Call 0x1,0x19 ; Debug Table 0x1a.0x5 = 0x815,0x6
0816 e21d | | Load 0x1,0x1d ; Debug Table 0x1a.0x6 = 0x816,0x7
0817 8218 | | Call 0x1,0x18
0818 8219 | | Call 0x1,0x19 ; Debug Table 0x1a.0x7 = 0x818,0x8
0819 e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0x8 = 0x819,0x9
081a e00b | | Load 0x0,0xb
081b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
081c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
081d 8218 | | Call 0x1,0x18
081e 8219 | | Call 0x1,0x19 ; Debug Table 0x1a.0x9 = 0x81e,0xa
081f e21d | | Load 0x1,0x1d ; Debug Table 0x1a.0xa = 0x81f,0xb
0820 8218 | | Call 0x1,0x18
0821 8219 | | Call 0x1,0x19 ; Debug Table 0x1a.0xb = 0x821,0xc
0822 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1a.0xc = 0x822,0xd
0823 e405 | | Load 0x2,0x5
0824 85fe | | Call 0x2,-0x2
0825 c5fb | | Store 0x2,-0x5
0826 e408 | | Load 0x2,0x8 ; Debug Table 0x1a.0xd = 0x826,0xe
0827 0a01 | | Execute_Immediate Plus,0x1
0828 0248 | H | Execute Discrete,Check_In_Integer
0829 a408 | | Store_Unchecked 0x2,0x8
082a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
082b TRAP_07d8:
082b 0007 | | Action Break_Optional
082c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x1a.0xe = 0x82c,0xf
082d 0000 0000 | | .XXX[0x3]
082f 0000 | |
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0833 | 3 | .CONST 0x0833 ; Address of begin
0831 0854 | T | .CONST 0x0854 ; Address of exception handler
0832 0001 | | .CONST 0x0001 ; Number of locals
0833 BODY_0830:
0833 INIT_0830:
0833 e404 | | Load 0x2,0x4 ; Debug Table 0x1b = .DEBUG 0x0833,0x0ddc,0x0004,0x0000,0x0039,0x3556,0x0000,0x0af9
; Debug Table 0x1b.0x0 = 0x833,0x1
0834 e003 | | Load 0x0,0x3
0835 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
0836 e40f | | Load 0x2,0xf
0837 017d | } | Execute Record,Structure_Write
0838 e40f | | Load 0x2,0xf ; Debug Table 0x1b.0x1 = 0x838,0x2
0839 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
083a a40e | | Store_Unchecked 0x2,0xe
083b e40e | | Load 0x2,0xe ; Debug Table 0x1b.0x2 = 0x83b,0x3
083c e003 | | Load 0x0,0x3
083d 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
083e 180e | | Execute Package,Field_Execute,Field_Number 0xe
083f 680a |h | Jump_Zero 0x84a
0840 e40f | | Load 0x2,0xf ; Debug Table 0x1b.0x3 = 0x840,0x4
0841 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0842 e409 | | Load 0x2,0x9
0843 01d7 | | Execute Vector,Field_Read
0844 0a01 | | Execute_Immediate Plus,0x1
0845 e40f | | Load 0x2,0xf
0846 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0847 e409 | | Load 0x2,0x9
0848 01d6 | | Execute Vector,Field_Write
0849 4501 |E | Exit_Suprogram New_Top_Offset 0x1
084a e40f | | Load 0x2,0xf ; Debug Table 0x1b.0x4 = 0x84a,0x5
084b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
084c e40b | | Load 0x2,0xb
084d 01d7 | | Execute Vector,Field_Read
084e 0a01 | | Execute_Immediate Plus,0x1
084f e40f | | Load 0x2,0xf
0850 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0851 e40b | | Load 0x2,0xb
0852 01d6 | | Execute Vector,Field_Write
0853 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0854 TRAP_0830:
0854 0007 | | Action Break_Optional
0855 e410 | | Load 0x2,0x10 ; Debug Table 0x1b.0x5 = 0x855,0x6
0856 0a01 | | Execute_Immediate Plus,0x1
0857 0248 | H | Execute Discrete,Check_In_Integer
0858 a410 | | Store_Unchecked 0x2,0x10
0859 4501 |E | Exit_Suprogram New_Top_Offset 0x1
085a ; --------------------------------------------------------------------------------------
085a ; STRING TABLE
085a ; --------------------------------------------------------------------------------------
085a 004c | L | .STRTAB 0x004c->0x0880 ; "map ptr is nil"
085b 0058 | X | .STRTAB 0x0058->0x0887 ; "--- more (y/n): "
085c 0066 | f | .STRTAB 0x0066->0x088f ; "average import_table size: "
085d 007f | | .STRTAB 0x007f->0x089c ; "data base is nil, status = "
085e 0098 | | .STRTAB 0x0098->0x08aa ; "average ph db size: "
085f 00aa | | .STRTAB 0x00aa->0x08b4 ; "no argument given"
0860 00b9 | | .STRTAB 0x00b9->0x08bc ; " subordinates: "
0861 00c6 | | .STRTAB 0x00c6->0x08c4 ; " "
0862 00c5 | | .STRTAB 0x00c5->0x08c4 ; "*** exception: "
0863 00d2 | | .STRTAB 0x00d2->0x08cc ; "*** error status: "
0864 00e2 | | .STRTAB 0x00e2->0x08d5 ; " while "
0865 00e7 | | .STRTAB 0x00e7->0x08d8 ; "'C(ada)"
0866 00ec | | .STRTAB 0x00ec->0x08dc ; "*** error resolving "
0867 00fe | | .STRTAB 0x00fe->0x08e6 ; ", status = "
0868 0107 | | .STRTAB 0x0107->0x08eb ; " referencers: "
0869 0113 | | .STRTAB 0x0113->0x08f2 ; " refs_in_use: "
086a 011f | | .STRTAB 0x011f->0x08f9 ; " refs_by_sel_wis: "
086b 012f | / | .STRTAB 0x012f->0x0902 ; " refs_by_sel_ois: "
086c 013f | ? | .STRTAB 0x013f->0x090b ; " sees_used_ns_via_uc: "
086d 0153 | S | .STRTAB 0x0153->0x0916 ; " subordinate_to: "
086e 0162 | b | .STRTAB 0x0162->0x091f ; " refs_code_seg"
086f 016e | n | .STRTAB 0x016e->0x0926 ; "["
0870 016d | m | .STRTAB 0x016d->0x0926 ; "] "
0871 016d | m | .STRTAB 0x016d->0x0927 ; "# of entries: "
0872 0179 | y | .STRTAB 0x0179->0x092e ; "# "
0873 0179 | y | .STRTAB 0x0179->0x092f ; ": "
0874 0179 | y | .STRTAB 0x0179->0x0930 ; "\x22"
0875 0178 | x | .STRTAB 0x0178->0x0931 ; " subordinates:"
0876 0185 | | .STRTAB 0x0185->0x0938 ; " sunvuc:"
0877 018c | | .STRTAB 0x018c->0x093d ; "# placeholders: "
0878 01a6 | | .STRTAB 0x01a6->0x094b ; " # subordinate relations:"
0879 01be | | .STRTAB 0x01be->0x0958 ; " # sunvucs relations: "
087a 01d6 | | .STRTAB 0x01d6->0x0965 ; "# non placeholders: "
087b 01f0 | | .STRTAB 0x01f0->0x0973 ; "# nonexistents: "
087c 020a | | .STRTAB 0x020a->0x0981 ; " while destroying ph db for "
087d 0224 | $ | .STRTAB 0x0224->0x098f ; "getting object from iterator"
087e 023e | > | .STRTAB 0x023e->0x099d ; "opening ada unit"
087f 024c | L | .STREND 0x024c->0x09a5
0880 6d61 7020 |map | .STRTAB_STRINGS
09a5 0000 0000 | | .XXX[0x3]
09a7 0000 | |
09a8 ; --------------------------------------------------------------------------------------
09a8 ; Debug Table
09a8 ; --------------------------------------------------------------------------------------
09a8 0003 001c | | .CONST 0x0003,0x001c
09aa 000b 0a8a | | .DEBUG 0x000b,0x0a8a,0x8000,0x0000,0x0038,0xc6c6,0x0000,0x0005
09b2 0022 0aa2 | " | .DEBUG 0x0022,0x0aa2,0x8000,0x0000,0x0039,0x3556,0x0000,0x001f
09ba 007b 0ae8 | { | .DEBUG 0x007b,0x0ae8,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0006
09c2 00db 0b16 | | .DEBUG 0x00db,0x0b16,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0015
09ca 00eb 0b1c | | .DEBUG 0x00eb,0x0b1c,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x001f
09d2 011b 0b2e | .| .DEBUG 0x011b,0x0b2e,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0027
09da 019b 0b60 | `| .DEBUG 0x019b,0x0b60,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x004b
09e2 01ab 0b66 | f| .DEBUG 0x01ab,0x0b66,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0055
09ea 01db 0b78 | x| .DEBUG 0x01db,0x0b78,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x005d
09f2 021b 0b96 | | .DEBUG 0x021b,0x0b96,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0061
09fa 02cb 0bce | | .DEBUG 0x02cb,0x0bce,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0073
0a02 032b 0bfc | + | .DEBUG 0x032b,0x0bfc,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x0085
0a0a 036b 0c14 | k | .DEBUG 0x036b,0x0c14,0x0001,0x0000,0x0038,0xc6c6,0x0000,0x008f
0a12 038b 0c1e | | .DEBUG 0x038b,0x0c1e,0x0001,0x0000,0x0039,0x3556,0x0000,0x0074
0a1a 03ab 0c24 | $| .DEBUG 0x03ab,0x0c24,0x0001,0x0000,0x0039,0x3556,0x0000,0x008e
0a22 03c3 0c2c | ,| .DEBUG 0x03c3,0x0c2c,0x2801,0x0002,0x0039,0x3556,0x0000,0x00c8
0a2a 042b 0c4e | + N| .DEBUG 0x042b,0x0c4e,0x0001,0x0000,0x0039,0x3556,0x0000,0x01ff
0a32 0453 0c60 | S `| .DEBUG 0x0453,0x0c60,0x0001,0x0000,0x0039,0x3556,0x0000,0x025b
0a3a 04bb 0c8a | | .DEBUG 0x04bb,0x0c8a,0x0001,0x0000,0x0039,0x3556,0x0000,0x02f7
0a42 04fb 0ca4 | | .DEBUG 0x04fb,0x0ca4,0x0001,0x0000,0x0039,0x3556,0x0000,0x0439
0a4a 051b 0cae | | .DEBUG 0x051b,0x0cae,0x0001,0x0000,0x0039,0x3556,0x0000,0x05e4
0a52 056b 0cd4 | k | .DEBUG 0x056b,0x0cd4,0x0001,0x0000,0x0039,0x3556,0x0000,0x0725
0a5a 060b 0d0c | | .DEBUG 0x060b,0x0d0c,0x0001,0x0000,0x0039,0x3556,0x0000,0x081e
0a62 0683 0d4a | J| .DEBUG 0x0683,0x0d4a,0x0001,0x0000,0x0039,0x3556,0x0000,0x09fa
0a6a 077b 0da2 | { | .DEBUG 0x077b,0x0da2,0x0001,0x0000,0x0039,0x3556,0x0000,0x0d80
0a72 07c3 0db4 | | .DEBUG 0x07c3,0x0db4,0x0004,0x0000,0x0039,0x3556,0x0000,0x0ced
0a7a 07db 0dbc | | .DEBUG 0x07db,0x0dbc,0x0804,0x0002,0x0039,0x3556,0x0000,0x01ed
0a82 0833 0ddc | 3 | .DEBUG 0x0833,0x0ddc,0x0004,0x0000,0x0039,0x3556,0x0000,0x0af9
0a8a ; --------------------------------------------------------------------------------------
0a8a ; Debug3 Subtable 0x0
0a8a ; --------------------------------------------------------------------------------------
0a8a 000b 0000 | | .DBG3TAB 0x000b,0x0000
0a8c 000b ffff | | .CONST 0x000b,0xffff
0a8e 000d fffe | | .CONST 0x000d,0xfffe
0a90 000f fffd | | .CONST 0x000f,0xfffd
0a92 0011 fffc | | .CONST 0x0011,0xfffc
0a94 0013 fffb | | .CONST 0x0013,0xfffb
0a96 0015 fffa | | .CONST 0x0015,0xfffa
0a98 0017 fff9 | | .CONST 0x0017,0xfff9
0a9a 0019 fff8 | | .CONST 0x0019,0xfff8
0a9c 001b fff7 | | .CONST 0x001b,0xfff7
0a9e 001d fff6 | | .CONST 0x001d,0xfff6
0aa0 001f fff5 | | .CONST 0x001f,0xfff5
0aa2 ; --------------------------------------------------------------------------------------
0aa2 ; Debug3 Subtable 0x1
0aa2 ; --------------------------------------------------------------------------------------
0aa2 0022 0000 | " | .DBG3TAB 0x0022,0x0000
0aa4 0022 ffff | " | .CONST 0x0022,0xffff
0aa6 0023 fffe | # | .CONST 0x0023,0xfffe
0aa8 0024 fffd | $ | .CONST 0x0024,0xfffd
0aaa 0025 fffc | % | .CONST 0x0025,0xfffc
0aac 0026 fffb | & | .CONST 0x0026,0xfffb
0aae 0029 fffa | ) | .CONST 0x0029,0xfffa
0ab0 002c fff9 | , | .CONST 0x002c,0xfff9
0ab2 002f fff8 | / | .CONST 0x002f,0xfff8
0ab4 0032 fff7 | 2 | .CONST 0x0032,0xfff7
0ab6 0035 fff6 | 5 | .CONST 0x0035,0xfff6
0ab8 0041 fff5 | A | .CONST 0x0041,0xfff5
0aba 0043 fff4 | C | .CONST 0x0043,0xfff4
0abc 0045 fff3 | E | .CONST 0x0045,0xfff3
0abe 0047 fff2 | G | .CONST 0x0047,0xfff2
0ac0 0049 fff1 | I | .CONST 0x0049,0xfff1
0ac2 004b fff0 | K | .CONST 0x004b,0xfff0
0ac4 004d ffef | M | .CONST 0x004d,0xffef
0ac6 004f ffee | O | .CONST 0x004f,0xffee
0ac8 0051 ffed | Q | .CONST 0x0051,0xffed
0aca 0053 ffec | S | .CONST 0x0053,0xffec
0acc 0055 ffeb | U | .CONST 0x0055,0xffeb
0ace 0057 ffea | W | .CONST 0x0057,0xffea
0ad0 0059 ffe9 | Y | .CONST 0x0059,0xffe9
0ad2 005b ffe8 | [ | .CONST 0x005b,0xffe8
0ad4 005d ffe7 | ] | .CONST 0x005d,0xffe7
0ad6 005f ffe6 | _ | .CONST 0x005f,0xffe6
0ad8 0061 ffe5 | a | .CONST 0x0061,0xffe5
0ada 0063 ffe4 | c | .CONST 0x0063,0xffe4
0adc 0065 ffe3 | e | .CONST 0x0065,0xffe3
0ade 0067 ffe2 | g | .CONST 0x0067,0xffe2
0ae0 0069 ffe1 | i | .CONST 0x0069,0xffe1
0ae2 006b ffe0 | k | .CONST 0x006b,0xffe0
0ae4 006d ffdf | m | .CONST 0x006d,0xffdf
0ae6 006f ffde | o | .CONST 0x006f,0xffde
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; Debug3 Subtable 0x2
0ae8 ; --------------------------------------------------------------------------------------
0ae8 0004 0012 | | .DBG3TAB 0x0004,0x0012
0aea 007b ffff | { | .CONST 0x007b,0xffff
0aec 0086 fffe | | .CONST 0x0086,0xfffe
0aee 008b fffd | | .CONST 0x008b,0xfffd
0af0 008d fffc | | .CONST 0x008d,0xfffc
0af2 008e 0001 | | .CONST 0x008e,0x0001
0af4 0092 0002 | | .CONST 0x0092,0x0002
0af6 0095 0003 | | .CONST 0x0095,0x0003
0af8 0096 0004 | | .CONST 0x0096,0x0004
0afa 0097 0005 | | .CONST 0x0097,0x0005
0afc 00a5 0007 | | .CONST 0x00a5,0x0007
0afe 00a9 0008 | | .CONST 0x00a9,0x0008
0b00 00ab 0009 | | .CONST 0x00ab,0x0009
0b02 00ac 000a | | .CONST 0x00ac,0x000a
0b04 00af 000b | | .CONST 0x00af,0x000b
0b06 00b3 000c | | .CONST 0x00b3,0x000c
0b08 00b4 000d | | .CONST 0x00b4,0x000d
0b0a 00bb 000f | | .CONST 0x00bb,0x000f
0b0c 00bd 000e | | .CONST 0x00bd,0x000e
0b0e 00c2 0010 | | .CONST 0x00c2,0x0010
0b10 00c6 0011 | | .CONST 0x00c6,0x0011
0b12 00c9 0012 | | .CONST 0x00c9,0x0012
0b14 00ce 0006 | | .CONST 0x00ce,0x0006
0b16 ; --------------------------------------------------------------------------------------
0b16 ; Debug3 Subtable 0x3
0b16 ; --------------------------------------------------------------------------------------
0b16 0001 0001 | | .DBG3TAB 0x0001,0x0001
0b18 00db ffff | | .CONST 0x00db,0xffff
0b1a 00dd 0001 | | .CONST 0x00dd,0x0001
0b1c ; --------------------------------------------------------------------------------------
0b1c ; Debug3 Subtable 0x4
0b1c ; --------------------------------------------------------------------------------------
0b1c 0003 0005 | | .DBG3TAB 0x0003,0x0005
0b1e 00eb ffff | | .CONST 0x00eb,0xffff
0b20 00f3 fffe | | .CONST 0x00f3,0xfffe
0b22 00f5 fffd | | .CONST 0x00f5,0xfffd
0b24 00f6 0001 | | .CONST 0x00f6,0x0001
0b26 0103 0002 | | .CONST 0x0103,0x0002
0b28 0106 0003 | | .CONST 0x0106,0x0003
0b2a 0107 0004 | | .CONST 0x0107,0x0004
0b2c 0110 0005 | | .CONST 0x0110,0x0005
0b2e ; --------------------------------------------------------------------------------------
0b2e ; Debug3 Subtable 0x5
0b2e ; --------------------------------------------------------------------------------------
0b2e 0006 0012 | | .DBG3TAB 0x0006,0x0012
0b30 011b ffff | | .CONST 0x011b,0xffff
0b32 0120 fffe | | .CONST 0x0120,0xfffe
0b34 0125 fffd | % | .CONST 0x0125,0xfffd
0b36 012a fffc | * | .CONST 0x012a,0xfffc
0b38 012c fffb | , | .CONST 0x012c,0xfffb
0b3a 012e fffa | . | .CONST 0x012e,0xfffa
0b3c 012f 0001 | / | .CONST 0x012f,0x0001
0b3e 0144 0002 | D | .CONST 0x0144,0x0002
0b40 0148 0003 | H | .CONST 0x0148,0x0003
0b42 0151 0004 | Q | .CONST 0x0151,0x0004
0b44 0152 0005 | R | .CONST 0x0152,0x0005
0b46 0153 0006 | S | .CONST 0x0153,0x0006
0b48 0157 0007 | W | .CONST 0x0157,0x0007
0b4a 0165 0009 | e | .CONST 0x0165,0x0009
0b4c 0169 000a | i | .CONST 0x0169,0x000a
0b4e 016b 000b | k | .CONST 0x016b,0x000b
0b50 016c 000c | l | .CONST 0x016c,0x000c
0b52 016f 000d | o | .CONST 0x016f,0x000d
0b54 0173 000e | s | .CONST 0x0173,0x000e
0b56 0174 000f | t | .CONST 0x0174,0x000f
0b58 017b 0011 | { | .CONST 0x017b,0x0011
0b5a 017e 0012 | ~ | .CONST 0x017e,0x0012
0b5c 0188 0013 | | .CONST 0x0188,0x0013
0b5e 018d 0008 | | .CONST 0x018d,0x0008
0b60 ; --------------------------------------------------------------------------------------
0b60 ; Debug3 Subtable 0x6
0b60 ; --------------------------------------------------------------------------------------
0b60 0001 0001 | | .DBG3TAB 0x0001,0x0001
0b62 019b ffff | | .CONST 0x019b,0xffff
0b64 019d 0001 | | .CONST 0x019d,0x0001
0b66 ; --------------------------------------------------------------------------------------
0b66 ; Debug3 Subtable 0x7
0b66 ; --------------------------------------------------------------------------------------
0b66 0003 0005 | | .DBG3TAB 0x0003,0x0005
0b68 01ab ffff | | .CONST 0x01ab,0xffff
0b6a 01b3 fffe | | .CONST 0x01b3,0xfffe
0b6c 01b5 fffd | | .CONST 0x01b5,0xfffd
0b6e 01b6 0001 | | .CONST 0x01b6,0x0001
0b70 01c3 0002 | | .CONST 0x01c3,0x0002
0b72 01c6 0003 | | .CONST 0x01c6,0x0003
0b74 01c7 0004 | | .CONST 0x01c7,0x0004
0b76 01d0 0005 | | .CONST 0x01d0,0x0005
0b78 ; --------------------------------------------------------------------------------------
0b78 ; Debug3 Subtable 0x8
0b78 ; --------------------------------------------------------------------------------------
0b78 0004 000a | | .DBG3TAB 0x0004,0x000a
0b7a 01db ffff | | .CONST 0x01db,0xffff
0b7c 01df fffe | | .CONST 0x01df,0xfffe
0b7e 01e0 fffd | | .CONST 0x01e0,0xfffd
0b80 01e5 fffc | | .CONST 0x01e5,0xfffc
0b82 01e9 0001 | | .CONST 0x01e9,0x0001
0b84 01f0 0002 | | .CONST 0x01f0,0x0002
0b86 01f2 0003 | | .CONST 0x01f2,0x0003
0b88 01f5 0004 | | .CONST 0x01f5,0x0004
0b8a 01f6 0005 | | .CONST 0x01f6,0x0005
0b8c 01f7 0006 | | .CONST 0x01f7,0x0006
0b8e 0203 0008 | | .CONST 0x0203,0x0008
0b90 0207 0009 | | .CONST 0x0207,0x0009
0b92 0208 000a | | .CONST 0x0208,0x000a
0b94 020d 0007 | | .CONST 0x020d,0x0007
0b96 ; --------------------------------------------------------------------------------------
0b96 ; Debug3 Subtable 0x9
0b96 ; --------------------------------------------------------------------------------------
0b96 0001 001a | | .DBG3TAB 0x0001,0x001a
0b98 021b ffff | | .CONST 0x021b,0xffff
0b9a 021e 0001 | | .CONST 0x021e,0x0001
0b9c 023d 0017 | = | .CONST 0x023d,0x0017
0b9e 0244 0018 | D | .CONST 0x0244,0x0018
0ba0 0248 0019 | H | .CONST 0x0248,0x0019
0ba2 024a 001a | J | .CONST 0x024a,0x001a
0ba4 0251 0002 | Q | .CONST 0x0251,0x0002
0ba6 0258 0003 | X | .CONST 0x0258,0x0003
0ba8 025f 0004 | _ | .CONST 0x025f,0x0004
0baa 0263 0005 | c | .CONST 0x0263,0x0005
0bac 0268 0006 | h | .CONST 0x0268,0x0006
0bae 026f 0007 | o | .CONST 0x026f,0x0007
0bb0 0274 0008 | t | .CONST 0x0274,0x0008
0bb2 0278 0009 | x | .CONST 0x0278,0x0009
0bb4 027d 000a | } | .CONST 0x027d,0x000a
0bb6 0284 000b | | .CONST 0x0284,0x000b
0bb8 028b 000c | | .CONST 0x028b,0x000c
0bba 028f 000d | | .CONST 0x028f,0x000d
0bbc 0294 000e | | .CONST 0x0294,0x000e
0bbe 029b 000f | | .CONST 0x029b,0x000f
0bc0 02a1 0010 | | .CONST 0x02a1,0x0010
0bc2 02a2 0011 | | .CONST 0x02a2,0x0011
0bc4 02a7 0012 | | .CONST 0x02a7,0x0012
0bc6 02ad 0013 | | .CONST 0x02ad,0x0013
0bc8 02ae 0014 | | .CONST 0x02ae,0x0014
0bca 02b5 0015 | | .CONST 0x02b5,0x0015
0bcc 02bc 0016 | | .CONST 0x02bc,0x0016
0bce ; --------------------------------------------------------------------------------------
0bce ; Debug3 Subtable 0xa
0bce ; --------------------------------------------------------------------------------------
0bce 0003 0013 | | .DBG3TAB 0x0003,0x0013
0bd0 02cb ffff | | .CONST 0x02cb,0xffff
0bd2 02cc fffe | | .CONST 0x02cc,0xfffe
0bd4 02cd fffd | | .CONST 0x02cd,0xfffd
0bd6 02d2 0001 | | .CONST 0x02d2,0x0001
0bd8 02d6 0002 | | .CONST 0x02d6,0x0002
0bda 02d9 0003 | | .CONST 0x02d9,0x0003
0bdc 02e0 0004 | | .CONST 0x02e0,0x0004
0bde 02e4 0005 | | .CONST 0x02e4,0x0005
0be0 02e5 0006 | | .CONST 0x02e5,0x0006
0be2 02e7 0007 | | .CONST 0x02e7,0x0007
0be4 02ea 0008 | | .CONST 0x02ea,0x0008
0be6 02f5 0009 | | .CONST 0x02f5,0x0009
0be8 02fb 000a | | .CONST 0x02fb,0x000a
0bea 0300 000b | | .CONST 0x0300,0x000b
0bec 0304 000c | | .CONST 0x0304,0x000c
0bee 0308 000d | | .CONST 0x0308,0x000d
0bf0 030d 000f | | .CONST 0x030d,0x000f
0bf2 0312 0010 | | .CONST 0x0312,0x0010
0bf4 0315 0011 | | .CONST 0x0315,0x0011
0bf6 031a 000e | | .CONST 0x031a,0x000e
0bf8 031f 0012 | | .CONST 0x031f,0x0012
0bfa 0320 0013 | | .CONST 0x0320,0x0013
0bfc ; --------------------------------------------------------------------------------------
0bfc ; Debug3 Subtable 0xb
0bfc ; --------------------------------------------------------------------------------------
0bfc 0005 0006 | | .DBG3TAB 0x0005,0x0006
0bfe 032b ffff | + | .CONST 0x032b,0xffff
0c00 032f fffe | / | .CONST 0x032f,0xfffe
0c02 0330 fffd | 0 | .CONST 0x0330,0xfffd
0c04 0331 fffc | 1 | .CONST 0x0331,0xfffc
0c06 0332 fffb | 2 | .CONST 0x0332,0xfffb
0c08 0334 0001 | 4 | .CONST 0x0334,0x0001
0c0a 033b 0002 | ; | .CONST 0x033b,0x0002
0c0c 0357 0004 | W | .CONST 0x0357,0x0004
0c0e 035d 0005 | ] | .CONST 0x035d,0x0005
0c10 035e 0006 | ^ | .CONST 0x035e,0x0006
0c12 0363 0003 | c | .CONST 0x0363,0x0003
0c14 ; --------------------------------------------------------------------------------------
0c14 ; Debug3 Subtable 0xc
0c14 ; --------------------------------------------------------------------------------------
0c14 0003 0001 | | .DBG3TAB 0x0003,0x0001
0c16 036b ffff | k | .CONST 0x036b,0xffff
0c18 0373 fffe | s | .CONST 0x0373,0xfffe
0c1a 0375 fffd | u | .CONST 0x0375,0xfffd
0c1c 0376 0001 | v | .CONST 0x0376,0x0001
0c1e ; --------------------------------------------------------------------------------------
0c1e ; Debug3 Subtable 0xd
0c1e ; --------------------------------------------------------------------------------------
0c1e 0000 0002 | | .DBG3TAB 0x0000,0x0002
0c20 038b 0001 | | .CONST 0x038b,0x0001
0c22 038c 0002 | | .CONST 0x038c,0x0002
0c24 ; --------------------------------------------------------------------------------------
0c24 ; Debug3 Subtable 0xe
0c24 ; --------------------------------------------------------------------------------------
0c24 0000 0003 | | .DBG3TAB 0x0000,0x0003
0c26 03ab 0001 | | .CONST 0x03ab,0x0001
0c28 03ad 0002 | | .CONST 0x03ad,0x0002
0c2a 03bb 0003 | | .CONST 0x03bb,0x0003
0c2c ; --------------------------------------------------------------------------------------
0c2c ; Debug3 Subtable 0xf
0c2c ; --------------------------------------------------------------------------------------
0c2c 0007 0009 | | .DBG3TAB 0x0007,0x0009
0c2e 03c3 ffff | | .CONST 0x03c3,0xffff
0c30 03c6 fffe | | .CONST 0x03c6,0xfffe
0c32 03cb fffd | | .CONST 0x03cb,0xfffd
0c34 03cd fffc | | .CONST 0x03cd,0xfffc
0c36 03ce fffb | | .CONST 0x03ce,0xfffb
0c38 03d4 fffa | | .CONST 0x03d4,0xfffa
0c3a 03da fff9 | | .CONST 0x03da,0xfff9
0c3c 03de 0001 | | .CONST 0x03de,0x0001
0c3e 0400 0002 | | .CONST 0x0400,0x0002
0c40 0402 0003 | | .CONST 0x0402,0x0003
0c42 0411 0004 | | .CONST 0x0411,0x0004
0c44 0412 0005 | | .CONST 0x0412,0x0005
0c46 0415 0007 | | .CONST 0x0415,0x0007
0c48 0416 0008 | | .CONST 0x0416,0x0008
0c4a 041c 0006 | | .CONST 0x041c,0x0006
0c4c 0422 0009 | " | .CONST 0x0422,0x0009
0c4e ; --------------------------------------------------------------------------------------
0c4e ; Debug3 Subtable 0x10
0c4e ; --------------------------------------------------------------------------------------
0c4e 0000 0008 | | .DBG3TAB 0x0000,0x0008
0c50 042b 0001 | + | .CONST 0x042b,0x0001
0c52 0434 0002 | 4 | .CONST 0x0434,0x0002
0c54 0438 0003 | 8 | .CONST 0x0438,0x0003
0c56 043c 0004 | < | .CONST 0x043c,0x0004
0c58 0440 0005 | @ | .CONST 0x0440,0x0005
0c5a 0444 0006 | D | .CONST 0x0444,0x0006
0c5c 0448 0007 | H | .CONST 0x0448,0x0007
0c5e 044c 0008 | L | .CONST 0x044c,0x0008
0c60 ; --------------------------------------------------------------------------------------
0c60 ; Debug3 Subtable 0x11
0c60 ; --------------------------------------------------------------------------------------
0c60 0004 0010 | | .DBG3TAB 0x0004,0x0010
0c62 0453 ffff | S | .CONST 0x0453,0xffff
0c64 0458 fffe | X | .CONST 0x0458,0xfffe
0c66 045d fffd | ] | .CONST 0x045d,0xfffd
0c68 045e fffc | ^ | .CONST 0x045e,0xfffc
0c6a 0466 0002 | f | .CONST 0x0466,0x0002
0c6c 046b 0003 | k | .CONST 0x046b,0x0003
0c6e 046d 0004 | m | .CONST 0x046d,0x0004
0c70 047d 0005 | } | .CONST 0x047d,0x0005
0c72 047f 0006 | | .CONST 0x047f,0x0006
0c74 0480 0007 | | .CONST 0x0480,0x0007
0c76 048c 0008 | | .CONST 0x048c,0x0008
0c78 048e 0009 | | .CONST 0x048e,0x0009
0c7a 048f 000a | | .CONST 0x048f,0x000a
0c7c 0493 000b | | .CONST 0x0493,0x000b
0c7e 0495 000c | | .CONST 0x0495,0x000c
0c80 04a5 000d | | .CONST 0x04a5,0x000d
0c82 04a7 000e | | .CONST 0x04a7,0x000e
0c84 04ab 000f | | .CONST 0x04ab,0x000f
0c86 04ae 0010 | | .CONST 0x04ae,0x0010
0c88 04b3 0001 | | .CONST 0x04b3,0x0001
0c8a ; --------------------------------------------------------------------------------------
0c8a ; Debug3 Subtable 0x12
0c8a ; --------------------------------------------------------------------------------------
0c8a 0002 000a | | .DBG3TAB 0x0002,0x000a
0c8c 04bb ffff | | .CONST 0x04bb,0xffff
0c8e 04c4 fffe | | .CONST 0x04c4,0xfffe
0c90 04c9 0001 | | .CONST 0x04c9,0x0001
0c92 04d0 0002 | | .CONST 0x04d0,0x0002
0c94 04d8 0003 | | .CONST 0x04d8,0x0003
0c96 04d9 0004 | | .CONST 0x04d9,0x0004
0c98 04dd 0005 | | .CONST 0x04dd,0x0005
0c9a 04de 0006 | | .CONST 0x04de,0x0006
0c9c 04e0 0007 | | .CONST 0x04e0,0x0007
0c9e 04e4 0008 | | .CONST 0x04e4,0x0008
0ca0 04e5 0009 | | .CONST 0x04e5,0x0009
0ca2 04ee 000a | | .CONST 0x04ee,0x000a
0ca4 ; --------------------------------------------------------------------------------------
0ca4 ; Debug3 Subtable 0x13
0ca4 ; --------------------------------------------------------------------------------------
0ca4 0001 0003 | | .DBG3TAB 0x0001,0x0003
0ca6 04fb ffff | | .CONST 0x04fb,0xffff
0ca8 0506 0002 | | .CONST 0x0506,0x0002
0caa 050e 0003 | | .CONST 0x050e,0x0003
0cac 0513 0001 | | .CONST 0x0513,0x0001
0cae ; --------------------------------------------------------------------------------------
0cae ; Debug3 Subtable 0x14
0cae ; --------------------------------------------------------------------------------------
0cae 0004 000e | | .DBG3TAB 0x0004,0x000e
0cb0 051b ffff | | .CONST 0x051b,0xffff
0cb2 051c fffe | | .CONST 0x051c,0xfffe
0cb4 051d fffd | | .CONST 0x051d,0xfffd
0cb6 0520 fffc | | .CONST 0x0520,0xfffc
0cb8 0525 0001 | % | .CONST 0x0525,0x0001
0cba 0529 0002 | ) | .CONST 0x0529,0x0002
0cbc 052f 0003 | / | .CONST 0x052f,0x0003
0cbe 0532 0004 | 2 | .CONST 0x0532,0x0004
0cc0 0536 0005 | 6 | .CONST 0x0536,0x0005
0cc2 053c 0006 | < | .CONST 0x053c,0x0006
0cc4 0541 0007 | A | .CONST 0x0541,0x0007
0cc6 0546 0008 | F | .CONST 0x0546,0x0008
0cc8 054b 0009 | K | .CONST 0x054b,0x0009
0cca 0552 000b | R | .CONST 0x0552,0x000b
0ccc 055a 000c | Z | .CONST 0x055a,0x000c
0cce 055e 000d | ^ | .CONST 0x055e,0x000d
0cd0 0561 000e | a | .CONST 0x0561,0x000e
0cd2 0564 000f | d | .CONST 0x0564,0x000f
0cd4 ; --------------------------------------------------------------------------------------
0cd4 ; Debug3 Subtable 0x15
0cd4 ; --------------------------------------------------------------------------------------
0cd4 0007 0014 | | .DBG3TAB 0x0007,0x0014
0cd6 056b ffff | k | .CONST 0x056b,0xffff
0cd8 0576 fffe | v | .CONST 0x0576,0xfffe
0cda 057b fffd | { | .CONST 0x057b,0xfffd
0cdc 057c fffc | | | .CONST 0x057c,0xfffc
0cde 057d fffb | } | .CONST 0x057d,0xfffb
0ce0 0580 fffa | | .CONST 0x0580,0xfffa
0ce2 0582 fff9 | | .CONST 0x0582,0xfff9
0ce4 0595 0001 | | .CONST 0x0595,0x0001
0ce6 0599 0002 | | .CONST 0x0599,0x0002
0ce8 059c 0003 | | .CONST 0x059c,0x0003
0cea 059d 0004 | | .CONST 0x059d,0x0004
0cec 059e 0005 | | .CONST 0x059e,0x0005
0cee 05ac 0007 | | .CONST 0x05ac,0x0007
0cf0 05b0 0008 | | .CONST 0x05b0,0x0008
0cf2 05b5 0009 | | .CONST 0x05b5,0x0009
0cf4 05ba 000a | | .CONST 0x05ba,0x000a
0cf6 05bd 000b | | .CONST 0x05bd,0x000b
0cf8 05c1 000c | | .CONST 0x05c1,0x000c
0cfa 05cb 000d | | .CONST 0x05cb,0x000d
0cfc 05d0 0006 | | .CONST 0x05d0,0x0006
0cfe 05d5 000e | | .CONST 0x05d5,0x000e
0d00 05dc 000f | | .CONST 0x05dc,0x000f
0d02 05de 0010 | | .CONST 0x05de,0x0010
0d04 05e1 0011 | | .CONST 0x05e1,0x0011
0d06 05e6 0012 | | .CONST 0x05e6,0x0012
0d08 05f9 0013 | | .CONST 0x05f9,0x0013
0d0a 05fd 0014 | | .CONST 0x05fd,0x0014
0d0c ; --------------------------------------------------------------------------------------
0d0c ; Debug3 Subtable 0x16
0d0c ; --------------------------------------------------------------------------------------
0d0c 0002 001c | | .DBG3TAB 0x0002,0x001c
0d0e 060b ffff | | .CONST 0x060b,0xffff
0d10 060c fffe | | .CONST 0x060c,0xfffe
0d12 060f 0001 | | .CONST 0x060f,0x0001
0d14 0614 0002 | | .CONST 0x0614,0x0002
0d16 0617 0003 | | .CONST 0x0617,0x0003
0d18 0624 0004 | $ | .CONST 0x0624,0x0004
0d1a 0625 0005 | % | .CONST 0x0625,0x0005
0d1c 062c 0006 | , | .CONST 0x062c,0x0006
0d1e 062e 0007 | . | .CONST 0x062e,0x0007
0d20 062f 0008 | / | .CONST 0x062f,0x0008
0d22 0631 0009 | 1 | .CONST 0x0631,0x0009
0d24 0632 000b | 2 | .CONST 0x0632,0x000b
0d26 0637 000c | 7 | .CONST 0x0637,0x000c
0d28 0639 000d | 9 | .CONST 0x0639,0x000d
0d2a 063a 000e | : | .CONST 0x063a,0x000e
0d2c 0647 000f | G | .CONST 0x0647,0x000f
0d2e 0648 0010 | H | .CONST 0x0648,0x0010
0d30 064a 0011 | J | .CONST 0x064a,0x0011
0d32 064b 0012 | K | .CONST 0x064b,0x0012
0d34 0650 0013 | P | .CONST 0x0650,0x0013
0d36 0651 0014 | Q | .CONST 0x0651,0x0014
0d38 0655 0015 | U | .CONST 0x0655,0x0015
0d3a 065c 0016 | \ | .CONST 0x065c,0x0016
0d3c 065f 0017 | _ | .CONST 0x065f,0x0017
0d3e 0665 0018 | e | .CONST 0x0665,0x0018
0d40 0667 0019 | g | .CONST 0x0667,0x0019
0d42 066a 001a | j | .CONST 0x066a,0x001a
0d44 0670 001b | p | .CONST 0x0670,0x001b
0d46 0673 001d | s | .CONST 0x0673,0x001d
0d48 0676 001e | v | .CONST 0x0676,0x001e
0d4a ; --------------------------------------------------------------------------------------
0d4a ; Debug3 Subtable 0x17
0d4a ; --------------------------------------------------------------------------------------
0d4a 000d 001e | | .DBG3TAB 0x000d,0x001e
0d4c 0683 ffff | | .CONST 0x0683,0xffff
0d4e 0688 fffe | | .CONST 0x0688,0xfffe
0d50 068d fffd | | .CONST 0x068d,0xfffd
0d52 0692 fffc | | .CONST 0x0692,0xfffc
0d54 0694 fffb | | .CONST 0x0694,0xfffb
0d56 0696 fffa | | .CONST 0x0696,0xfffa
0d58 0697 fff9 | | .CONST 0x0697,0xfff9
0d5a 06ab fff8 | | .CONST 0x06ab,0xfff8
0d5c 06bf fff7 | | .CONST 0x06bf,0xfff7
0d5e 06c1 fff6 | | .CONST 0x06c1,0xfff6
0d60 06c3 fff5 | | .CONST 0x06c3,0xfff5
0d62 06c4 fff4 | | .CONST 0x06c4,0xfff4
0d64 06c7 fff3 | | .CONST 0x06c7,0xfff3
0d66 06cb 0001 | | .CONST 0x06cb,0x0001
0d68 06e0 0002 | | .CONST 0x06e0,0x0002
0d6a 06e4 0003 | | .CONST 0x06e4,0x0003
0d6c 06ed 0004 | | .CONST 0x06ed,0x0004
0d6e 06ee 0005 | | .CONST 0x06ee,0x0005
0d70 06ef 0006 | | .CONST 0x06ef,0x0006
0d72 06f3 0007 | | .CONST 0x06f3,0x0007
0d74 0701 0009 | | .CONST 0x0701,0x0009
0d76 0702 000a | | .CONST 0x0702,0x000a
0d78 0707 0008 | | .CONST 0x0707,0x0008
0d7a 070c 000b | | .CONST 0x070c,0x000b
0d7c 070f 000c | | .CONST 0x070f,0x000c
0d7e 0716 000d | | .CONST 0x0716,0x000d
0d80 0720 000e | | .CONST 0x0720,0x000e
0d82 0727 000f | ' | .CONST 0x0727,0x000f
0d84 0728 0010 | ( | .CONST 0x0728,0x0010
0d86 0731 0011 | 1 | .CONST 0x0731,0x0011
0d88 0732 0012 | 2 | .CONST 0x0732,0x0012
0d8a 073b 0013 | ; | .CONST 0x073b,0x0013
0d8c 073c 0014 | < | .CONST 0x073c,0x0014
0d8e 073f 0015 | ? | .CONST 0x073f,0x0015
0d90 0746 0016 | F | .CONST 0x0746,0x0016
0d92 0747 0017 | G | .CONST 0x0747,0x0017
0d94 0750 0018 | P | .CONST 0x0750,0x0018
0d96 0751 0019 | Q | .CONST 0x0751,0x0019
0d98 075a 001a | Z | .CONST 0x075a,0x001a
0d9a 075b 001b | [ | .CONST 0x075b,0x001b
0d9c 075e 001c | ^ | .CONST 0x075e,0x001c
0d9e 0765 001d | e | .CONST 0x0765,0x001d
0da0 0766 001e | f | .CONST 0x0766,0x001e
0da2 ; --------------------------------------------------------------------------------------
0da2 ; Debug3 Subtable 0x18
0da2 ; --------------------------------------------------------------------------------------
0da2 0002 0006 | | .DBG3TAB 0x0002,0x0006
0da4 077b ffff | { | .CONST 0x077b,0xffff
0da6 0780 fffe | | .CONST 0x0780,0xfffe
0da8 0782 0001 | | .CONST 0x0782,0x0001
0daa 0797 0002 | | .CONST 0x0797,0x0002
0dac 079b 0003 | | .CONST 0x079b,0x0003
0dae 07a9 0004 | | .CONST 0x07a9,0x0004
0db0 07ab 0005 | | .CONST 0x07ab,0x0005
0db2 07b9 0006 | | .CONST 0x07b9,0x0006
0db4 ; --------------------------------------------------------------------------------------
0db4 ; Debug3 Subtable 0x19
0db4 ; --------------------------------------------------------------------------------------
0db4 0000 0003 | | .DBG3TAB 0x0000,0x0003
0db6 07c3 0001 | | .CONST 0x07c3,0x0001
0db8 07cf 0002 | | .CONST 0x07cf,0x0002
0dba 07d5 0003 | | .CONST 0x07d5,0x0003
0dbc ; --------------------------------------------------------------------------------------
0dbc ; Debug3 Subtable 0x1a
0dbc ; --------------------------------------------------------------------------------------
0dbc 0000 000f | | .DBG3TAB 0x0000,0x000f
0dbe 07db 0001 | | .CONST 0x07db,0x0001
0dc0 07ea 0002 | | .CONST 0x07ea,0x0002
0dc2 07ee 0003 | | .CONST 0x07ee,0x0003
0dc4 080c 0004 | | .CONST 0x080c,0x0004
0dc6 0810 0005 | | .CONST 0x0810,0x0005
0dc8 0815 0006 | | .CONST 0x0815,0x0006
0dca 0816 0007 | | .CONST 0x0816,0x0007
0dcc 0818 0008 | | .CONST 0x0818,0x0008
0dce 0819 0009 | | .CONST 0x0819,0x0009
0dd0 081e 000a | | .CONST 0x081e,0x000a
0dd2 081f 000b | | .CONST 0x081f,0x000b
0dd4 0821 000c | ! | .CONST 0x0821,0x000c
0dd6 0822 000d | " | .CONST 0x0822,0x000d
0dd8 0826 000e | & | .CONST 0x0826,0x000e
0dda 082c 000f | , | .CONST 0x082c,0x000f
0ddc ; --------------------------------------------------------------------------------------
0ddc ; Debug3 Subtable 0x1b
0ddc ; --------------------------------------------------------------------------------------
0ddc 0000 0006 | | .DBG3TAB 0x0000,0x0006
0dde 0833 0001 | 3 | .CONST 0x0833,0x0001
0de0 0838 0002 | 8 | .CONST 0x0838,0x0002
0de2 083b 0003 | ; | .CONST 0x083b,0x0003
0de4 0840 0004 | @ | .CONST 0x0840,0x0004
0de6 084a 0005 | J | .CONST 0x084a,0x0005
0de8 0855 0006 | U | .CONST 0x0855,0x0006
0dea 0000 0000 | | .BLANK 0000[0x16]