DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦598f94005⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0458       | X  |		.CONST	0x0458								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0043       | C  |		.CONST	0x0043								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001a       |    |		.CONST	0x001a								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x04f2,0x8000,0x0000,0x0058,0x5a85,0x0000,0x000d
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2 = 0xd,0xfffd
000e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0010 0129       | )  |		Execute	Any,Make_Visible
0011 e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0x4 = 0x11,0xfffb
0012 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0013 0129       | )  |		Execute	Any,Make_Visible
0014 e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0x5 = 0x14,0xfffa
0015 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0016 0129       | )  |		Execute	Any,Make_Visible
0017 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x25,0xfff2
0027 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0xe = 0x27,0xfff1
0028 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0028,0x0512,0x8000,0x0000,0x0058,0x5d05,0x0000,0x0019
													; Debug Table 0x1.0x0 = 0x28,0xffff
0029 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x29,0xfffe
002a 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x2a,0xfffd
002b 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x2b,0xfffc
002c 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x2c,0xfffb
002d 0092 03a4  |    |		Action	Push_String_Extended,0x3a4					; "referencers"
													; Debug Table 0x1.0x5 = 0x2d,0xfffa
002f 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x6 = 0x2f,0xfff9
0030 00c7       |    |		Action	Elaborate_Subprogram
0031 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x7 = 0x31,0xfff8
0032 00c7       |    |		Action	Elaborate_Subprogram
0033 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x8 = 0x33,0xfff7
0034 00c7       |    |		Action	Elaborate_Subprogram
0035 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x9 = 0x35,0xfff6
0036 00c7       |    |		Action	Elaborate_Subprogram
0037 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xa = 0x37,0xfff5
0038 00c7       |    |		Action	Elaborate_Subprogram
0039 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0xb = 0x39,0xfff4
003a 00c7       |    |		Action	Elaborate_Subprogram
003b 029d 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call			; Debug Table 0x1.0xc = 0x3b,0xfff3
003d 029d 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call			; Debug Table 0x1.0xd = 0x3d,0xfff2
003f 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xe = 0x3f,0xfff1
0040 00c7       |    |		Action	Elaborate_Subprogram
0041 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xf = 0x41,0xfff0
0042 00c7       |    |		Action	Elaborate_Subprogram
0043			BODY_0008:
0043 00bc       |    |		Action	Signal_Activated
0044 00bb       |    |		Action	Signal_Completion
0045 0000 0000  |    |		.XXX[0x3]
0047 0000       |    |
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b       | K  |		.CONST	0x004b								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 0001       |    |		.CONST	0x0001								; Number of locals
004b			BODY_0048:
004b			INIT_0048:
004b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x004b,0x0534,0x0002,0x0000,0x0058,0x5a85,0x0000,0x002b
													; Debug Table 0x2.0x0 = 0x4b,0x1
004c e003       |    |		Load	0x0,0x3
004d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
004e 700f       |p   |		Jump_Nonzero	0x5e
004f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x1 = 0x4f,0x2
0050 00db       |    |		Load_Top	At_Offset_3
0051 e004       |    |		Load	0x0,0x4
0052 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0053 0092 03a5  |    |		Action	Push_String_Extended,0x3a5					; " is not a "
0055 01cc       |    |		Execute	Vector,Catenate
0056 e218       |    |		Load	0x1,0x18
0057 01cc       |    |		Execute	Vector,Catenate
0058 0092 03a6  |    |		Action	Push_String_Extended,0x3a6					; " object"
005a 01cc       |    |		Execute	Vector,Catenate
005b e5fe       |    |		Load	0x2,-0x2
005c e004       |    |		Load	0x0,0x4
005d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
005e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x2 = 0x5e,0x3
005f 00d8       |    |		Load_Top	At_Offset_0
0060 0120       |    |		Execute	Any,Is_Value
0061 7002       |p   |		Jump_Nonzero	0x64
0062 00d8       |    |		Load_Top	At_Offset_0
0063 011e       |    |		Execute	Any,Convert
0064 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0065 0000 0000  |    |		.XXX[0x3]
0067 0000       |    |
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x006b,0x053c,0x0002,0x0000,0x0058,0x5a85,0x0000,0x003a
													; Debug Table 0x3.0x0 = 0x6b,0x1
