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

⟦3c1c8eee6⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0694fc

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 03a0       |    |		.CONST	0x03a0								; 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 8002       |    |		.CONST	0x8002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 007c       | |  |		.CONST	0x007c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0039       | 9  |		.CONST	0x0039								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1
000c 0129       | )  |		Execute	Any,Make_Visible
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 00c4       |    |		Action	Make_Default
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 00c4       |    |		Action	Make_Default
001b 00c4       |    |		Action	Make_Default
001c 00c4       |    |		Action	Make_Default
001d 00c4       |    |		Action	Make_Default
001e e002       |    |		Load	0x0,0x2
001f 0129       | )  |		Execute	Any,Make_Visible
0020 c216       |    |		Store	0x1,0x16
0021 e003       |    |		Load	0x0,0x3
0022 0129       | )  |		Execute	Any,Make_Visible
0023 c219       |    |		Store	0x1,0x19
0024 e004       |    |		Load	0x0,0x4
0025 0129       | )  |		Execute	Any,Make_Visible
0026 c20e       |    |		Store	0x1,0xe
0027 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated
0029 c21b       |    |		Store	0x1,0x1b
002a 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated
002c c21d       |    |		Store	0x1,0x1d
002d 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated
002f c21a       |    |		Store	0x1,0x1a
0030 00bf       |    |		Action	Accept_Activation
0031 e005       |    |		Load	0x0,0x5
0032 1928       | (  |		Execute	Package,Field_Reference,Field_Number 0x28
0033 00c6       |    |		Action	Check_Subprogram_Elaborated
0034 e006       |    |		Load	0x0,0x6
0035 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
0036 e006       |    |		Load	0x0,0x6
0037 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
0038 e006       |    |		Load	0x0,0x6
0039 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
003a e006       |    |		Load	0x0,0x6
003b 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
003c e006       |    |		Load	0x0,0x6
003d 191c       |    |		Execute	Package,Field_Reference,Field_Number 0x1c
003e e007       |    |		Load	0x0,0x7
003f e008       |    |		Load	0x0,0x8
0040 4800       |H   |		Short_Literal	0x0
0041 0007       |    |		Action	Break_Optional
0042 e005       |    |		Load	0x0,0x5
0043 1928       | (  |		Execute	Package,Field_Reference,Field_Number 0x28
0044 00c6       |    |		Action	Check_Subprogram_Elaborated
0045 e009       |    |		Load	0x0,0x9
0046 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
0047 e009       |    |		Load	0x0,0x9
0048 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
0049 e005       |    |		Load	0x0,0x5
004a 191b       |    |		Execute	Package,Field_Reference,Field_Number 0x1b
004b e005       |    |		Load	0x0,0x5
004c 191c       |    |		Execute	Package,Field_Reference,Field_Number 0x1c
004d e005       |    |		Load	0x0,0x5
004e 1927       | '  |		Execute	Package,Field_Reference,Field_Number 0x27
004f e00a       |    |		Load	0x0,0xa
0050 e00b       |    |		Load	0x0,0xb
0051 4800       |H   |		Short_Literal	0x0
0052 0007       |    |		Action	Break_Optional
0053 e005       |    |		Load	0x0,0x5
0054 1928       | (  |		Execute	Package,Field_Reference,Field_Number 0x28
0055 00c6       |    |		Action	Check_Subprogram_Elaborated
0056 e00c       |    |		Load	0x0,0xc
0057 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
0058 e00c       |    |		Load	0x0,0xc
0059 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
005a e005       |    |		Load	0x0,0x5
005b 191b       |    |		Execute	Package,Field_Reference,Field_Number 0x1b
005c e005       |    |		Load	0x0,0x5
005d 191c       |    |		Execute	Package,Field_Reference,Field_Number 0x1c
005e e005       |    |		Load	0x0,0x5
005f 1927       | '  |		Execute	Package,Field_Reference,Field_Number 0x27
0060 e00d       |    |		Load	0x0,0xd
0061 e00e       |    |		Load	0x0,0xe
0062 4800       |H   |		Short_Literal	0x0
0063 0007       |    |		Action	Break_Optional
0064 4800       |H   |		Short_Literal	0x0
0065 0093 026b  |   k|		push_full_address	INIT_0268
0067 02a0       |    |		Declare_Subprogram	Null_Subprogram
0068 038e       |    |		Declare_Type	Package,Defined
0069 0387       |    |		Declare_Variable	Package
006a e005       |    |		Load	0x0,0x5
006b e00f       |    |		Load	0x0,0xf
006c e010       |    |		Load	0x0,0x10
006d 4803       |H   |		Short_Literal	0x3
006e e237       | 7  |		Load	0x1,0x37
006f 020e       |    |		Execute	Module,Augment_Imports
0070 00d8       |    |		Load_Top	At_Offset_0
0071 020f       |    |		Execute	Module,Activate
0072 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 029d 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call
0078 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call
007a 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
007b 00c7       |    |		Action	Elaborate_Subprogram
007c			BODY_0008:
007c 00bc       |    |		Action	Signal_Activated
007d 00bb       |    |		Action	Signal_Completion
007e 0000 0000  |    |		.XXX[0x2]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 008f       |    |		.CONST	0x008f								; Address of begin
0081 00c7       |    |		.CONST	0x00c7								; Address of exception handler
0082 0003       |    |		.CONST	0x0003								; Number of locals
0083			INIT_0080:
0083 e011       |    |		Load	0x0,0x11
0084 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0085 02c7       |    |		Declare_Variable	Any
0086 4801       |H   |		Short_Literal	0x1
0087 e012       |    |		Load	0x0,0x12
0088 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0089 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
008a e5ff       |    |		Load	0x2,-0x1
008b e011       |    |		Load	0x0,0x11
008c 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
008d a402       |    |		Store_Unchecked	0x2,0x2
008e 00e1       |    |		Load_Encached	Boolean_Cache
008f			BODY_0080:
008f e012       |    |		Load	0x0,0x12
0090 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0091 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0092 e5ff       |    |		Load	0x2,-0x1
0093 e005       |    |		Load	0x0,0x5
0094 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0095 e237       | 7  |		Load	0x1,0x37
0096 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0097 00d9       |    |		Load_Top	At_Offset_1
0098 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0099 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
009a 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
009b 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
009c 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
009d 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
009e e005       |    |		Load	0x0,0x5
009f 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
00a0 0092 0320  |    |		Action	Push_String_Extended,0x320					; "Ada \x22with\x22"
00a2 0092 0321  |   !|		Action	Push_String_Extended,0x321					; "Ada units"
00a4 e237       | 7  |		Load	0x1,0x37
00a5 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00a6 00d9       |    |		Load_Top	At_Offset_1
00a7 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
00a8 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
00a9 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
00aa 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
00ab 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
00ac 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
00ad e005       |    |		Load	0x0,0x5
00ae 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
00af 0092 0322  |   "|		Action	Push_String_Extended,0x322					; "subsystem \x22import\x22"
00b1 0092 0323  |   #|		Action	Push_String_Extended,0x323					; "subsystems"
00b3 e237       | 7  |		Load	0x1,0x37
00b4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00b5 00d9       |    |		Load_Top	At_Offset_1
00b6 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
00b7 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
00b8 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
00b9 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
00ba 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
00bb 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
00bc e005       |    |		Load	0x0,0x5
00bd 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
00be 0092 0324  |   $|		Action	Push_String_Extended,0x324					; "library \x22import\x22"
00c0 0092 0325  |   %|		Action	Push_String_Extended,0x325					; "libraries"
00c2 e237       | 7  |		Load	0x1,0x37
00c3 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00c4 e005       |    |		Load	0x0,0x5
00c5 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00c6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00c7			TRAP_0080:
00c7 e005       |    |		Load	0x0,0x5
00c8 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
00c9 010f       |    |		Execute	Exception,Equal
00ca 6813       |h   |		Jump_Zero	0xde
00cb 00da       |    |		Load_Top	At_Offset_2
00cc e012       |    |		Load	0x0,0x12
00cd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ce 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
00cf 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00d0 00d9       |    |		Load_Top	At_Offset_1
00d1 6805       |h   |		Jump_Zero	0xd7
00d2 4801       |H   |		Short_Literal	0x1
00d3 e5ff       |    |		Load	0x2,-0x1
00d4 e013       |    |		Load	0x0,0x13
00d5 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
00d6 7806       |x   |		Jump	0xdd
00d7 4801       |H   |		Short_Literal	0x1
00d8 e5ff       |    |		Load	0x2,-0x1
00d9 0092 0326  |   &|		Action	Push_String_Extended,0x326					; "object"
00db e013       |    |		Load	0x0,0x13
00dc 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
00dd 0831       | 1  |		Execute_Immediate	Raise,0x31
00de 0100       |    |		Execute	Exception,Raise
00df 0000       |    |		.XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00f3       |    |		.CONST	0x00f3								; Address of begin
00e1 0155       | U  |		.CONST	0x0155								; Address of exception handler
00e2 0004       |    |		.CONST	0x0004								; Number of locals
00e3			INIT_00e0:
00e3 e012       |    |		Load	0x0,0x12
00e4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00e5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00e6 02c7       |    |		Declare_Variable	Any
00e7 4801       |H   |		Short_Literal	0x1
00e8 e012       |    |		Load	0x0,0x12
00e9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00ea 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00eb e5ff       |    |		Load	0x2,-0x1
00ec e011       |    |		Load	0x0,0x11
00ed 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00ee a402       |    |		Store_Unchecked	0x2,0x2
00ef 029f 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Call
00f1 029f 0253  |   S|		Declare_Subprogram	INIT_0250,For_Call
00f3			BODY_00e0:
00f3 00da       |    |		Load_Top	At_Offset_2
00f4 e00c       |    |		Load	0x0,0xc
00f5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00f6 6802       |h   |		Jump_Zero	0xf9
00f7 8403       |    |		Call	0x2,0x3
00f8 7854       |xT  |		Jump	0x14d
00f9 00da       |    |		Load_Top	At_Offset_2
00fa e009       |    |		Load	0x0,0x9
00fb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00fc 684e       |hN  |		Jump_Zero	0x14b
00fd e5fc       |    |		Load	0x2,-0x4
00fe 704e       |pN  |		Jump_Nonzero	0x14d
00ff e014       |    |		Load	0x0,0x14
0100 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0101 4800       |H   |		Short_Literal	0x0
0102 0092 0327  |   '|		Action	Push_String_Extended,0x327					; "Will generate defining diagram for library "
0104 4800       |H   |		Short_Literal	0x0
0105 00ea       |    |		Load_Encached	Null_String_Cache
0106 4800       |H   |		Short_Literal	0x0
0107 e402       |    |		Load	0x2,0x2
0108 e012       |    |		Load	0x0,0x12
0109 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
010a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
010b 01cc       |    |		Execute	Vector,Catenate
010c e015       |    |		Load	0x0,0x15
010d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
010e 00da       |    |		Load_Top	At_Offset_2
010f 00ea       |    |		Load_Encached	Null_String_Cache
0110 e005       |    |		Load	0x0,0x5
0111 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0112 e237       | 7  |		Load	0x1,0x37
0113 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0114 4801       |H   |		Short_Literal	0x1
0115 00db       |    |		Load_Top	At_Offset_3
0116 e009       |    |		Load	0x0,0x9
0117 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0118 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0119 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
011a 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
011b 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
011c 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
011d 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
011e e005       |    |		Load	0x0,0x5
011f 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0120 0092 0320  |    |		Action	Push_String_Extended,0x320					; "Ada \x22with\x22"
0122 0092 0321  |   !|		Action	Push_String_Extended,0x321					; "Ada units"
0124 e237       | 7  |		Load	0x1,0x37
0125 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0126 4801       |H   |		Short_Literal	0x1
0127 00db       |    |		Load_Top	At_Offset_3
0128 e009       |    |		Load	0x0,0x9
0129 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
012a 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
012b 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
012c 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
012d 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
012e 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
012f 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
0130 e005       |    |		Load	0x0,0x5
0131 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0132 0092 0324  |   $|		Action	Push_String_Extended,0x324					; "library \x22import\x22"
0134 0092 0325  |   %|		Action	Push_String_Extended,0x325					; "libraries"
0136 e237       | 7  |		Load	0x1,0x37
0137 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0138 4801       |H   |		Short_Literal	0x1
0139 00db       |    |		Load_Top	At_Offset_3
013a e009       |    |		Load	0x0,0x9
013b 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
013c 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
013d 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
013e 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
013f 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
0140 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
0141 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
0142 e005       |    |		Load	0x0,0x5
0143 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0144 0092 0322  |   "|		Action	Push_String_Extended,0x322					; "subsystem \x22import\x22"
0146 0092 0323  |   #|		Action	Push_String_Extended,0x323					; "subsystems"
0148 e237       | 7  |		Load	0x1,0x37
0149 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
014a 7802       |x   |		Jump	0x14d
014b e216       |    |		Load	0x1,0x16
014c 0257       | W  |		Execute	Discrete,Raise
014d e5fc       |    |		Load	0x2,-0x4
014e 6804       |h   |		Jump_Zero	0x153
014f e016       |    |		Load	0x0,0x16
0150 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0151 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0152 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0153 8404       |    |		Call	0x2,0x4
0154 0831       | 1  |		Execute_Immediate	Raise,0x31
0155			TRAP_00e0:
0155 e005       |    |		Load	0x0,0x5
0156 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0157 010f       |    |		Execute	Exception,Equal
0158 6802       |h   |		Jump_Zero	0x15b
0159 e20d       |    |		Load	0x1,0xd
015a 0257       | W  |		Execute	Discrete,Raise
015b 0100       |    |		Execute	Exception,Raise
015c 0000 0000  |    |		.BLANK	0000[0x4]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0173       | s  |		.CONST	0x0173								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0003       |    |		.CONST	0x0003								; Number of locals
0163			INIT_0160:
0163 e011       |    |		Load	0x0,0x11
0164 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0165 02c7       |    |		Declare_Variable	Any
0166 4801       |H   |		Short_Literal	0x1
0167 e012       |    |		Load	0x0,0x12
0168 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0169 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
016a e5ff       |    |		Load	0x2,-0x1
016b e011       |    |		Load	0x0,0x11
016c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
016d a402       |    |		Store_Unchecked	0x2,0x2
016e e011       |    |		Load	0x0,0x11
016f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0170 02c7       |    |		Declare_Variable	Any
0171 00d8       |    |		Load_Top	At_Offset_0
0172 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0173			BODY_0160:
0173 00d9       |    |		Load_Top	At_Offset_1
0174 e012       |    |		Load	0x0,0x12
0175 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0176 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0177 6823       |h#  |		Jump_Zero	0x19b
0178 4800       |H   |		Short_Literal	0x0
0179 00da       |    |		Load_Top	At_Offset_2
017a e00c       |    |		Load	0x0,0xc
017b 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
017c c403       |    |		Store	0x2,0x3
017d 00d9       |    |		Load_Top	At_Offset_1
017e 00d9       |    |		Load_Top	At_Offset_1
017f e012       |    |		Load	0x0,0x12
0180 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0181 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0182 6804       |h   |		Jump_Zero	0x187
0183 e5ff       |    |		Load	0x2,-0x1
0184 0335       | 5  |		Declare_Variable	Array,Duplicate
0185 00cd       |    |		Action	Spare6_Action
0186 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0187 00d8       |    |		Load_Top	At_Offset_0
0188 e012       |    |		Load	0x0,0x12
0189 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
018b 6808       |h   |		Jump_Zero	0x194
018c 4801       |H   |		Short_Literal	0x1
018d 00da       |    |		Load_Top	At_Offset_2
018e e012       |    |		Load	0x0,0x12
018f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0190 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0191 e013       |    |		Load	0x0,0x13
0192 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0193 7809       |x   |		Jump	0x19d
0194 4800       |H   |		Short_Literal	0x0
0195 00ea       |    |		Load_Encached	Null_String_Cache
0196 6009       |`   |		Indirect_Literal	Discrete,0x1a0,{0x00000000, 0x7fffffff}
0197 00db       |    |		Load_Top	At_Offset_3
0198 e011       |    |		Load	0x0,0x11
0199 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
019a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019b e20d       |    |		Load	0x1,0xd
019c 0257       | W  |		Execute	Discrete,Raise
019d 0831       | 1  |		Execute_Immediate	Raise,0x31
019e 0000 0000  |    |		.XXX[0x2]
01a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
01a4 0000 0000  |    |		.BLANK	0000[0x4]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 01c3       |    |		.CONST	0x01c3								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab e012       |    |		Load	0x0,0x12
01ac 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ad 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01ae 00db       |    |		Load_Top	At_Offset_3
01af e005       |    |		Load	0x0,0x5
01b0 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01b1 4801       |H   |		Short_Literal	0x1
01b2 e012       |    |		Load	0x0,0x12
01b3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01b4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01b5 e5ff       |    |		Load	0x2,-0x1
01b6 e011       |    |		Load	0x0,0x11
01b7 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01b8 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
01b9 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
01ba 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
01bb 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
01bc 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
01bd 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
01be e005       |    |		Load	0x0,0x5
01bf 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
01c0 e005       |    |		Load	0x0,0x5
01c1 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01c2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01c3			TRAP_01a8:
01c3 e005       |    |		Load	0x0,0x5
01c4 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
01c5 010f       |    |		Execute	Exception,Equal
01c6 6802       |h   |		Jump_Zero	0x1c9
01c7 e20d       |    |		Load	0x1,0xd
01c8 0257       | W  |		Execute	Discrete,Raise
01c9 0100       |    |		Execute	Exception,Raise
01ca 0000 0000  |    |		.BLANK	0000[0x6]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 01eb       |    |		.CONST	0x01eb								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 e012       |    |		Load	0x0,0x12
01d4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d5 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01d6 00db       |    |		Load_Top	At_Offset_3
01d7 e005       |    |		Load	0x0,0x5
01d8 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01d9 4801       |H   |		Short_Literal	0x1
01da e012       |    |		Load	0x0,0x12
01db 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01dc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01dd e5ff       |    |		Load	0x2,-0x1
01de e011       |    |		Load	0x0,0x11
01df 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01e0 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
01e1 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
01e2 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
01e3 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
01e4 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
01e5 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
01e6 e005       |    |		Load	0x0,0x5
01e7 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
01e8 e005       |    |		Load	0x0,0x5
01e9 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01ea 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01eb			TRAP_01d0:
01eb e005       |    |		Load	0x0,0x5
01ec 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
01ed 010f       |    |		Execute	Exception,Equal
01ee 6802       |h   |		Jump_Zero	0x1f1
01ef e20d       |    |		Load	0x1,0xd
01f0 0257       | W  |		Execute	Discrete,Raise
01f1 0100       |    |		Execute	Exception,Raise
01f2 0000 0000  |    |		.BLANK	0000[0x6]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0204       |    |		.CONST	0x0204								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0002       |    |		.CONST	0x0002								; Number of locals
01fb			INIT_01f8:
01fb e012       |    |		Load	0x0,0x12
01fc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01fd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01fe 02c7       |    |		Declare_Variable	Any
01ff 4800       |H   |		Short_Literal	0x0
0200 e402       |    |		Load	0x2,0x2
0201 e00c       |    |		Load	0x0,0xc
0202 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0203 a602       |    |		Store_Unchecked	0x3,0x2
0204			BODY_01f8:
0204 00d8       |    |		Load_Top	At_Offset_0
0205 e012       |    |		Load	0x0,0x12
0206 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0207 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0208 6807       |h   |		Jump_Zero	0x210
0209 4801       |H   |		Short_Literal	0x1
020a e402       |    |		Load	0x2,0x2
020b e00c       |    |		Load	0x0,0xc
020c 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
020d c602       |    |		Store	0x3,0x2
020e e20d       |    |		Load	0x1,0xd
020f 0257       | W  |		Execute	Discrete,Raise
0210 e5fc       |    |		Load	0x2,-0x4
0211 7039       |p9  |		Jump_Nonzero	0x24b
0212 e014       |    |		Load	0x0,0x14
0213 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0214 4800       |H   |		Short_Literal	0x0
0215 0092 0328  |   (|		Action	Push_String_Extended,0x328					; "Generating defining diagram for subsystem "
0217 4800       |H   |		Short_Literal	0x0
0218 00ea       |    |		Load_Encached	Null_String_Cache
0219 4800       |H   |		Short_Literal	0x0
021a e602       |    |		Load	0x3,0x2
021b e012       |    |		Load	0x0,0x12
021c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
021d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
021e 01cc       |    |		Execute	Vector,Catenate
021f e015       |    |		Load	0x0,0x15
0220 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0221 00d8       |    |		Load_Top	At_Offset_0
0222 00ea       |    |		Load_Encached	Null_String_Cache
0223 e005       |    |		Load	0x0,0x5
0224 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0225 e237       | 7  |		Load	0x1,0x37
0226 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0227 4801       |H   |		Short_Literal	0x1
0228 e402       |    |		Load	0x2,0x2
0229 e00c       |    |		Load	0x0,0xc
022a 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
022b 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
022c 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
022d 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
022e 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
022f 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0230 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0231 e005       |    |		Load	0x0,0x5
0232 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0233 0092 0329  |   )|		Action	Push_String_Extended,0x329					; "\x22with\x22"
0235 0092 0321  |   !|		Action	Push_String_Extended,0x321					; "Ada units"
0237 e237       | 7  |		Load	0x1,0x37
0238 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0239 4801       |H   |		Short_Literal	0x1
023a e402       |    |		Load	0x2,0x2
023b e00c       |    |		Load	0x0,0xc
023c 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
023d 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
023e 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
023f 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
0240 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
0241 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
0242 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
0243 e005       |    |		Load	0x0,0x5
0244 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0245 0092 0324  |   $|		Action	Push_String_Extended,0x324					; "library \x22import\x22"
0247 0092 0325  |   %|		Action	Push_String_Extended,0x325					; "libraries"
0249 e237       | 7  |		Load	0x1,0x37
024a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
024b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
024c 0000 0000  |    |		.BLANK	0000[0x4]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0257       | W  |		.CONST	0x0257								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 e005       |    |		Load	0x0,0x5
0254 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0255 00cb       |    |		Action	Pop_Block_With_Result
0256 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0257			TRAP_0250:
0257 e005       |    |		Load	0x0,0x5
0258 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0259 010f       |    |		Execute	Exception,Equal
025a 6804       |h   |		Jump_Zero	0x25f
025b e005       |    |		Load	0x0,0x5
025c 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
025d 00cb       |    |		Action	Pop_Block_With_Result
025e 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
025f 00d8       |    |		Load_Top	At_Offset_0
0260 0101       |    |		Execute	Exception,Reraise
0261 0000 0000  |    |		.BLANK	0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 027e       | ~  |		.CONST	0x027e								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0013       |    |		.CONST	0x0013								; Number of locals
026b			INIT_0268:
026b 029a 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Visible,Unelaborated
026d 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
026f 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0270 0129       | )  |		Execute	Any,Make_Visible
0271 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0272 0129       | )  |		Execute	Any,Make_Visible
0273 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0274 0129       | )  |		Execute	Any,Make_Visible
0275 00bf       |    |		Action	Accept_Activation
0276 00e3       |    |		Load_Encached	Natural_Cache
0277 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0278 00e3       |    |		Load_Encached	Natural_Cache
0279 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
027a 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
027b 00c7       |    |		Action	Elaborate_Subprogram
027c 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
027d 00c7       |    |		Action	Elaborate_Subprogram
027e			BODY_0268:
027e 00bc       |    |		Action	Signal_Activated
027f 00bb       |    |		Action	Signal_Completion
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283       |    |		.CONST	0x0283								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0001       |    |		.CONST	0x0001								; Number of locals
0283			BODY_0280:
0283			INIT_0280:
0283 4800       |H   |		Short_Literal	0x0
0284 a212       |    |		Store_Unchecked	0x1,0x12
0285 4800       |H   |		Short_Literal	0x0
0286 a213       |    |		Store_Unchecked	0x1,0x13
0287 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 029b       |    |		.CONST	0x029b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0005       |    |		.CONST	0x0005								; Number of locals
028b			INIT_0288:
028b e001       |    |		Load	0x0,0x1
028c 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
028d e212       |    |		Load	0x1,0x12
028e 0272       | r  |		Execute	Discrete,Minus
028f 00e3       |    |		Load_Encached	Natural_Cache
0290 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0291 e001       |    |		Load	0x0,0x1
0292 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0293 e213       |    |		Load	0x1,0x13
0294 0272       | r  |		Execute	Discrete,Minus
0295 00e3       |    |		Load_Encached	Natural_Cache
0296 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0297 029f 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Call
0299 029f 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Call
029b			BODY_0288:
029b 0092 032a  |   *|		Action	Push_String_Extended,0x32a					; "Found "
029d 4820       |H   |		Short_Literal	0x20
029e 4800       |H   |		Short_Literal	0x0
029f 480a       |H   |		Short_Literal	0xa
02a0 e402       |    |		Load	0x2,0x2
02a1 e002       |    |		Load	0x0,0x2
02a2 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
02a3 01cc       |    |		Execute	Vector,Catenate
02a4 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; " "
02a6 01cc       |    |		Execute	Vector,Catenate
02a7 e5ff       |    |		Load	0x2,-0x1
02a8 e402       |    |		Load	0x2,0x2
02a9 8405       |    |		Call	0x2,0x5
02aa 01cc       |    |		Execute	Vector,Catenate
02ab 0092 032c  |   ,|		Action	Push_String_Extended,0x32c					; " with "
02ad 01cc       |    |		Execute	Vector,Catenate
02ae 4820       |H   |		Short_Literal	0x20
02af 4800       |H   |		Short_Literal	0x0
02b0 480a       |H   |		Short_Literal	0xa
02b1 e403       |    |		Load	0x2,0x3
02b2 e002       |    |		Load	0x0,0x2
02b3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
02b4 01cc       |    |		Execute	Vector,Catenate
02b5 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; " "
02b7 01cc       |    |		Execute	Vector,Catenate
02b8 e5fe       |    |		Load	0x2,-0x2
02b9 01cc       |    |		Execute	Vector,Catenate
02ba 0092 032d  |   -|		Action	Push_String_Extended,0x32d					; " dependencies"
02bc 0092 032e  |   .|		Action	Push_String_Extended,0x32e					; " dependency"
02be e403       |    |		Load	0x2,0x3
02bf 8404       |    |		Call	0x2,0x4
02c0 01cc       |    |		Execute	Vector,Catenate
02c1 e003       |    |		Load	0x0,0x3
02c2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02c3 e001       |    |		Load	0x0,0x1
02c4 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02c5 a212       |    |		Store_Unchecked	0x1,0x12
02c6 e001       |    |		Load	0x0,0x1
02c7 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
02c8 a213       |    |		Store_Unchecked	0x1,0x13
02c9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02ca 0000 0000  |    |		.BLANK	0000[0x6]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d3       |    |		.CONST	0x02d3								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0001       |    |		.CONST	0x0001								; Number of locals
02d3			BODY_02d0:
02d3			INIT_02d0:
02d3 00da       |    |		Load_Top	At_Offset_2
02d4 0f01       |    |		Execute_Immediate	Equal,0x1
02d5 6802       |h   |		Jump_Zero	0x2d8
02d6 00db       |    |		Load_Top	At_Offset_3
02d7 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02d8 e7fd       |    |		Load	0x3,-0x3
02d9 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02da 0000 0000  |    |		.BLANK	0000[0x6]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e5       |    |		.CONST	0x02e5								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0002       |    |		.CONST	0x0002								; Number of locals
02e3			INIT_02e0:
02e3 029f 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Call
02e5			BODY_02e0:
02e5 00db       |    |		Load_Top	At_Offset_3
02e6 0f01       |    |		Execute_Immediate	Equal,0x1
02e7 680e       |h   |		Jump_Zero	0x2f6
02e8 e7fe       |    |		Load	0x3,-0x2
02e9 01dd       |    |		Execute	Vector,First
02ea e7fe       |    |		Load	0x3,-0x2
02eb 01dc       |    |		Execute	Vector,Last
02ec 0aff       |    |		Execute_Immediate	Plus,-0x1
02ed 00d8       |    |		Load_Top	At_Offset_0
02ee 00e2       |    |		Load_Encached	Integer_Cache
02ef 0260       | `  |		Execute	Discrete,In_Type
02f0 7001       |p   |		Jump_Nonzero	0x2f2
02f1 0801       |    |		Execute_Immediate	Raise,0x1
02f2 e7fe       |    |		Load	0x3,-0x2
02f3 01cf       |    |		Execute	Vector,Slice_Read
02f4 8602       |    |		Call	0x3,0x2
02f5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02f6 e7fe       |    |		Load	0x3,-0x2
02f7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 031d       |    |		.CONST	0x031d								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb 00da       |    |		Load_Top	At_Offset_2
02fc 01dc       |    |		Execute	Vector,Last
02fd 0aff       |    |		Execute_Immediate	Plus,-0x1
02fe 00d8       |    |		Load_Top	At_Offset_0
02ff 00e2       |    |		Load_Encached	Integer_Cache
0300 0260       | `  |		Execute	Discrete,In_Type
0301 7001       |p   |		Jump_Nonzero	0x303
0302 0801       |    |		Execute_Immediate	Raise,0x1
0303 00db       |    |		Load_Top	At_Offset_3
0304 01dc       |    |		Execute	Vector,Last
0305 e9ff       |    |		Load	0x4,-0x1
0306 01cf       |    |		Execute	Vector,Slice_Read
0307 0092 032f  |   /|		Action	Push_String_Extended,0x32f					; "ie"
0309 01df       |    |		Execute	Vector,Equal
030a 6810       |h   |		Jump_Zero	0x31b
030b 00da       |    |		Load_Top	At_Offset_2
030c 01dd       |    |		Execute	Vector,First
030d 00db       |    |		Load_Top	At_Offset_3
030e 01dc       |    |		Execute	Vector,Last
030f 0afe       |    |		Execute_Immediate	Plus,-0x2
0310 00d8       |    |		Load_Top	At_Offset_0
0311 00e2       |    |		Load_Encached	Integer_Cache
0312 0260       | `  |		Execute	Discrete,In_Type
0313 7001       |p   |		Jump_Nonzero	0x315
0314 0801       |    |		Execute_Immediate	Raise,0x1
0315 e9ff       |    |		Load	0x4,-0x1
0316 01cf       |    |		Execute	Vector,Slice_Read
0317 0092 0330  |   0|		Action	Push_String_Extended,0x330					; "y"
0319 01cc       |    |		Execute	Vector,Catenate
031a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
031b 00da       |    |		Load_Top	At_Offset_2
031c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
031d			TRAP_02f8:
031d 0007       |    |		Action	Break_Optional
031e 00db       |    |		Load_Top	At_Offset_3
031f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0320 ; --------------------------------------------------------------------------------------
0320 ; STRING TABLE
0320 ; --------------------------------------------------------------------------------------
0320 0024       | $  |		.STRTAB	0x0024->0x0332							; "Ada \x22with\x22"
0321 002c       | ,  |		.STRTAB	0x002c->0x0337							; "Ada units"
0322 0033       | 3  |		.STRTAB	0x0033->0x033b							; "subsystem \x22import\x22"
0323 0043       | C  |		.STRTAB	0x0043->0x0344							; "subsystems"
0324 004b       | K  |		.STRTAB	0x004b->0x0349							; "library \x22import\x22"
0325 0059       | Y  |		.STRTAB	0x0059->0x0351							; "libraries"
0326 0060       | `  |		.STRTAB	0x0060->0x0356							; "object"
0327 0064       | d  |		.STRTAB	0x0064->0x0359							; "Will generate defining diagram for library "
0328 008d       |    |		.STRTAB	0x008d->0x036e							; "Generating defining diagram for subsystem "
0329 00b5       |    |		.STRTAB	0x00b5->0x0383							; "\x22with\x22"
032a 00b9       |    |		.STRTAB	0x00b9->0x0386							; "Found "
032b 00bd       |    |		.STRTAB	0x00bd->0x0389							; " "
032c 00bc       |    |		.STRTAB	0x00bc->0x038a							; " with "
032d 00c0       |    |		.STRTAB	0x00c0->0x038d							; " dependencies"
032e 00cb       |    |		.STRTAB	0x00cb->0x0393							; " dependency"
032f 00d4       |    |		.STRTAB	0x00d4->0x0399							; "ie"
0330 00d4       |    |		.STRTAB	0x00d4->0x039a							; "y"
0331 00d3       |    |		.STREND 0x00d3->0x039a
0332 4164 6120  |Ada |		.STRTAB_STRINGS
039b 0000 0000  |    |		.BLANK	0000[0x5]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; Debug Table
03a0 ; --------------------------------------------------------------------------------------
03a0 0004 0014  |    |		.DEBUG4	0x0004,0x0014,0x0ef0,0x0000,0x0001,0x0000
03a6 c368 800b  | h  |		.XXX[0x5a]
03a8 0300 0041  |   A|
03aa a1f1 d3e0  |    |
03ac 03de 5dfc  |  ] |
03ae 1a42 01c6  | B  |
03b0 61db f45c  |a  \|
03b2 f005 a02c  |   ,|
03b4 1121 fd95  | !  |
03b6 8809 8000  |    |
03b8 2b24 5c13  |+$\ |
03ba 2c1c 3b3b  |, ;;|
03bc 81f2 9c9d  |    |
03be b39a c1eb  |    |
03c0 4ddd b2ad  |M   |
03c2 81f7 6d9d  |  m |
03c4 f2ad 1c06  |    |
03c6 0620 b743  |   C|
03c8 0028 0c1c  | (  |
03ca 3494 0010  |4   |
03cc 5b01 ee55  |[  U|
03ce 81f4 e8dd  |    |
03d0 ee8e 6000  |  ` |
03d2 6701 beac  |g   |
03d4 180b 4902  |  I |
03d6 0154 1c20  | T  |
03d8 2f01 ee85  |/   |
03da 81f6 f91c  |    |
03dc 3a7a 41f7  |:zA |
03de 7bc1 5835  |{ X5|
03e0 400b f118  |@   |
03e2 2850 8110  |(P  |
03e4 6fa1 b791  |o   |
03e6 0008 0040  |   @|
03e8 06f1 de24  |   $|
03ea da1c 29c8  |  ) |
03ec 8808 9520  |    |
03ee 3871 5db6  |8q] |
03f0 7420 0b7c  |t  ||
03f2 022b 789a  | +x |
03f4 2a93 21ee  |* ! |
03f6 a5a2 1902  |    |
03f8 4002 9da1  |@   |
03fa ceb5 e1b6  |    |
03fc bee0 3acb  |  : |
03fe e15a d5e0  | Z  |