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

⟦6621bad14⟧

    Length: 5120 (0x1400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5

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 08b0       |    |		.CONST	0x08b0								; 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 8005       |    |		.CONST	0x8005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0162       | b  |		.CONST	0x0162								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0051       | Q  |		.CONST	0x0051								; Number of locals
000b			INIT_0008:
000b 00e9       |    |		Load_Encached	String_Cache
000c 0129       | )  |		Execute	Any,Make_Visible
000d 0092 066f  |   o|		Action	Push_String_Extended,0x66f					; "SRS"
000f 0129       | )  |		Execute	Any,Make_Visible
0010 0092 0670  |   p|		Action	Push_String_Extended,0x670					; "IRS"
0012 0129       | )  |		Execute	Any,Make_Visible
0013 0092 0671  |   q|		Action	Push_String_Extended,0x671					; "PSDD"
0015 0129       | )  |		Execute	Any,Make_Visible
0016 0092 0672  |   r|		Action	Push_String_Extended,0x672					; "SDD"
0018 0129       | )  |		Execute	Any,Make_Visible
0019 0092 0673  |   s|		Action	Push_String_Extended,0x673					; "IDD"
001b 0129       | )  |		Execute	Any,Make_Visible
001c 0092 0674  |   t|		Action	Push_String_Extended,0x674					; "<UNKNOWN>"
001e 0129       | )  |		Execute	Any,Make_Visible
001f 0092 0675  |   u|		Action	Push_String_Extended,0x675					; "<DEFAULT>"
0021 0129       | )  |		Execute	Any,Make_Visible
0022 00c4       |    |		Action	Make_Default
0023 00c4       |    |		Action	Make_Default
0024 00c4       |    |		Action	Make_Default
0025 00c4       |    |		Action	Make_Default
0026 00c4       |    |		Action	Make_Default
0027 00c4       |    |		Action	Make_Default
0028 00c4       |    |		Action	Make_Default
0029 00c4       |    |		Action	Make_Default
002a 00c4       |    |		Action	Make_Default
002b 00c4       |    |		Action	Make_Default
002c 00c4       |    |		Action	Make_Default
002d 00c4       |    |		Action	Make_Default
002e 00c4       |    |		Action	Make_Default
002f 00c4       |    |		Action	Make_Default
0030 00c4       |    |		Action	Make_Default
0031 00c4       |    |		Action	Make_Default
0032 00c4       |    |		Action	Make_Default
0033 00c4       |    |		Action	Make_Default
0034 00c4       |    |		Action	Make_Default
0035 00c4       |    |		Action	Make_Default
0036 00c4       |    |		Action	Make_Default
0037 00c4       |    |		Action	Make_Default
0038 00c4       |    |		Action	Make_Default
0039 00c4       |    |		Action	Make_Default
003a 00c4       |    |		Action	Make_Default
003b 00c4       |    |		Action	Make_Default
003c 00c4       |    |		Action	Make_Default
003d 00c4       |    |		Action	Make_Default
003e 00c4       |    |		Action	Make_Default
003f 00c4       |    |		Action	Make_Default
0040 00c4       |    |		Action	Make_Default
0041 00c4       |    |		Action	Make_Default
0042 00c4       |    |		Action	Make_Default
0043 00c4       |    |		Action	Make_Default
0044 00c4       |    |		Action	Make_Default
0045 00c4       |    |		Action	Make_Default
0046 00c4       |    |		Action	Make_Default
0047 00c4       |    |		Action	Make_Default
0048 00c4       |    |		Action	Make_Default
0049 00c4       |    |		Action	Make_Default
004a 00c4       |    |		Action	Make_Default
004b e001       |    |		Load	0x0,0x1
004c 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
004d c230       | 0  |		Store	0x1,0x30
004e e002       |    |		Load	0x0,0x2
004f 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0050 c231       | 1  |		Store	0x1,0x31
0051 e003       |    |		Load	0x0,0x3
0052 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0053 c232       | 2  |		Store	0x1,0x32
0054 e004       |    |		Load	0x0,0x4
0055 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0056 c233       | 3  |		Store	0x1,0x33
0057 e005       |    |		Load	0x0,0x5
0058 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
0059 c234       | 4  |		Store	0x1,0x34
005a 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated
005c c21a       |    |		Store	0x1,0x1a
005d 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
005f c21b       |    |		Store	0x1,0x1b
0060 029a 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call,Visible,Unelaborated
0062 c21c       |    |		Store	0x1,0x1c
0063 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated
0065 c21d       |    |		Store	0x1,0x1d
0066 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated
0068 c21e       |    |		Store	0x1,0x1e
0069 029a 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call,Visible,Unelaborated
006b c235       | 5  |		Store	0x1,0x35
006c 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated
006e c220       |    |		Store	0x1,0x20
006f 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated
0071 c236       | 6  |		Store	0x1,0x36
0072 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
0074 c237       | 7  |		Store	0x1,0x37
0075 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated
0077 c238       | 8  |		Store	0x1,0x38
0078 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated
007a c239       | 9  |		Store	0x1,0x39
007b 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated
007d c23a       | :  |		Store	0x1,0x3a
007e 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated
0080 c23b       | ;  |		Store	0x1,0x3b
0081 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
0083 c23c       | <  |		Store	0x1,0x3c
0084 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated
0086 c228       | (  |		Store	0x1,0x28
0087 4800       |H   |		Short_Literal	0x0
0088 4805       |H   |		Short_Literal	0x5
0089 029f 0223  |   #|		Declare_Subprogram	INIT_0220,For_Call
008b 03fe       |    |		Declare_Type	Discrete,Defined,Visible
008c c229       | )  |		Store	0x1,0x29
008d 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated
008f c23d       | =  |		Store	0x1,0x3d
0090 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
0092 c22b       | +  |		Store	0x1,0x2b
0093 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated
0095 c22c       | ,  |		Store	0x1,0x2c
0096 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated
0098 c22d       | -  |		Store	0x1,0x2d
0099 029a 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call,Visible,Unelaborated
009b c22e       | .  |		Store	0x1,0x2e
009c 029a 0473  |   s|		Declare_Subprogram	INIT_0470,For_Outer_Call,Visible,Unelaborated
009e c22f       | /  |		Store	0x1,0x2f
009f 00bf       |    |		Action	Accept_Activation
00a0 e006       |    |		Load	0x0,0x6
00a1 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
00a2 e229       | )  |		Load	0x1,0x29
00a3 0266       | f  |		Execute	Discrete,Bounds
00a4 e007       |    |		Load	0x0,0x7
00a5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a6 02a0       |    |		Declare_Subprogram	Null_Subprogram
00a7 4801       |H   |		Short_Literal	0x1
00a8 035d       | ]  |		Declare_Type	Array,Defined
00a9 00d8       |    |		Load_Top	At_Offset_0
00aa 0337       | 7  |		Declare_Variable	Array
00ab 4800       |H   |		Short_Literal	0x0
00ac 4800       |H   |		Short_Literal	0x0
00ad 00da       |    |		Load_Top	At_Offset_2
00ae 01d6       |    |		Execute	Vector,Field_Write
00af 4801       |H   |		Short_Literal	0x1
00b0 4801       |H   |		Short_Literal	0x1
00b1 00da       |    |		Load_Top	At_Offset_2
00b2 01d6       |    |		Execute	Vector,Field_Write
00b3 4803       |H   |		Short_Literal	0x3
00b4 4802       |H   |		Short_Literal	0x2
00b5 00da       |    |		Load_Top	At_Offset_2
00b6 01d6       |    |		Execute	Vector,Field_Write
00b7 4804       |H   |		Short_Literal	0x4
00b8 4803       |H   |		Short_Literal	0x3
00b9 00da       |    |		Load_Top	At_Offset_2
00ba 01d6       |    |		Execute	Vector,Field_Write
00bb 4802       |H   |		Short_Literal	0x2
00bc 4804       |H   |		Short_Literal	0x4
00bd 00da       |    |		Load_Top	At_Offset_2
00be 01d6       |    |		Execute	Vector,Field_Write
00bf 4805       |H   |		Short_Literal	0x5
00c0 4805       |H   |		Short_Literal	0x5
00c1 00da       |    |		Load_Top	At_Offset_2
00c2 01d6       |    |		Execute	Vector,Field_Write
00c3 00d9       |    |		Load_Top	At_Offset_1
00c4 01c3       |    |		Execute	Vector,Check_In_Type
00c5 0007       |    |		Action	Break_Optional
00c6 e008       |    |		Load	0x0,0x8
00c7 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00c8 0266       | f  |		Execute	Discrete,Bounds
00c9 00e1       |    |		Load_Encached	Boolean_Cache
00ca 02a0       |    |		Declare_Subprogram	Null_Subprogram
00cb 4801       |H   |		Short_Literal	0x1
00cc 035d       | ]  |		Declare_Type	Array,Defined
00cd 00d8       |    |		Load_Top	At_Offset_0
00ce 0337       | 7  |		Declare_Variable	Array
00cf 4801       |H   |		Short_Literal	0x1
00d0 4801       |H   |		Short_Literal	0x1
00d1 00da       |    |		Load_Top	At_Offset_2
00d2 01d6       |    |		Execute	Vector,Field_Write
00d3 4801       |H   |		Short_Literal	0x1
00d4 4803       |H   |		Short_Literal	0x3
00d5 00da       |    |		Load_Top	At_Offset_2
00d6 01d6       |    |		Execute	Vector,Field_Write
00d7 4800       |H   |		Short_Literal	0x0
00d8 4800       |H   |		Short_Literal	0x0
00d9 00da       |    |		Load_Top	At_Offset_2
00da 01d6       |    |		Execute	Vector,Field_Write
00db 4800       |H   |		Short_Literal	0x0
00dc 4802       |H   |		Short_Literal	0x2
00dd 00da       |    |		Load_Top	At_Offset_2
00de 01d6       |    |		Execute	Vector,Field_Write
00df 00d9       |    |		Load_Top	At_Offset_1
00e0 01c3       |    |		Execute	Vector,Check_In_Type
00e1 0007       |    |		Action	Break_Optional
00e2 00d9       |    |		Load_Top	At_Offset_1
00e3 0337       | 7  |		Declare_Variable	Array
00e4 4801       |H   |		Short_Literal	0x1
00e5 4801       |H   |		Short_Literal	0x1
00e6 00da       |    |		Load_Top	At_Offset_2
00e7 01d6       |    |		Execute	Vector,Field_Write
00e8 4801       |H   |		Short_Literal	0x1
00e9 4800       |H   |		Short_Literal	0x0
00ea 00da       |    |		Load_Top	At_Offset_2
00eb 01d6       |    |		Execute	Vector,Field_Write
00ec 4800       |H   |		Short_Literal	0x0
00ed 4802       |H   |		Short_Literal	0x2
00ee 00da       |    |		Load_Top	At_Offset_2
00ef 01d6       |    |		Execute	Vector,Field_Write
00f0 4800       |H   |		Short_Literal	0x0
00f1 4803       |H   |		Short_Literal	0x3
00f2 00da       |    |		Load_Top	At_Offset_2
00f3 01d6       |    |		Execute	Vector,Field_Write
00f4 00da       |    |		Load_Top	At_Offset_2
00f5 01c3       |    |		Execute	Vector,Check_In_Type
00f6 0007       |    |		Action	Break_Optional
00f7 e009       |    |		Load	0x0,0x9
00f8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00f9 0266       | f  |		Execute	Discrete,Bounds
00fa e00a       |    |		Load	0x0,0xa
00fb 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00fc 02a0       |    |		Declare_Subprogram	Null_Subprogram
00fd 4801       |H   |		Short_Literal	0x1
00fe 035d       | ]  |		Declare_Type	Array,Defined
00ff 00d8       |    |		Load_Top	At_Offset_0
0100 0337       | 7  |		Declare_Variable	Array
0101 4802       |H   |		Short_Literal	0x2
0102 4800       |H   |		Short_Literal	0x0
0103 00da       |    |		Load_Top	At_Offset_2
0104 01d6       |    |		Execute	Vector,Field_Write
0105 4806       |H   |		Short_Literal	0x6
0106 4801       |H   |		Short_Literal	0x1
0107 00da       |    |		Load_Top	At_Offset_2
0108 01d6       |    |		Execute	Vector,Field_Write
0109 4807       |H   |		Short_Literal	0x7
010a 4802       |H   |		Short_Literal	0x2
010b 00da       |    |		Load_Top	At_Offset_2
010c 01d6       |    |		Execute	Vector,Field_Write
010d 4807       |H   |		Short_Literal	0x7
010e 4803       |H   |		Short_Literal	0x3
010f 00da       |    |		Load_Top	At_Offset_2
0110 01d6       |    |		Execute	Vector,Field_Write
0111 00d9       |    |		Load_Top	At_Offset_1
0112 01c3       |    |		Execute	Vector,Check_In_Type
0113 0007       |    |		Action	Break_Optional
0114 029b 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call,Unelaborated
0116 029d 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call
0118 029d 052b  |   +|		Declare_Subprogram	INIT_0528,For_Outer_Call
011a 029d 0563  |   c|		Declare_Subprogram	INIT_0560,For_Outer_Call
011c 029d 057b  |   {|		Declare_Subprogram	INIT_0578,For_Outer_Call
011e 029d 059b  |    |		Declare_Subprogram	INIT_0598,For_Outer_Call
0120 029d 05ab  |    |		Declare_Subprogram	INIT_05a8,For_Outer_Call
0122 029d 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call
0124 029d 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Outer_Call
0126 029d 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call
0128 029d 061b  |    |		Declare_Subprogram	INIT_0618,For_Outer_Call
012a 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
012b 00c7       |    |		Action	Elaborate_Subprogram
012c 029d 064b  |   K|		Declare_Subprogram	INIT_0648,For_Outer_Call
012e 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
012f 00c7       |    |		Action	Elaborate_Subprogram
0130 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
0131 00c7       |    |		Action	Elaborate_Subprogram
0132 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
0133 00c7       |    |		Action	Elaborate_Subprogram
0134 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
0135 00c7       |    |		Action	Elaborate_Subprogram
0136 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
0137 00c7       |    |		Action	Elaborate_Subprogram
0138 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0139 00c7       |    |		Action	Elaborate_Subprogram
013a 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
013b 00c7       |    |		Action	Elaborate_Subprogram
013c 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
013d 00c7       |    |		Action	Elaborate_Subprogram
013e 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
013f 00c7       |    |		Action	Elaborate_Subprogram
0140 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0141 00c7       |    |		Action	Elaborate_Subprogram
0142 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
0143 00c7       |    |		Action	Elaborate_Subprogram
0144 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0145 00c7       |    |		Action	Elaborate_Subprogram
0146 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
0147 00c7       |    |		Action	Elaborate_Subprogram
0148 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
0149 00c7       |    |		Action	Elaborate_Subprogram
014a 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
014b 00c7       |    |		Action	Elaborate_Subprogram
014c 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
014d 00c7       |    |		Action	Elaborate_Subprogram
014e 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
014f 00c7       |    |		Action	Elaborate_Subprogram
0150 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
0151 00c7       |    |		Action	Elaborate_Subprogram
0152 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c
0153 00c7       |    |		Action	Elaborate_Subprogram
0154 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0155 00c7       |    |		Action	Elaborate_Subprogram
0156 1d3d       | =  |		Execute_Immediate	Reference_Lex_1,0x3d
0157 00c7       |    |		Action	Elaborate_Subprogram
0158 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
0159 00c7       |    |		Action	Elaborate_Subprogram
015a 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
015b 00c7       |    |		Action	Elaborate_Subprogram
015c 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
015d 00c7       |    |		Action	Elaborate_Subprogram
015e 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
015f 00c7       |    |		Action	Elaborate_Subprogram
0160 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
0161 00c7       |    |		Action	Elaborate_Subprogram
0162			BODY_0008:
0162 e00b       |    |		Load	0x0,0xb
0163 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0164 00bc       |    |		Action	Signal_Activated
0165 00bb       |    |		Action	Signal_Completion
0166 0000 0000  |    |		.XXX[0x2]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b 00da       |    |		Load_Top	At_Offset_2
016c e00c       |    |		Load	0x0,0xc
016d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
016e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
016f 0000       |    |		.XXX[0x1]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 00db       |    |		Load_Top	At_Offset_3
0174 00db       |    |		Load_Top	At_Offset_3
0175 e00c       |    |		Load	0x0,0xc
0176 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0177 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b       | {  |		.CONST	0x017b								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0001       |    |		.CONST	0x0001								; Number of locals
017b			BODY_0178:
017b			INIT_0178:
017b 00da       |    |		Load_Top	At_Offset_2
017c e00c       |    |		Load	0x0,0xc
017d 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
017e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
017f 0000       |    |		.XXX[0x1]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183       |    |		.CONST	0x0183								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0001       |    |		.CONST	0x0001								; Number of locals
0183			BODY_0180:
0183			INIT_0180:
0183 e00c       |    |		Load	0x0,0xc
0184 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0185 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0186 0000 0000  |    |		.XXX[0x2]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b       |    |		.CONST	0x018b								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0001       |    |		.CONST	0x0001								; Number of locals
018b			BODY_0188:
018b			INIT_0188:
018b e00c       |    |		Load	0x0,0xc
018c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
018d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
018e 0000 0000  |    |		.XXX[0x2]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193       |    |		.CONST	0x0193								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0001       |    |		.CONST	0x0001								; Number of locals
0193			BODY_0190:
0193			INIT_0190:
0193 00da       |    |		Load_Top	At_Offset_2
0194 e00c       |    |		Load	0x0,0xc
0195 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0196 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0197 0000       |    |		.XXX[0x1]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b e00c       |    |		Load	0x0,0xc
019c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
019d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
019e 0000 0000  |    |		.XXX[0x2]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 00da       |    |		Load_Top	At_Offset_2
01a4 e00c       |    |		Load	0x0,0xc
01a5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01a6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01a7 0000       |    |		.XXX[0x1]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab 00db       |    |		Load_Top	At_Offset_3
01ac 00db       |    |		Load_Top	At_Offset_3
01ad e00c       |    |		Load	0x0,0xc
01ae 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01af 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 00da       |    |		Load_Top	At_Offset_2
01b4 e00c       |    |		Load	0x0,0xc
01b5 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01b6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01b7 0000       |    |		.XXX[0x1]
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 00da       |    |		Load_Top	At_Offset_2
01bc e00c       |    |		Load	0x0,0xc
01bd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01be 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01bf 0000       |    |		.XXX[0x1]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3       |    |		.CONST	0x01c3								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0001       |    |		.CONST	0x0001								; Number of locals
01c3			BODY_01c0:
01c3			INIT_01c0:
01c3 00db       |    |		Load_Top	At_Offset_3
01c4 00db       |    |		Load_Top	At_Offset_3
01c5 e00c       |    |		Load	0x0,0xc
01c6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01c7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb       |    |		.CONST	0x01cb								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0001       |    |		.CONST	0x0001								; Number of locals
01cb			BODY_01c8:
01cb			INIT_01c8:
01cb 00da       |    |		Load_Top	At_Offset_2
01cc e00c       |    |		Load	0x0,0xc
01cd 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01ce 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01cf 0000       |    |		.XXX[0x1]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2
01d4 e00c       |    |		Load	0x0,0xc
01d5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01d7 0000       |    |		.XXX[0x1]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01f6       |    |		.CONST	0x01f6								; Address of begin
01d9 020e       |    |		.CONST	0x020e								; Address of exception handler
01da 0003       |    |		.CONST	0x0003								; Number of locals
01db			INIT_01d8:
01db e008       |    |		Load	0x0,0x8
01dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01dd 02c7       |    |		Declare_Variable	Any
01de 00d8       |    |		Load_Top	At_Offset_0
01df 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e0 4822       |H"  |		Short_Literal	0x22
01e1 0092 0676  |   v|		Action	Push_String_Extended,0x676					; "Compiler_Model => \x22"
01e3 e5ff       |    |		Load	0x2,-0x1
01e4 01cc       |    |		Execute	Vector,Catenate
01e5 0092 0677  |   w|		Action	Push_String_Extended,0x677					; "\x22, Design_Facility_Model => \x22"
01e7 01cc       |    |		Execute	Vector,Catenate
01e8 e5fe       |    |		Load	0x2,-0x2
01e9 01cc       |    |		Execute	Vector,Catenate
01ea 0092 0678  |   x|		Action	Push_String_Extended,0x678					; "\x22, New_Model_Name => \x22"
01ec 01cc       |    |		Execute	Vector,Catenate
01ed e5fd       |    |		Load	0x2,-0x3
01ee 01cc       |    |		Execute	Vector,Catenate
01ef 0092 0679  |   y|		Action	Push_String_Extended,0x679					; "\x22, Response => \x22"
01f1 01cc       |    |		Execute	Vector,Catenate
01f2 e5fc       |    |		Load	0x2,-0x4
01f3 01cc       |    |		Execute	Vector,Catenate
01f4 01cb       |    |		Execute	Vector,Append
01f5 0007       |    |		Action	Break_Optional
01f6			BODY_01d8:
01f6 00d9       |    |		Load_Top	At_Offset_1
01f7 0120       |    |		Execute	Any,Is_Value
01f8 6803       |h   |		Jump_Zero	0x1fc
01f9 e008       |    |		Load	0x0,0x8
01fa 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01fb 7801       |x   |		Jump	0x1fd
01fc 00d9       |    |		Load_Top	At_Offset_1
01fd e5fc       |    |		Load	0x2,-0x4
01fe 8250       | P  |		Call	0x1,0x50
01ff c402       |    |		Store	0x2,0x2
0200 00d8       |    |		Load_Top	At_Offset_0
0201 0092 067a  |   z|		Action	Push_String_Extended,0x67a					; "Create_Model"
0203 8249       | I  |		Call	0x1,0x49
0204 e5fd       |    |		Load	0x2,-0x3
0205 e5fe       |    |		Load	0x2,-0x2
0206 e5ff       |    |		Load	0x2,-0x1
0207 e00c       |    |		Load	0x0,0xc
0208 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0209 00d9       |    |		Load_Top	At_Offset_1
020a 0092 067a  |   z|		Action	Push_String_Extended,0x67a					; "Create_Model"
020c 824b       | K  |		Call	0x1,0x4b
020d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
020e			TRAP_01d8:
020e e008       |    |		Load	0x0,0x8
020f 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0210 010f       |    |		Execute	Exception,Equal
0211 6805       |h   |		Jump_Zero	0x217
0212 00da       |    |		Load_Top	At_Offset_2
0213 0092 067a  |   z|		Action	Push_String_Extended,0x67a					; "Create_Model"
0215 824a       | J  |		Call	0x1,0x4a
0216 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0217 4800       |H   |		Short_Literal	0x0
0218 0092 067a  |   z|		Action	Push_String_Extended,0x67a					; "Create_Model"
021a 824c       | L  |		Call	0x1,0x4c
021b 00da       |    |		Load_Top	At_Offset_2
021c 0092 067a  |   z|		Action	Push_String_Extended,0x67a					; "Create_Model"
021e 824a       | J  |		Call	0x1,0x4a
021f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 4607       |F   |		Jump_Case	0x8
0224 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0225 7806       |x   |		Jump	0x22c								; case 0x1
0226 7809       |x   |		Jump	0x230								; case 0x2
0227 780d       |x   |		Jump	0x235								; case 0x3
0228 7810       |x   |		Jump	0x239								; case 0x4
0229 7811       |x   |		Jump	0x23b								; case 0x5
022a 7812       |x   |		Jump	0x23d								; case 0x6
022b 7815       |x   |		Jump	0x241								; case 0x7
022c 00da       |    |		Load_Top	At_Offset_2
022d 0091 0669  |   i|		Action	Push_String_Extended_Indexed,0x669				; "SYSTEM"
022f 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0230 00db       |    |		Load_Top	At_Offset_3
0231 00db       |    |		Load_Top	At_Offset_3
0232 00e0       |    |		Load_Encached	Standard_Cache
0233 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0234 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0235 00da       |    |		Load_Top	At_Offset_2
0236 00e0       |    |		Load_Encached	Standard_Cache
0237 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0238 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0239 00db       |    |		Load_Top	At_Offset_3
023a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
023b 00db       |    |		Load_Top	At_Offset_3
023c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
023d e229       | )  |		Load	0x1,0x29
023e 00dc       |    |		Load_Top	At_Offset_4
023f 0267       | g  |		Execute	Discrete,Predecessor
0240 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0241 e229       | )  |		Load	0x1,0x29
0242 00dc       |    |		Load_Top	At_Offset_4
0243 0268       | h  |		Execute	Discrete,Successor
0244 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0245 0000 0000  |    |		.XXX[0x3]
0247 0000       |    |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0296       |    |		.CONST	0x0296								; Address of begin
0249 02c5       |    |		.CONST	0x02c5								; Address of exception handler
024a 0004       |    |		.CONST	0x0004								; Number of locals
024b			INIT_0248:
024b e008       |    |		Load	0x0,0x8
024c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
024d 02c7       |    |		Declare_Variable	Any
024e 00d8       |    |		Load_Top	At_Offset_0
024f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0250 e00a       |    |		Load	0x0,0xa
0251 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0252 02c7       |    |		Declare_Variable	Any
0253 00d8       |    |		Load_Top	At_Offset_0
0254 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0255 4822       |H"  |		Short_Literal	0x22
0256 0092 067b  |   {|		Action	Push_String_Extended,0x67b					; "Component => \x22"
0258 e5ff       |    |		Load	0x2,-0x1
0259 01cc       |    |		Execute	Vector,Catenate
025a 0092 067c  |   ||		Action	Push_String_Extended,0x67c					; "\x22, Kind => "
025c 01cc       |    |		Execute	Vector,Catenate
025d e5fe       |    |		Load	0x2,-0x2
025e e229       | )  |		Load	0x1,0x29
025f 011c       |    |		Execute	Any,Convert_Unchecked
0260 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0261 01cc       |    |		Execute	Vector,Catenate
0262 0092 067d  |   }|		Action	Push_String_Extended,0x67d					; ", Parent => \x22"
0264 01cc       |    |		Execute	Vector,Catenate
0265 e5fd       |    |		Load	0x2,-0x3
0266 01cc       |    |		Execute	Vector,Catenate
0267 0092 067e  |   ~|		Action	Push_String_Extended,0x67e					; "\x22, Working_View_Base_Name => \x22"
0269 01cc       |    |		Execute	Vector,Catenate
026a e5fc       |    |		Load	0x2,-0x4
026b 01cc       |    |		Execute	Vector,Catenate
026c 0092 067f  |    |		Action	Push_String_Extended,0x67f					; "\x22, View_To_Import => \x22"
026e 01cc       |    |		Execute	Vector,Catenate
026f e5fb       |    |		Load	0x2,-0x5
0270 01cc       |    |		Execute	Vector,Catenate
0271 0092 0680  |    |		Action	Push_String_Extended,0x680					; "\x22, Create_Load_View => "
0273 01cc       |    |		Execute	Vector,Catenate
0274 e5fa       |    |		Load	0x2,-0x6
0275 00e1       |    |		Load_Encached	Boolean_Cache
0276 011c       |    |		Execute	Any,Convert_Unchecked
0277 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0278 01cc       |    |		Execute	Vector,Catenate
0279 0092 0681  |    |		Action	Push_String_Extended,0x681					; ", Model => \x22"
027b 01cc       |    |		Execute	Vector,Catenate
027c e5f9       |    |		Load	0x2,-0x7
027d 01cc       |    |		Execute	Vector,Catenate
027e 0092 0682  |    |		Action	Push_String_Extended,0x682					; "\x22, Comments => \x22"
0280 01cc       |    |		Execute	Vector,Catenate
0281 e5f8       |    |		Load	0x2,-0x8
0282 01cc       |    |		Execute	Vector,Catenate
0283 0092 0683  |    |		Action	Push_String_Extended,0x683					; "\x22, Work_Order => \x22"
0285 01cc       |    |		Execute	Vector,Catenate
0286 e5f7       |    |		Load	0x2,-0x9
0287 01cc       |    |		Execute	Vector,Catenate
0288 0092 0684  |    |		Action	Push_String_Extended,0x684					; "\x22, Volume =>"
028a 01cc       |    |		Execute	Vector,Catenate
028b e5f6       |    |		Load	0x2,-0xa
028c 00e0       |    |		Load_Encached	Standard_Cache
028d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
028e 01cc       |    |		Execute	Vector,Catenate
028f 0092 0685  |    |		Action	Push_String_Extended,0x685					; ", Response => \x22"
0291 01cc       |    |		Execute	Vector,Catenate
0292 e5f5       |    |		Load	0x2,-0xb
0293 01cc       |    |		Execute	Vector,Catenate
0294 01cb       |    |		Execute	Vector,Append
0295 0007       |    |		Action	Break_Optional
0296			BODY_0248:
0296 00da       |    |		Load_Top	At_Offset_2
0297 0120       |    |		Execute	Any,Is_Value
0298 6803       |h   |		Jump_Zero	0x29c
0299 e008       |    |		Load	0x0,0x8
029a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
029b 7801       |x   |		Jump	0x29d
029c 00da       |    |		Load_Top	At_Offset_2
029d e5f5       |    |		Load	0x2,-0xb
029e 8250       | P  |		Call	0x1,0x50
029f c402       |    |		Store	0x2,0x2
02a0 00d8       |    |		Load_Top	At_Offset_0
02a1 0092 0686  |    |		Action	Push_String_Extended,0x686					; "Initial"
02a3 8249       | I  |		Call	0x1,0x49
02a4 00d9       |    |		Load_Top	At_Offset_1
02a5 e5f6       |    |		Load	0x2,-0xa
02a6 e5f7       |    |		Load	0x2,-0x9
02a7 e5f8       |    |		Load	0x2,-0x8
02a8 e5f9       |    |		Load	0x2,-0x7
02a9 e5fa       |    |		Load	0x2,-0x6
02aa e5fb       |    |		Load	0x2,-0x5
02ab e5fc       |    |		Load	0x2,-0x4
02ac e5fd       |    |		Load	0x2,-0x3
02ad e5fe       |    |		Load	0x2,-0x2
02ae e240       | @  |		Load	0x1,0x40
02af 01d7       |    |		Execute	Vector,Field_Read
02b0 e007       |    |		Load	0x0,0x7
02b1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02b2 00d9       |    |		Load_Top	At_Offset_1
02b3 00d0       |    |		Action	Swap_Control
02b4 0260       | `  |		Execute	Discrete,In_Type
02b5 7001       |p   |		Jump_Nonzero	0x2b7
02b6 0801       |    |		Execute_Immediate	Raise,0x1
02b7 e5ff       |    |		Load	0x2,-0x1
02b8 e007       |    |		Load	0x0,0x7
02b9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02ba c403       |    |		Store	0x2,0x3
02bb 4801       |H   |		Short_Literal	0x1
02bc 0092 0687  |    |		Action	Push_String_Extended,0x687					; "Unable to initialize design component"
02be 00db       |    |		Load_Top	At_Offset_3
02bf 8247       | G  |		Call	0x1,0x47
02c0 00da       |    |		Load_Top	At_Offset_2
02c1 0092 0686  |    |		Action	Push_String_Extended,0x686					; "Initial"
02c3 824b       | K  |		Call	0x1,0x4b
02c4 450c       |E   |		Exit_Suprogram	New_Top_Offset 0xc
02c5			TRAP_0248:
02c5 e00d       |    |		Load	0x0,0xd
02c6 010f       |    |		Execute	Exception,Equal
02c7 6805       |h   |		Jump_Zero	0x2cd
02c8 00db       |    |		Load_Top	At_Offset_3
02c9 0092 0686  |    |		Action	Push_String_Extended,0x686					; "Initial"
02cb 824a       | J  |		Call	0x1,0x4a
02cc 450c       |E   |		Exit_Suprogram	New_Top_Offset 0xc
02cd e008       |    |		Load	0x0,0x8
02ce 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
02cf 010f       |    |		Execute	Exception,Equal
02d0 6805       |h   |		Jump_Zero	0x2d6
02d1 00db       |    |		Load_Top	At_Offset_3
02d2 0092 0686  |    |		Action	Push_String_Extended,0x686					; "Initial"
02d4 824a       | J  |		Call	0x1,0x4a
02d5 450c       |E   |		Exit_Suprogram	New_Top_Offset 0xc
02d6 4800       |H   |		Short_Literal	0x0
02d7 0092 0686  |    |		Action	Push_String_Extended,0x686					; "Initial"
02d9 824c       | L  |		Call	0x1,0x4c
02da 00db       |    |		Load_Top	At_Offset_3
02db 0092 0686  |    |		Action	Push_String_Extended,0x686					; "Initial"
02dd 824a       | J  |		Call	0x1,0x4a
02de 450c       |E   |		Exit_Suprogram	New_Top_Offset 0xc
02df 0000       |    |		.XXX[0x1]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02fe       |    |		.CONST	0x02fe								; Address of begin
02e1 031b       |    |		.CONST	0x031b								; Address of exception handler
02e2 0004       |    |		.CONST	0x0004								; Number of locals
02e3			INIT_02e0:
02e3 e008       |    |		Load	0x0,0x8
02e4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02e5 02c7       |    |		Declare_Variable	Any
02e6 00d8       |    |		Load_Top	At_Offset_0
02e7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02e8 e00a       |    |		Load	0x0,0xa
02e9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02ea 02c7       |    |		Declare_Variable	Any
02eb 00d8       |    |		Load_Top	At_Offset_0
02ec 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02ed 4822       |H"  |		Short_Literal	0x22
02ee 0092 0688  |    |		Action	Push_String_Extended,0x688					; "Of_Component => \x22"
02f0 e5ff       |    |		Load	0x2,-0x1
02f1 01cc       |    |		Execute	Vector,Catenate
02f2 0092 0689  |    |		Action	Push_String_Extended,0x689					; "\x22, To => \x22"
02f4 01cc       |    |		Execute	Vector,Catenate
02f5 e5fe       |    |		Load	0x2,-0x2
02f6 01cc       |    |		Execute	Vector,Catenate
02f7 0092 0679  |   y|		Action	Push_String_Extended,0x679					; "\x22, Response => \x22"
02f9 01cc       |    |		Execute	Vector,Catenate
02fa e5fd       |    |		Load	0x2,-0x3
02fb 01cc       |    |		Execute	Vector,Catenate
02fc 01cb       |    |		Execute	Vector,Append
02fd 0007       |    |		Action	Break_Optional
02fe			BODY_02e0:
02fe 00da       |    |		Load_Top	At_Offset_2
02ff 0120       |    |		Execute	Any,Is_Value
0300 6803       |h   |		Jump_Zero	0x304
0301 e008       |    |		Load	0x0,0x8
0302 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0303 7801       |x   |		Jump	0x305
0304 00da       |    |		Load_Top	At_Offset_2
0305 e5fd       |    |		Load	0x2,-0x3
0306 8250       | P  |		Call	0x1,0x50
0307 c402       |    |		Store	0x2,0x2
0308 00d8       |    |		Load_Top	At_Offset_0
0309 0092 068a  |    |		Action	Push_String_Extended,0x68a					; "Set_Parent"
030b 8249       | I  |		Call	0x1,0x49
030c 00d9       |    |		Load_Top	At_Offset_1
030d e5fe       |    |		Load	0x2,-0x2
030e e5ff       |    |		Load	0x2,-0x1
030f e007       |    |		Load	0x0,0x7
0310 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0311 c403       |    |		Store	0x2,0x3
0312 4801       |H   |		Short_Literal	0x1
0313 00ea       |    |		Load_Encached	Null_String_Cache
0314 00db       |    |		Load_Top	At_Offset_3
0315 8247       | G  |		Call	0x1,0x47
0316 00da       |    |		Load_Top	At_Offset_2
0317 0092 068a  |    |		Action	Push_String_Extended,0x68a					; "Set_Parent"
0319 824b       | K  |		Call	0x1,0x4b
031a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
031b			TRAP_02e0:
031b e00d       |    |		Load	0x0,0xd
031c 010f       |    |		Execute	Exception,Equal
031d 6805       |h   |		Jump_Zero	0x323
031e 00db       |    |		Load_Top	At_Offset_3
031f 0092 068a  |    |		Action	Push_String_Extended,0x68a					; "Set_Parent"
0321 824a       | J  |		Call	0x1,0x4a
0322 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0323 e008       |    |		Load	0x0,0x8
0324 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0325 010f       |    |		Execute	Exception,Equal
0326 6805       |h   |		Jump_Zero	0x32c
0327 00db       |    |		Load_Top	At_Offset_3
0328 0092 068a  |    |		Action	Push_String_Extended,0x68a					; "Set_Parent"
032a 824a       | J  |		Call	0x1,0x4a
032b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
032c 4800       |H   |		Short_Literal	0x0
032d 0092 068a  |    |		Action	Push_String_Extended,0x68a					; "Set_Parent"
032f 824c       | L  |		Call	0x1,0x4c
0330 00db       |    |		Load_Top	At_Offset_3
0331 0092 068a  |    |		Action	Push_String_Extended,0x68a					; "Set_Parent"
0333 824a       | J  |		Call	0x1,0x4a
0334 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0335 0000 0000  |    |		.XXX[0x3]
0337 0000       |    |
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0359       | Y  |		.CONST	0x0359								; Address of begin
0339 0376       | v  |		.CONST	0x0376								; Address of exception handler
033a 0004       |    |		.CONST	0x0004								; Number of locals
033b			INIT_0338:
033b e008       |    |		Load	0x0,0x8
033c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
033d 02c7       |    |		Declare_Variable	Any
033e 00d8       |    |		Load_Top	At_Offset_0
033f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0340 e00a       |    |		Load	0x0,0xa
0341 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0342 02c7       |    |		Declare_Variable	Any
0343 00d8       |    |		Load_Top	At_Offset_0
0344 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0345 4822       |H"  |		Short_Literal	0x22
0346 0092 0688  |    |		Action	Push_String_Extended,0x688					; "Of_Component => \x22"
0348 e5ff       |    |		Load	0x2,-0x1
0349 01cc       |    |		Execute	Vector,Catenate
034a 0092 068b  |    |		Action	Push_String_Extended,0x68b					; "\x22, Attempt_Repair => "
034c 01cc       |    |		Execute	Vector,Catenate
034d e5fe       |    |		Load	0x2,-0x2
034e 00e1       |    |		Load_Encached	Boolean_Cache
034f 011c       |    |		Execute	Any,Convert_Unchecked
0350 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0351 01cc       |    |		Execute	Vector,Catenate
0352 0092 0685  |    |		Action	Push_String_Extended,0x685					; ", Response => \x22"
0354 01cc       |    |		Execute	Vector,Catenate
0355 e5fd       |    |		Load	0x2,-0x3
0356 01cc       |    |		Execute	Vector,Catenate
0357 01cb       |    |		Execute	Vector,Append
0358 0007       |    |		Action	Break_Optional
0359			BODY_0338:
0359 00da       |    |		Load_Top	At_Offset_2
035a 0120       |    |		Execute	Any,Is_Value
035b 6803       |h   |		Jump_Zero	0x35f
035c e008       |    |		Load	0x0,0x8
035d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
035e 7801       |x   |		Jump	0x360
035f 00da       |    |		Load_Top	At_Offset_2
0360 e5fd       |    |		Load	0x2,-0x3
0361 8250       | P  |		Call	0x1,0x50
0362 c402       |    |		Store	0x2,0x2
0363 00d8       |    |		Load_Top	At_Offset_0
0364 0092 068c  |    |		Action	Push_String_Extended,0x68c					; "Check_Consistency"
0366 8249       | I  |		Call	0x1,0x49
0367 00d9       |    |		Load_Top	At_Offset_1
0368 e5fe       |    |		Load	0x2,-0x2
0369 e5ff       |    |		Load	0x2,-0x1
036a e007       |    |		Load	0x0,0x7
036b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
036c c403       |    |		Store	0x2,0x3
036d 4801       |H   |		Short_Literal	0x1
036e 00ea       |    |		Load_Encached	Null_String_Cache
036f 00db       |    |		Load_Top	At_Offset_3
0370 8247       | G  |		Call	0x1,0x47
0371 00da       |    |		Load_Top	At_Offset_2
0372 0092 068c  |    |		Action	Push_String_Extended,0x68c					; "Check_Consistency"
0374 824b       | K  |		Call	0x1,0x4b
0375 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0376			TRAP_0338:
0376 e00d       |    |		Load	0x0,0xd
0377 010f       |    |		Execute	Exception,Equal
0378 6805       |h   |		Jump_Zero	0x37e
0379 00db       |    |		Load_Top	At_Offset_3
037a 0092 068c  |    |		Action	Push_String_Extended,0x68c					; "Check_Consistency"
037c 824a       | J  |		Call	0x1,0x4a
037d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
037e e008       |    |		Load	0x0,0x8
037f 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0380 010f       |    |		Execute	Exception,Equal
0381 6805       |h   |		Jump_Zero	0x387
0382 00db       |    |		Load_Top	At_Offset_3
0383 0092 068c  |    |		Action	Push_String_Extended,0x68c					; "Check_Consistency"
0385 824a       | J  |		Call	0x1,0x4a
0386 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0387 4800       |H   |		Short_Literal	0x0
0388 0092 068c  |    |		Action	Push_String_Extended,0x68c					; "Check_Consistency"
038a 824c       | L  |		Call	0x1,0x4c
038b 00db       |    |		Load_Top	At_Offset_3
038c 0092 068c  |    |		Action	Push_String_Extended,0x68c					; "Check_Consistency"
038e 824a       | J  |		Call	0x1,0x4a
038f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 03b9       |    |		.CONST	0x03b9								; Address of begin
0391 03de       |    |		.CONST	0x03de								; Address of exception handler
0392 0004       |    |		.CONST	0x0004								; Number of locals
0393			INIT_0390:
0393 e008       |    |		Load	0x0,0x8
0394 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0395 02c7       |    |		Declare_Variable	Any
0396 00d8       |    |		Load_Top	At_Offset_0
0397 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0398 e00a       |    |		Load	0x0,0xa
0399 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
039a 02c7       |    |		Declare_Variable	Any
039b 00d8       |    |		Load_Top	At_Offset_0
039c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
039d 4822       |H"  |		Short_Literal	0x22
039e 0092 0688  |    |		Action	Push_String_Extended,0x688					; "Of_Component => \x22"
03a0 e5ff       |    |		Load	0x2,-0x1
03a1 01cc       |    |		Execute	Vector,Catenate
03a2 0092 068d  |    |		Action	Push_String_Extended,0x68d					; "\x22, Decompose_Cscis => "
03a4 01cc       |    |		Execute	Vector,Catenate
03a5 e5fe       |    |		Load	0x2,-0x2
03a6 00e1       |    |		Load_Encached	Boolean_Cache
03a7 011c       |    |		Execute	Any,Convert_Unchecked
03a8 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03a9 01cc       |    |		Execute	Vector,Catenate
03aa 0092 068e  |    |		Action	Push_String_Extended,0x68e					; ", Transitive => "
03ac 01cc       |    |		Execute	Vector,Catenate
03ad e5fd       |    |		Load	0x2,-0x3
03ae 00e1       |    |		Load_Encached	Boolean_Cache
03af 011c       |    |		Execute	Any,Convert_Unchecked
03b0 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03b1 01cc       |    |		Execute	Vector,Catenate
03b2 0092 0685  |    |		Action	Push_String_Extended,0x685					; ", Response => \x22"
03b4 01cc       |    |		Execute	Vector,Catenate
03b5 e5fc       |    |		Load	0x2,-0x4
03b6 01cc       |    |		Execute	Vector,Catenate
03b7 01cb       |    |		Execute	Vector,Append
03b8 0007       |    |		Action	Break_Optional
03b9			BODY_0390:
03b9 00da       |    |		Load_Top	At_Offset_2
03ba 0120       |    |		Execute	Any,Is_Value
03bb 6803       |h   |		Jump_Zero	0x3bf
03bc e008       |    |		Load	0x0,0x8
03bd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03be 7801       |x   |		Jump	0x3c0
03bf 00da       |    |		Load_Top	At_Offset_2
03c0 e5fc       |    |		Load	0x2,-0x4
03c1 8250       | P  |		Call	0x1,0x50
03c2 c402       |    |		Store	0x2,0x2
03c3 00d8       |    |		Load_Top	At_Offset_0
03c4 0092 068f  |    |		Action	Push_String_Extended,0x68f					; "Display_Hierarchy"
03c6 8249       | I  |		Call	0x1,0x49
03c7 00d9       |    |		Load_Top	At_Offset_1
03c8 e5fd       |    |		Load	0x2,-0x3
03c9 e5fe       |    |		Load	0x2,-0x2
03ca e5ff       |    |		Load	0x2,-0x1
03cb e007       |    |		Load	0x0,0x7
03cc 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
03cd c403       |    |		Store	0x2,0x3
03ce 4801       |H   |		Short_Literal	0x1
03cf 4822       |H"  |		Short_Literal	0x22
03d0 0092 0690  |    |		Action	Push_String_Extended,0x690					; "Problems encountered while displaying hierarchy of \x22"
03d2 e5ff       |    |		Load	0x2,-0x1
03d3 e00e       |    |		Load	0x0,0xe
03d4 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03d5 01cc       |    |		Execute	Vector,Catenate
03d6 01cb       |    |		Execute	Vector,Append
03d7 00db       |    |		Load_Top	At_Offset_3
03d8 8247       | G  |		Call	0x1,0x47
03d9 00da       |    |		Load_Top	At_Offset_2
03da 0092 068f  |    |		Action	Push_String_Extended,0x68f					; "Display_Hierarchy"
03dc 824b       | K  |		Call	0x1,0x4b
03dd 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03de			TRAP_0390:
03de e00d       |    |		Load	0x0,0xd
03df 010f       |    |		Execute	Exception,Equal
03e0 6805       |h   |		Jump_Zero	0x3e6
03e1 00db       |    |		Load_Top	At_Offset_3
03e2 0092 068f  |    |		Action	Push_String_Extended,0x68f					; "Display_Hierarchy"
03e4 824a       | J  |		Call	0x1,0x4a
03e5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03e6 e008       |    |		Load	0x0,0x8
03e7 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
03e8 010f       |    |		Execute	Exception,Equal
03e9 6805       |h   |		Jump_Zero	0x3ef
03ea 00db       |    |		Load_Top	At_Offset_3
03eb 0092 068f  |    |		Action	Push_String_Extended,0x68f					; "Display_Hierarchy"
03ed 824a       | J  |		Call	0x1,0x4a
03ee 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03ef 4800       |H   |		Short_Literal	0x0
03f0 0092 068f  |    |		Action	Push_String_Extended,0x68f					; "Display_Hierarchy"
03f2 824c       | L  |		Call	0x1,0x4c
03f3 00db       |    |		Load_Top	At_Offset_3
03f4 0092 068f  |    |		Action	Push_String_Extended,0x68f					; "Display_Hierarchy"
03f6 824a       | J  |		Call	0x1,0x4a
03f7 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0423       | #  |		.CONST	0x0423								; Address of begin
03f9 044d       | M  |		.CONST	0x044d								; Address of exception handler
03fa 0005       |    |		.CONST	0x0005								; Number of locals
03fb			INIT_03f8:
03fb e008       |    |		Load	0x0,0x8
03fc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03fd 02c7       |    |		Declare_Variable	Any
03fe 00d8       |    |		Load_Top	At_Offset_0
03ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0400 e00a       |    |		Load	0x0,0xa
0401 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0402 02c7       |    |		Declare_Variable	Any
0403 00d8       |    |		Load_Top	At_Offset_0
0404 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0405 e00f       |    |		Load	0x0,0xf
0406 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0407 4822       |H"  |		Short_Literal	0x22
0408 0092 0688  |    |		Action	Push_String_Extended,0x688					; "Of_Component => \x22"
040a e5ff       |    |		Load	0x2,-0x1
040b 01cc       |    |		Execute	Vector,Catenate
040c 0092 068d  |    |		Action	Push_String_Extended,0x68d					; "\x22, Decompose_Cscis => "
040e 01cc       |    |		Execute	Vector,Catenate
040f e5fe       |    |		Load	0x2,-0x2
0410 00e1       |    |		Load_Encached	Boolean_Cache
0411 011c       |    |		Execute	Any,Convert_Unchecked
0412 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0413 01cc       |    |		Execute	Vector,Catenate
0414 0092 068e  |    |		Action	Push_String_Extended,0x68e					; ", Transitive => "
0416 01cc       |    |		Execute	Vector,Catenate
0417 e5fd       |    |		Load	0x2,-0x3
0418 00e1       |    |		Load_Encached	Boolean_Cache
0419 011c       |    |		Execute	Any,Convert_Unchecked
041a 1c01       |    |		Execute_Immediate	Run_Utility,0x1
041b 01cc       |    |		Execute	Vector,Catenate
041c 0092 0685  |    |		Action	Push_String_Extended,0x685					; ", Response => \x22"
041e 01cc       |    |		Execute	Vector,Catenate
041f e5fc       |    |		Load	0x2,-0x4
0420 01cc       |    |		Execute	Vector,Catenate
0421 01cb       |    |		Execute	Vector,Append
0422 0007       |    |		Action	Break_Optional
0423			BODY_03f8:
0423 00db       |    |		Load_Top	At_Offset_3
0424 0120       |    |		Execute	Any,Is_Value
0425 6803       |h   |		Jump_Zero	0x429
0426 e008       |    |		Load	0x0,0x8
0427 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0428 7801       |x   |		Jump	0x42a
0429 00db       |    |		Load_Top	At_Offset_3
042a e5fc       |    |		Load	0x2,-0x4
042b 8250       | P  |		Call	0x1,0x50
042c c402       |    |		Store	0x2,0x2
042d 00d8       |    |		Load_Top	At_Offset_0
042e 0092 0691  |    |		Action	Push_String_Extended,0x691					; "Children"
0430 8249       | I  |		Call	0x1,0x49
0431 00da       |    |		Load_Top	At_Offset_2
0432 e00f       |    |		Load	0x0,0xf
0433 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0434 e5fd       |    |		Load	0x2,-0x3
0435 e5fe       |    |		Load	0x2,-0x2
0436 e5ff       |    |		Load	0x2,-0x1
0437 e007       |    |		Load	0x0,0x7
0438 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0439 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
043a c403       |    |		Store	0x2,0x3
043b 4801       |H   |		Short_Literal	0x1
043c 4822       |H"  |		Short_Literal	0x22
043d 0092 0692  |    |		Action	Push_String_Extended,0x692					; "Errors detected while determining children of \x22"
043f e5ff       |    |		Load	0x2,-0x1
0440 01cc       |    |		Execute	Vector,Catenate
0441 01cb       |    |		Execute	Vector,Append
0442 e403       |    |		Load	0x2,0x3
0443 8247       | G  |		Call	0x1,0x47
0444 00db       |    |		Load_Top	At_Offset_3
0445 0092 0691  |    |		Action	Push_String_Extended,0x691					; "Children"
0447 824b       | K  |		Call	0x1,0x4b
0448 00d9       |    |		Load_Top	At_Offset_1
0449 0217       |    |		Execute	Heap_Access,All_Reference
044a 0335       | 5  |		Declare_Variable	Array,Duplicate
044b 00cd       |    |		Action	Spare6_Action
044c 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
044d			TRAP_03f8:
044d e00d       |    |		Load	0x0,0xd
044e 010f       |    |		Execute	Exception,Equal
044f 6807       |h   |		Jump_Zero	0x457
0450 e402       |    |		Load	0x2,0x2
0451 0092 0691  |    |		Action	Push_String_Extended,0x691					; "Children"
0453 824a       | J  |		Call	0x1,0x4a
0454 0092 0693  |    |		Action	Push_String_Extended,0x693					; "<>"
0456 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0457 e008       |    |		Load	0x0,0x8
0458 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0459 010f       |    |		Execute	Exception,Equal
045a 6807       |h   |		Jump_Zero	0x462
045b e402       |    |		Load	0x2,0x2
045c 0092 0691  |    |		Action	Push_String_Extended,0x691					; "Children"
045e 824a       | J  |		Call	0x1,0x4a
045f 0092 0693  |    |		Action	Push_String_Extended,0x693					; "<>"
0461 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0462 4800       |H   |		Short_Literal	0x0
0463 0092 0691  |    |		Action	Push_String_Extended,0x691					; "Children"
0465 824c       | L  |		Call	0x1,0x4c
0466 e402       |    |		Load	0x2,0x2
0467 0092 0691  |    |		Action	Push_String_Extended,0x691					; "Children"
0469 824a       | J  |		Call	0x1,0x4a
046a 0092 0693  |    |		Action	Push_String_Extended,0x693					; "<>"
046c 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
046d 0000 0000  |    |		.XXX[0x3]
046f 0000       |    |
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0493       |    |		.CONST	0x0493								; Address of begin
0471 04bc       |    |		.CONST	0x04bc								; Address of exception handler
0472 0005       |    |		.CONST	0x0005								; Number of locals
0473			INIT_0470:
0473 e008       |    |		Load	0x0,0x8
0474 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0475 02c7       |    |		Declare_Variable	Any
0476 00d8       |    |		Load_Top	At_Offset_0
0477 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0478 e00a       |    |		Load	0x0,0xa
0479 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
047a 02c7       |    |		Declare_Variable	Any
047b 00d8       |    |		Load_Top	At_Offset_0
047c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
047d e00f       |    |		Load	0x0,0xf
047e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
047f 4822       |H"  |		Short_Literal	0x22
0480 0092 0688  |    |		Action	Push_String_Extended,0x688					; "Of_Component => \x22"
0482 e5ff       |    |		Load	0x2,-0x1
0483 01cc       |    |		Execute	Vector,Catenate
0484 0092 0694  |    |		Action	Push_String_Extended,0x694					; ", Recursive => "
0486 01cc       |    |		Execute	Vector,Catenate
0487 e5fe       |    |		Load	0x2,-0x2
0488 00e1       |    |		Load_Encached	Boolean_Cache
0489 011c       |    |		Execute	Any,Convert_Unchecked
048a 1c01       |    |		Execute_Immediate	Run_Utility,0x1
048b 01cc       |    |		Execute	Vector,Catenate
048c 0092 0685  |    |		Action	Push_String_Extended,0x685					; ", Response => \x22"
048e 01cc       |    |		Execute	Vector,Catenate
048f e5fd       |    |		Load	0x2,-0x3
0490 01cc       |    |		Execute	Vector,Catenate
0491 01cb       |    |		Execute	Vector,Append
0492 0007       |    |		Action	Break_Optional
0493			BODY_0470:
0493 00db       |    |		Load_Top	At_Offset_3
0494 0120       |    |		Execute	Any,Is_Value
0495 6803       |h   |		Jump_Zero	0x499
0496 e008       |    |		Load	0x0,0x8
0497 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0498 7801       |x   |		Jump	0x49a
0499 00db       |    |		Load_Top	At_Offset_3
049a e5fd       |    |		Load	0x2,-0x3
049b 8250       | P  |		Call	0x1,0x50
049c c402       |    |		Store	0x2,0x2
049d 00d8       |    |		Load_Top	At_Offset_0
049e 0092 0695  |    |		Action	Push_String_Extended,0x695					; "Parent"
04a0 8249       | I  |		Call	0x1,0x49
04a1 00da       |    |		Load_Top	At_Offset_2
04a2 e00f       |    |		Load	0x0,0xf
04a3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04a4 e5fe       |    |		Load	0x2,-0x2
04a5 e5ff       |    |		Load	0x2,-0x1
04a6 e007       |    |		Load	0x0,0x7
04a7 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
04a8 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
04a9 c403       |    |		Store	0x2,0x3
04aa 4801       |H   |		Short_Literal	0x1
04ab 4822       |H"  |		Short_Literal	0x22
04ac 0092 0696  |    |		Action	Push_String_Extended,0x696					; "Errors detected while determining parentage of \x22"
04ae e5ff       |    |		Load	0x2,-0x1
04af 01cc       |    |		Execute	Vector,Catenate
04b0 01cb       |    |		Execute	Vector,Append
04b1 e403       |    |		Load	0x2,0x3
04b2 8247       | G  |		Call	0x1,0x47
04b3 00db       |    |		Load_Top	At_Offset_3
04b4 0092 0695  |    |		Action	Push_String_Extended,0x695					; "Parent"
04b6 824b       | K  |		Call	0x1,0x4b
04b7 00d9       |    |		Load_Top	At_Offset_1
04b8 0217       |    |		Execute	Heap_Access,All_Reference
04b9 0335       | 5  |		Declare_Variable	Array,Duplicate
04ba 00cd       |    |		Action	Spare6_Action
04bb 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
04bc			TRAP_0470:
04bc e00d       |    |		Load	0x0,0xd
04bd 010f       |    |		Execute	Exception,Equal
04be 6807       |h   |		Jump_Zero	0x4c6
04bf e402       |    |		Load	0x2,0x2
04c0 0092 0695  |    |		Action	Push_String_Extended,0x695					; "Parent"
04c2 824a       | J  |		Call	0x1,0x4a
04c3 0092 0693  |    |		Action	Push_String_Extended,0x693					; "<>"
04c5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
04c6 e008       |    |		Load	0x0,0x8
04c7 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
04c8 010f       |    |		Execute	Exception,Equal
04c9 6807       |h   |		Jump_Zero	0x4d1
04ca e402       |    |		Load	0x2,0x2
04cb 0092 0695  |    |		Action	Push_String_Extended,0x695					; "Parent"
04cd 824a       | J  |		Call	0x1,0x4a
04ce 0092 0693  |    |		Action	Push_String_Extended,0x693					; "<>"
04d0 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
04d1 4800       |H   |		Short_Literal	0x0
04d2 0092 0695  |    |		Action	Push_String_Extended,0x695					; "Parent"
04d4 824c       | L  |		Call	0x1,0x4c
04d5 e402       |    |		Load	0x2,0x2
04d6 0092 0695  |    |		Action	Push_String_Extended,0x695					; "Parent"
04d8 824a       | J  |		Call	0x1,0x4a
04d9 0092 0693  |    |		Action	Push_String_Extended,0x693					; "<>"
04db 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
04dc 0000 0000  |    |		.BLANK	0000[0x4]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e4       |    |		.CONST	0x04e4								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0002       |    |		.CONST	0x0002								; Number of locals
04e3			INIT_04e0:
04e3 00ea       |    |		Load_Encached	Null_String_Cache
04e4			BODY_04e0:
04e4 4800       |H   |		Short_Literal	0x0
04e5 4800       |H   |		Short_Literal	0x0
04e6 e5fe       |    |		Load	0x2,-0x2
04e7 e5ff       |    |		Load	0x2,-0x1
04e8 e402       |    |		Load	0x2,0x2
04e9 e00a       |    |		Load	0x0,0xa
04ea 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
04eb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04ec 0000 0000  |    |		.BLANK	0000[0x4]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3       |    |		.CONST	0x04f3								; Address of begin
04f1 0004       |    |		.CONST	0x0004								; Address of exception handler
04f2 0001       |    |		.CONST	0x0001								; Number of locals
04f3			BODY_04f0:
04f3			INIT_04f0:
04f3 4801       |H   |		Short_Literal	0x1
04f4 00db       |    |		Load_Top	At_Offset_3
04f5 e00a       |    |		Load	0x0,0xa
04f6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04f7 6828       |h(  |		Jump_Zero	0x520
04f8 00db       |    |		Load_Top	At_Offset_3
04f9 01db       |    |		Execute	Vector,Length
04fa 700a       |p   |		Jump_Nonzero	0x505
04fb 00da       |    |		Load_Top	At_Offset_2
04fc e00a       |    |		Load	0x0,0xa
04fd 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04fe e245       | E  |		Load	0x1,0x45
04ff 01d7       |    |		Execute	Vector,Field_Read
0500 00db       |    |		Load_Top	At_Offset_3
0501 e00a       |    |		Load	0x0,0xa
0502 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0503 8246       | F  |		Call	0x1,0x46
0504 7810       |x   |		Jump	0x515
0505 00da       |    |		Load_Top	At_Offset_2
0506 e00a       |    |		Load	0x0,0xa
0507 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0508 e245       | E  |		Load	0x1,0x45
0509 01d7       |    |		Execute	Vector,Field_Read
050a 4829       |H)  |		Short_Literal	0x29
050b e5fe       |    |		Load	0x2,-0x2
050c 0092 0697  |    |		Action	Push_String_Extended,0x697					; " ("
050e 01cc       |    |		Execute	Vector,Catenate
050f e5ff       |    |		Load	0x2,-0x1
0510 e00a       |    |		Load	0x0,0xa
0511 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0512 01cc       |    |		Execute	Vector,Catenate
0513 01cb       |    |		Execute	Vector,Append
0514 8246       | F  |		Call	0x1,0x46
0515 e5fd       |    |		Load	0x2,-0x3
0516 7007       |p   |		Jump_Nonzero	0x51e
0517 e008       |    |		Load	0x0,0x8
0518 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0519 e008       |    |		Load	0x0,0x8
051a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
051b e243       | C  |		Load	0x1,0x43
051c 01d7       |    |		Execute	Vector,Field_Read
051d 6802       |h   |		Jump_Zero	0x520
051e e00d       |    |		Load	0x0,0xd
051f 0257       | W  |		Execute	Discrete,Raise
0520 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0521 0000 0000  |    |		.BLANK	0000[0x7]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b       | +  |		.CONST	0x052b								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0001       |    |		.CONST	0x0001								; Number of locals
052b			BODY_0528:
052b			INIT_0528:
052b e5fb       |    |		Load	0x2,-0x5
052c 6816       |h   |		Jump_Zero	0x543
052d 4822       |H"  |		Short_Literal	0x22
052e 0092 0698  |    |		Action	Push_String_Extended,0x698					; "Of_Document => \x22"
0530 e5ff       |    |		Load	0x2,-0x1
0531 01cc       |    |		Execute	Vector,Catenate
0532 0092 0699  |    |		Action	Push_String_Extended,0x699					; "\x22, In_View => \x22"
0534 01cc       |    |		Execute	Vector,Catenate
0535 e5fe       |    |		Load	0x2,-0x2
0536 01cc       |    |		Execute	Vector,Catenate
0537 0092 069a  |    |		Action	Push_String_Extended,0x69a					; "\x22, Options => \x22"
0539 01cc       |    |		Execute	Vector,Catenate
053a e5fd       |    |		Load	0x2,-0x3
053b 01cc       |    |		Execute	Vector,Catenate
053c 0092 0679  |   y|		Action	Push_String_Extended,0x679					; "\x22, Response => \x22"
053e 01cc       |    |		Execute	Vector,Catenate
053f e5fc       |    |		Load	0x2,-0x4
0540 01cc       |    |		Execute	Vector,Catenate
0541 01cb       |    |		Execute	Vector,Append
0542 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
0543 4822       |H"  |		Short_Literal	0x22
0544 0092 069b  |    |		Action	Push_String_Extended,0x69b					; "Document => \x22"
0546 e5ff       |    |		Load	0x2,-0x1
0547 01cc       |    |		Execute	Vector,Catenate
0548 0092 0699  |    |		Action	Push_String_Extended,0x699					; "\x22, In_View => \x22"
054a 01cc       |    |		Execute	Vector,Catenate
054b e5fe       |    |		Load	0x2,-0x2
054c 01cc       |    |		Execute	Vector,Catenate
054d 0092 069a  |    |		Action	Push_String_Extended,0x69a					; "\x22, Options => \x22"
054f 01cc       |    |		Execute	Vector,Catenate
0550 e5fd       |    |		Load	0x2,-0x3
0551 01cc       |    |		Execute	Vector,Catenate
0552 0092 0679  |   y|		Action	Push_String_Extended,0x679					; "\x22, Response => \x22"
0554 01cc       |    |		Execute	Vector,Catenate
0555 e5fc       |    |		Load	0x2,-0x4
0556 01cc       |    |		Execute	Vector,Catenate
0557 01cb       |    |		Execute	Vector,Append
0558 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
0559 0000 0000  |    |		.BLANK	0000[0x7]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563       | c  |		.CONST	0x0563								; Address of begin
0561 0004       |    |		.CONST	0x0004								; Address of exception handler
0562 0001       |    |		.CONST	0x0001								; Number of locals
0563			BODY_0560:
0563			INIT_0560:
0563 4800       |H   |		Short_Literal	0x0
0564 0092 069c  |    |		Action	Push_String_Extended,0x69c					; "[Design."
0566 e5ff       |    |		Load	0x2,-0x1
0567 01cc       |    |		Execute	Vector,Catenate
0568 0092 069d  |    |		Action	Push_String_Extended,0x69d					; " (2167a) ("
056a 01cc       |    |		Execute	Vector,Catenate
056b e5fe       |    |		Load	0x2,-0x2
056c 01cc       |    |		Execute	Vector,Catenate
056d 0092 069e  |    |		Action	Push_String_Extended,0x69e					; ");]"
056f 01cc       |    |		Execute	Vector,Catenate
0570 8246       | F  |		Call	0x1,0x46
0571 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0572 0000 0000  |    |		.BLANK	0000[0x6]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 0582       |    |		.CONST	0x0582								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0002       |    |		.CONST	0x0002								; Number of locals
057b			INIT_0578:
057b e008       |    |		Load	0x0,0x8
057c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
057d e008       |    |		Load	0x0,0x8
057e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
057f e242       | B  |		Load	0x1,0x42
0580 01d7       |    |		Execute	Vector,Field_Read
0581 0007       |    |		Action	Break_Optional
0582			BODY_0578:
0582 4800       |H   |		Short_Literal	0x0
0583 0092 069c  |    |		Action	Push_String_Extended,0x69c					; "[Design."
0585 e5ff       |    |		Load	0x2,-0x1
0586 01cc       |    |		Execute	Vector,Catenate
0587 0092 069f  |    |		Action	Push_String_Extended,0x69f					; " has failed with errors]"
0589 01cc       |    |		Execute	Vector,Catenate
058a 8246       | F  |		Call	0x1,0x46
058b e5fe       |    |		Load	0x2,-0x2
058c e008       |    |		Load	0x0,0x8
058d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
058e 00d8       |    |		Load_Top	At_Offset_0
058f 6803       |h   |		Jump_Zero	0x593
0590 e008       |    |		Load	0x0,0x8
0591 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0592 0257       | W  |		Execute	Discrete,Raise
0593 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0594 0000 0000  |    |		.BLANK	0000[0x4]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 059b       |    |		.CONST	0x059b								; Address of begin
0599 0004       |    |		.CONST	0x0004								; Address of exception handler
059a 0001       |    |		.CONST	0x0001								; Number of locals
059b			BODY_0598:
059b			INIT_0598:
059b 4800       |H   |		Short_Literal	0x0
059c 0092 069c  |    |		Action	Push_String_Extended,0x69c					; "[Design."
059e e5ff       |    |		Load	0x2,-0x1
059f 01cc       |    |		Execute	Vector,Catenate
05a0 0092 06a0  |    |		Action	Push_String_Extended,0x6a0					; " has completed]"
05a2 01cc       |    |		Execute	Vector,Catenate
05a3 8246       | F  |		Call	0x1,0x46
05a4 00db       |    |		Load_Top	At_Offset_3
05a5 e008       |    |		Load	0x0,0x8
05a6 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
05a7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ab       |    |		.CONST	0x05ab								; Address of begin
05a9 0004       |    |		.CONST	0x0004								; Address of exception handler
05aa 0001       |    |		.CONST	0x0001								; Number of locals
05ab			BODY_05a8:
05ab			INIT_05a8:
05ab 4807       |H   |		Short_Literal	0x7
05ac 4829       |H)  |		Short_Literal	0x29
05ad 0092 06a1  |    |		Action	Push_String_Extended,0x6a1					; "Unexpected exception in Design."
05af e5ff       |    |		Load	0x2,-0x1
05b0 01cc       |    |		Execute	Vector,Catenate
05b1 0092 0697  |    |		Action	Push_String_Extended,0x697					; " ("
05b3 01cc       |    |		Execute	Vector,Catenate
05b4 e00a       |    |		Load	0x0,0xa
05b5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05b6 01cc       |    |		Execute	Vector,Catenate
05b7 01cb       |    |		Execute	Vector,Append
05b8 8246       | F  |		Call	0x1,0x46
05b9 00db       |    |		Load_Top	At_Offset_3
05ba 7007       |p   |		Jump_Nonzero	0x5c2
05bb e008       |    |		Load	0x0,0x8
05bc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05bd e008       |    |		Load	0x0,0x8
05be 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05bf e243       | C  |		Load	0x1,0x43
05c0 01d7       |    |		Execute	Vector,Field_Read
05c1 6802       |h   |		Jump_Zero	0x5c4
05c2 e00d       |    |		Load	0x0,0xd
05c3 0257       | W  |		Execute	Discrete,Raise
05c4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05c5 0000 0000  |    |		.XXX[0x3]
05c7 0000       |    |
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05d0       |    |		.CONST	0x05d0								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0002       |    |		.CONST	0x0002								; Number of locals
05cb			INIT_05c8:
05cb e00a       |    |		Load	0x0,0xa
05cc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05cd 02c7       |    |		Declare_Variable	Any
05ce 00d8       |    |		Load_Top	At_Offset_0
05cf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05d0			BODY_05c8:
05d0 00d8       |    |		Load_Top	At_Offset_0
05d1 e5fd       |    |		Load	0x2,-0x3
05d2 e5fe       |    |		Load	0x2,-0x2
05d3 e5ff       |    |		Load	0x2,-0x1
05d4 e010       |    |		Load	0x0,0x10
05d5 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
05d6 c5fd       |    |		Store	0x2,-0x3
05d7 c402       |    |		Store	0x2,0x2
05d8 4801       |H   |		Short_Literal	0x1
05d9 4822       |H"  |		Short_Literal	0x22
05da 0092 06a2  |    |		Action	Push_String_Extended,0x6a2					; "Errors detected in OPTIONS parameter \x22"
05dc e5ff       |    |		Load	0x2,-0x1
05dd 01cc       |    |		Execute	Vector,Catenate
05de 01cb       |    |		Execute	Vector,Append
05df 00da       |    |		Load_Top	At_Offset_2
05e0 8247       | G  |		Call	0x1,0x47
05e1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05e2 0000 0000  |    |		.BLANK	0000[0x6]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f1       |    |		.CONST	0x05f1								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0002       |    |		.CONST	0x0002								; Number of locals
05eb			INIT_05e8:
05eb 4820       |H   |		Short_Literal	0x20
05ec 00db       |    |		Load_Top	At_Offset_3
05ed e00e       |    |		Load	0x0,0xe
05ee 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
05ef e00e       |    |		Load	0x0,0xe
05f0 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05f1			BODY_05e8:
05f1 00d8       |    |		Load_Top	At_Offset_0
05f2 e214       |    |		Load	0x1,0x14
05f3 01df       |    |		Execute	Vector,Equal
05f4 6806       |h   |		Jump_Zero	0x5fb
05f5 e5fe       |    |		Load	0x2,-0x2
05f6 e011       |    |		Load	0x0,0x11
05f7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05f8 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
05f9 8230       | 0  |		Call	0x1,0x30
05fa 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05fb 00d8       |    |		Load_Top	At_Offset_0
05fc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05fd 0000 0000  |    |		.XXX[0x3]
05ff 0000       |    |
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 060c       |    |		.CONST	0x060c								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0003       |    |		.CONST	0x0003								; Number of locals
0603			INIT_0600:
0603 00db       |    |		Load_Top	At_Offset_3
0604 e012       |    |		Load	0x0,0x12
0605 186b       | k  |		Execute	Package,Field_Execute,Field_Number 0x6b
0606 00db       |    |		Load_Top	At_Offset_3
0607 824e       | N  |		Call	0x1,0x4e
0608 e5fe       |    |		Load	0x2,-0x2
0609 00d9       |    |		Load_Top	At_Offset_1
060a e013       |    |		Load	0x0,0x13
060b 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
060c			BODY_0600:
060c 4801       |H   |		Short_Literal	0x1
060d 0092 06a3  |    |		Action	Push_String_Extended,0x6a3					; "Unable to resolve document name"
060f 00da       |    |		Load_Top	At_Offset_2
0610 e013       |    |		Load	0x0,0x13
0611 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0612 8247       | G  |		Call	0x1,0x47
0613 00d8       |    |		Load_Top	At_Offset_0
0614 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0615 0000 0000  |    |		.XXX[0x3]
0617 0000       |    |
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 0625       | %  |		.CONST	0x0625								; Address of begin
0619 0004       |    |		.CONST	0x0004								; Address of exception handler
061a 0003       |    |		.CONST	0x0003								; Number of locals
061b			INIT_0618:
061b e008       |    |		Load	0x0,0x8
061c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
061d 02c7       |    |		Declare_Variable	Any
061e 00d8       |    |		Load_Top	At_Offset_0
061f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0620 e00a       |    |		Load	0x0,0xa
0621 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0622 02c7       |    |		Declare_Variable	Any
0623 00d8       |    |		Load_Top	At_Offset_0
0624 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0625			BODY_0618:
0625 e008       |    |		Load	0x0,0x8
0626 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0627 c5fe       |    |		Store	0x2,-0x2
0628 00d8       |    |		Load_Top	At_Offset_0
0629 00da       |    |		Load_Top	At_Offset_2
062a 0120       |    |		Execute	Any,Is_Value
062b 6803       |h   |		Jump_Zero	0x62f
062c e008       |    |		Load	0x0,0x8
062d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
062e 7801       |x   |		Jump	0x630
062f 00da       |    |		Load_Top	At_Offset_2
0630 e5ff       |    |		Load	0x2,-0x1
0631 e008       |    |		Load	0x0,0x8
0632 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
0633 c402       |    |		Store	0x2,0x2
0634 c403       |    |		Store	0x2,0x3
0635 4801       |H   |		Short_Literal	0x1
0636 4822       |H"  |		Short_Literal	0x22
0637 0092 06a4  |    |		Action	Push_String_Extended,0x6a4					; "Errors detected in RESPONSE parameter \x22"
0639 e5ff       |    |		Load	0x2,-0x1
063a 01cc       |    |		Execute	Vector,Catenate
063b 01cb       |    |		Execute	Vector,Append
063c 00da       |    |		Load_Top	At_Offset_2
063d 8247       | G  |		Call	0x1,0x47
063e 00d9       |    |		Load_Top	At_Offset_1
063f e008       |    |		Load	0x0,0x8
0640 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0641 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0642 0000 0000  |    |		.BLANK	0000[0x6]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 0655       | U  |		.CONST	0x0655								; Address of begin
0649 0004       |    |		.CONST	0x0004								; Address of exception handler
064a 0003       |    |		.CONST	0x0003								; Number of locals
064b			INIT_0648:
064b e012       |    |		Load	0x0,0x12
064c 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
064d 02c7       |    |		Declare_Variable	Any
064e 00d8       |    |		Load_Top	At_Offset_0
064f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0650 e00a       |    |		Load	0x0,0xa
0651 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0652 02c7       |    |		Declare_Variable	Any
0653 00d8       |    |		Load_Top	At_Offset_0
0654 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0655			BODY_0648:
0655 00d8       |    |		Load_Top	At_Offset_0
0656 00da       |    |		Load_Top	At_Offset_2
0657 0120       |    |		Execute	Any,Is_Value
0658 6803       |h   |		Jump_Zero	0x65c
0659 e012       |    |		Load	0x0,0x12
065a 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
065b 7801       |x   |		Jump	0x65d
065c 00da       |    |		Load_Top	At_Offset_2
065d e5ff       |    |		Load	0x2,-0x1
065e e012       |    |		Load	0x0,0x12
065f 1869       | i  |		Execute	Package,Field_Execute,Field_Number 0x69
0660 c402       |    |		Store	0x2,0x2
0661 c403       |    |		Store	0x2,0x3
0662 4801       |H   |		Short_Literal	0x1
0663 0092 06a5  |    |		Action	Push_String_Extended,0x6a5					; "Unable to determine view context"
0665 00da       |    |		Load_Top	At_Offset_2
0666 8247       | G  |		Call	0x1,0x47
0667 00d9       |    |		Load_Top	At_Offset_1
0668 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0669 ; --------------------------------------------------------------------------------------
0669 ; STRING TABLE
0669 ; --------------------------------------------------------------------------------------
0669 007c       | |  |		.STRTAB	0x007c->0x06a7							; "SYSTEM"
066a 0080       |    |		.STRTAB	0x0080->0x06aa							; "SEGMENT"
066b 0085       |    |		.STRTAB	0x0085->0x06ad							; "MULTI_SUBSYSTEM_CSCI"
066c 0097       |    |		.STRTAB	0x0097->0x06b7							; "CSCI_CHILD_SUBSYSTEM"
066d 00a9       |    |		.STRTAB	0x00a9->0x06c1							; "SINGLE_SUBSYSTEM_CSCI"
066e 00bc       |    |		.STRTAB	0x00bc->0x06cc							; "HWCI"
066f 00be       |    |		.STRTAB	0x00be->0x06ce							; "SRS"
0670 00bf       |    |		.STRTAB	0x00bf->0x06cf							; "IRS"
0671 00c0       |    |		.STRTAB	0x00c0->0x06d1							; "PSDD"
0672 00c2       |    |		.STRTAB	0x00c2->0x06d3							; "SDD"
0673 00c3       |    |		.STRTAB	0x00c3->0x06d4							; "IDD"
0674 00c4       |    |		.STRTAB	0x00c4->0x06d6							; "<UNKNOWN>"
0675 00cb       |    |		.STRTAB	0x00cb->0x06da							; "<DEFAULT>"
0676 00d2       |    |		.STRTAB	0x00d2->0x06df							; "Compiler_Model => \x22"
0677 00e3       |    |		.STRTAB	0x00e3->0x06e8							; "\x22, Design_Facility_Model => \x22"
0678 00fe       |    |		.STRTAB	0x00fe->0x06f7							; "\x22, New_Model_Name => \x22"
0679 0112       |    |		.STRTAB	0x0112->0x0702							; "\x22, Response => \x22"
067a 0120       |    |		.STRTAB	0x0120->0x070a							; "Create_Model"
067b 012a       | *  |		.STRTAB	0x012a->0x0710							; "Component => \x22"
067c 0136       | 6  |		.STRTAB	0x0136->0x0717							; "\x22, Kind => "
067d 013f       | ?  |		.STRTAB	0x013f->0x071c							; ", Parent => \x22"
067e 014a       | J  |		.STRTAB	0x014a->0x0723							; "\x22, Working_View_Base_Name => \x22"
067f 0166       | f  |		.STRTAB	0x0166->0x0732							; "\x22, View_To_Import => \x22"
0680 017a       | z  |		.STRTAB	0x017a->0x073d							; "\x22, Create_Load_View => "
0681 018f       |    |		.STRTAB	0x018f->0x0748							; ", Model => \x22"
0682 0199       |    |		.STRTAB	0x0199->0x074e							; "\x22, Comments => \x22"
0683 01a7       |    |		.STRTAB	0x01a7->0x0756							; "\x22, Work_Order => \x22"
0684 01b7       |    |		.STRTAB	0x01b7->0x075f							; "\x22, Volume =>"
0685 01c1       |    |		.STRTAB	0x01c1->0x0765							; ", Response => \x22"
0686 01ce       |    |		.STRTAB	0x01ce->0x076d							; "Initial"
0687 01d3       |    |		.STRTAB	0x01d3->0x0770							; "Unable to initialize design component"
0688 01f6       |    |		.STRTAB	0x01f6->0x0783							; "Of_Component => \x22"
0689 0205       |    |		.STRTAB	0x0205->0x078b							; "\x22, To => \x22"
068a 020d       |    |		.STRTAB	0x020d->0x0790							; "Set_Parent"
068b 0215       |    |		.STRTAB	0x0215->0x0795							; "\x22, Attempt_Repair => "
068c 0228       | (  |		.STRTAB	0x0228->0x07a0							; "Check_Consistency"
068d 0237       | 7  |		.STRTAB	0x0237->0x07a8							; "\x22, Decompose_Cscis => "
068e 024b       | K  |		.STRTAB	0x024b->0x07b3							; ", Transitive => "
068f 0259       | Y  |		.STRTAB	0x0259->0x07bb							; "Display_Hierarchy"
0690 0268       | h  |		.STRTAB	0x0268->0x07c4							; "Problems encountered while displaying hierarchy of \x22"
0691 029a       |    |		.STRTAB	0x029a->0x07de							; "Children"
0692 02a0       |    |		.STRTAB	0x02a0->0x07e2							; "Errors detected while determining children of \x22"
0693 02cd       |    |		.STRTAB	0x02cd->0x07f9							; "<>"
0694 02cd       |    |		.STRTAB	0x02cd->0x07fa							; ", Recursive => "
0695 02da       |    |		.STRTAB	0x02da->0x0802							; "Parent"
0696 02de       |    |		.STRTAB	0x02de->0x0805							; "Errors detected while determining parentage of \x22"
0697 030c       |    |		.STRTAB	0x030c->0x081d							; " ("
0698 030c       |    |		.STRTAB	0x030c->0x081e							; "Of_Document => \x22"
0699 031a       |    |		.STRTAB	0x031a->0x0826							; "\x22, In_View => \x22"
069a 0327       | '  |		.STRTAB	0x0327->0x082d							; "\x22, Options => \x22"
069b 0334       | 4  |		.STRTAB	0x0334->0x0835							; "Document => \x22"
069c 033f       | ?  |		.STRTAB	0x033f->0x083b							; "[Design."
069d 0345       | E  |		.STRTAB	0x0345->0x083f							; " (2167a) ("
069e 034d       | M  |		.STRTAB	0x034d->0x0844							; ");]"
069f 034e       | N  |		.STRTAB	0x034e->0x0846							; " has failed with errors]"
06a0 0364       | d  |		.STRTAB	0x0364->0x0852							; " has completed]"
06a1 0371       | q  |		.STRTAB	0x0371->0x0859							; "Unexpected exception in Design."
06a2 038e       |    |		.STRTAB	0x038e->0x0869							; "Errors detected in OPTIONS parameter \x22"
06a3 03b2       |    |		.STRTAB	0x03b2->0x087c							; "Unable to resolve document name"
06a4 03cf       |    |		.STRTAB	0x03cf->0x088b							; "Errors detected in RESPONSE parameter \x22"
06a5 03f4       |    |		.STRTAB	0x03f4->0x089f							; "Unable to determine view context"
06a6 0412       |    |		.STREND 0x0412->0x08af
06a7 5359 5354  |SYST|		.STRTAB_STRINGS
08af 0000       |    |		.XXX[0x1]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; Debug Table
08b0 ; --------------------------------------------------------------------------------------
08b0 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xc6eb,0x0000,0x0001,0x0000
08b6 9657 c657  | W W|		.XXX[0x14a]
08b8 9a57 9257  | W W|
08ba f257 b657  | W W|
08bc a257 c257  | W W|
08be f657 ce57  | W W|
08c0 a257 da57  | W W|
08c2 ee57 e654  | W T|
08c4 2a5b fa54  |*[ T|
08c6 3258 1658  |2X X|
08c8 065b ba54  | [ T|
08ca 125b ca55  | [ U|
08cc 6c03 d254  |l  T|
08ce 225b e254  |"[ T|
08d0 2658 5e58  |&X^X|
08d2 5a58 665b  |ZXf[|
08d4 f254 4a58  | TJX|
08d6 525b de54  |R[ T|
08d8 3e58 0e59  |>X Y|
08da e408 1658  |   X|
08dc 4a5b 9254  |J[ T|
08de 0a5b b257  | [ W|
08e0 ba54 9658  | T X|
08e2 4e58 3659  |NX6Y|
08e4 7803 0404  |x   |
08e6 9a58 6259  | XbY|
08e8 1d13 c657  |   W|
08ea d254 a658  | T X|
08ec 1a5b be54  | [ T|
08ee 8658 1258  | X X|
08f0 1258 5658  | XVX|
08f2 ae58 3658  | X6X|
08f4 1258 be58  | X X|
08f6 6658 5658  |fXVX|
08f8 fa5b de54  | [ T|
08fa 8e58 3658  | X6X|
08fc 7e58 d258  |~X X|
08fe 3658 ca58  |6X X|
0900 565b f255  |V[ U|
0902 225b ae54  |"[ T|
0904 ca59 2e5b  | Y.[|
0906 d254 965b  | T [|
0908 f254 f259  | T Y|
090a 2e5b 9254  |.[ T|
090c e658 b659  | X Y|
090e 5258 9658  |RX X|
0910 fe58 1e5b  | X [|
0912 de54 ee5b  | T [|
0914 4c2c f65b  |L, [|
0916 de55 4e5b  | UN[|
0918 ca54 da58  | T X|
091a d658 8659  | X Y|
091c 2658 6258  |&XbX|
091e 7259 6258  |rYbX|
0920 6258 9658  |bX X|
0922 465b fe55  |F[ U|
0924 0a58 2e58  | X.X|
0926 6659 965b  |fY [|
0928 d654 7a5b  | Tz[|
092a ae55 a258  | U X|
092c 8659 0658  | Y X|
092e 3a59 b258  |:Y X|
0930 6e5b 9a54  |n[ T|
0932 7659 9e58  |vY X|
0934 4259 ce59  |BY Y|
0936 aa5b f657  | [ W|
0938 6827 3594  |h'5 |
093a 798d 364f  |y 6O|
093c 0416 1080  |    |
093e 943c 9c33  | < 3|
0940 8c2f b825  | / %|
0942 0d8a 4d14  |  M |
0944 5408 a800  |T   |
0946 7000 c422  |p  "|
0948 6516 325a  |e 2Z|
094a e02f cd9c  | /  |
094c 7894 7000  |x p |
094e f94f fc01  | O  |
0950 ec0a 325a  |  2Z|
0952 8907 fc03  |    |
0954 8406 325b  |  2[|
0956 083f fc00  | ?  |
0958 c40a 3258  |  2X|
095a a043 fc02  | C  |
095c 0c12 325a  |  2Z|
095e f82f fc00  | /  |
0960 b432 3259  | 22Y|
0962 6c57 fc03  |lW  |
0964 9406 3258  |  2X|
0966 9457 fc00  | W  |
0968 d00a 325b  |  2[|
096a bc10 6c16  |  l |
096c 3259 5c27  |2Y\'|
096e fc01 cc0a  |    |
0970 3258 c0e7  |2X  |
0972 fc01 d426  |   &|
0974 325a ca33  |2Z 3|
0976 fc03 d806  |    |
0978 325a 543f  |2ZT?|
097a fc02 0026  |   &|
097c 325b 887f  |2[  |
097e fc02 f02e  |   .|
0980 325b 3057  |2[0W|
0982 fc02 9916  |    |
0984 3259 4c11  |2YL |
0986 cd22 3259  | "2Y|
0988 2c30 85ce  |,0  |
098a 4e59 5023  |NYP#|
098c fc03 dc74  |   t|
098e 7001 60b7  |p ` |
0990 fc02 182e  |   .|
0992 3258 d108  |2X  |
0994 0cba 325b  |  2[|
0996 e853 fc02  | S  |
0998 f406 325a  |  2Z|
099a 7d13 fc02  |}   |
099c 882a 325a  | *2Z|
099e 8057 fc03  | W  |
09a0 f806 325a  |  2Z|
09a2 dc13 e19e  |    |
09a4 4e5a 3823  |NZ8#|
09a6 fc02 c40a  |    |
09a8 3258 f857  |2X W|
09aa fc01 cc3e  |   >|
09ac 3259 8813  |2Y  |
09ae fc03 7e04  |  ~ |
09b0 7000 50d7  |p P |
09b2 f056 4e58  | VNX|
09b4 783f fc03  |x?  |
09b6 a012 325b  |  2[|
09b8 0413 fc00  |    |
09ba 040a 325a  |  2Z|
09bc b43b fc03  | ;  |
09be 600a 325a  |` 2Z|
09c0 ac57 fc02  | W  |
09c2 c877 4a18  | wJ |
09c4 8410 265d  |  &]|
09c6 cc23 fc00  | #  |
09c8 1408 a800  |    |
09ca 7402 c8b7  |t   |
09cc fc02 2808  |  ( |
09ce 425d c8d1  |B]  |
09d0 6824 425d  |h$B]|
09d2 1d47 fc01  | G  |
09d4 3820 425d  |8 B]|
09d6 29e7 fc03  |)   |
09d8 cc10 425e  |  B^|
09da 7833 fc00  |x3  |
09dc 2430 425e  |$0B^|
09de f83f fc01  | ?  |
09e0 1814 425e  |  B^|
09e2 d017 fc01  |    |
09e4 2430 425e  |$0B^|
09e6 7658 a410  |vX  |
09e8 425f c8d0  |B_  |
09ea 7dcc 7894  |} x |
09ec 7402 7413  |t t |
09ee fc02 bc10  |    |
09f0 425d 9d4a  |B] J|
09f2 1c08 425e  |  B^|
09f4 34b7 fc01  |4   |
09f6 7008 425f  |p B_|
09f8 518b fc03  |Q   |
09fa 0c04 425e  |  B^|
09fc e86b fc02  | k  |
09fe b850 425f  | PB_|