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

⟦294a6d57a⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0598       |    |		.CONST	0x0598								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0026       | &  |		.CONST	0x0026								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0005       |    |		.CONST	0x0005								; Number of locals
001b			INIT_0018:
001b 0007       |    |		Action	Break_Optional
001c 0007       |    |		Action	Break_Optional
001d 0007       |    |		Action	Break_Optional
001e 029f 0033  |   3|		Declare_Subprogram	INIT_0030,For_Call
0020 029f 014b  |   K|		Declare_Subprogram	INIT_0148,For_Call
0022 029f 027b  |   {|		Declare_Subprogram	INIT_0278,For_Call
0024 029f 0393  |    |		Declare_Subprogram	INIT_0390,For_Call
0026			BODY_0018:
0026 8402       |    |		Call	0x2,0x2
0027 8403       |    |		Call	0x2,0x3
0028 8404       |    |		Call	0x2,0x4
0029 8405       |    |		Call	0x2,0x5
002a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
002b 0000 0000  |    |		.BLANK	0000[0x5]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 005b       | [  |		.CONST	0x005b								; Address of begin
0031 0004       |    |		.CONST	0x0004								; Address of exception handler
0032 000d       |    |		.CONST	0x000d								; Number of locals
0033			INIT_0030:
0033 a002       |    |		Store_Unchecked	0x0,0x2
0034 00c6       |    |		Action	Check_Subprogram_Elaborated
0035 e003       |    |		Load	0x0,0x3
0036 e004       |    |		Load	0x0,0x4
0037 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0038 0093 0000  |    |		push_full_address	0x0
003a 6105       |a   |		Indirect_Literal	Discrete,0x140,{0x80000000, 0x00080000}
003b 0273       | s  |		Execute	Discrete,Plus
003c e005       |    |		Load	0x0,0x5
003d 0273       | s  |		Execute	Discrete,Plus
003e e006       |    |		Load	0x0,0x6
003f 0273       | s  |		Execute	Discrete,Plus
0040 4805       |H   |		Short_Literal	0x5
0041 0007       |    |		Action	Break_Optional
0042 029f 049b  |    |		Declare_Subprogram	INIT_0498,For_Call
0044 029f 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Call
0046 a007       |    |		Store_Unchecked	0x0,0x7
0047 00c6       |    |		Action	Check_Subprogram_Elaborated
0048 e003       |    |		Load	0x0,0x3
0049 0092 0511  |    |		Action	Push_String_Extended,0x511					; "X_Error_With_Atom"
004b 4806       |H   |		Short_Literal	0x6
004c 4803       |H   |		Short_Literal	0x3
004d 0099       |    |		Action	Reference_Dynamic
004e 4807       |H   |		Short_Literal	0x7
004f 4803       |H   |		Short_Literal	0x3
0050 0099       |    |		Action	Reference_Dynamic
0051 0093 0000  |    |		push_full_address	0x0
0053 60e8       |`   |		Indirect_Literal	Discrete,0x13c,{0x80000000, 0x00070000}
0054 0273       | s  |		Execute	Discrete,Plus
0055 e005       |    |		Load	0x0,0x5
0056 0273       | s  |		Execute	Discrete,Plus
0057 e008       |    |		Load	0x0,0x8
0058 0273       | s  |		Execute	Discrete,Plus
0059 480d       |H   |		Short_Literal	0xd
005a 0007       |    |		Action	Break_Optional
005b			BODY_0030:
005b 0092 0512  |    |		Action	Push_String_Extended,0x512					; "X_Error_With_Atom conversions"
005d 8009       |    |		Call	0x0,0x9
005e 4801       |H   |		Short_Literal	0x1
005f 4820       |H   |		Short_Literal	0x20
0060 e004       |    |		Load	0x0,0x4
0061 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0062 0334       | 4  |		Declare_Variable	Array,With_Constraint
0063 4820       |H   |		Short_Literal	0x20
0064 4801       |H   |		Short_Literal	0x1
0065 4800       |H   |		Short_Literal	0x0
0066 00d9       |    |		Load_Top	At_Offset_1
0067 e60e       |    |		Load	0x3,0xe
0068 01d6       |    |		Execute	Vector,Field_Write
0069 3ffb       |?   |		Loop_Increasing	0x65
006a e003       |    |		Load	0x0,0x3
006b 0322       | "  |		Declare_Variable	Record
006c 4800       |H   |		Short_Literal	0x0
006d 00d9       |    |		Load_Top	At_Offset_1
006e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
006f 4800       |H   |		Short_Literal	0x0
0070 00d9       |    |		Load_Top	At_Offset_1
0071 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0072 4800       |H   |		Short_Literal	0x0
0073 00d9       |    |		Load_Top	At_Offset_1
0074 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0075 00d8       |    |		Load_Top	At_Offset_0
0076 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0077 4800       |H   |		Short_Literal	0x0
0078 00d0       |    |		Action	Swap_Control
0079 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
007a 4800       |H   |		Short_Literal	0x0
007b 00d9       |    |		Load_Top	At_Offset_1
007c 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
007d 4800       |H   |		Short_Literal	0x0
007e 00d9       |    |		Load_Top	At_Offset_1
007f 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0080 e003       |    |		Load	0x0,0x3
0081 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0082 0337       | 7  |		Declare_Variable	Array
0083 4815       |H   |		Short_Literal	0x15
0084 4801       |H   |		Short_Literal	0x1
0085 4800       |H   |		Short_Literal	0x0
0086 00d9       |    |		Load_Top	At_Offset_1
0087 e610       |    |		Load	0x3,0x10
0088 01d6       |    |		Execute	Vector,Field_Write
0089 3ffb       |?   |		Loop_Increasing	0x85
008a e003       |    |		Load	0x0,0x3
008b 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
008c 0119       |    |		Execute	Any,Check_In_Formal_Type
008d 00d9       |    |		Load_Top	At_Offset_1
008e 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
008f 0092 0513  |    |		Action	Push_String_Extended,0x513					; "0"
0091 e608       |    |		Load	0x3,0x8
0092 e609       |    |		Load	0x3,0x9
0093 480a       |H   |		Short_Literal	0xa
0094 4803       |H   |		Short_Literal	0x3
0095 0099       |    |		Action	Reference_Dynamic
0096 480b       |H   |		Short_Literal	0xb
0097 4803       |H   |		Short_Literal	0x3
0098 0099       |    |		Action	Reference_Dynamic
0099 480c       |H   |		Short_Literal	0xc
009a 4803       |H   |		Short_Literal	0x3
009b 0099       |    |		Action	Reference_Dynamic
009c 8007       |    |		Call	0x0,0x7
009d 4801       |H   |		Short_Literal	0x1
009e 4820       |H   |		Short_Literal	0x20
009f e004       |    |		Load	0x0,0x4
00a0 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00a1 0334       | 4  |		Declare_Variable	Array,With_Constraint
00a2 4820       |H   |		Short_Literal	0x20
00a3 4801       |H   |		Short_Literal	0x1
00a4 48ff       |H   |		Short_Literal	0xff
00a5 00d9       |    |		Load_Top	At_Offset_1
00a6 e60e       |    |		Load	0x3,0xe
00a7 01d6       |    |		Execute	Vector,Field_Write
00a8 3ffb       |?   |		Loop_Increasing	0xa4
00a9 e003       |    |		Load	0x0,0x3
00aa 0322       | "  |		Declare_Variable	Record
00ab 48ff       |H   |		Short_Literal	0xff
00ac 00d9       |    |		Load_Top	At_Offset_1
00ad 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00ae 48ff       |H   |		Short_Literal	0xff
00af 00d9       |    |		Load_Top	At_Offset_1
00b0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00b1 6086       |`   |		Indirect_Literal	Discrete,0x138,{0x00000000, 0x0000ffff}
00b2 00d9       |    |		Load_Top	At_Offset_1
00b3 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00b4 00d8       |    |		Load_Top	At_Offset_0
00b5 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
00b6 4fff       |O   |		Short_Literal	-0x1
00b7 00d0       |    |		Action	Swap_Control
00b8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00b9 607e       |`~  |		Indirect_Literal	Discrete,0x138,{0x00000000, 0x0000ffff}
00ba 00d9       |    |		Load_Top	At_Offset_1
00bb 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
00bc 48ff       |H   |		Short_Literal	0xff
00bd 00d9       |    |		Load_Top	At_Offset_1
00be 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
00bf e003       |    |		Load	0x0,0x3
00c0 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
00c1 0337       | 7  |		Declare_Variable	Array
00c2 4815       |H   |		Short_Literal	0x15
00c3 4801       |H   |		Short_Literal	0x1
00c4 48ff       |H   |		Short_Literal	0xff
00c5 00d9       |    |		Load_Top	At_Offset_1
00c6 e610       |    |		Load	0x3,0x10
00c7 01d6       |    |		Execute	Vector,Field_Write
00c8 3ffb       |?   |		Loop_Increasing	0xc4
00c9 e003       |    |		Load	0x0,0x3
00ca 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
00cb 0119       |    |		Execute	Any,Check_In_Formal_Type
00cc 00d9       |    |		Load_Top	At_Offset_1
00cd 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
00ce 0092 0514  |    |		Action	Push_String_Extended,0x514					; "-1"
00d0 e608       |    |		Load	0x3,0x8
00d1 e609       |    |		Load	0x3,0x9
00d2 480a       |H   |		Short_Literal	0xa
00d3 4803       |H   |		Short_Literal	0x3
00d4 0099       |    |		Action	Reference_Dynamic
00d5 480b       |H   |		Short_Literal	0xb
00d6 4803       |H   |		Short_Literal	0x3
00d7 0099       |    |		Action	Reference_Dynamic
00d8 480c       |H   |		Short_Literal	0xc
00d9 4803       |H   |		Short_Literal	0x3
00da 0099       |    |		Action	Reference_Dynamic
00db 8007       |    |		Call	0x0,0x7
00dc 4800       |H   |		Short_Literal	0x0
00dd 4801       |H   |		Short_Literal	0x1
00de e004       |    |		Load	0x0,0x4
00df 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00e0 0334       | 4  |		Declare_Variable	Array,With_Constraint
00e1 4801       |H   |		Short_Literal	0x1
00e2 4800       |H   |		Short_Literal	0x0
00e3 00da       |    |		Load_Top	At_Offset_2
00e4 01d6       |    |		Execute	Vector,Field_Write
00e5 4802       |H   |		Short_Literal	0x2
00e6 4801       |H   |		Short_Literal	0x1
00e7 00da       |    |		Load_Top	At_Offset_2
00e8 01d6       |    |		Execute	Vector,Field_Write
00e9 e00a       |    |		Load	0x0,0xa
00ea 01cc       |    |		Execute	Vector,Catenate
00eb e00b       |    |		Load	0x0,0xb
00ec 01cc       |    |		Execute	Vector,Catenate
00ed e00c       |    |		Load	0x0,0xc
00ee 01cc       |    |		Execute	Vector,Catenate
00ef 4801       |H   |		Short_Literal	0x1
00f0 4816       |H   |		Short_Literal	0x16
00f1 e004       |    |		Load	0x0,0x4
00f2 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00f3 0334       | 4  |		Declare_Variable	Array,With_Constraint
00f4 4806       |H   |		Short_Literal	0x6
00f5 4801       |H   |		Short_Literal	0x1
00f6 00da       |    |		Load_Top	At_Offset_2
00f7 01d6       |    |		Execute	Vector,Field_Write
00f8 4816       |H   |		Short_Literal	0x16
00f9 4802       |H   |		Short_Literal	0x2
00fa 48ff       |H   |		Short_Literal	0xff
00fb 00d9       |    |		Load_Top	At_Offset_1
00fc e60f       |    |		Load	0x3,0xf
00fd 01d6       |    |		Execute	Vector,Field_Write
00fe 3ffb       |?   |		Loop_Increasing	0xfa
00ff 01cc       |    |		Execute	Vector,Catenate
0100 e003       |    |		Load	0x0,0x3
0101 0322       | "  |		Declare_Variable	Record
0102 4801       |H   |		Short_Literal	0x1
0103 00d9       |    |		Load_Top	At_Offset_1
0104 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0105 4802       |H   |		Short_Literal	0x2
0106 00d9       |    |		Load_Top	At_Offset_1
0107 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0108 4803       |H   |		Short_Literal	0x3
0109 00d9       |    |		Load_Top	At_Offset_1
010a 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
010b 00d8       |    |		Load_Top	At_Offset_0
010c 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
010d 4804       |H   |		Short_Literal	0x4
010e 00d0       |    |		Action	Swap_Control
010f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0110 4805       |H   |		Short_Literal	0x5
0111 00d9       |    |		Load_Top	At_Offset_1
0112 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0113 4806       |H   |		Short_Literal	0x6
0114 00d9       |    |		Load_Top	At_Offset_1
0115 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0116 e003       |    |		Load	0x0,0x3
0117 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0118 0337       | 7  |		Declare_Variable	Array
0119 4815       |H   |		Short_Literal	0x15
011a 4801       |H   |		Short_Literal	0x1
011b 48ff       |H   |		Short_Literal	0xff
011c 00d9       |    |		Load_Top	At_Offset_1
011d e610       |    |		Load	0x3,0x10
011e 01d6       |    |		Execute	Vector,Field_Write
011f 3ffb       |?   |		Loop_Increasing	0x11b
0120 e003       |    |		Load	0x0,0x3
0121 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0122 0119       |    |		Execute	Any,Check_In_Formal_Type
0123 00d9       |    |		Load_Top	At_Offset_1
0124 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0125 0092 0515  |    |		Action	Push_String_Extended,0x515					; "1.2.3.4.5.6.-1"
0127 e608       |    |		Load	0x3,0x8
0128 e609       |    |		Load	0x3,0x9
0129 480a       |H   |		Short_Literal	0xa
012a 4803       |H   |		Short_Literal	0x3
012b 0099       |    |		Action	Reference_Dynamic
012c 480b       |H   |		Short_Literal	0xb
012d 4803       |H   |		Short_Literal	0x3
012e 0099       |    |		Action	Reference_Dynamic
012f 480c       |H   |		Short_Literal	0xc
0130 4803       |H   |		Short_Literal	0x3
0131 0099       |    |		Action	Reference_Dynamic
0132 8007       |    |		Call	0x0,0x7
0133 4801       |H   |		Short_Literal	0x1
0134 800d       |    |		Call	0x0,0xd
0135 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0136 0000 0000  |    |		.XXX[0x2]
0138 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
013c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00070000}
0140 8000 0000  |    |		.LITERAL	{0x80000000, 0x00080000}
0144 0000 0000  |    |		.BLANK	0000[0x4]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0173       | s  |		.CONST	0x0173								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 000d       |    |		.CONST	0x000d								; Number of locals
014b			INIT_0148:
014b a002       |    |		Store_Unchecked	0x0,0x2
014c 00c6       |    |		Action	Check_Subprogram_Elaborated
014d e00e       |    |		Load	0x0,0xe
014e e004       |    |		Load	0x0,0x4
014f 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0150 0093 0000  |    |		push_full_address	0x0
0152 611d       |a   |		Indirect_Literal	Discrete,0x270,{0x80000000, 0x00060000}
0153 0273       | s  |		Execute	Discrete,Plus
0154 e005       |    |		Load	0x0,0x5
0155 0273       | s  |		Execute	Discrete,Plus
0156 e00f       |    |		Load	0x0,0xf
0157 0273       | s  |		Execute	Discrete,Plus
0158 4805       |H   |		Short_Literal	0x5
0159 0007       |    |		Action	Break_Optional
015a 029f 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Call
015c 029f 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Call
015e a007       |    |		Store_Unchecked	0x0,0x7
015f 00c6       |    |		Action	Check_Subprogram_Elaborated
0160 e00e       |    |		Load	0x0,0xe
0161 0092 0516  |    |		Action	Push_String_Extended,0x516					; "X_Error_With_Nothing"
0163 4806       |H   |		Short_Literal	0x6
0164 4803       |H   |		Short_Literal	0x3
0165 0099       |    |		Action	Reference_Dynamic
0166 4807       |H   |		Short_Literal	0x7
0167 4803       |H   |		Short_Literal	0x3
0168 0099       |    |		Action	Reference_Dynamic
0169 0093 0000  |    |		push_full_address	0x0
016b 6100       |a   |		Indirect_Literal	Discrete,0x26c,{0x80000000, 0x00050000}
016c 0273       | s  |		Execute	Discrete,Plus
016d e005       |    |		Load	0x0,0x5
016e 0273       | s  |		Execute	Discrete,Plus
016f e010       |    |		Load	0x0,0x10
0170 0273       | s  |		Execute	Discrete,Plus
0171 480d       |H   |		Short_Literal	0xd
0172 0007       |    |		Action	Break_Optional
0173			BODY_0148:
0173 0092 0517  |    |		Action	Push_String_Extended,0x517					; "X_Error_With_Nothing conversions"
0175 8009       |    |		Call	0x0,0x9
0176 4801       |H   |		Short_Literal	0x1
0177 4820       |H   |		Short_Literal	0x20
0178 e004       |    |		Load	0x0,0x4
0179 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
017a 0334       | 4  |		Declare_Variable	Array,With_Constraint
017b 4820       |H   |		Short_Literal	0x20
017c 4801       |H   |		Short_Literal	0x1
017d 4800       |H   |		Short_Literal	0x0
017e 00d9       |    |		Load_Top	At_Offset_1
017f e60e       |    |		Load	0x3,0xe
0180 01d6       |    |		Execute	Vector,Field_Write
0181 3ffb       |?   |		Loop_Increasing	0x17d
0182 e00e       |    |		Load	0x0,0xe
0183 0322       | "  |		Declare_Variable	Record
0184 4800       |H   |		Short_Literal	0x0
0185 00d9       |    |		Load_Top	At_Offset_1
0186 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0187 4800       |H   |		Short_Literal	0x0
0188 00d9       |    |		Load_Top	At_Offset_1
0189 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
018a 4800       |H   |		Short_Literal	0x0
018b 00d9       |    |		Load_Top	At_Offset_1
018c 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
018d e00e       |    |		Load	0x0,0xe
018e 3003       |0   |		Execute	Record,Field_Type,Field_Number 0x3
018f 0337       | 7  |		Declare_Variable	Array
0190 4804       |H   |		Short_Literal	0x4
0191 4801       |H   |		Short_Literal	0x1
0192 4800       |H   |		Short_Literal	0x0
0193 00d9       |    |		Load_Top	At_Offset_1
0194 e610       |    |		Load	0x3,0x10
0195 01d6       |    |		Execute	Vector,Field_Write
0196 3ffb       |?   |		Loop_Increasing	0x192
0197 e00e       |    |		Load	0x0,0xe
0198 3003       |0   |		Execute	Record,Field_Type,Field_Number 0x3
0199 0119       |    |		Execute	Any,Check_In_Formal_Type
019a 00d9       |    |		Load_Top	At_Offset_1
019b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
019c 4800       |H   |		Short_Literal	0x0
019d 00d9       |    |		Load_Top	At_Offset_1
019e 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
019f 4800       |H   |		Short_Literal	0x0
01a0 00d9       |    |		Load_Top	At_Offset_1
01a1 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
01a2 e00e       |    |		Load	0x0,0xe
01a3 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
01a4 0337       | 7  |		Declare_Variable	Array
01a5 4815       |H   |		Short_Literal	0x15
01a6 4801       |H   |		Short_Literal	0x1
01a7 4800       |H   |		Short_Literal	0x0
01a8 00d9       |    |		Load_Top	At_Offset_1
01a9 e610       |    |		Load	0x3,0x10
01aa 01d6       |    |		Execute	Vector,Field_Write
01ab 3ffb       |?   |		Loop_Increasing	0x1a7
01ac e00e       |    |		Load	0x0,0xe
01ad 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
01ae 0119       |    |		Execute	Any,Check_In_Formal_Type
01af 00d9       |    |		Load_Top	At_Offset_1
01b0 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
01b1 0092 0513  |    |		Action	Push_String_Extended,0x513					; "0"
01b3 e608       |    |		Load	0x3,0x8
01b4 e609       |    |		Load	0x3,0x9
01b5 480a       |H   |		Short_Literal	0xa
01b6 4803       |H   |		Short_Literal	0x3
01b7 0099       |    |		Action	Reference_Dynamic
01b8 480b       |H   |		Short_Literal	0xb
01b9 4803       |H   |		Short_Literal	0x3
01ba 0099       |    |		Action	Reference_Dynamic
01bb 480c       |H   |		Short_Literal	0xc
01bc 4803       |H   |		Short_Literal	0x3
01bd 0099       |    |		Action	Reference_Dynamic
01be 8007       |    |		Call	0x0,0x7
01bf 4801       |H   |		Short_Literal	0x1
01c0 4820       |H   |		Short_Literal	0x20
01c1 e004       |    |		Load	0x0,0x4
01c2 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01c3 0334       | 4  |		Declare_Variable	Array,With_Constraint
01c4 4820       |H   |		Short_Literal	0x20
01c5 4801       |H   |		Short_Literal	0x1
01c6 48ff       |H   |		Short_Literal	0xff
01c7 00d9       |    |		Load_Top	At_Offset_1
01c8 e60e       |    |		Load	0x3,0xe
01c9 01d6       |    |		Execute	Vector,Field_Write
01ca 3ffb       |?   |		Loop_Increasing	0x1c6
01cb e00e       |    |		Load	0x0,0xe
01cc 0322       | "  |		Declare_Variable	Record
01cd 48ff       |H   |		Short_Literal	0xff
01ce 00d9       |    |		Load_Top	At_Offset_1
01cf 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01d0 48ff       |H   |		Short_Literal	0xff
01d1 00d9       |    |		Load_Top	At_Offset_1
01d2 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01d3 6764       |gd  |		Indirect_Literal	Discrete,0x138,{0x00000000, 0x0000ffff}
01d4 00d9       |    |		Load_Top	At_Offset_1
01d5 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01d6 e00e       |    |		Load	0x0,0xe
01d7 3003       |0   |		Execute	Record,Field_Type,Field_Number 0x3
01d8 0337       | 7  |		Declare_Variable	Array
01d9 4804       |H   |		Short_Literal	0x4
01da 4801       |H   |		Short_Literal	0x1
01db 48ff       |H   |		Short_Literal	0xff
01dc 00d9       |    |		Load_Top	At_Offset_1
01dd e610       |    |		Load	0x3,0x10
01de 01d6       |    |		Execute	Vector,Field_Write
01df 3ffb       |?   |		Loop_Increasing	0x1db
01e0 e00e       |    |		Load	0x0,0xe
01e1 3003       |0   |		Execute	Record,Field_Type,Field_Number 0x3
01e2 0119       |    |		Execute	Any,Check_In_Formal_Type
01e3 00d9       |    |		Load_Top	At_Offset_1
01e4 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01e5 6752       |gR  |		Indirect_Literal	Discrete,0x138,{0x00000000, 0x0000ffff}
01e6 00d9       |    |		Load_Top	At_Offset_1
01e7 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01e8 48ff       |H   |		Short_Literal	0xff
01e9 00d9       |    |		Load_Top	At_Offset_1
01ea 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
01eb e00e       |    |		Load	0x0,0xe
01ec 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
01ed 0337       | 7  |		Declare_Variable	Array
01ee 4815       |H   |		Short_Literal	0x15
01ef 4801       |H   |		Short_Literal	0x1
01f0 48ff       |H   |		Short_Literal	0xff
01f1 00d9       |    |		Load_Top	At_Offset_1
01f2 e610       |    |		Load	0x3,0x10
01f3 01d6       |    |		Execute	Vector,Field_Write
01f4 3ffb       |?   |		Loop_Increasing	0x1f0
01f5 e00e       |    |		Load	0x0,0xe
01f6 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
01f7 0119       |    |		Execute	Any,Check_In_Formal_Type
01f8 00d9       |    |		Load_Top	At_Offset_1
01f9 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
01fa 0092 0514  |    |		Action	Push_String_Extended,0x514					; "-1"
01fc e608       |    |		Load	0x3,0x8
01fd e609       |    |		Load	0x3,0x9
01fe 480a       |H   |		Short_Literal	0xa
01ff 4803       |H   |		Short_Literal	0x3
0200 0099       |    |		Action	Reference_Dynamic
0201 480b       |H   |		Short_Literal	0xb
0202 4803       |H   |		Short_Literal	0x3
0203 0099       |    |		Action	Reference_Dynamic
0204 480c       |H   |		Short_Literal	0xc
0205 4803       |H   |		Short_Literal	0x3
0206 0099       |    |		Action	Reference_Dynamic
0207 8007       |    |		Call	0x0,0x7
0208 4800       |H   |		Short_Literal	0x0
0209 4801       |H   |		Short_Literal	0x1
020a e004       |    |		Load	0x0,0x4
020b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
020c 0334       | 4  |		Declare_Variable	Array,With_Constraint
020d 4801       |H   |		Short_Literal	0x1
020e 4800       |H   |		Short_Literal	0x0
020f 00da       |    |		Load_Top	At_Offset_2
0210 01d6       |    |		Execute	Vector,Field_Write
0211 4802       |H   |		Short_Literal	0x2
0212 4801       |H   |		Short_Literal	0x1
0213 00da       |    |		Load_Top	At_Offset_2
0214 01d6       |    |		Execute	Vector,Field_Write
0215 e00a       |    |		Load	0x0,0xa
0216 01cc       |    |		Execute	Vector,Catenate
0217 e011       |    |		Load	0x0,0x11
0218 01cc       |    |		Execute	Vector,Catenate
0219 e012       |    |		Load	0x0,0x12
021a 01cc       |    |		Execute	Vector,Catenate
021b 4801       |H   |		Short_Literal	0x1
021c 4816       |H   |		Short_Literal	0x16
021d e004       |    |		Load	0x0,0x4
021e 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
021f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0220 4805       |H   |		Short_Literal	0x5
0221 4801       |H   |		Short_Literal	0x1
0222 00da       |    |		Load_Top	At_Offset_2
0223 01d6       |    |		Execute	Vector,Field_Write
0224 4816       |H   |		Short_Literal	0x16
0225 4802       |H   |		Short_Literal	0x2
0226 48ff       |H   |		Short_Literal	0xff
0227 00d9       |    |		Load_Top	At_Offset_1
0228 e60f       |    |		Load	0x3,0xf
0229 01d6       |    |		Execute	Vector,Field_Write
022a 3ffb       |?   |		Loop_Increasing	0x226
022b 01cc       |    |		Execute	Vector,Catenate
022c e00e       |    |		Load	0x0,0xe
022d 0322       | "  |		Declare_Variable	Record
022e 4801       |H   |		Short_Literal	0x1
022f 00d9       |    |		Load_Top	At_Offset_1
0230 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0231 4802       |H   |		Short_Literal	0x2
0232 00d9       |    |		Load_Top	At_Offset_1
0233 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0234 4803       |H   |		Short_Literal	0x3
0235 00d9       |    |		Load_Top	At_Offset_1
0236 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0237 e00e       |    |		Load	0x0,0xe
0238 3003       |0   |		Execute	Record,Field_Type,Field_Number 0x3
0239 0337       | 7  |		Declare_Variable	Array
023a 4804       |H   |		Short_Literal	0x4
023b 4801       |H   |		Short_Literal	0x1
023c 48ff       |H   |		Short_Literal	0xff
023d 00d9       |    |		Load_Top	At_Offset_1
023e e610       |    |		Load	0x3,0x10
023f 01d6       |    |		Execute	Vector,Field_Write
0240 3ffb       |?   |		Loop_Increasing	0x23c
0241 e00e       |    |		Load	0x0,0xe
0242 3003       |0   |		Execute	Record,Field_Type,Field_Number 0x3
0243 0119       |    |		Execute	Any,Check_In_Formal_Type
0244 00d9       |    |		Load_Top	At_Offset_1
0245 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0246 4804       |H   |		Short_Literal	0x4
0247 00d9       |    |		Load_Top	At_Offset_1
0248 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0249 4805       |H   |		Short_Literal	0x5
024a 00d9       |    |		Load_Top	At_Offset_1
024b 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
024c e00e       |    |		Load	0x0,0xe
024d 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
024e 0337       | 7  |		Declare_Variable	Array
024f 4815       |H   |		Short_Literal	0x15
0250 4801       |H   |		Short_Literal	0x1
0251 48ff       |H   |		Short_Literal	0xff
0252 00d9       |    |		Load_Top	At_Offset_1
0253 e610       |    |		Load	0x3,0x10
0254 01d6       |    |		Execute	Vector,Field_Write
0255 3ffb       |?   |		Loop_Increasing	0x251
0256 e00e       |    |		Load	0x0,0xe
0257 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0258 0119       |    |		Execute	Any,Check_In_Formal_Type
0259 00d9       |    |		Load_Top	At_Offset_1
025a 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
025b 0092 0518  |    |		Action	Push_String_Extended,0x518					; "1.2.3.-1.4.5.-1"
025d e608       |    |		Load	0x3,0x8
025e e609       |    |		Load	0x3,0x9
025f 480a       |H   |		Short_Literal	0xa
0260 4803       |H   |		Short_Literal	0x3
0261 0099       |    |		Action	Reference_Dynamic
0262 480b       |H   |		Short_Literal	0xb
0263 4803       |H   |		Short_Literal	0x3
0264 0099       |    |		Action	Reference_Dynamic
0265 480c       |H   |		Short_Literal	0xc
0266 4803       |H   |		Short_Literal	0x3
0267 0099       |    |		Action	Reference_Dynamic
0268 8007       |    |		Call	0x0,0x7
0269 4801       |H   |		Short_Literal	0x1
026a 800d       |    |		Call	0x0,0xd
026b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
026c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
0270 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
0274 0000 0000  |    |		.BLANK	0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 02a3       |    |		.CONST	0x02a3								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 000d       |    |		.CONST	0x000d								; Number of locals
027b			INIT_0278:
027b a002       |    |		Store_Unchecked	0x0,0x2
027c 00c6       |    |		Action	Check_Subprogram_Elaborated
027d e013       |    |		Load	0x0,0x13
027e e004       |    |		Load	0x0,0x4
027f 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0280 0093 0000  |    |		push_full_address	0x0
0282 6105       |a   |		Indirect_Literal	Discrete,0x388,{0x80000000, 0x00040000}
0283 0273       | s  |		Execute	Discrete,Plus
0284 e005       |    |		Load	0x0,0x5
0285 0273       | s  |		Execute	Discrete,Plus
0286 e014       |    |		Load	0x0,0x14
0287 0273       | s  |		Execute	Discrete,Plus
0288 4805       |H   |		Short_Literal	0x5
0289 0007       |    |		Action	Break_Optional
028a 029f 04db  |    |		Declare_Subprogram	INIT_04d8,For_Call
028c 029f 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Call
028e a007       |    |		Store_Unchecked	0x0,0x7
028f 00c6       |    |		Action	Check_Subprogram_Elaborated
0290 e013       |    |		Load	0x0,0x13
0291 0092 0519  |    |		Action	Push_String_Extended,0x519					; "X_Error_With_Resource"
0293 4806       |H   |		Short_Literal	0x6
0294 4803       |H   |		Short_Literal	0x3
0295 0099       |    |		Action	Reference_Dynamic
0296 4807       |H   |		Short_Literal	0x7
0297 4803       |H   |		Short_Literal	0x3
0298 0099       |    |		Action	Reference_Dynamic
0299 0093 0000  |    |		push_full_address	0x0
029b 60e8       |`   |		Indirect_Literal	Discrete,0x384,{0x80000000, 0x00030000}
029c 0273       | s  |		Execute	Discrete,Plus
029d e005       |    |		Load	0x0,0x5
029e 0273       | s  |		Execute	Discrete,Plus
029f e015       |    |		Load	0x0,0x15
02a0 0273       | s  |		Execute	Discrete,Plus
02a1 480d       |H   |		Short_Literal	0xd
02a2 0007       |    |		Action	Break_Optional
02a3			BODY_0278:
02a3 0092 051a  |    |		Action	Push_String_Extended,0x51a					; "X_Error_With_Resource conversions"
02a5 8009       |    |		Call	0x0,0x9
02a6 4801       |H   |		Short_Literal	0x1
02a7 4820       |H   |		Short_Literal	0x20
02a8 e004       |    |		Load	0x0,0x4
02a9 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02aa 0334       | 4  |		Declare_Variable	Array,With_Constraint
02ab 4820       |H   |		Short_Literal	0x20
02ac 4801       |H   |		Short_Literal	0x1
02ad 4800       |H   |		Short_Literal	0x0
02ae 00d9       |    |		Load_Top	At_Offset_1
02af e60e       |    |		Load	0x3,0xe
02b0 01d6       |    |		Execute	Vector,Field_Write
02b1 3ffb       |?   |		Loop_Increasing	0x2ad
02b2 e013       |    |		Load	0x0,0x13
02b3 0322       | "  |		Declare_Variable	Record
02b4 4800       |H   |		Short_Literal	0x0
02b5 00d9       |    |		Load_Top	At_Offset_1
02b6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02b7 4800       |H   |		Short_Literal	0x0
02b8 00d9       |    |		Load_Top	At_Offset_1
02b9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02ba 4800       |H   |		Short_Literal	0x0
02bb 00d9       |    |		Load_Top	At_Offset_1
02bc 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02bd 00d8       |    |		Load_Top	At_Offset_0
02be 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
02bf 4800       |H   |		Short_Literal	0x0
02c0 00d0       |    |		Action	Swap_Control
02c1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02c2 4800       |H   |		Short_Literal	0x0
02c3 00d9       |    |		Load_Top	At_Offset_1
02c4 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
02c5 4800       |H   |		Short_Literal	0x0
02c6 00d9       |    |		Load_Top	At_Offset_1
02c7 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
02c8 e013       |    |		Load	0x0,0x13
02c9 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
02ca 0337       | 7  |		Declare_Variable	Array
02cb 4815       |H   |		Short_Literal	0x15
02cc 4801       |H   |		Short_Literal	0x1
02cd 4800       |H   |		Short_Literal	0x0
02ce 00d9       |    |		Load_Top	At_Offset_1
02cf e610       |    |		Load	0x3,0x10
02d0 01d6       |    |		Execute	Vector,Field_Write
02d1 3ffb       |?   |		Loop_Increasing	0x2cd
02d2 e013       |    |		Load	0x0,0x13
02d3 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
02d4 0119       |    |		Execute	Any,Check_In_Formal_Type
02d5 00d9       |    |		Load_Top	At_Offset_1
02d6 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
02d7 0092 0513  |    |		Action	Push_String_Extended,0x513					; "0"
02d9 e608       |    |		Load	0x3,0x8
02da e609       |    |		Load	0x3,0x9
02db 480a       |H   |		Short_Literal	0xa
02dc 4803       |H   |		Short_Literal	0x3
02dd 0099       |    |		Action	Reference_Dynamic
02de 480b       |H   |		Short_Literal	0xb
02df 4803       |H   |		Short_Literal	0x3
02e0 0099       |    |		Action	Reference_Dynamic
02e1 480c       |H   |		Short_Literal	0xc
02e2 4803       |H   |		Short_Literal	0x3
02e3 0099       |    |		Action	Reference_Dynamic
02e4 8007       |    |		Call	0x0,0x7
02e5 4801       |H   |		Short_Literal	0x1
02e6 4820       |H   |		Short_Literal	0x20
02e7 e004       |    |		Load	0x0,0x4
02e8 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02e9 0334       | 4  |		Declare_Variable	Array,With_Constraint
02ea 4820       |H   |		Short_Literal	0x20
02eb 4801       |H   |		Short_Literal	0x1
02ec 48ff       |H   |		Short_Literal	0xff
02ed 00d9       |    |		Load_Top	At_Offset_1
02ee e60e       |    |		Load	0x3,0xe
02ef 01d6       |    |		Execute	Vector,Field_Write
02f0 3ffb       |?   |		Loop_Increasing	0x2ec
02f1 e013       |    |		Load	0x0,0x13
02f2 0322       | "  |		Declare_Variable	Record
02f3 48ff       |H   |		Short_Literal	0xff
02f4 00d9       |    |		Load_Top	At_Offset_1
02f5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02f6 48ff       |H   |		Short_Literal	0xff
02f7 00d9       |    |		Load_Top	At_Offset_1
02f8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02f9 6086       |`   |		Indirect_Literal	Discrete,0x380,{0x00000000, 0x0000ffff}
02fa 00d9       |    |		Load_Top	At_Offset_1
02fb 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02fc 00d8       |    |		Load_Top	At_Offset_0
02fd 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
02fe 4fff       |O   |		Short_Literal	-0x1
02ff 00d0       |    |		Action	Swap_Control
0300 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0301 607e       |`~  |		Indirect_Literal	Discrete,0x380,{0x00000000, 0x0000ffff}
0302 00d9       |    |		Load_Top	At_Offset_1
0303 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0304 48ff       |H   |		Short_Literal	0xff
0305 00d9       |    |		Load_Top	At_Offset_1
0306 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0307 e013       |    |		Load	0x0,0x13
0308 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0309 0337       | 7  |		Declare_Variable	Array
030a 4815       |H   |		Short_Literal	0x15
030b 4801       |H   |		Short_Literal	0x1
030c 48ff       |H   |		Short_Literal	0xff
030d 00d9       |    |		Load_Top	At_Offset_1
030e e610       |    |		Load	0x3,0x10
030f 01d6       |    |		Execute	Vector,Field_Write
0310 3ffb       |?   |		Loop_Increasing	0x30c
0311 e013       |    |		Load	0x0,0x13
0312 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0313 0119       |    |		Execute	Any,Check_In_Formal_Type
0314 00d9       |    |		Load_Top	At_Offset_1
0315 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0316 0092 0514  |    |		Action	Push_String_Extended,0x514					; "-1"
0318 e608       |    |		Load	0x3,0x8
0319 e609       |    |		Load	0x3,0x9
031a 480a       |H   |		Short_Literal	0xa
031b 4803       |H   |		Short_Literal	0x3
031c 0099       |    |		Action	Reference_Dynamic
031d 480b       |H   |		Short_Literal	0xb
031e 4803       |H   |		Short_Literal	0x3
031f 0099       |    |		Action	Reference_Dynamic
0320 480c       |H   |		Short_Literal	0xc
0321 4803       |H   |		Short_Literal	0x3
0322 0099       |    |		Action	Reference_Dynamic
0323 8007       |    |		Call	0x0,0x7
0324 4800       |H   |		Short_Literal	0x0
0325 4801       |H   |		Short_Literal	0x1
0326 e004       |    |		Load	0x0,0x4
0327 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0328 0334       | 4  |		Declare_Variable	Array,With_Constraint
0329 4801       |H   |		Short_Literal	0x1
032a 4800       |H   |		Short_Literal	0x0
032b 00da       |    |		Load_Top	At_Offset_2
032c 01d6       |    |		Execute	Vector,Field_Write
032d 4802       |H   |		Short_Literal	0x2
032e 4801       |H   |		Short_Literal	0x1
032f 00da       |    |		Load_Top	At_Offset_2
0330 01d6       |    |		Execute	Vector,Field_Write
0331 e00a       |    |		Load	0x0,0xa
0332 01cc       |    |		Execute	Vector,Catenate
0333 e00b       |    |		Load	0x0,0xb
0334 01cc       |    |		Execute	Vector,Catenate
0335 e00c       |    |		Load	0x0,0xc
0336 01cc       |    |		Execute	Vector,Catenate
0337 4801       |H   |		Short_Literal	0x1
0338 4816       |H   |		Short_Literal	0x16
0339 e004       |    |		Load	0x0,0x4
033a 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
033b 0334       | 4  |		Declare_Variable	Array,With_Constraint
033c 4806       |H   |		Short_Literal	0x6
033d 4801       |H   |		Short_Literal	0x1
033e 00da       |    |		Load_Top	At_Offset_2
033f 01d6       |    |		Execute	Vector,Field_Write
0340 4816       |H   |		Short_Literal	0x16
0341 4802       |H   |		Short_Literal	0x2
0342 48ff       |H   |		Short_Literal	0xff
0343 00d9       |    |		Load_Top	At_Offset_1
0344 e60f       |    |		Load	0x3,0xf
0345 01d6       |    |		Execute	Vector,Field_Write
0346 3ffb       |?   |		Loop_Increasing	0x342
0347 01cc       |    |		Execute	Vector,Catenate
0348 e013       |    |		Load	0x0,0x13
0349 0322       | "  |		Declare_Variable	Record
034a 4801       |H   |		Short_Literal	0x1
034b 00d9       |    |		Load_Top	At_Offset_1
034c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
034d 4802       |H   |		Short_Literal	0x2
034e 00d9       |    |		Load_Top	At_Offset_1
034f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0350 4803       |H   |		Short_Literal	0x3
0351 00d9       |    |		Load_Top	At_Offset_1
0352 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0353 00d8       |    |		Load_Top	At_Offset_0
0354 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0355 4804       |H   |		Short_Literal	0x4
0356 00d0       |    |		Action	Swap_Control
0357 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0358 4805       |H   |		Short_Literal	0x5
0359 00d9       |    |		Load_Top	At_Offset_1
035a 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
035b 4806       |H   |		Short_Literal	0x6
035c 00d9       |    |		Load_Top	At_Offset_1
035d 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
035e e013       |    |		Load	0x0,0x13
035f 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0360 0337       | 7  |		Declare_Variable	Array
0361 4815       |H   |		Short_Literal	0x15
0362 4801       |H   |		Short_Literal	0x1
0363 48ff       |H   |		Short_Literal	0xff
0364 00d9       |    |		Load_Top	At_Offset_1
0365 e610       |    |		Load	0x3,0x10
0366 01d6       |    |		Execute	Vector,Field_Write
0367 3ffb       |?   |		Loop_Increasing	0x363
0368 e013       |    |		Load	0x0,0x13
0369 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
036a 0119       |    |		Execute	Any,Check_In_Formal_Type
036b 00d9       |    |		Load_Top	At_Offset_1
036c 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
036d 0092 0515  |    |		Action	Push_String_Extended,0x515					; "1.2.3.4.5.6.-1"
036f e608       |    |		Load	0x3,0x8
0370 e609       |    |		Load	0x3,0x9
0371 480a       |H   |		Short_Literal	0xa
0372 4803       |H   |		Short_Literal	0x3
0373 0099       |    |		Action	Reference_Dynamic
0374 480b       |H   |		Short_Literal	0xb
0375 4803       |H   |		Short_Literal	0x3
0376 0099       |    |		Action	Reference_Dynamic
0377 480c       |H   |		Short_Literal	0xc
0378 4803       |H   |		Short_Literal	0x3
0379 0099       |    |		Action	Reference_Dynamic
037a 8007       |    |		Call	0x0,0x7
037b 4801       |H   |		Short_Literal	0x1
037c 800d       |    |		Call	0x0,0xd
037d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
037e 0000 0000  |    |		.XXX[0x2]
0380 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0384 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
0388 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
038c 0000 0000  |    |		.BLANK	0000[0x4]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 03bb       |    |		.CONST	0x03bb								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 000d       |    |		.CONST	0x000d								; Number of locals
0393			INIT_0390:
0393 a002       |    |		Store_Unchecked	0x0,0x2
0394 00c6       |    |		Action	Check_Subprogram_Elaborated
0395 e016       |    |		Load	0x0,0x16
0396 e004       |    |		Load	0x0,0x4
0397 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0398 0093 0000  |    |		push_full_address	0x0
039a 60f9       |`   |		Indirect_Literal	Discrete,0x494,{0x80000000, 0x00020000}
039b 0273       | s  |		Execute	Discrete,Plus
039c e005       |    |		Load	0x0,0x5
039d 0273       | s  |		Execute	Discrete,Plus
039e e017       |    |		Load	0x0,0x17
039f 0273       | s  |		Execute	Discrete,Plus
03a0 4805       |H   |		Short_Literal	0x5
03a1 0007       |    |		Action	Break_Optional
03a2 029f 04fb  |    |		Declare_Subprogram	INIT_04f8,For_Call
03a4 029f 050b  |    |		Declare_Subprogram	INIT_0508,For_Call
03a6 a007       |    |		Store_Unchecked	0x0,0x7
03a7 00c6       |    |		Action	Check_Subprogram_Elaborated
03a8 e016       |    |		Load	0x0,0x16
03a9 0092 051b  |    |		Action	Push_String_Extended,0x51b					; "X_Error_With_Value"
03ab 4806       |H   |		Short_Literal	0x6
03ac 4803       |H   |		Short_Literal	0x3
03ad 0099       |    |		Action	Reference_Dynamic
03ae 4807       |H   |		Short_Literal	0x7
03af 4803       |H   |		Short_Literal	0x3
03b0 0099       |    |		Action	Reference_Dynamic
03b1 0093 0000  |    |		push_full_address	0x0
03b3 60dc       |`   |		Indirect_Literal	Discrete,0x490,{0x80000000, 0x00010000}
03b4 0273       | s  |		Execute	Discrete,Plus
03b5 e005       |    |		Load	0x0,0x5
03b6 0273       | s  |		Execute	Discrete,Plus
03b7 e018       |    |		Load	0x0,0x18
03b8 0273       | s  |		Execute	Discrete,Plus
03b9 480d       |H   |		Short_Literal	0xd
03ba 0007       |    |		Action	Break_Optional
03bb			BODY_0390:
03bb 0092 051c  |    |		Action	Push_String_Extended,0x51c					; "X_Error_With_Value conversions"
03bd 8009       |    |		Call	0x0,0x9
03be 4801       |H   |		Short_Literal	0x1
03bf 4820       |H   |		Short_Literal	0x20
03c0 e004       |    |		Load	0x0,0x4
03c1 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
03c2 0334       | 4  |		Declare_Variable	Array,With_Constraint
03c3 4820       |H   |		Short_Literal	0x20
03c4 4801       |H   |		Short_Literal	0x1
03c5 4800       |H   |		Short_Literal	0x0
03c6 00d9       |    |		Load_Top	At_Offset_1
03c7 e60e       |    |		Load	0x3,0xe
03c8 01d6       |    |		Execute	Vector,Field_Write
03c9 3ffb       |?   |		Loop_Increasing	0x3c5
03ca e016       |    |		Load	0x0,0x16
03cb 0322       | "  |		Declare_Variable	Record
03cc 4800       |H   |		Short_Literal	0x0
03cd 00d9       |    |		Load_Top	At_Offset_1
03ce 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03cf 4800       |H   |		Short_Literal	0x0
03d0 00d9       |    |		Load_Top	At_Offset_1
03d1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03d2 4800       |H   |		Short_Literal	0x0
03d3 00d9       |    |		Load_Top	At_Offset_1
03d4 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03d5 4800       |H   |		Short_Literal	0x0
03d6 00d9       |    |		Load_Top	At_Offset_1
03d7 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
03d8 4800       |H   |		Short_Literal	0x0
03d9 00d9       |    |		Load_Top	At_Offset_1
03da 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
03db 4800       |H   |		Short_Literal	0x0
03dc 00d9       |    |		Load_Top	At_Offset_1
03dd 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
03de e016       |    |		Load	0x0,0x16
03df 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
03e0 0337       | 7  |		Declare_Variable	Array
03e1 4815       |H   |		Short_Literal	0x15
03e2 4801       |H   |		Short_Literal	0x1
03e3 4800       |H   |		Short_Literal	0x0
03e4 00d9       |    |		Load_Top	At_Offset_1
03e5 e610       |    |		Load	0x3,0x10
03e6 01d6       |    |		Execute	Vector,Field_Write
03e7 3ffb       |?   |		Loop_Increasing	0x3e3
03e8 e016       |    |		Load	0x0,0x16
03e9 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
03ea 0119       |    |		Execute	Any,Check_In_Formal_Type
03eb 00d9       |    |		Load_Top	At_Offset_1
03ec 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
03ed 0092 0513  |    |		Action	Push_String_Extended,0x513					; "0"
03ef e608       |    |		Load	0x3,0x8
03f0 e609       |    |		Load	0x3,0x9
03f1 480a       |H   |		Short_Literal	0xa
03f2 4803       |H   |		Short_Literal	0x3
03f3 0099       |    |		Action	Reference_Dynamic
03f4 480b       |H   |		Short_Literal	0xb
03f5 4803       |H   |		Short_Literal	0x3
03f6 0099       |    |		Action	Reference_Dynamic
03f7 480c       |H   |		Short_Literal	0xc
03f8 4803       |H   |		Short_Literal	0x3
03f9 0099       |    |		Action	Reference_Dynamic
03fa 8007       |    |		Call	0x0,0x7
03fb 4801       |H   |		Short_Literal	0x1
03fc 4820       |H   |		Short_Literal	0x20
03fd e004       |    |		Load	0x0,0x4
03fe 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
03ff 0334       | 4  |		Declare_Variable	Array,With_Constraint
0400 4820       |H   |		Short_Literal	0x20
0401 4801       |H   |		Short_Literal	0x1
0402 48ff       |H   |		Short_Literal	0xff
0403 00d9       |    |		Load_Top	At_Offset_1
0404 e60e       |    |		Load	0x3,0xe
0405 01d6       |    |		Execute	Vector,Field_Write
0406 3ffb       |?   |		Loop_Increasing	0x402
0407 e016       |    |		Load	0x0,0x16
0408 0322       | "  |		Declare_Variable	Record
0409 48ff       |H   |		Short_Literal	0xff
040a 00d9       |    |		Load_Top	At_Offset_1
040b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
040c 48ff       |H   |		Short_Literal	0xff
040d 00d9       |    |		Load_Top	At_Offset_1
040e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
040f 6770       |gp  |		Indirect_Literal	Discrete,0x380,{0x00000000, 0x0000ffff}
0410 00d9       |    |		Load_Top	At_Offset_1
0411 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0412 4fff       |O   |		Short_Literal	-0x1
0413 00d9       |    |		Load_Top	At_Offset_1
0414 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0415 676a       |gj  |		Indirect_Literal	Discrete,0x380,{0x00000000, 0x0000ffff}
0416 00d9       |    |		Load_Top	At_Offset_1
0417 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0418 48ff       |H   |		Short_Literal	0xff
0419 00d9       |    |		Load_Top	At_Offset_1
041a 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
041b e016       |    |		Load	0x0,0x16
041c 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
041d 0337       | 7  |		Declare_Variable	Array
041e 4815       |H   |		Short_Literal	0x15
041f 4801       |H   |		Short_Literal	0x1
0420 48ff       |H   |		Short_Literal	0xff
0421 00d9       |    |		Load_Top	At_Offset_1
0422 e610       |    |		Load	0x3,0x10
0423 01d6       |    |		Execute	Vector,Field_Write
0424 3ffb       |?   |		Loop_Increasing	0x420
0425 e016       |    |		Load	0x0,0x16
0426 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0427 0119       |    |		Execute	Any,Check_In_Formal_Type
0428 00d9       |    |		Load_Top	At_Offset_1
0429 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
042a 0092 0514  |    |		Action	Push_String_Extended,0x514					; "-1"
042c e608       |    |		Load	0x3,0x8
042d e609       |    |		Load	0x3,0x9
042e 480a       |H   |		Short_Literal	0xa
042f 4803       |H   |		Short_Literal	0x3
0430 0099       |    |		Action	Reference_Dynamic
0431 480b       |H   |		Short_Literal	0xb
0432 4803       |H   |		Short_Literal	0x3
0433 0099       |    |		Action	Reference_Dynamic
0434 480c       |H   |		Short_Literal	0xc
0435 4803       |H   |		Short_Literal	0x3
0436 0099       |    |		Action	Reference_Dynamic
0437 8007       |    |		Call	0x0,0x7
0438 4800       |H   |		Short_Literal	0x0
0439 4801       |H   |		Short_Literal	0x1
043a e004       |    |		Load	0x0,0x4
043b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
043c 0334       | 4  |		Declare_Variable	Array,With_Constraint
043d 4801       |H   |		Short_Literal	0x1
043e 4800       |H   |		Short_Literal	0x0
043f 00da       |    |		Load_Top	At_Offset_2
0440 01d6       |    |		Execute	Vector,Field_Write
0441 4802       |H   |		Short_Literal	0x2
0442 4801       |H   |		Short_Literal	0x1
0443 00da       |    |		Load_Top	At_Offset_2
0444 01d6       |    |		Execute	Vector,Field_Write
0445 e00a       |    |		Load	0x0,0xa
0446 01cc       |    |		Execute	Vector,Catenate
0447 e00b       |    |		Load	0x0,0xb
0448 01cc       |    |		Execute	Vector,Catenate
0449 e00c       |    |		Load	0x0,0xc
044a 01cc       |    |		Execute	Vector,Catenate
044b 4801       |H   |		Short_Literal	0x1
044c 4816       |H   |		Short_Literal	0x16
044d e004       |    |		Load	0x0,0x4
044e 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
044f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0450 4806       |H   |		Short_Literal	0x6
0451 4801       |H   |		Short_Literal	0x1
0452 00da       |    |		Load_Top	At_Offset_2
0453 01d6       |    |		Execute	Vector,Field_Write
0454 4816       |H   |		Short_Literal	0x16
0455 4802       |H   |		Short_Literal	0x2
0456 48ff       |H   |		Short_Literal	0xff
0457 00d9       |    |		Load_Top	At_Offset_1
0458 e60f       |    |		Load	0x3,0xf
0459 01d6       |    |		Execute	Vector,Field_Write
045a 3ffb       |?   |		Loop_Increasing	0x456
045b 01cc       |    |		Execute	Vector,Catenate
045c e016       |    |		Load	0x0,0x16
045d 0322       | "  |		Declare_Variable	Record
045e 4801       |H   |		Short_Literal	0x1
045f 00d9       |    |		Load_Top	At_Offset_1
0460 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0461 4802       |H   |		Short_Literal	0x2
0462 00d9       |    |		Load_Top	At_Offset_1
0463 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0464 4803       |H   |		Short_Literal	0x3
0465 00d9       |    |		Load_Top	At_Offset_1
0466 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0467 4804       |H   |		Short_Literal	0x4
0468 00d9       |    |		Load_Top	At_Offset_1
0469 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
046a 4805       |H   |		Short_Literal	0x5
046b 00d9       |    |		Load_Top	At_Offset_1
046c 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
046d 4806       |H   |		Short_Literal	0x6
046e 00d9       |    |		Load_Top	At_Offset_1
046f 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0470 e016       |    |		Load	0x0,0x16
0471 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
0472 0337       | 7  |		Declare_Variable	Array
0473 4815       |H   |		Short_Literal	0x15
0474 4801       |H   |		Short_Literal	0x1
0475 48ff       |H   |		Short_Literal	0xff
0476 00d9       |    |		Load_Top	At_Offset_1
0477 e610       |    |		Load	0x3,0x10
0478 01d6       |    |		Execute	Vector,Field_Write
0479 3ffb       |?   |		Loop_Increasing	0x475
047a e016       |    |		Load	0x0,0x16
047b 3006       |0   |		Execute	Record,Field_Type,Field_Number 0x6
047c 0119       |    |		Execute	Any,Check_In_Formal_Type
047d 00d9       |    |		Load_Top	At_Offset_1
047e 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
047f 0092 0515  |    |		Action	Push_String_Extended,0x515					; "1.2.3.4.5.6.-1"
0481 e608       |    |		Load	0x3,0x8
0482 e609       |    |		Load	0x3,0x9
0483 480a       |H   |		Short_Literal	0xa
0484 4803       |H   |		Short_Literal	0x3
0485 0099       |    |		Action	Reference_Dynamic
0486 480b       |H   |		Short_Literal	0xb
0487 4803       |H   |		Short_Literal	0x3
0488 0099       |    |		Action	Reference_Dynamic
0489 480c       |H   |		Short_Literal	0xc
048a 4803       |H   |		Short_Literal	0x3
048b 0099       |    |		Action	Reference_Dynamic
048c 8007       |    |		Call	0x0,0x7
048d 4801       |H   |		Short_Literal	0x1
048e 800d       |    |		Call	0x0,0xd
048f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0490 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0494 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b       |    |		.CONST	0x049b								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0001       |    |		.CONST	0x0001								; Number of locals
049b			BODY_0498:
049b			INIT_0498:
049b 00db       |    |		Load_Top	At_Offset_3
049c 00db       |    |		Load_Top	At_Offset_3
049d e602       |    |		Load	0x3,0x2
049e e603       |    |		Load	0x3,0x3
049f 4804       |H   |		Short_Literal	0x4
04a0 4803       |H   |		Short_Literal	0x3
04a1 0099       |    |		Action	Reference_Dynamic
04a2 8002       |    |		Call	0x0,0x2
04a3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04a4 0000 0000  |    |		.BLANK	0000[0x4]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab       |    |		.CONST	0x04ab								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0001       |    |		.CONST	0x0001								; Number of locals
04ab			BODY_04a8:
04ab			INIT_04a8:
04ab 00db       |    |		Load_Top	At_Offset_3
04ac 00db       |    |		Load_Top	At_Offset_3
04ad e019       |    |		Load	0x0,0x19
04ae a01a       |    |		Store_Unchecked	0x0,0x1a
04af 801b       |    |		Call	0x0,0x1b
04b0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04b1 0000 0000  |    |		.BLANK	0000[0x7]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb       |    |		.CONST	0x04bb								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0001       |    |		.CONST	0x0001								; Number of locals
04bb			BODY_04b8:
04bb			INIT_04b8:
04bb 00db       |    |		Load_Top	At_Offset_3
04bc 00db       |    |		Load_Top	At_Offset_3
04bd e602       |    |		Load	0x3,0x2
04be e603       |    |		Load	0x3,0x3
04bf 4804       |H   |		Short_Literal	0x4
04c0 4803       |H   |		Short_Literal	0x3
04c1 0099       |    |		Action	Reference_Dynamic
04c2 8002       |    |		Call	0x0,0x2
04c3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04c4 0000 0000  |    |		.BLANK	0000[0x4]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb       |    |		.CONST	0x04cb								; Address of begin
04c9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ca 0001       |    |		.CONST	0x0001								; Number of locals
04cb			BODY_04c8:
04cb			INIT_04c8:
04cb 00db       |    |		Load_Top	At_Offset_3
04cc 00db       |    |		Load_Top	At_Offset_3
04cd e01c       |    |		Load	0x0,0x1c
04ce a01d       |    |		Store_Unchecked	0x0,0x1d
04cf 801b       |    |		Call	0x0,0x1b
04d0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04d1 0000 0000  |    |		.BLANK	0000[0x7]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db       |    |		.CONST	0x04db								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0001       |    |		.CONST	0x0001								; Number of locals
04db			BODY_04d8:
04db			INIT_04d8:
04db 00db       |    |		Load_Top	At_Offset_3
04dc 00db       |    |		Load_Top	At_Offset_3
04dd e602       |    |		Load	0x3,0x2
04de e603       |    |		Load	0x3,0x3
04df 4804       |H   |		Short_Literal	0x4
04e0 4803       |H   |		Short_Literal	0x3
04e1 0099       |    |		Action	Reference_Dynamic
04e2 8002       |    |		Call	0x0,0x2
04e3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04e4 0000 0000  |    |		.BLANK	0000[0x4]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb       |    |		.CONST	0x04eb								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0001       |    |		.CONST	0x0001								; Number of locals
04eb			BODY_04e8:
04eb			INIT_04e8:
04eb 00db       |    |		Load_Top	At_Offset_3
04ec 00db       |    |		Load_Top	At_Offset_3
04ed e01e       |    |		Load	0x0,0x1e
04ee a01f       |    |		Store_Unchecked	0x0,0x1f
04ef 801b       |    |		Call	0x0,0x1b
04f0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04f1 0000 0000  |    |		.BLANK	0000[0x7]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb       |    |		.CONST	0x04fb								; Address of begin
04f9 0004       |    |		.CONST	0x0004								; Address of exception handler
04fa 0001       |    |		.CONST	0x0001								; Number of locals
04fb			BODY_04f8:
04fb			INIT_04f8:
04fb 00db       |    |		Load_Top	At_Offset_3
04fc 00db       |    |		Load_Top	At_Offset_3
04fd e602       |    |		Load	0x3,0x2
04fe e603       |    |		Load	0x3,0x3
04ff 4804       |H   |		Short_Literal	0x4
0500 4803       |H   |		Short_Literal	0x3
0501 0099       |    |		Action	Reference_Dynamic
0502 8002       |    |		Call	0x0,0x2
0503 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0504 0000 0000  |    |		.BLANK	0000[0x4]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b       |    |		.CONST	0x050b								; Address of begin
0509 0004       |    |		.CONST	0x0004								; Address of exception handler
050a 0001       |    |		.CONST	0x0001								; Number of locals
050b			BODY_0508:
050b			INIT_0508:
050b 00db       |    |		Load_Top	At_Offset_3
050c 00db       |    |		Load_Top	At_Offset_3
050d e020       |    |		Load	0x0,0x20
050e a021       | !  |		Store_Unchecked	0x0,0x21
050f 801b       |    |		Call	0x0,0x1b
0510 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0511 ; --------------------------------------------------------------------------------------
0511 ; STRING TABLE
0511 ; --------------------------------------------------------------------------------------
0511 001a       |    |		.STRTAB	0x001a->0x051e							; "X_Error_With_Atom"
0512 0029       | )  |		.STRTAB	0x0029->0x0526							; "X_Error_With_Atom conversions"
0513 0044       | D  |		.STRTAB	0x0044->0x0535							; "0"
0514 0043       | C  |		.STRTAB	0x0043->0x0535							; "-1"
0515 0043       | C  |		.STRTAB	0x0043->0x0536							; "1.2.3.4.5.6.-1"
0516 004f       | O  |		.STRTAB	0x004f->0x053d							; "X_Error_With_Nothing"
0517 0061       | a  |		.STRTAB	0x0061->0x0547							; "X_Error_With_Nothing conversions"
0518 007f       |    |		.STRTAB	0x007f->0x0557							; "1.2.3.-1.4.5.-1"
0519 008c       |    |		.STRTAB	0x008c->0x055f							; "X_Error_With_Resource"
051a 009f       |    |		.STRTAB	0x009f->0x0569							; "X_Error_With_Resource conversions"
051b 00be       |    |		.STRTAB	0x00be->0x057a							; "X_Error_With_Value"
051c 00ce       |    |		.STRTAB	0x00ce->0x0583							; "X_Error_With_Value conversions"
051d 00ea       |    |		.STREND 0x00ea->0x0592
051e 585f 4572  |X_Er|		.STRTAB_STRINGS
0592 0000 0000  |    |		.BLANK	0000[0x6]
0598 ; --------------------------------------------------------------------------------------
0598 ; Debug Table
0598 ; --------------------------------------------------------------------------------------
0598 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x690d,0x0000,0x0001,0x000e
059e 000b 0000  |    |		.DBG4T	0x000b,0x0000,0x8000,0x0000
05a2 001b 05d6  |    |		.DBG4T	0x001b,0x05d6,0x8001,0x0000
05a6 0033 05e3  | 3  |		.DBG4T	0x0033,0x05e3,0x0001,0x0000
05aa 014b 05ec  | K  |		.DBG4T	0x014b,0x05ec,0x0001,0x0000
05ae 027b 05f5  | {  |		.DBG4T	0x027b,0x05f5,0x0001,0x0000
05b2 0393 05fe  |    |		.DBG4T	0x0393,0x05fe,0x0001,0x0000
05b6 049b 0000  |    |		.DBG4T	0x049b,0x0000,0x000b,0x0000
05ba 04ab 0000  |    |		.DBG4T	0x04ab,0x0000,0x000b,0x0000
05be 04bb 0000  |    |		.DBG4T	0x04bb,0x0000,0x000b,0x0000
05c2 04cb 0000  |    |		.DBG4T	0x04cb,0x0000,0x000b,0x0000
05c6 04db 0000  |    |		.DBG4T	0x04db,0x0000,0x000b,0x0000
05ca 04eb 0000  |    |		.DBG4T	0x04eb,0x0000,0x000b,0x0000
05ce 04fb 0000  |    |		.DBG4T	0x04fb,0x0000,0x000b,0x0000
05d2 050b 0000  |    |		.DBG4T	0x050b,0x0000,0x000b,0x0000
05d6 ; --------------------------------------------------------------------------------------
05d6 ; Debug chain
05d6 ; --------------------------------------------------------------------------------------
05d6 0007 0004  |    |		.DBGLEN	0x0007,0x0004
05d8 001b 001c  |    |		.DBGLNO	0x001b,0x001c,0x001d,0x001e,0x0020,0x0022,0x0024,0x0026,0x0027,0x0028,0x0029
05e3 ; --------------------------------------------------------------------------------------
05e3 ; Debug chain
05e3 ; --------------------------------------------------------------------------------------
05e3 0002 0005  |    |		.DBGLEN	0x0002,0x0005
05e5 0033 0042  | 3 B|		.DBGLNO	0x0033,0x0042,0x005b,0x005e,0x009d,0x00dc,0x0133
05ec ; --------------------------------------------------------------------------------------
05ec ; Debug chain
05ec ; --------------------------------------------------------------------------------------
05ec 0002 0005  |    |		.DBGLEN	0x0002,0x0005
05ee 014b 015a  | K Z|		.DBGLNO	0x014b,0x015a,0x0173,0x0176,0x01bf,0x0208,0x0269
05f5 ; --------------------------------------------------------------------------------------
05f5 ; Debug chain
05f5 ; --------------------------------------------------------------------------------------
05f5 0002 0005  |    |		.DBGLEN	0x0002,0x0005
05f7 027b 028a  | {  |		.DBGLNO	0x027b,0x028a,0x02a3,0x02a6,0x02e5,0x0324,0x037b
05fe ; --------------------------------------------------------------------------------------
05fe ; Debug chain
05fe ; --------------------------------------------------------------------------------------
05fe 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0600 0393 03a2  |    |		.DBGLNO	0x0393,0x03a2,0x03bb,0x03be,0x03fb,0x0438,0x048d
0607 0000 0000  |    |		.BLANK	0000[0x1f9]