006c 00d8       |    |		Load_Top	At_Offset_0
006d 0120       |    |		Execute	Any,Is_Value
006e 7002       |p   |		Jump_Nonzero	0x71
006f 00d8       |    |		Load_Top	At_Offset_0
0070 011e       |    |		Execute	Any,Convert
0071 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0072 0000 0000  |    |		.BLANK	0000[0x6]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b       | {  |		.CONST	0x007b								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 0001       |    |		.CONST	0x0001								; Number of locals
007b			BODY_0078:
007b			INIT_0078:
007b e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x4 = .DEBUG	0x007b,0x0540,0x0001,0x0000,0x0058,0x5a85,0x0000,0x0049
													; Debug Table 0x4.0x0 = 0x7b,0x1
007c 0120       |    |		Execute	Any,Is_Value
007d 6803       |h   |		Jump_Zero	0x81
007e e005       |    |		Load	0x0,0x5
007f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0080 7804       |x   |		Jump	0x85
0081 e5fc       |    |		Load	0x2,-0x4
0082 e002       |    |		Load	0x0,0x2
0083 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0084 011e       |    |		Execute	Any,Convert
0085 4800       |H   |		Short_Literal	0x0
0086 e218       |    |		Load	0x1,0x18
0087 e5fd       |    |		Load	0x2,-0x3
0088 e5fe       |    |		Load	0x2,-0x2
0089 e5ff       |    |		Load	0x2,-0x1
008a e005       |    |		Load	0x0,0x5
008b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
008c e20f       |    |		Load	0x1,0xf
008d 011e       |    |		Execute	Any,Convert
008e c5fc       |    |		Store	0x2,-0x4
008f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5 = .DEBUG	0x0093,0x0544,0x0001,0x0000,0x0058,0x5a85,0x0000,0x005d
													; Debug Table 0x5.0x0 = 0x93,0x1
0094 e5fd       |    |		Load	0x2,-0x3
0095 e218       |    |		Load	0x1,0x18
0096 e5fd       |    |		Load	0x2,-0x3
0097 e5fe       |    |		Load	0x2,-0x2
0098 e006       |    |		Load	0x0,0x6
0099 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
009a e5fd       |    |		Load	0x2,-0x3
009b e5ff       |    |		Load	0x2,-0x1
009c 8211       |    |		Call	0x1,0x11
009d e005       |    |		Load	0x0,0x5
009e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
009f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00af       |    |		.CONST	0x00af								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0006       |    |		.CONST	0x0006								; Number of locals
00a3			INIT_00a0:
00a3 029f 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Call				; Debug Table 0x6 = .DEBUG	0x00a3,0x0548,0x2801,0x0002,0x0058,0x5a85,0x0000,0x006f
													; Debug Table 0x6.0x0 = 0xa3,0xffff
00a5 e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x1 = 0xa5,0xfffe
00a6 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
00a7 00c6       |    |		Action	Check_Subprogram_Elaborated
00a8 4802       |H   |		Short_Literal	0x2
00a9 4802       |H   |		Short_Literal	0x2
00aa 0099       |    |		Action	Reference_Dynamic
00ab 62f4       |b   |		Indirect_Literal	Discrete,0x3a0,{0x00000000, 0x00585d05}
00ac 4935       |I5  |		Short_Literal	0x135
00ad 4806       |H   |		Short_Literal	0x6
00ae 0007       |    |		Action	Break_Optional
00af			BODY_00a0:
00af e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x6.0x2 = 0xaf,0x1
00b0 e218       |    |		Load	0x1,0x18
00b1 e5fc       |    |		Load	0x2,-0x4
00b2 e5fd       |    |		Load	0x2,-0x3
00b3 8211       |    |		Call	0x1,0x11
00b4 4803       |H   |		Short_Literal	0x3
00b5 4802       |H   |		Short_Literal	0x2
00b6 0099       |    |		Action	Reference_Dynamic
00b7 4804       |H   |		Short_Literal	0x4
00b8 4802       |H   |		Short_Literal	0x2
00b9 0099       |    |		Action	Reference_Dynamic
00ba e005       |    |		Load	0x0,0x5
00bb 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00bc 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00bd 0000 0000  |    |		.XXX[0x3]
00bf 0000       |    |
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7 = .DEBUG	0x00c3,0x0550,0x0001,0x0000,0x0058,0x5a85,0x0000,0x008b
													; Debug Table 0x7.0x0 = 0xc3,0x1
00c4 e5fd       |    |		Load	0x2,-0x3
00c5 e218       |    |		Load	0x1,0x18
00c6 e5fd       |    |		Load	0x2,-0x3
00c7 e5fe       |    |		Load	0x2,-0x2
00c8 e006       |    |		Load	0x0,0x6
00c9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00ca e5fd       |    |		Load	0x2,-0x3
00cb e5ff       |    |		Load	0x2,-0x1
00cc 8211       |    |		Call	0x1,0x11
00cd e005       |    |		Load	0x0,0x5
00ce 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00cf 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 0101       |    |		.CONST	0x0101								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0012       |    |		.CONST	0x0012								; Number of locals
00d3			INIT_00d0:
00d3 e006       |    |		Load	0x0,0x6								; Debug Table 0x8 = .DEBUG	0x00d3,0x0554,0x0001,0x0000,0x0058,0x5a85,0x0000,0x009d
													; Debug Table 0x8.0x0 = 0xd3,0xffff
00d4 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00d5 e006       |    |		Load	0x0,0x6								; Debug Table 0x8.0x1 = 0xd5,0xfffe
00d6 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00d7 e007       |    |		Load	0x0,0x7								; Debug Table 0x8.0x2 = 0xd7,0xfffd
00d8 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00d9 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00da 029e 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Call,Unelaborated			; Debug Table 0x8.0x3 = 0xda,0xfffc
00dc e004       |    |		Load	0x0,0x4								; Debug Table 0x8.0x4 = 0xdc,0xfffb
00dd 1920       |    |		Execute	Package,Field_Reference,Field_Number 0x20
00de 00c6       |    |		Action	Check_Subprogram_Elaborated
00df 4805       |H   |		Short_Literal	0x5
00e0 4802       |H   |		Short_Literal	0x2
00e1 0099       |    |		Action	Reference_Dynamic
00e2 62bd       |b   |		Indirect_Literal	Discrete,0x3a0,{0x00000000, 0x00585d05}
00e3 4a5c       |J\  |		Short_Literal	0x25c
00e4 4809       |H   |		Short_Literal	0x9
00e5 0007       |    |		Action	Break_Optional
00e6 029f 021b  |    |		Declare_Subprogram	INIT_0218,For_Call				; Debug Table 0x8.0x5 = 0xe6,0xfffa
00e8 029f 0283  |    |		Declare_Subprogram	INIT_0280,For_Call				; Debug Table 0x8.0x6 = 0xe8,0xfff9
00ea 029f 02db  |    |		Declare_Subprogram	INIT_02d8,For_Call				; Debug Table 0x8.0x7 = 0xea,0xfff8
00ec 4805       |H   |		Short_Literal	0x5							; Debug Table 0x8.0x8 = 0xec,0xfff7
00ed 4802       |H   |		Short_Literal	0x2
00ee 0099       |    |		Action	Reference_Dynamic
00ef 00c7       |    |		Action	Elaborate_Subprogram
00f0 029e 0313  |    |		Declare_Subprogram	INIT_0310,For_Call,Unelaborated			; Debug Table 0x8.0x9 = 0xf0,0xfff6
00f2 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x8.0xa = 0xf2,0xfff5
00f3 00c6       |    |		Action	Check_Subprogram_Elaborated
00f4 480d       |H   |		Short_Literal	0xd
00f5 4802       |H   |		Short_Literal	0x2
00f6 0099       |    |		Action	Reference_Dynamic
00f7 62a8       |b   |		Indirect_Literal	Discrete,0x3a0,{0x00000000, 0x00585d05}
00f8 62a3       |b   |		Indirect_Literal	Discrete,0x39c,{0x00000000, 0x0000048b}
00f9 4811       |H   |		Short_Literal	0x11
00fa 0007       |    |		Action	Break_Optional
00fb 480d       |H   |		Short_Literal	0xd							; Debug Table 0x8.0xb = 0xfb,0xfff4
00fc 4802       |H   |		Short_Literal	0x2
00fd 0099       |    |		Action	Reference_Dynamic
00fe 00c7       |    |		Action	Elaborate_Subprogram
00ff 029f 0333  |   3|		Declare_Subprogram	INIT_0330,For_Call				; Debug Table 0x8.0xc = 0xff,0xfff3
0101			BODY_00d0:
0101 e006       |    |		Load	0x0,0x6								; Debug Table 0x8.0xd = 0x101,0x1
0102 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0103 e5fe       |    |		Load	0x2,-0x2
0104 e006       |    |		Load	0x0,0x6
0105 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0106 c402       |    |		Store	0x2,0x2
0107 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0xe = 0x107,0x2
0108 e5ff       |    |		Load	0x2,-0x1
0109 840d       |    |		Call	0x2,0xd
010a e006       |    |		Load	0x0,0x6								; Debug Table 0x8.0xf = 0x10a,0x3
010b 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
010c e5fe       |    |		Load	0x2,-0x2
010d e006       |    |		Load	0x0,0x6
010e 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
010f c403       |    |		Store	0x2,0x3
0110 e007       |    |		Load	0x0,0x7								; Debug Table 0x8.0x10 = 0x110,0x4
0111 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0112 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0113 e5fe       |    |		Load	0x2,-0x2
0114 0217       |    |		Execute	Heap_Access,All_Reference
0115 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0116 e007       |    |		Load	0x0,0x7
0117 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0118 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0119 c404       |    |		Store	0x2,0x4
011a 0092 03a7  |    |		Action	Push_String_Extended,0x3a7					; "Finding Ada referencers of "
													; Debug Table 0x8.0x11 = 0x11a,0x5
011c e5fe       |    |		Load	0x2,-0x2
011d e5ff       |    |		Load	0x2,-0x1
011e e008       |    |		Load	0x0,0x8
011f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0120 01cc       |    |		Execute	Vector,Catenate
0121 0092 03a8  |    |		Action	Push_String_Extended,0x3a8					; " failed"
0123 01cc       |    |		Execute	Vector,Catenate
0124 e5fe       |    |		Load	0x2,-0x2
0125 e5fe       |    |		Load	0x2,-0x2
0126 e5ff       |    |		Load	0x2,-0x1
0127 e006       |    |		Load	0x0,0x6
0128 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0129 4806       |H   |		Short_Literal	0x6
012a 4802       |H   |		Short_Literal	0x2
012b 0099       |    |		Action	Reference_Dynamic
012c 4807       |H   |		Short_Literal	0x7
012d 4802       |H   |		Short_Literal	0x2
012e 0099       |    |		Action	Reference_Dynamic
012f e004       |    |		Load	0x0,0x4
0130 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0131 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x12 = 0x131,0x6
0132 e5ff       |    |		Load	0x2,-0x1
0133 e008       |    |		Load	0x0,0x8
0134 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0135 6802       |h   |		Jump_Zero	0x138
0136 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x13 = 0x136,0x7
0137 8412       |    |		Call	0x2,0x12
0138 e403       |    |		Load	0x2,0x3								; Debug Table 0x8.0x14 = 0x138,0x8
0139 a5fc       |    |		Store_Unchecked	0x2,-0x4
013a e404       |    |		Load	0x2,0x4								; Debug Table 0x8.0x15 = 0x13a,0x9
013b a5fd       |    |		Store_Unchecked	0x2,-0x3
013c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
013d 0000 0000  |    |		.XXX[0x3]
013f 0000       |    |
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 014d       | M  |		.CONST	0x014d								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0002       |    |		.CONST	0x0002								; Number of locals
0143			INIT_0140:
0143 e002       |    |		Load	0x0,0x2								; Debug Table 0x9 = .DEBUG	0x0143,0x0582,0x0001,0x0000,0x0058,0x5a85,0x0000,0x00b9
													; Debug Table 0x9.0x0 = 0x143,0xffff
0144 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0145 02c7       |    |		Declare_Variable	Any
0146 e5fe       |    |		Load	0x2,-0x2
0147 e5fe       |    |		Load	0x2,-0x2
0148 e5ff       |    |		Load	0x2,-0x1
0149 e008       |    |		Load	0x0,0x8
014a 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
014b 8211       |    |		Call	0x1,0x11
014c c402       |    |		Store	0x2,0x2
014d			BODY_0140:
014d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x1 = 0x14d,0x1
014e 00d9       |    |		Load_Top	At_Offset_1
014f e004       |    |		Load	0x0,0x4
0150 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0151 6806       |h   |		Jump_Zero	0x158
0152 0092 03a9  |    |		Action	Push_String_Extended,0x3a9					; "Internal Error - Cannot unfreeze the referencers object"
													; Debug Table 0x9.0x2 = 0x152,0x2
0154 e5fe       |    |		Load	0x2,-0x2
0155 00da       |    |		Load_Top	At_Offset_2
0156 e004       |    |		Load	0x0,0x4
0157 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0158 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0159 0000 0000  |    |		.BLANK	0000[0x7]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0168       | h  |		.CONST	0x0168								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0003       |    |		.CONST	0x0003								; Number of locals
0163			INIT_0160:
0163 e002       |    |		Load	0x0,0x2								; Debug Table 0xa = .DEBUG	0x0163,0x058a,0x0002,0x0000,0x0058,0x5d05,0x0000,0x014e
													; Debug Table 0xa.0x0 = 0x163,0xffff
0164 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0165 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0166 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x1 = 0x166,0xfffe
0167 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0168			BODY_0160:
0168 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x2 = 0x168,0x1
0169 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
016a e002       |    |		Load	0x0,0x2
016b 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
016c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
016d 622a       |b*  |		Indirect_Literal	Discrete,0x398,{0x00000000, 0x00004000}
016e e009       |    |		Load	0x0,0x9
016f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0170 e5ff       |    |		Load	0x2,-0x1
0171 e002       |    |		Load	0x0,0x2
0172 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0173 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0174 005b       | [  |		Store_Top	Discrete,At_Offset_3
0175 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0176 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x3 = 0x176,0x2
0177 7003       |p   |		Jump_Nonzero	0x17b
0178 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x4 = 0x178,0x3
0179 0f04       |    |		Execute_Immediate	Equal,0x4
017a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017b 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x5 = 0x17b,0x4
017c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017d 0000 0000  |    |		.XXX[0x3]
017f 0000       |    |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0188       |    |		.CONST	0x0188								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0002       |    |		.CONST	0x0002								; Number of locals
0183			INIT_0180:
0183 e00a       |    |		Load	0x0,0xa								; Debug Table 0xb = .DEBUG	0x0183,0x0598,0x0001,0x0000,0x0058,0x5d05,0x0000,0x019b
													; Debug Table 0xb.0x0 = 0x183,0xffff
0184 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0185 02c7       |    |		Declare_Variable	Any
0186 00db       |    |		Load_Top	At_Offset_3
0187 c402       |    |		Store	0x2,0x2
0188			BODY_0180:
0188 00cf       |    |		Action	Mark_Auxiliary
0189 7829       |x)  |		Jump	0x1b3
018a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x1 = 0x18a,0x2
018b e00a       |    |		Load	0x0,0xa
018c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
018d 4604       |F   |		Jump_Case	0x5
018e 7804       |x   |		Jump	0x193								; case 0x0
018f 780a       |x   |		Jump	0x19a								; case 0x1
0190 7810       |x   |		Jump	0x1a1								; case 0x2
0191 780f       |x   |		Jump	0x1a1								; case 0x3
0192 7815       |x   |		Jump	0x1a8								; case 0x4
0193 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x2 = 0x193,0x3
0194 00da       |    |		Load_Top	At_Offset_2
0195 e00a       |    |		Load	0x0,0xa
0196 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0197 e00b       |    |		Load	0x0,0xb
0198 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0199 7814       |x   |		Jump	0x1ae
019a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x3 = 0x19a,0x4
019b 00da       |    |		Load_Top	At_Offset_2
019c e00a       |    |		Load	0x0,0xa
019d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
019e e00b       |    |		Load	0x0,0xb
019f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01a0 780d       |x   |		Jump	0x1ae
01a1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x4 = 0x1a1,0x5
01a2 00da       |    |		Load_Top	At_Offset_2
01a3 e00a       |    |		Load	0x0,0xa
01a4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01a5 e00b       |    |		Load	0x0,0xb
01a6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01a7 7806       |x   |		Jump	0x1ae
01a8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x5 = 0x1a8,0x6
01a9 00da       |    |		Load_Top	At_Offset_2
01aa e00a       |    |		Load	0x0,0xa
01ab 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01ac e00b       |    |		Load	0x0,0xb
01ad 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01ae 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x6 = 0x1ae,0x7
01af e00a       |    |		Load	0x0,0xa
01b0 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01b1 c402       |    |		Store	0x2,0x2
01b2 00c9       |    |		Action	Pop_Auxiliary_Loop
01b3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x7 = 0x1b3,0x1
01b4 e00a       |    |		Load	0x0,0xa
01b5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01b6 6fd3       |o   |		Jump_Zero	0x18a
01b7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc = .DEBUG	0x01bb,0x05aa,0x0801,0x0002,0x0058,0x5d05,0x0000,0x0118
													; Debug Table 0xc.0x0 = 0x1bb,0x1
01bc e7fe       |    |		Load	0x3,-0x2
01bd e7ff       |    |		Load	0x3,-0x1
01be e006       |    |		Load	0x0,0x6
01bf 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01c0 85fe       |    |		Call	0x2,-0x2
01c1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01c2 0000 0000  |    |		.BLANK	0000[0x6]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d4       |    |		.CONST	0x01d4								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0004       |    |		.CONST	0x0004								; Number of locals
01cb			INIT_01c8:
01cb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xd = .DEBUG	0x01cb,0x05ae,0x0001,0x0000,0x0058,0x5d05,0x0000,0x024e
													; Debug Table 0xd.0x0 = 0x1cb,0xffff
01cc e002       |    |		Load	0x0,0x2								; Debug Table 0xd.0x1 = 0x1cc,0xfffe
01cd 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01ce 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
01cf 02c7       |    |		Declare_Variable	Any
01d0 00d8       |    |		Load_Top	At_Offset_0
01d1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d2 e002       |    |		Load	0x0,0x2								; Debug Table 0xd.0x2 = 0x1d2,0xfffd
01d3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d4			BODY_01c8:
01d4 e002       |    |		Load	0x0,0x2								; Debug Table 0xd.0x3 = 0x1d4,0x1
01d5 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01d6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01d7 e7ff       |    |		Load	0x3,-0x1
01d8 e002       |    |		Load	0x0,0x2
01d9 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
01da 012e       | .  |		Execute	Any,Not_Equal
01db 6801       |h   |		Jump_Zero	0x1dd
01dc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xd.0x4 = 0x1dc,0x2
01dd 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x5 = 0x1dd,0x3
01de e7ff       |    |		Load	0x3,-0x1
01df e002       |    |		Load	0x0,0x2
01e0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01e1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01e2 e002       |    |		Load	0x0,0x2
01e3 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
01e4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01e5 6830       |h0  |		Jump_Zero	0x216
01e6 e002       |    |		Load	0x0,0x2								; Debug Table 0xd.0x6 = 0x1e6,0x4
01e7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01e8 00da       |    |		Load_Top	At_Offset_2
01e9 0120       |    |		Execute	Any,Is_Value
01ea 6804       |h   |		Jump_Zero	0x1ef
01eb e002       |    |		Load	0x0,0x2
01ec 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01ed 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
01ee 7801       |x   |		Jump	0x1f0
01ef 00da       |    |		Load_Top	At_Offset_2
01f0 e002       |    |		Load	0x0,0x2
01f1 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01f2 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
01f3 61a4       |a   |		Indirect_Literal	Discrete,0x398,{0x00000000, 0x00004000}
01f4 4801       |H   |		Short_Literal	0x1
01f5 4800       |H   |		Short_Literal	0x0
01f6 4800       |H   |		Short_Literal	0x0
01f7 e7fe       |    |		Load	0x3,-0x2
01f8 0217       |    |		Execute	Heap_Access,All_Reference
01f9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01fa 4801       |H   |		Short_Literal	0x1
01fb e7ff       |    |		Load	0x3,-0x1
01fc e002       |    |		Load	0x0,0x2
01fd 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01fe 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01ff e002       |    |		Load	0x0,0x2
0200 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0201 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0202 c602       |    |		Store	0x3,0x2
0203 c603       |    |		Store	0x3,0x3
0204 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0205 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0x7 = 0x205,0x5
0206 0092 03aa  |    |		Action	Push_String_Extended,0x3aa					; "Couldn't open ada unit while looking for dependents"
0208 e7fe       |    |		Load	0x3,-0x2
0209 00db       |    |		Load_Top	At_Offset_3
020a e004       |    |		Load	0x0,0x4
020b 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
020c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x8 = 0x20c,0x6
020d e002       |    |		Load	0x0,0x2
020e 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
020f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0210 6801       |h   |		Jump_Zero	0x212
0211 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xd.0x9 = 0x211,0x7
0212 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0xa = 0x212,0x8
0213 840b       |    |		Call	0x2,0xb
0214 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0xb = 0x214,0x9
0215 840c       |    |		Call	0x2,0xc
0216 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0217 0000       |    |		.XXX[0x1]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0232       | 2  |		.CONST	0x0232								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0006       |    |		.CONST	0x0006								; Number of locals
021b			INIT_0218:
021b e006       |    |		Load	0x0,0x6								; Debug Table 0xe = .DEBUG	0x021b,0x05c8,0x0001,0x0000,0x0058,0x5d05,0x0000,0x0266
													; Debug Table 0xe.0x0 = 0x21b,0xffff
021c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
021d 02c7       |    |		Declare_Variable	Any
021e 00d8       |    |		Load_Top	At_Offset_0
021f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0220 e002       |    |		Load	0x0,0x2								; Debug Table 0xe.0x1 = 0x220,0xfffe
0221 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0222 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0223 02c7       |    |		Declare_Variable	Any
0224 00d8       |    |		Load_Top	At_Offset_0
0225 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0226 e002       |    |		Load	0x0,0x2								; Debug Table 0xe.0x2 = 0x226,0xfffd
0227 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0228 02c7       |    |		Declare_Variable	Any
0229 00d8       |    |		Load_Top	At_Offset_0
022a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
022b e002       |    |		Load	0x0,0x2								; Debug Table 0xe.0x3 = 0x22b,0xfffc
022c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
022d 02c7       |    |		Declare_Variable	Any
022e 00d8       |    |		Load_Top	At_Offset_0
022f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0230 e002       |    |		Load	0x0,0x2								; Debug Table 0xe.0x4 = 0x230,0xfffb
0231 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0232			BODY_0218:
0232 e002       |    |		Load	0x0,0x2								; Debug Table 0xe.0x5 = 0x232,0x1
0233 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0234 00da       |    |		Load_Top	At_Offset_2
0235 0120       |    |		Execute	Any,Is_Value
0236 6803       |h   |		Jump_Zero	0x23a
0237 e002       |    |		Load	0x0,0x2
0238 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0239 7801       |x   |		Jump	0x23b
023a 00da       |    |		Load_Top	At_Offset_2
023b 615c       |a\  |		Indirect_Literal	Discrete,0x398,{0x00000000, 0x00004000}
023c e5fe       |    |		Load	0x2,-0x2
023d 0217       |    |		Execute	Heap_Access,All_Reference
023e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
023f e7ff       |    |		Load	0x3,-0x1
0240 e002       |    |		Load	0x0,0x2
0241 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0242 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0243 c605       |    |		Store	0x3,0x5
0244 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0245 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x6 = 0x245,0x2
0246 7037       |p7  |		Jump_Nonzero	0x27e
0247 e002       |    |		Load	0x0,0x2								; Debug Table 0xe.0x7 = 0x247,0x3
0248 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0249 e603       |    |		Load	0x3,0x3
024a 0120       |    |		Execute	Any,Is_Value
024b 6804       |h   |		Jump_Zero	0x250
024c e002       |    |		Load	0x0,0x2
024d 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
024e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
024f 7801       |x   |		Jump	0x251
0250 e603       |    |		Load	0x3,0x3
0251 00db       |    |		Load_Top	At_Offset_3
0252 e002       |    |		Load	0x0,0x2
0253 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0254 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0255 c603       |    |		Store	0x3,0x3
0256 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0257 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x8 = 0x257,0x4
0258 0092 03ab  |    |		Action	Push_String_Extended,0x3ab					; "Internal Error - Couldn't get world while checking dependents "
025a e5fe       |    |		Load	0x2,-0x2
025b 00db       |    |		Load_Top	At_Offset_3
025c e004       |    |		Load	0x0,0x4
025d 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
025e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x9 = 0x25e,0x5
025f e002       |    |		Load	0x0,0x2
0260 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0261 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0262 c604       |    |		Store	0x3,0x4
0263 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe.0xa = 0x263,0x6
0264 00db       |    |		Load_Top	At_Offset_3
0265 e006       |    |		Load	0x0,0x6
0266 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0267 6810       |h   |		Jump_Zero	0x278
0268 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe.0xb = 0x268,0x7
0269 00db       |    |		Load_Top	At_Offset_3
026a e006       |    |		Load	0x0,0x6
026b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
026c c602       |    |		Store	0x3,0x2
026d e602       |    |		Load	0x3,0x2								; Debug Table 0xe.0xc = 0x26d,0x8
026e e402       |    |		Load	0x2,0x2
026f e006       |    |		Load	0x0,0x6
0270 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0271 7005       |p   |		Jump_Nonzero	0x277
0272 e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0xd = 0x272,0x9
0273 e602       |    |		Load	0x3,0x2
0274 e006       |    |		Load	0x0,0x6
0275 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0276 c403       |    |		Store	0x2,0x3
0277 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0278 e404       |    |		Load	0x2,0x4								; Debug Table 0xe.0xe = 0x278,0xa
0279 00da       |    |		Load_Top	At_Offset_2
027a e007       |    |		Load	0x0,0x7
027b 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
027c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
027d c404       |    |		Store	0x2,0x4
027e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
027f 0000       |    |		.XXX[0x1]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 02a5       |    |		.CONST	0x02a5								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0009       |    |		.CONST	0x0009								; Number of locals
0283			INIT_0280:
0283 e006       |    |		Load	0x0,0x6								; Debug Table 0xf = .DEBUG	0x0283,0x05e8,0x0001,0x0000,0x0058,0x5d05,0x0000,0x0301
													; Debug Table 0xf.0x0 = 0x283,0xffff
0284 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0285 02c7       |    |		Declare_Variable	Any
0286 00d8       |    |		Load_Top	At_Offset_0
0287 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0288 e00c       |    |		Load	0x0,0xc								; Debug Table 0xf.0x1 = 0x288,0xfffe
0289 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
028a 02c7       |    |		Declare_Variable	Any
028b 00d8       |    |		Load_Top	At_Offset_0
028c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028d e002       |    |		Load	0x0,0x2								; Debug Table 0xf.0x2 = 0x28d,0xfffd
028e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
028f 02ff       |    |		Declare_Variable	Variant_Record
0290 00d8       |    |		Load_Top	At_Offset_0
0291 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0292 e002       |    |		Load	0x0,0x2								; Debug Table 0xf.0x3 = 0x292,0xfffc
0293 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0294 02c7       |    |		Declare_Variable	Any
0295 00d8       |    |		Load_Top	At_Offset_0
0296 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0297 e002       |    |		Load	0x0,0x2								; Debug Table 0xf.0x4 = 0x297,0xfffb
0298 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0299 02c7       |    |		Declare_Variable	Any
029a 00d8       |    |		Load_Top	At_Offset_0
029b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
029c e002       |    |		Load	0x0,0x2								; Debug Table 0xf.0x5 = 0x29c,0xfffa
029d 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
029e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
029f 02c7       |    |		Declare_Variable	Any
02a0 00d8       |    |		Load_Top	At_Offset_0
02a1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02a2 e002       |    |		Load	0x0,0x2								; Debug Table 0xf.0x6 = 0x2a2,0xfff9
02a3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02a4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf.0x7 = 0x2a4,0xfff8
02a5			BODY_0280:
02a5 e009       |    |		Load	0x0,0x9								; Debug Table 0xf.0x8 = 0x2a5,0x1
02a6 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02a7 e5fe       |    |		Load	0x2,-0x2
02a8 0217       |    |		Execute	Heap_Access,All_Reference
02a9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02aa e7ff       |    |		Load	0x3,-0x1
02ab e00c       |    |		Load	0x0,0xc
02ac 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02ad c603       |    |		Store	0x3,0x3
02ae 00cf       |    |		Action	Mark_Auxiliary
02af 781f       |x   |		Jump	0x2cf
02b0 e603       |    |		Load	0x3,0x3								; Debug Table 0xf.0x9 = 0x2b0,0x3
02b1 e00c       |    |		Load	0x0,0xc
02b2 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02b3 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
02b4 e002       |    |		Load	0x0,0x2								; Debug Table 0xf.0xa = 0x2b4,0x4
02b5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02b6 e604       |    |		Load	0x3,0x4
02b7 00db       |    |		Load_Top	At_Offset_3
02b8 e002       |    |		Load	0x0,0x2
02b9 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02ba 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02bb 00d1       |    |		Pop_Control	Pop_Count_1
02bc 005b       | [  |		Store_Top	Discrete,At_Offset_3
02bd 0092 03ac  |    |		Action	Push_String_Extended,0x3ac					; "Internal Error - Couldn't get version for dependent ada unit "
													; Debug Table 0xf.0xb = 0x2bd,0x5
02bf 00da       |    |		Load_Top	At_Offset_2
02c0 e002       |    |		Load	0x0,0x2
02c1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02c2 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
02c3 01cc       |    |		Execute	Vector,Catenate
02c4 e5fe       |    |		Load	0x2,-0x2
02c5 e608       |    |		Load	0x3,0x8
02c6 e004       |    |		Load	0x0,0x4
02c7 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
02c8 e604       |    |		Load	0x3,0x4								; Debug Table 0xf.0xc = 0x2c8,0x6
02c9 840a       |    |		Call	0x2,0xa
02ca e603       |    |		Load	0x3,0x3								; Debug Table 0xf.0xd = 0x2ca,0x7
02cb e00c       |    |		Load	0x0,0xc
02cc 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02cd c603       |    |		Store	0x3,0x3
02ce 00c9       |    |		Action	Pop_Auxiliary_Loop
02cf e603       |    |		Load	0x3,0x3								; Debug Table 0xf.0xe = 0x2cf,0x2
02d0 e00c       |    |		Load	0x0,0xc
02d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02d2 6fdd       |o   |		Jump_Zero	0x2b0
02d3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02d4 0000 0000  |    |		.BLANK	0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02e9       |    |		.CONST	0x02e9								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0004       |    |		.CONST	0x0004								; Number of locals
02db			INIT_02d8:
02db 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x10 = .DEBUG	0x02db,0x0608,0x0001,0x0000,0x0058,0x5d05,0x0000,0x0394
													; Debug Table 0x10.0x0 = 0x2db,0xffff
02dc 00db       |    |		Load_Top	At_Offset_3
02dd 4976       |Iv  |		Short_Literal	0x176
02de 00eb       |    |		Load_Encached	Diana_Cache
02df 0098       |    |		Execute	Package,Field_Read_Dynamic
02e0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02e1 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02e2 e00d       |    |		Load	0x0,0xd								; Debug Table 0x10.0x1 = 0x2e2,0xfffe
02e3 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
02e4 e002       |    |		Load	0x0,0x2								; Debug Table 0x10.0x2 = 0x2e4,0xfffd
02e5 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02e6 02ff       |    |		Declare_Variable	Variant_Record
02e7 00d8       |    |		Load_Top	At_Offset_0
02e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02e9			BODY_02d8:
02e9 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x10.0x3 = 0x2e9,0x1
02ea 0217       |    |		Execute	Heap_Access,All_Reference
02eb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02ec e009       |    |		Load	0x0,0x9
02ed 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02ee e602       |    |		Load	0x3,0x2
02ef 4806       |H   |		Short_Literal	0x6
02f0 e00d       |    |		Load	0x0,0xd
02f1 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02f2 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
02f3 00cf       |    |		Action	Mark_Auxiliary
02f4 780f       |x   |		Jump	0x304
02f5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x4 = 0x2f5,0x3
02f6 e00d       |    |		Load	0x0,0xd
02f7 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
02f8 00da       |    |		Load_Top	At_Offset_2
02f9 016d       | m  |		Execute	Variant_Record,Structure_Write
02fa 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x5 = 0x2fa,0x4
02fb 8219       |    |		Call	0x1,0x19
02fc 6802       |h   |		Jump_Zero	0x2ff
02fd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x6 = 0x2fd,0x5
02fe 840a       |    |		Call	0x2,0xa
02ff 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x7 = 0x2ff,0x6
0300 e00d       |    |		Load	0x0,0xd
0301 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0302 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0303 00c9       |    |		Action	Pop_Auxiliary_Loop
0304 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x8 = 0x304,0x2
0305 e00d       |    |		Load	0x0,0xd
0306 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0307 6fed       |o   |		Jump_Zero	0x2f5
0308 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0309 0000 0000  |    |		.BLANK	0000[0x7]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11 = .DEBUG	0x0313,0x061c,0x0001,0x0000,0x0058,0x5d05,0x0000,0x047d
													; Debug Table 0x11.0x0 = 0x313,0x1
0314 e402       |    |		Load	0x2,0x2
0315 e006       |    |		Load	0x0,0x6
0316 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0317 6801       |h   |		Jump_Zero	0x319
0318 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x11.0x1 = 0x318,0x2
0319 e402       |    |		Load	0x2,0x2								; Debug Table 0x11.0x2 = 0x319,0x3
031a 00db       |    |		Load_Top	At_Offset_3
031b e006       |    |		Load	0x0,0x6
031c 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
031d c402       |    |		Store	0x2,0x2
031e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x3 = 0x31e,0x4
031f e7fe       |    |		Load	0x3,-0x2
0320 e7ff       |    |		Load	0x3,-0x1
0321 e008       |    |		Load	0x0,0x8
0322 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0323 480e       |H   |		Short_Literal	0xe
0324 4802       |H   |		Short_Literal	0x2
0325 0099       |    |		Action	Reference_Dynamic
0326 480f       |H   |		Short_Literal	0xf
0327 4802       |H   |		Short_Literal	0x2
0328 0099       |    |		Action	Reference_Dynamic
0329 8214       |    |		Call	0x1,0x14
032a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
032b 0000 0000  |    |		.BLANK	0000[0x5]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0345       | E  |		.CONST	0x0345								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0005       |    |		.CONST	0x0005								; Number of locals
0333			INIT_0330:
0333 e00e       |    |		Load	0x0,0xe								; Debug Table 0x12 = .DEBUG	0x0333,0x0626,0x0001,0x0000,0x0058,0x5d05,0x0000,0x04c2
													; Debug Table 0x12.0x0 = 0x333,0xffff
0334 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0335 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0336 02c7       |    |		Declare_Variable	Any
0337 00d8       |    |		Load_Top	At_Offset_0
0338 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0339 e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x1 = 0x339,0xfffe
033a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
033b 02c7       |    |		Declare_Variable	Any
033c 00d8       |    |		Load_Top	At_Offset_0
033d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
033e e00a       |    |		Load	0x0,0xa								; Debug Table 0x12.0x2 = 0x33e,0xfffd
033f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0340 02c7       |    |		Declare_Variable	Any
0341 00d8       |    |		Load_Top	At_Offset_0
0342 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0343 e00d       |    |		Load	0x0,0xd								; Debug Table 0x12.0x3 = 0x343,0xfffc
0344 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0345			BODY_0330:
0345 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x4 = 0x345,0x1
0346 4800       |H   |		Short_Literal	0x0
0347 4800       |H   |		Short_Literal	0x0
0348 e604       |    |		Load	0x3,0x4
0349 e5fe       |    |		Load	0x2,-0x2
034a 0217       |    |		Execute	Heap_Access,All_Reference
034b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
034c e5fe       |    |		Load	0x2,-0x2
034d 0217       |    |		Execute	Heap_Access,All_Reference
034e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
034f e00e       |    |		Load	0x0,0xe
0350 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0351 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0352 c602       |    |		Store	0x3,0x2
0353 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x5 = 0x353,0x2
0354 e5fe       |    |		Load	0x2,-0x2
0355 e7ff       |    |		Load	0x3,-0x1
0356 e006       |    |		Load	0x0,0x6
0357 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0358 e602       |    |		Load	0x3,0x2
0359 e00e       |    |		Load	0x0,0xe
035a 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
035b 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
035c c603       |    |		Store	0x3,0x3
035d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x6 = 0x35d,0x3
035e e00e       |    |		Load	0x0,0xe
035f 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0360 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0361 7012       |p   |		Jump_Nonzero	0x374
0362 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x7 = 0x362,0x4
0363 e602       |    |		Load	0x3,0x2
0364 e00e       |    |		Load	0x0,0xe
0365 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0366 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0367 821a       |    |		Call	0x1,0x1a
0368 e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x8 = 0x368,0x5
0369 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
036a e5fe       |    |		Load	0x2,-0x2
036b e7ff       |    |		Load	0x3,-0x1
036c e006       |    |		Load	0x0,0x6
036d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
036e 0092 03ad  |    |		Action	Push_String_Extended,0x3ad					; "Unable to locate program library for view <1>"
0370 e5fe       |    |		Load	0x2,-0x2
0371 e004       |    |		Load	0x0,0x4
0372 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0373 7805       |x   |		Jump	0x379
0374 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x9 = 0x374,0x6
0375 e002       |    |		Load	0x0,0x2
0376 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0377 6801       |h   |		Jump_Zero	0x379
0378 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x12.0xa = 0x378,0x7
0379 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0xb = 0x379,0x8
037a 0217       |    |		Execute	Heap_Access,All_Reference
037b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
037c e5fe       |    |		Load	0x2,-0x2
037d 0217       |    |		Execute	Heap_Access,All_Reference
037e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
037f e603       |    |		Load	0x3,0x3
0380 e002       |    |		Load	0x0,0x2
0381 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
0382 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0383 4806       |H   |		Short_Literal	0x6
0384 e00d       |    |		Load	0x0,0xd
0385 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
0386 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0387 00cf       |    |		Action	Mark_Auxiliary
0388 7809       |x   |		Jump	0x392
0389 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0xc = 0x389,0xa
038a e00d       |    |		Load	0x0,0xd
038b 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
038c 840a       |    |		Call	0x2,0xa
038d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0xd = 0x38d,0xb
038e e00d       |    |		Load	0x0,0xd
038f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0390 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0391 00c9       |    |		Action	Pop_Auxiliary_Loop
0392 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0xe = 0x392,0x9
0393 e00d       |    |		Load	0x0,0xd
0394 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0395 6ff3       |o   |		Jump_Zero	0x389
0396 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0397 0000       |    |		.XXX[0x1]
0398 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
039c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000048b}
03a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00585d05}
03a4 ; --------------------------------------------------------------------------------------
03a4 ; STRING TABLE
03a4 ; --------------------------------------------------------------------------------------
03a4 0016       |    |		.STRTAB	0x0016->0x03af							; "referencers"
03a5 001f       |    |		.STRTAB	0x001f->0x03b4							; " is not a "
03a6 0027       | '  |		.STRTAB	0x0027->0x03b9							; " object"
03a7 002c       | ,  |		.STRTAB	0x002c->0x03bd							; "Finding Ada referencers of "
03a8 0045       | E  |		.STRTAB	0x0045->0x03ca							; " failed"
03a9 004a       | J  |		.STRTAB	0x004a->0x03ce							; "Internal Error - Cannot unfreeze the referencers object"
03aa 007f       |    |		.STRTAB	0x007f->0x03e9							; "Couldn't open ada unit while looking for dependents"
03ab 00b0       |    |		.STRTAB	0x00b0->0x0403							; "Internal Error - Couldn't get world while checking dependents "
03ac 00ec       |    |		.STRTAB	0x00ec->0x0422							; "Internal Error - Couldn't get version for dependent ada unit "
03ad 0127       | '  |		.STRTAB	0x0127->0x0440							; "Unable to locate program library for view <1>"
03ae 0152       | R  |		.STREND 0x0152->0x0457
03af 7265 6665  |refe|		.STRTAB_STRINGS
0457 0000       |    |		.XXX[0x1]
0458 ; --------------------------------------------------------------------------------------
0458 ; Debug Table
0458 ; --------------------------------------------------------------------------------------
0458 0003 0013  |    |		.CONST	0x0003,0x0013
045a 000b 04f2  |    |		.DEBUG	0x000b,0x04f2,0x8000,0x0000,0x0058,0x5a85,0x0000,0x000d
0462 0028 0512  | (  |		.DEBUG	0x0028,0x0512,0x8000,0x0000,0x0058,0x5d05,0x0000,0x0019
046a 004b 0534  | K 4|		.DEBUG	0x004b,0x0534,0x0002,0x0000,0x0058,0x5a85,0x0000,0x002b
0472 006b 053c  | k <|		.DEBUG	0x006b,0x053c,0x0002,0x0000,0x0058,0x5a85,0x0000,0x003a
047a 007b 0540  | { @|		.DEBUG	0x007b,0x0540,0x0001,0x0000,0x0058,0x5a85,0x0000,0x0049
0482 0093 0544  |   D|		.DEBUG	0x0093,0x0544,0x0001,0x0000,0x0058,0x5a85,0x0000,0x005d
048a 00a3 0548  |   H|		.DEBUG	0x00a3,0x0548,0x2801,0x0002,0x0058,0x5a85,0x0000,0x006f
0492 00c3 0550  |   P|		.DEBUG	0x00c3,0x0550,0x0001,0x0000,0x0058,0x5a85,0x0000,0x008b
049a 00d3 0554  |   T|		.DEBUG	0x00d3,0x0554,0x0001,0x0000,0x0058,0x5a85,0x0000,0x009d
04a2 0143 0582  | C  |		.DEBUG	0x0143,0x0582,0x0001,0x0000,0x0058,0x5a85,0x0000,0x00b9
04aa 0163 058a  | c  |		.DEBUG	0x0163,0x058a,0x0002,0x0000,0x0058,0x5d05,0x0000,0x014e
04b2 0183 0598  |    |		.DEBUG	0x0183,0x0598,0x0001,0x0000,0x0058,0x5d05,0x0000,0x019b
04ba 01bb 05aa  |    |		.DEBUG	0x01bb,0x05aa,0x0801,0x0002,0x0058,0x5d05,0x0000,0x0118
04c2 01cb 05ae  |    |		.DEBUG	0x01cb,0x05ae,0x0001,0x0000,0x0058,0x5d05,0x0000,0x024e
04ca 021b 05c8  |    |		.DEBUG	0x021b,0x05c8,0x0001,0x0000,0x0058,0x5d05,0x0000,0x0266
04d2 0283 05e8  |    |		.DEBUG	0x0283,0x05e8,0x0001,0x0000,0x0058,0x5d05,0x0000,0x0301
04da 02db 0608  |    |		.DEBUG	0x02db,0x0608,0x0001,0x0000,0x0058,0x5d05,0x0000,0x0394
04e2 0313 061c  |    |		.DEBUG	0x0313,0x061c,0x0001,0x0000,0x0058,0x5d05,0x0000,0x047d
04ea 0333 0626  | 3 &|		.DEBUG	0x0333,0x0626,0x0001,0x0000,0x0058,0x5d05,0x0000,0x04c2
04f2 ; --------------------------------------------------------------------------------------
04f2 ; Debug3 Subtable 0x0
04f2 ; --------------------------------------------------------------------------------------
04f2 000f 0000  |    |		.DBG3TAB	0x000f,0x0000
04f4 000b ffff  |    |		.CONST	0x000b,0xffff
04f6 000c fffe  |    |		.CONST	0x000c,0xfffe
04f8 000d fffd  |    |		.CONST	0x000d,0xfffd
04fa 000e fffc  |    |		.CONST	0x000e,0xfffc
04fc 0011 fffb  |    |		.CONST	0x0011,0xfffb
04fe 0014 fffa  |    |		.CONST	0x0014,0xfffa
0500 0017 fff9  |    |		.CONST	0x0017,0xfff9
0502 0019 fff8  |    |		.CONST	0x0019,0xfff8
0504 001b fff7  |    |		.CONST	0x001b,0xfff7
0506 001d fff6  |    |		.CONST	0x001d,0xfff6
0508 001f fff5  |    |		.CONST	0x001f,0xfff5
050a 0021 fff4  | !  |		.CONST	0x0021,0xfff4
050c 0023 fff3  | #  |		.CONST	0x0023,0xfff3
050e 0025 fff2  | %  |		.CONST	0x0025,0xfff2
0510 0027 fff1  | '  |		.CONST	0x0027,0xfff1
0512 ; --------------------------------------------------------------------------------------
0512 ; Debug3 Subtable 0x1
0512 ; --------------------------------------------------------------------------------------
0512 0010 0000  |    |		.DBG3TAB	0x0010,0x0000
0514 0028 ffff  | (  |		.CONST	0x0028,0xffff
0516 0029 fffe  | )  |		.CONST	0x0029,0xfffe
0518 002a fffd  | *  |		.CONST	0x002a,0xfffd
051a 002b fffc  | +  |		.CONST	0x002b,0xfffc
051c 002c fffb  | ,  |		.CONST	0x002c,0xfffb
051e 002d fffa  | -  |		.CONST	0x002d,0xfffa
0520 002f fff9  | /  |		.CONST	0x002f,0xfff9
0522 0031 fff8  | 1  |		.CONST	0x0031,0xfff8
0524 0033 fff7  | 3  |		.CONST	0x0033,0xfff7
0526 0035 fff6  | 5  |		.CONST	0x0035,0xfff6
0528 0037 fff5  | 7  |		.CONST	0x0037,0xfff5
052a 0039 fff4  | 9  |		.CONST	0x0039,0xfff4
052c 003b fff3  | ;  |		.CONST	0x003b,0xfff3
052e 003d fff2  | =  |		.CONST	0x003d,0xfff2
0530 003f fff1  | ?  |		.CONST	0x003f,0xfff1
0532 0041 fff0  | A  |		.CONST	0x0041,0xfff0
0534 ; --------------------------------------------------------------------------------------
0534 ; Debug3 Subtable 0x2
0534 ; --------------------------------------------------------------------------------------
0534 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0536 004b 0001  | K  |		.CONST	0x004b,0x0001
0538 004f 0002  | O  |		.CONST	0x004f,0x0002
053a 005e 0003  | ^  |		.CONST	0x005e,0x0003
053c ; --------------------------------------------------------------------------------------
053c ; Debug3 Subtable 0x3
053c ; --------------------------------------------------------------------------------------
053c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
053e 006b 0001  | k  |		.CONST	0x006b,0x0001
0540 ; --------------------------------------------------------------------------------------
0540 ; Debug3 Subtable 0x4
0540 ; --------------------------------------------------------------------------------------
0540 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0542 007b 0001  | {  |		.CONST	0x007b,0x0001
0544 ; --------------------------------------------------------------------------------------
0544 ; Debug3 Subtable 0x5
0544 ; --------------------------------------------------------------------------------------
0544 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0546 0093 0001  |    |		.CONST	0x0093,0x0001
0548 ; --------------------------------------------------------------------------------------
0548 ; Debug3 Subtable 0x6
0548 ; --------------------------------------------------------------------------------------
0548 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
054a 00a3 ffff  |    |		.CONST	0x00a3,0xffff
054c 00a5 fffe  |    |		.CONST	0x00a5,0xfffe
054e 00af 0001  |    |		.CONST	0x00af,0x0001
0550 ; --------------------------------------------------------------------------------------
0550 ; Debug3 Subtable 0x7
0550 ; --------------------------------------------------------------------------------------
0550 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0552 00c3 0001  |    |		.CONST	0x00c3,0x0001
0554 ; --------------------------------------------------------------------------------------
0554 ; Debug3 Subtable 0x8
0554 ; --------------------------------------------------------------------------------------
0554 000d 0009  |    |		.DBG3TAB	0x000d,0x0009
0556 00d3 ffff  |    |		.CONST	0x00d3,0xffff
0558 00d5 fffe  |    |		.CONST	0x00d5,0xfffe
055a 00d7 fffd  |    |		.CONST	0x00d7,0xfffd
055c 00da fffc  |    |		.CONST	0x00da,0xfffc
055e 00dc fffb  |    |		.CONST	0x00dc,0xfffb
0560 00e6 fffa  |    |		.CONST	0x00e6,0xfffa
0562 00e8 fff9  |    |		.CONST	0x00e8,0xfff9
0564 00ea fff8  |    |		.CONST	0x00ea,0xfff8
0566 00ec fff7  |    |		.CONST	0x00ec,0xfff7
0568 00f0 fff6  |    |		.CONST	0x00f0,0xfff6
056a 00f2 fff5  |    |		.CONST	0x00f2,0xfff5
056c 00fb fff4  |    |		.CONST	0x00fb,0xfff4
056e 00ff fff3  |    |		.CONST	0x00ff,0xfff3
0570 0101 0001  |    |		.CONST	0x0101,0x0001
0572 0107 0002  |    |		.CONST	0x0107,0x0002
0574 010a 0003  |    |		.CONST	0x010a,0x0003
0576 0110 0004  |    |		.CONST	0x0110,0x0004
0578 011a 0005  |    |		.CONST	0x011a,0x0005
057a 0131 0006  | 1  |		.CONST	0x0131,0x0006
057c 0136 0007  | 6  |		.CONST	0x0136,0x0007
057e 0138 0008  | 8  |		.CONST	0x0138,0x0008
0580 013a 0009  | :  |		.CONST	0x013a,0x0009
0582 ; --------------------------------------------------------------------------------------
0582 ; Debug3 Subtable 0x9
0582 ; --------------------------------------------------------------------------------------
0582 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0584 0143 ffff  | C  |		.CONST	0x0143,0xffff
0586 014d 0001  | M  |		.CONST	0x014d,0x0001
0588 0152 0002  | R  |		.CONST	0x0152,0x0002
058a ; --------------------------------------------------------------------------------------
058a ; Debug3 Subtable 0xa
058a ; --------------------------------------------------------------------------------------
058a 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
058c 0163 ffff  | c  |		.CONST	0x0163,0xffff
058e 0166 fffe  | f  |		.CONST	0x0166,0xfffe
0590 0168 0001  | h  |		.CONST	0x0168,0x0001
0592 0176 0002  | v  |		.CONST	0x0176,0x0002
0594 0178 0003  | x  |		.CONST	0x0178,0x0003
0596 017b 0004  | {  |		.CONST	0x017b,0x0004
0598 ; --------------------------------------------------------------------------------------
0598 ; Debug3 Subtable 0xb
0598 ; --------------------------------------------------------------------------------------
0598 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
059a 0183 ffff  |    |		.CONST	0x0183,0xffff
059c 018a 0002  |    |		.CONST	0x018a,0x0002
059e 0193 0003  |    |		.CONST	0x0193,0x0003
05a0 019a 0004  |    |		.CONST	0x019a,0x0004
05a2 01a1 0005  |    |		.CONST	0x01a1,0x0005
05a4 01a8 0006  |    |		.CONST	0x01a8,0x0006
05a6 01ae 0007  |    |		.CONST	0x01ae,0x0007
05a8 01b3 0001  |    |		.CONST	0x01b3,0x0001
05aa ; --------------------------------------------------------------------------------------
05aa ; Debug3 Subtable 0xc
05aa ; --------------------------------------------------------------------------------------
05aa 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
05ac 01bb 0001  |    |		.CONST	0x01bb,0x0001
05ae ; --------------------------------------------------------------------------------------
05ae ; Debug3 Subtable 0xd
05ae ; --------------------------------------------------------------------------------------
05ae 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
05b0 01cb ffff  |    |		.CONST	0x01cb,0xffff
05b2 01cc fffe  |    |		.CONST	0x01cc,0xfffe
05b4 01d2 fffd  |    |		.CONST	0x01d2,0xfffd
05b6 01d4 0001  |    |		.CONST	0x01d4,0x0001
05b8 01dc 0002  |    |		.CONST	0x01dc,0x0002
05ba 01dd 0003  |    |		.CONST	0x01dd,0x0003
05bc 01e6 0004  |    |		.CONST	0x01e6,0x0004
05be 0205 0005  |    |		.CONST	0x0205,0x0005
05c0 020c 0006  |    |		.CONST	0x020c,0x0006
05c2 0211 0007  |    |		.CONST	0x0211,0x0007
05c4 0212 0008  |    |		.CONST	0x0212,0x0008
05c6 0214 0009  |    |		.CONST	0x0214,0x0009
05c8 ; --------------------------------------------------------------------------------------
05c8 ; Debug3 Subtable 0xe
05c8 ; --------------------------------------------------------------------------------------
05c8 0005 000a  |    |		.DBG3TAB	0x0005,0x000a
05ca 021b ffff  |    |		.CONST	0x021b,0xffff
05cc 0220 fffe  |    |		.CONST	0x0220,0xfffe
05ce 0226 fffd  | &  |		.CONST	0x0226,0xfffd
05d0 022b fffc  | +  |		.CONST	0x022b,0xfffc
05d2 0230 fffb  | 0  |		.CONST	0x0230,0xfffb
05d4 0232 0001  | 2  |		.CONST	0x0232,0x0001
05d6 0245 0002  | E  |		.CONST	0x0245,0x0002
05d8 0247 0003  | G  |		.CONST	0x0247,0x0003
05da 0257 0004  | W  |		.CONST	0x0257,0x0004
05dc 025e 0005  | ^  |		.CONST	0x025e,0x0005
05de 0263 0006  | c  |		.CONST	0x0263,0x0006
05e0 0268 0007  | h  |		.CONST	0x0268,0x0007
05e2 026d 0008  | m  |		.CONST	0x026d,0x0008
05e4 0272 0009  | r  |		.CONST	0x0272,0x0009
05e6 0278 000a  | x  |		.CONST	0x0278,0x000a
05e8 ; --------------------------------------------------------------------------------------
05e8 ; Debug3 Subtable 0xf
05e8 ; --------------------------------------------------------------------------------------
05e8 0008 0007  |    |		.DBG3TAB	0x0008,0x0007
05ea 0283 ffff  |    |		.CONST	0x0283,0xffff
05ec 0288 fffe  |    |		.CONST	0x0288,0xfffe
05ee 028d fffd  |    |		.CONST	0x028d,0xfffd
05f0 0292 fffc  |    |		.CONST	0x0292,0xfffc
05f2 0297 fffb  |    |		.CONST	0x0297,0xfffb
05f4 029c fffa  |    |		.CONST	0x029c,0xfffa
05f6 02a2 fff9  |    |		.CONST	0x02a2,0xfff9
05f8 02a4 fff8  |    |		.CONST	0x02a4,0xfff8
05fa 02a5 0001  |    |		.CONST	0x02a5,0x0001
05fc 02b0 0003  |    |		.CONST	0x02b0,0x0003
05fe 02b4 0004  |    |		.CONST	0x02b4,0x0004
0600 02bd 0005  |    |		.CONST	0x02bd,0x0005
0602 02c8 0006  |    |		.CONST	0x02c8,0x0006
0604 02ca 0007  |    |		.CONST	0x02ca,0x0007
0606 02cf 0002  |    |		.CONST	0x02cf,0x0002
0608 ; --------------------------------------------------------------------------------------
0608 ; Debug3 Subtable 0x10
0608 ; --------------------------------------------------------------------------------------
0608 0003 0006  |    |		.DBG3TAB	0x0003,0x0006
060a 02db ffff  |    |		.CONST	0x02db,0xffff
060c 02e2 fffe  |    |		.CONST	0x02e2,0xfffe
060e 02e4 fffd  |    |		.CONST	0x02e4,0xfffd
0610 02e9 0001  |    |		.CONST	0x02e9,0x0001
0612 02f5 0003  |    |		.CONST	0x02f5,0x0003
0614 02fa 0004  |    |		.CONST	0x02fa,0x0004
0616 02fd 0005  |    |		.CONST	0x02fd,0x0005
0618 02ff 0006  |    |		.CONST	0x02ff,0x0006
061a 0304 0002  |    |		.CONST	0x0304,0x0002
061c ; --------------------------------------------------------------------------------------
061c ; Debug3 Subtable 0x11
061c ; --------------------------------------------------------------------------------------
061c 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
061e 0313 0001  |    |		.CONST	0x0313,0x0001
0620 0318 0002  |    |		.CONST	0x0318,0x0002
0622 0319 0003  |    |		.CONST	0x0319,0x0003
0624 031e 0004  |    |		.CONST	0x031e,0x0004
0626 ; --------------------------------------------------------------------------------------
0626 ; Debug3 Subtable 0x12
0626 ; --------------------------------------------------------------------------------------
0626 0004 000b  |    |		.DBG3TAB	0x0004,0x000b
0628 0333 ffff  | 3  |		.CONST	0x0333,0xffff
062a 0339 fffe  | 9  |		.CONST	0x0339,0xfffe
062c 033e fffd  | >  |		.CONST	0x033e,0xfffd
062e 0343 fffc  | C  |		.CONST	0x0343,0xfffc
0630 0345 0001  | E  |		.CONST	0x0345,0x0001
0632 0353 0002  | S  |		.CONST	0x0353,0x0002
0634 035d 0003  | ]  |		.CONST	0x035d,0x0003
0636 0362 0004  | b  |		.CONST	0x0362,0x0004
0638 0368 0005  | h  |		.CONST	0x0368,0x0005
063a 0374 0006  | t  |		.CONST	0x0374,0x0006
063c 0378 0007  | x  |		.CONST	0x0378,0x0007
063e 0379 0008  | y  |		.CONST	0x0379,0x0008
0640 0389 000a  |    |		.CONST	0x0389,0x000a
0642 038d 000b  |    |		.CONST	0x038d,0x000b
0644 0392 0009  |    |		.CONST	0x0392,0x0009
0646 0000 0000  |    |		.BLANK	0000[0x1ba]