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

⟦9cb4f04d0⟧

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

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0528       | (  |		.CONST	0x0528								; 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 00c5       |    |		.CONST	0x00c5								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 003d       | =  |		.CONST	0x003d								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0
000c 610f       |a   |		Indirect_Literal	Discrete,0x11c,{0x7fffffff, 0xffffffff}
000d 00e5       |    |		Load_Encached	Long_Integer_Cache
000e 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
000f 00e5       |    |		Load_Encached	Long_Integer_Cache
0010 0401       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x1
0011 00d8       |    |		Load_Top	At_Offset_0
0012 0903       |    |		Execute_Immediate	Binary_Scale,0x3
0013 00e5       |    |		Load_Encached	Long_Integer_Cache
0014 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0015 4f80       |O   |		Short_Literal	-0x80
0016 00e5       |    |		Load_Encached	Long_Integer_Cache
0017 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0018 00e5       |    |		Load_Encached	Long_Integer_Cache
0019 047f       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x7f
001a 00db       |    |		Load_Top	At_Offset_3
001b 0903       |    |		Execute_Immediate	Binary_Scale,0x3
001c e20d       |    |		Load	0x1,0xd
001d 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
001e 60f9       |`   |		Indirect_Literal	Discrete,0x118,{0xffffffff, 0xffff8000}
001f 00e5       |    |		Load_Encached	Long_Integer_Cache
0020 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0021 60f2       |`   |		Indirect_Literal	Discrete,0x114,{0x00000000, 0x00007fff}
0022 00e5       |    |		Load_Encached	Long_Integer_Cache
0023 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0024 e20e       |    |		Load	0x1,0xe
0025 0904       |    |		Execute_Immediate	Binary_Scale,0x4
0026 e20d       |    |		Load	0x1,0xd
0027 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0028 60e7       |`   |		Indirect_Literal	Discrete,0x110,{0xffffffff, 0xff800000}
0029 00e5       |    |		Load_Encached	Long_Integer_Cache
002a 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
002b 60e0       |`   |		Indirect_Literal	Discrete,0x10c,{0x00000000, 0x007fffff}
002c 00e5       |    |		Load_Encached	Long_Integer_Cache
002d 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
002e 4818       |H   |		Short_Literal	0x18
002f e20e       |    |		Load	0x1,0xe
0030 0271       | q  |		Execute	Discrete,Times
0031 e20d       |    |		Load	0x1,0xd
0032 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0033 60d4       |`   |		Indirect_Literal	Discrete,0x108,{0xffffffff, 0x80000000}
0034 00e5       |    |		Load_Encached	Long_Integer_Cache
0035 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0036 60cd       |`   |		Indirect_Literal	Discrete,0x104,{0x00000000, 0x7fffffff}
0037 00e5       |    |		Load_Encached	Long_Integer_Cache
0038 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0039 e20e       |    |		Load	0x1,0xe
003a 0905       |    |		Execute_Immediate	Binary_Scale,0x5
003b e20d       |    |		Load	0x1,0xd
003c 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
003d 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated
003f 58c0       |X   |		Indirect_Literal	Float,0x100,-7.2370051459731155e+75
0040 00e6       |    |		Load_Encached	Float_Cache
0041 03db       |    |		Declare_Variable	Float,Visible,With_Value
0042 58b9       |X   |		Indirect_Literal	Float,0xfc,7.2370051459731155e+75
0043 00e6       |    |		Load_Encached	Float_Cache
0044 03db       |    |		Declare_Variable	Float,Visible,With_Value
0045 e20d       |    |		Load	0x1,0xd
0046 0406       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x6
0047 e20e       |    |		Load	0x1,0xe
0048 0905       |    |		Execute_Immediate	Binary_Scale,0x5
0049 e20d       |    |		Load	0x1,0xd
004a 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
004b 58ac       |X   |		Indirect_Literal	Float,0xf8,-7.2370055773322614e+75
004c 00e6       |    |		Load_Encached	Float_Cache
004d 03db       |    |		Declare_Variable	Float,Visible,With_Value
004e 58a5       |X   |		Indirect_Literal	Float,0xf4,7.2370055773322614e+75
004f 00e6       |    |		Load_Encached	Float_Cache
0050 03db       |    |		Declare_Variable	Float,Visible,With_Value
0051 e20d       |    |		Load	0x1,0xd
0052 040f       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0xf
0053 e20e       |    |		Load	0x1,0xe
0054 0906       |    |		Execute_Immediate	Binary_Scale,0x6
0055 e20d       |    |		Load	0x1,0xd
0056 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0057 5898       |X   |		Indirect_Literal	Float,0xf0,0.0
0058 00e6       |    |		Load_Encached	Float_Cache
0059 03db       |    |		Declare_Variable	Float,Visible,With_Value
005a 5895       |X   |		Indirect_Literal	Float,0xf0,0.0
005b 00e6       |    |		Load_Encached	Float_Cache
005c 03db       |    |		Declare_Variable	Float,Visible,With_Value
005d e20d       |    |		Load	0x1,0xd
005e 0412       |    |		Execute_Immediate	Set_Value_Visible_Unchecked,0x12
005f e20e       |    |		Load	0x1,0xe
0060 0906       |    |		Execute_Immediate	Binary_Scale,0x6
0061 e20d       |    |		Load	0x1,0xd
0062 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0063 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated
0065 e20e       |    |		Load	0x1,0xe
0066 0903       |    |		Execute_Immediate	Binary_Scale,0x3
0067 e20d       |    |		Load	0x1,0xd
0068 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0069 e20e       |    |		Load	0x1,0xe
006a 0903       |    |		Execute_Immediate	Binary_Scale,0x3
006b e20d       |    |		Load	0x1,0xd
006c 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
006d e20e       |    |		Load	0x1,0xe
006e 0905       |    |		Execute_Immediate	Binary_Scale,0x5
006f e20d       |    |		Load	0x1,0xd
0070 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0071 e20e       |    |		Load	0x1,0xe
0072 0905       |    |		Execute_Immediate	Binary_Scale,0x5
0073 e20d       |    |		Load	0x1,0xd
0074 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0075 4900       |I   |		Short_Literal	0x100
0076 e20d       |    |		Load	0x1,0xd
0077 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0078 e20e       |    |		Load	0x1,0xe
0079 0903       |    |		Execute_Immediate	Binary_Scale,0x3
007a e20d       |    |		Load	0x1,0xd
007b 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
007c 606f       |`o  |		Indirect_Literal	Discrete,0xec,{0x00000000, 0x00010000}
007d e20d       |    |		Load	0x1,0xd
007e 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
007f e20e       |    |		Load	0x1,0xe
0080 0904       |    |		Execute_Immediate	Binary_Scale,0x4
0081 e20d       |    |		Load	0x1,0xd
0082 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0083 6080       |`   |		Indirect_Literal	Discrete,0x104,{0x00000000, 0x7fffffff}
0084 e20d       |    |		Load	0x1,0xd
0085 03f0       |    |		Declare_Variable	Discrete,Visible,With_Value
0086 e20e       |    |		Load	0x1,0xe
0087 0905       |    |		Execute_Immediate	Binary_Scale,0x5
0088 e20d       |    |		Load	0x1,0xd
0089 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
008a 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
008c e20f       |    |		Load	0x1,0xf
008d 0902       |    |		Execute_Immediate	Binary_Scale,0x2
008e e20d       |    |		Load	0x1,0xd
008f 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0090 e20e       |    |		Load	0x1,0xe
0091 e20d       |    |		Load	0x1,0xd
0092 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0093 e20e       |    |		Load	0x1,0xe
0094 e20d       |    |		Load	0x1,0xd
0095 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
0096 4800       |H   |		Short_Literal	0x0
0097 e20e       |    |		Load	0x1,0xe
0098 0271       | q  |		Execute	Discrete,Times
0099 e20d       |    |		Load	0x1,0xd
009a 03e8       |    |		Declare_Variable	Discrete,Visible,With_Value,With_Constraint
009b 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated
009d 00bf       |    |		Action	Accept_Activation
009e e001       |    |		Load	0x0,0x1
009f e002       |    |		Load	0x0,0x2
00a0 00e6       |    |		Load_Encached	Float_Cache
00a1 e003       |    |		Load	0x0,0x3
00a2 1b79       | y  |		Execute	Package,Field_Read,Field_Number 0x79
00a3 0387       |    |		Declare_Variable	Package
00a4 00d8       |    |		Load_Top	At_Offset_0
00a5 020f       |    |		Execute	Module,Activate
00a6 4800       |H   |		Short_Literal	0x0
00a7 4826       |H&  |		Short_Literal	0x26
00a8 029f 0193  |    |		Declare_Subprogram	INIT_0190,For_Call
00aa 03fd       |    |		Declare_Type	Discrete,Defined
00ab e004       |    |		Load	0x0,0x4
00ac e005       |    |		Load	0x0,0x5
00ad 00da       |    |		Load_Top	At_Offset_2
00ae 4800       |H   |		Short_Literal	0x0
00af 4800       |H   |		Short_Literal	0x0
00b0 4826       |H&  |		Short_Literal	0x26
00b1 0092 0328  |   (|		Action	Push_String_Extended,0x328					; "others => Unspecified"
00b3 00ea       |    |		Load_Encached	Null_String_Cache
00b4 00ea       |    |		Load_Encached	Null_String_Cache
00b5 4800       |H   |		Short_Literal	0x0
00b6 4826       |H&  |		Short_Literal	0x26
00b7 e006       |    |		Load	0x0,0x6
00b8 0387       |    |		Declare_Variable	Package
00b9 00d8       |    |		Load_Top	At_Offset_0
00ba 020f       |    |		Execute	Module,Activate
00bb 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
00bc 00c7       |    |		Action	Elaborate_Subprogram
00bd 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
00be 00c7       |    |		Action	Elaborate_Subprogram
00bf 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
00c0 00c7       |    |		Action	Elaborate_Subprogram
00c1 029d 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call
00c3 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
00c4 00c7       |    |		Action	Elaborate_Subprogram
00c5			BODY_0008:
00c5 00bc       |    |		Action	Signal_Activated
00c6 00bb       |    |		Action	Signal_Completion
00c7 0000       |    |		.XXX[0x1]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2
00cc e210       |    |		Load	0x1,0x10
00cd 027b       | {  |		Execute	Discrete,Greater_Equal
00ce 6806       |h   |		Jump_Zero	0xd5
00cf 00db       |    |		Load_Top	At_Offset_3
00d0 e211       |    |		Load	0x1,0x11
00d1 027a       | z  |		Execute	Discrete,Less_Equal
00d2 6802       |h   |		Jump_Zero	0xd5
00d3 e212       |    |		Load	0x1,0x12
00d4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00d5 00da       |    |		Load_Top	At_Offset_2
00d6 e213       |    |		Load	0x1,0x13
00d7 027b       | {  |		Execute	Discrete,Greater_Equal
00d8 6806       |h   |		Jump_Zero	0xdf
00d9 00db       |    |		Load_Top	At_Offset_3
00da e214       |    |		Load	0x1,0x14
00db 027a       | z  |		Execute	Discrete,Less_Equal
00dc 6802       |h   |		Jump_Zero	0xdf
00dd e215       |    |		Load	0x1,0x15
00de 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00df 00da       |    |		Load_Top	At_Offset_2
00e0 e216       |    |		Load	0x1,0x16
00e1 027b       | {  |		Execute	Discrete,Greater_Equal
00e2 6806       |h   |		Jump_Zero	0xe9
00e3 00db       |    |		Load_Top	At_Offset_3
00e4 e217       |    |		Load	0x1,0x17
00e5 027a       | z  |		Execute	Discrete,Less_Equal
00e6 6802       |h   |		Jump_Zero	0xe9
00e7 e218       |    |		Load	0x1,0x18
00e8 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00e9 e21b       |    |		Load	0x1,0x1b
00ea 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
00eb 0000       |    |		.XXX[0x1]
00ec 0000 0000  |    |		.LITERAL	{0x00000000, 0x00010000}
00f0 0000 0000  |    |		.DBL	0.0
00f2 0000 0000  |    |
00f4 4faf ffff  |O   |		.DBL	7.2370055773322614e+75
00f6 ffff ffff  |    |
00f8 cfaf ffff  |    |		.DBL	-7.2370055773322614e+75
00fa ffff ffff  |    |
00fc 4faf ffff  |O   |		.DBL	7.2370051459731155e+75
00fe e000 0000  |    |
0100 cfaf ffff  |    |		.DBL	-7.2370051459731155e+75
0102 e000 0000  |    |
0104 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
0108 ffff ffff  |    |		.LITERAL	{0xffffffff, 0x80000000}
010c 0000 0000  |    |		.LITERAL	{0x00000000, 0x007fffff}
0110 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xff800000}
0114 0000 0000  |    |		.LITERAL	{0x00000000, 0x00007fff}
0118 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffff8000}
011c 7fff ffff  |    |		.LITERAL	{0x7fffffff, 0xffffffff}
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 00da       |    |		Load_Top	At_Offset_2
0124 e21d       |    |		Load	0x1,0x1d
0125 0243       | C  |		Execute	Float,Greater_Equal
0126 680a       |h   |		Jump_Zero	0x131
0127 00db       |    |		Load_Top	At_Offset_3
0128 e21e       |    |		Load	0x1,0x1e
0129 0242       | B  |		Execute	Float,Less_Equal
012a 6806       |h   |		Jump_Zero	0x131
012b e5fd       |    |		Load	0x2,-0x3
012c e21f       |    |		Load	0x1,0x1f
012d 027a       | z  |		Execute	Discrete,Less_Equal
012e 6802       |h   |		Jump_Zero	0x131
012f e220       |    |		Load	0x1,0x20
0130 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0131 00da       |    |		Load_Top	At_Offset_2
0132 e221       | !  |		Load	0x1,0x21
0133 0243       | C  |		Execute	Float,Greater_Equal
0134 680a       |h   |		Jump_Zero	0x13f
0135 00db       |    |		Load_Top	At_Offset_3
0136 e222       | "  |		Load	0x1,0x22
0137 0242       | B  |		Execute	Float,Less_Equal
0138 6806       |h   |		Jump_Zero	0x13f
0139 e5fd       |    |		Load	0x2,-0x3
013a e223       | #  |		Load	0x1,0x23
013b 027a       | z  |		Execute	Discrete,Less_Equal
013c 6802       |h   |		Jump_Zero	0x13f
013d e224       | $  |		Load	0x1,0x24
013e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
013f e228       | (  |		Load	0x1,0x28
0140 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0141 0000 0000  |    |		.BLANK	0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0155       | U  |		.CONST	0x0155								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0002       |    |		.CONST	0x0002								; Number of locals
014b			INIT_0148:
014b 00db       |    |		Load_Top	At_Offset_3
014c 00db       |    |		Load_Top	At_Offset_3
014d 0272       | r  |		Execute	Discrete,Minus
014e 00d8       |    |		Load_Top	At_Offset_0
014f e20d       |    |		Load	0x1,0xd
0150 0260       | `  |		Execute	Discrete,In_Type
0151 7001       |p   |		Jump_Nonzero	0x153
0152 0801       |    |		Execute_Immediate	Raise,0x1
0153 e20d       |    |		Load	0x1,0xd
0154 03f1       |    |		Declare_Variable	Discrete,With_Value
0155			BODY_0148:
0155 00d8       |    |		Load_Top	At_Offset_0
0156 e22e       | .  |		Load	0x1,0x2e
0157 027a       | z  |		Execute	Discrete,Less_Equal
0158 6802       |h   |		Jump_Zero	0x15b
0159 e22f       | /  |		Load	0x1,0x2f
015a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
015b 00d8       |    |		Load_Top	At_Offset_0
015c e230       | 0  |		Load	0x1,0x30
015d 027a       | z  |		Execute	Discrete,Less_Equal
015e 6802       |h   |		Jump_Zero	0x161
015f e231       | 1  |		Load	0x1,0x31
0160 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0161 e233       | 3  |		Load	0x1,0x33
0162 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0163 0000 0000  |    |		.BLANK	0000[0x5]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016f       | o  |		.CONST	0x016f								; Address of begin
0169 0180       |    |		.CONST	0x0180								; Address of exception handler
016a 0003       |    |		.CONST	0x0003								; Number of locals
016b			INIT_0168:
016b e23c       | <  |		Load	0x1,0x3c
016c 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
016d 029f 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Call
016f			BODY_0168:
016f e5ff       |    |		Load	0x2,-0x1
0170 e23c       | <  |		Load	0x1,0x3c
0171 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0172 003a       | :  |		Store_Top	Access,At_Offset_2
0173 00cf       |    |		Action	Mark_Auxiliary
0174 7806       |x   |		Jump	0x17b
0175 8403       |    |		Call	0x2,0x3
0176 00da       |    |		Load_Top	At_Offset_2
0177 e23c       | <  |		Load	0x1,0x3c
0178 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0179 003b       | ;  |		Store_Top	Access,At_Offset_3
017a 00c9       |    |		Action	Pop_Auxiliary_Loop
017b 00da       |    |		Load_Top	At_Offset_2
017c e23c       | <  |		Load	0x1,0x3c
017d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
017e 6ff6       |o   |		Jump_Zero	0x175
017f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0180			TRAP_0168:
0180 010e       |    |		Execute	Exception,Is_Constraint_Error
0181 680c       |h   |		Jump_Zero	0x18e
0182 4800       |H   |		Short_Literal	0x0
0183 4800       |H   |		Short_Literal	0x0
0184 4807       |H   |		Short_Literal	0x7
0185 0092 0329  |   )|		Action	Push_String_Extended,0x329					; "Had Problem parsing "
0187 e5ff       |    |		Load	0x2,-0x1
0188 01cc       |    |		Execute	Vector,Catenate
0189 00ea       |    |		Load_Encached	Null_String_Cache
018a e007       |    |		Load	0x0,0x7
018b 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
018c 00d8       |    |		Load_Top	At_Offset_0
018d 0101       |    |		Execute	Exception,Reraise
018e 0100       |    |		Execute	Exception,Raise
018f 0000       |    |		.XXX[0x1]
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 4607       |F   |		Jump_Case	0x8
0194 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0195 7806       |x   |		Jump	0x19c								; case 0x1
0196 7809       |x   |		Jump	0x1a0								; case 0x2
0197 780d       |x   |		Jump	0x1a5								; case 0x3
0198 7810       |x   |		Jump	0x1a9								; case 0x4
0199 7811       |x   |		Jump	0x1ab								; case 0x5
019a 7812       |x   |		Jump	0x1ad								; case 0x6
019b 7815       |x   |		Jump	0x1b1								; case 0x7
019c 00da       |    |		Load_Top	At_Offset_2
019d 0091 0301  |    |		Action	Push_String_Extended_Indexed,0x301				; "NIL"
019f 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01a0 00db       |    |		Load_Top	At_Offset_3
01a1 00db       |    |		Load_Top	At_Offset_3
01a2 00e0       |    |		Load_Encached	Standard_Cache
01a3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01a4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01a5 00da       |    |		Load_Top	At_Offset_2
01a6 00e0       |    |		Load_Encached	Standard_Cache
01a7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01a8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01a9 00db       |    |		Load_Top	At_Offset_3
01aa 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01ab 00db       |    |		Load_Top	At_Offset_3
01ac 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01ad e23b       | ;  |		Load	0x1,0x3b
01ae 00dc       |    |		Load_Top	At_Offset_4
01af 0267       | g  |		Execute	Discrete,Predecessor
01b0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01b1 e23b       | ;  |		Load	0x1,0x3b
01b2 00dc       |    |		Load_Top	At_Offset_4
01b3 0268       | h  |		Execute	Discrete,Successor
01b4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01b5 0000 0000  |    |		.XXX[0x3]
01b7 0000       |    |
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bd       |    |		.CONST	0x01bd								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0003       |    |		.CONST	0x0003								; Number of locals
01bb			INIT_01b8:
01bb 00e6       |    |		Load_Encached	Float_Cache
01bc 00e4       |    |		Load_Encached	Positive_Cache
01bd			BODY_01b8:
01bd 00e4       |    |		Load_Encached	Positive_Cache
01be e23a       | :  |		Load	0x1,0x3a
01bf 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01c0 e5ff       |    |		Load	0x2,-0x1
01c1 e23a       | :  |		Load	0x1,0x3a
01c2 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01c3 004b       | K  |		Store_Top	Float,At_Offset_3
01c4 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01c5 00d9       |    |		Load_Top	At_Offset_1
01c6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01c7 0000       |    |		.XXX[0x1]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d3       |    |		.CONST	0x01d3								; Address of begin
01c9 02ec       |    |		.CONST	0x02ec								; Address of exception handler
01ca 0003       |    |		.CONST	0x0003								; Number of locals
01cb			INIT_01c8:
01cb e402       |    |		Load	0x2,0x2
01cc e23c       | <  |		Load	0x1,0x3c
01cd 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
01ce 00ea       |    |		Load_Encached	Null_String_Cache
01cf 4800       |H   |		Short_Literal	0x0
01d0 e402       |    |		Load	0x2,0x2
01d1 e23c       | <  |		Load	0x1,0x3c
01d2 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
01d3			BODY_01c8:
01d3 00d9       |    |		Load_Top	At_Offset_1
01d4 4626       |F&  |		Jump_Case	0x27
01d5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x0
01d6 782b       |x+  |		Jump	0x202								; case 0x1
01d7 7830       |x0  |		Jump	0x208								; case 0x2
01d8 7835       |x5  |		Jump	0x20e								; case 0x3
01d9 783a       |x:  |		Jump	0x214								; case 0x4
01da 783f       |x?  |		Jump	0x21a								; case 0x5
01db 7844       |xD  |		Jump	0x220								; case 0x6
01dc 7849       |xI  |		Jump	0x226								; case 0x7
01dd 784e       |xN  |		Jump	0x22c								; case 0x8
01de 7853       |xS  |		Jump	0x232								; case 0x9
01df 7858       |xX  |		Jump	0x238								; case 0xa
01e0 785d       |x]  |		Jump	0x23e								; case 0xb
01e1 7862       |xb  |		Jump	0x244								; case 0xc
01e2 7867       |xg  |		Jump	0x24a								; case 0xd
01e3 786e       |xn  |		Jump	0x252								; case 0xe
01e4 7875       |xu  |		Jump	0x25a								; case 0xf
01e5 787a       |xz  |		Jump	0x260								; case 0x10
01e6 787f       |x   |		Jump	0x266								; case 0x11
01e7 7886       |x   |		Jump	0x26e								; case 0x12
01e8 788d       |x   |		Jump	0x276								; case 0x13
01e9 7892       |x   |		Jump	0x27c								; case 0x14
01ea 7897       |x   |		Jump	0x282								; case 0x15
01eb 789e       |x   |		Jump	0x28a								; case 0x16
01ec 78a5       |x   |		Jump	0x292								; case 0x17
01ed 78aa       |x   |		Jump	0x298								; case 0x18
01ee 78af       |x   |		Jump	0x29e								; case 0x19
01ef 78b4       |x   |		Jump	0x2a4								; case 0x1a
01f0 78b9       |x   |		Jump	0x2aa								; case 0x1b
01f1 78be       |x   |		Jump	0x2b0								; case 0x1c
01f2 78c3       |x   |		Jump	0x2b6								; case 0x1d
01f3 78c8       |x   |		Jump	0x2bc								; case 0x1e
01f4 78cd       |x   |		Jump	0x2c2								; case 0x1f
01f5 78d2       |x   |		Jump	0x2c8								; case 0x20
01f6 78d7       |x   |		Jump	0x2ce								; case 0x21
01f7 78dc       |x   |		Jump	0x2d4								; case 0x22
01f8 78e1       |x   |		Jump	0x2da								; case 0x23
01f9 78e6       |x   |		Jump	0x2e0								; case 0x24
01fa 78eb       |x   |		Jump	0x2e6								; case 0x25
01fb 7800       |x   |		Jump	0x1fc								; case 0x26
01fc 00d8       |    |		Load_Top	At_Offset_0
01fd 00e5       |    |		Load_Encached	Long_Integer_Cache
01fe 00e0       |    |		Load_Encached	Standard_Cache
01ff 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0200 c238       | 8  |		Store	0x1,0x38
0201 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0202 00d8       |    |		Load_Top	At_Offset_0
0203 00e5       |    |		Load_Encached	Long_Integer_Cache
0204 00e0       |    |		Load_Encached	Standard_Cache
0205 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0206 a210       |    |		Store_Unchecked	0x1,0x10
0207 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0208 00d8       |    |		Load_Top	At_Offset_0
0209 00e5       |    |		Load_Encached	Long_Integer_Cache
020a 00e0       |    |		Load_Encached	Standard_Cache
020b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
020c a211       |    |		Store_Unchecked	0x1,0x11
020d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
020e 00d8       |    |		Load_Top	At_Offset_0
020f 00e5       |    |		Load_Encached	Long_Integer_Cache
0210 00e0       |    |		Load_Encached	Standard_Cache
0211 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0212 c212       |    |		Store	0x1,0x12
0213 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0214 00d8       |    |		Load_Top	At_Offset_0
0215 00e5       |    |		Load_Encached	Long_Integer_Cache
0216 00e0       |    |		Load_Encached	Standard_Cache
0217 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0218 a213       |    |		Store_Unchecked	0x1,0x13
0219 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
021a 00d8       |    |		Load_Top	At_Offset_0
021b 00e5       |    |		Load_Encached	Long_Integer_Cache
021c 00e0       |    |		Load_Encached	Standard_Cache
021d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
021e a214       |    |		Store_Unchecked	0x1,0x14
021f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0220 00d8       |    |		Load_Top	At_Offset_0
0221 00e5       |    |		Load_Encached	Long_Integer_Cache
0222 00e0       |    |		Load_Encached	Standard_Cache
0223 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0224 c215       |    |		Store	0x1,0x15
0225 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0226 00d8       |    |		Load_Top	At_Offset_0
0227 00e5       |    |		Load_Encached	Long_Integer_Cache
0228 00e0       |    |		Load_Encached	Standard_Cache
0229 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
022a a216       |    |		Store_Unchecked	0x1,0x16
022b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
022c 00d8       |    |		Load_Top	At_Offset_0
022d 00e5       |    |		Load_Encached	Long_Integer_Cache
022e 00e0       |    |		Load_Encached	Standard_Cache
022f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0230 a217       |    |		Store_Unchecked	0x1,0x17
0231 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0232 00d8       |    |		Load_Top	At_Offset_0
0233 00e5       |    |		Load_Encached	Long_Integer_Cache
0234 00e0       |    |		Load_Encached	Standard_Cache
0235 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0236 c218       |    |		Store	0x1,0x18
0237 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0238 00d8       |    |		Load_Top	At_Offset_0
0239 00e5       |    |		Load_Encached	Long_Integer_Cache
023a 00e0       |    |		Load_Encached	Standard_Cache
023b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
023c a219       |    |		Store_Unchecked	0x1,0x19
023d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
023e 00d8       |    |		Load_Top	At_Offset_0
023f 00e5       |    |		Load_Encached	Long_Integer_Cache
0240 00e0       |    |		Load_Encached	Standard_Cache
0241 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0242 a21a       |    |		Store_Unchecked	0x1,0x1a
0243 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0244 00d8       |    |		Load_Top	At_Offset_0
0245 00e5       |    |		Load_Encached	Long_Integer_Cache
0246 00e0       |    |		Load_Encached	Standard_Cache
0247 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0248 c21b       |    |		Store	0x1,0x1b
0249 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
024a 00ea       |    |		Load_Encached	Null_String_Cache
024b 4800       |H   |		Short_Literal	0x0
024c e402       |    |		Load	0x2,0x2
024d e23c       | <  |		Load	0x1,0x3c
024e 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
024f 823d       | =  |		Call	0x1,0x3d
0250 a21d       |    |		Store_Unchecked	0x1,0x1d
0251 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0252 00ea       |    |		Load_Encached	Null_String_Cache
0253 4800       |H   |		Short_Literal	0x0
0254 e402       |    |		Load	0x2,0x2
0255 e23c       | <  |		Load	0x1,0x3c
0256 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0257 823d       | =  |		Call	0x1,0x3d
0258 a21e       |    |		Store_Unchecked	0x1,0x1e
0259 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
025a 00d8       |    |		Load_Top	At_Offset_0
025b 00e5       |    |		Load_Encached	Long_Integer_Cache
025c 00e0       |    |		Load_Encached	Standard_Cache
025d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
025e c21f       |    |		Store	0x1,0x1f
025f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0260 00d8       |    |		Load_Top	At_Offset_0
0261 00e5       |    |		Load_Encached	Long_Integer_Cache
0262 00e0       |    |		Load_Encached	Standard_Cache
0263 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0264 c220       |    |		Store	0x1,0x20
0265 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0266 00ea       |    |		Load_Encached	Null_String_Cache
0267 4800       |H   |		Short_Literal	0x0
0268 e402       |    |		Load	0x2,0x2
0269 e23c       | <  |		Load	0x1,0x3c
026a 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
026b 823d       | =  |		Call	0x1,0x3d
026c a221       | !  |		Store_Unchecked	0x1,0x21
026d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
026e 00ea       |    |		Load_Encached	Null_String_Cache
026f 4800       |H   |		Short_Literal	0x0
0270 e402       |    |		Load	0x2,0x2
0271 e23c       | <  |		Load	0x1,0x3c
0272 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0273 823d       | =  |		Call	0x1,0x3d
0274 a222       | "  |		Store_Unchecked	0x1,0x22
0275 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0276 00d8       |    |		Load_Top	At_Offset_0
0277 00e5       |    |		Load_Encached	Long_Integer_Cache
0278 00e0       |    |		Load_Encached	Standard_Cache
0279 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
027a c223       | #  |		Store	0x1,0x23
027b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
027c 00d8       |    |		Load_Top	At_Offset_0
027d 00e5       |    |		Load_Encached	Long_Integer_Cache
027e 00e0       |    |		Load_Encached	Standard_Cache
027f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0280 c224       | $  |		Store	0x1,0x24
0281 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0282 00ea       |    |		Load_Encached	Null_String_Cache
0283 4800       |H   |		Short_Literal	0x0
0284 e402       |    |		Load	0x2,0x2
0285 e23c       | <  |		Load	0x1,0x3c
0286 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0287 823d       | =  |		Call	0x1,0x3d
0288 a225       | %  |		Store_Unchecked	0x1,0x25
0289 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
028a 00ea       |    |		Load_Encached	Null_String_Cache
028b 4800       |H   |		Short_Literal	0x0
028c e402       |    |		Load	0x2,0x2
028d e23c       | <  |		Load	0x1,0x3c
028e 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
028f 823d       | =  |		Call	0x1,0x3d
0290 a226       | &  |		Store_Unchecked	0x1,0x26
0291 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0292 00d8       |    |		Load_Top	At_Offset_0
0293 00e5       |    |		Load_Encached	Long_Integer_Cache
0294 00e0       |    |		Load_Encached	Standard_Cache
0295 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0296 c227       | '  |		Store	0x1,0x27
0297 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0298 00d8       |    |		Load_Top	At_Offset_0
0299 00e5       |    |		Load_Encached	Long_Integer_Cache
029a 00e0       |    |		Load_Encached	Standard_Cache
029b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
029c c228       | (  |		Store	0x1,0x28
029d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
029e 00d8       |    |		Load_Top	At_Offset_0
029f 00e5       |    |		Load_Encached	Long_Integer_Cache
02a0 00e0       |    |		Load_Encached	Standard_Cache
02a1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02a2 c22a       | *  |		Store	0x1,0x2a
02a3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a4 00d8       |    |		Load_Top	At_Offset_0
02a5 00e5       |    |		Load_Encached	Long_Integer_Cache
02a6 00e0       |    |		Load_Encached	Standard_Cache
02a7 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02a8 c22b       | +  |		Store	0x1,0x2b
02a9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02aa 00d8       |    |		Load_Top	At_Offset_0
02ab 00e5       |    |		Load_Encached	Long_Integer_Cache
02ac 00e0       |    |		Load_Encached	Standard_Cache
02ad 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02ae c22c       | ,  |		Store	0x1,0x2c
02af 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02b0 00d8       |    |		Load_Top	At_Offset_0
02b1 00e5       |    |		Load_Encached	Long_Integer_Cache
02b2 00e0       |    |		Load_Encached	Standard_Cache
02b3 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02b4 c22d       | -  |		Store	0x1,0x2d
02b5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02b6 00d8       |    |		Load_Top	At_Offset_0
02b7 00e5       |    |		Load_Encached	Long_Integer_Cache
02b8 00e0       |    |		Load_Encached	Standard_Cache
02b9 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02ba c22e       | .  |		Store	0x1,0x2e
02bb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02bc 00d8       |    |		Load_Top	At_Offset_0
02bd 00e5       |    |		Load_Encached	Long_Integer_Cache
02be 00e0       |    |		Load_Encached	Standard_Cache
02bf 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02c0 c22f       | /  |		Store	0x1,0x2f
02c1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02c2 00d8       |    |		Load_Top	At_Offset_0
02c3 00e5       |    |		Load_Encached	Long_Integer_Cache
02c4 00e0       |    |		Load_Encached	Standard_Cache
02c5 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02c6 c230       | 0  |		Store	0x1,0x30
02c7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02c8 00d8       |    |		Load_Top	At_Offset_0
02c9 00e5       |    |		Load_Encached	Long_Integer_Cache
02ca 00e0       |    |		Load_Encached	Standard_Cache
02cb 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02cc c231       | 1  |		Store	0x1,0x31
02cd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02ce 00d8       |    |		Load_Top	At_Offset_0
02cf 00e5       |    |		Load_Encached	Long_Integer_Cache
02d0 00e0       |    |		Load_Encached	Standard_Cache
02d1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02d2 c232       | 2  |		Store	0x1,0x32
02d3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02d4 00d8       |    |		Load_Top	At_Offset_0
02d5 00e5       |    |		Load_Encached	Long_Integer_Cache
02d6 00e0       |    |		Load_Encached	Standard_Cache
02d7 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02d8 c233       | 3  |		Store	0x1,0x33
02d9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02da 00d8       |    |		Load_Top	At_Offset_0
02db 00e5       |    |		Load_Encached	Long_Integer_Cache
02dc 00e0       |    |		Load_Encached	Standard_Cache
02dd 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02de c235       | 5  |		Store	0x1,0x35
02df 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02e0 00d8       |    |		Load_Top	At_Offset_0
02e1 00e5       |    |		Load_Encached	Long_Integer_Cache
02e2 00e0       |    |		Load_Encached	Standard_Cache
02e3 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02e4 c236       | 6  |		Store	0x1,0x36
02e5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02e6 00d8       |    |		Load_Top	At_Offset_0
02e7 00e5       |    |		Load_Encached	Long_Integer_Cache
02e8 00e0       |    |		Load_Encached	Standard_Cache
02e9 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02ea c237       | 7  |		Store	0x1,0x37
02eb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02ec			TRAP_01c8:
02ec 0007       |    |		Action	Break_Optional
02ed 4800       |H   |		Short_Literal	0x0
02ee 4800       |H   |		Short_Literal	0x0
02ef 4807       |H   |		Short_Literal	0x7
02f0 0092 032a  |   *|		Action	Push_String_Extended,0x32a					; "had problem interpreting entry"
02f2 e602       |    |		Load	0x3,0x2
02f3 e23b       | ;  |		Load	0x1,0x3b
02f4 011c       |    |		Execute	Any,Convert_Unchecked
02f5 1c01       |    |		Execute_Immediate	Run_Utility,0x1
02f6 01cc       |    |		Execute	Vector,Catenate
02f7 0092 032b  |   +|		Action	Push_String_Extended,0x32b					; " => "
02f9 01cc       |    |		Execute	Vector,Catenate
02fa e603       |    |		Load	0x3,0x3
02fb 01cc       |    |		Execute	Vector,Catenate
02fc 00ea       |    |		Load_Encached	Null_String_Cache
02fd e007       |    |		Load	0x0,0x7
02fe 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02ff 00d8       |    |		Load_Top	At_Offset_0
0300 0101       |    |		Execute	Exception,Reraise
0301 ; --------------------------------------------------------------------------------------
0301 ; STRING TABLE
0301 ; --------------------------------------------------------------------------------------
0301 0058       | X  |		.STRTAB	0x0058->0x032d							; "NIL"
0302 0059       | Y  |		.STRTAB	0x0059->0x032e							; "THE_SHORT_SHORT_INTEGER_LOWER_BOUND"
0303 007a       | z  |		.STRTAB	0x007a->0x0340							; "THE_SHORT_SHORT_INTEGER_UPPER_BOUND"
0304 009b       |    |		.STRTAB	0x009b->0x0351							; "THE_SHORT_SHORT_INTEGER_SIZE"
0305 00b5       |    |		.STRTAB	0x00b5->0x035f							; "THE_SHORT_INTEGER_LOWER_BOUND"
0306 00d0       |    |		.STRTAB	0x00d0->0x036e							; "THE_SHORT_INTEGER_UPPER_BOUND"
0307 00eb       |    |		.STRTAB	0x00eb->0x037c							; "THE_SHORT_INTEGER_SIZE"
0308 00ff       |    |		.STRTAB	0x00ff->0x0387							; "THE_INTEGER_LOWER_BOUND"
0309 0114       |    |		.STRTAB	0x0114->0x0393							; "THE_INTEGER_UPPER_BOUND"
030a 0129       | )  |		.STRTAB	0x0129->0x039e							; "THE_INTEGER_SIZE"
030b 0137       | 7  |		.STRTAB	0x0137->0x03a6							; "THE_LONG_INTEGER_LOWER_BOUND"
030c 0151       | Q  |		.STRTAB	0x0151->0x03b4							; "THE_LONG_INTEGER_UPPER_BOUND"
030d 016b       | k  |		.STRTAB	0x016b->0x03c2							; "THE_LONG_INTEGER_SIZE"
030e 017e       | ~  |		.STRTAB	0x017e->0x03cd							; "THE_SHORT_FLOAT_LOWER_BOUND"
030f 0197       |    |		.STRTAB	0x0197->0x03da							; "THE_SHORT_FLOAT_UPPER_BOUND"
0310 01b0       |    |		.STRTAB	0x01b0->0x03e8							; "THE_SHORT_FLOAT_DIGITS"
0311 01c4       |    |		.STRTAB	0x01c4->0x03f3							; "THE_SHORT_FLOAT_SIZE"
0312 01d6       |    |		.STRTAB	0x01d6->0x03fd							; "THE_FLOAT_LOWER_BOUND"
0313 01e9       |    |		.STRTAB	0x01e9->0x0407							; "THE_FLOAT_UPPER_BOUND"
0314 01fc       |    |		.STRTAB	0x01fc->0x0412							; "THE_FLOAT_DIGITS"
0315 020a       |    |		.STRTAB	0x020a->0x041a							; "THE_FLOAT_SIZE"
0316 0216       |    |		.STRTAB	0x0216->0x0421							; "THE_LONG_FLOAT_LOWER_BOUND"
0317 022e       | .  |		.STRTAB	0x022e->0x042e							; "THE_LONG_FLOAT_UPPER_BOUND"
0318 0246       | F  |		.STRTAB	0x0246->0x043b							; "THE_LONG_FLOAT_DIGITS"
0319 0259       | Y  |		.STRTAB	0x0259->0x0445							; "THE_LONG_FLOAT_SIZE"
031a 026a       | j  |		.STRTAB	0x026a->0x044f							; "THE_BOOLEAN_SIZE"
031b 0278       | x  |		.STRTAB	0x0278->0x0457							; "THE_CHARACTER_SIZE"
031c 0288       |    |		.STRTAB	0x0288->0x0460							; "THE_ACCESS_TYPE_SIZE"
031d 029a       |    |		.STRTAB	0x029a->0x046a							; "THE_TASK_TYPE_SIZE"
031e 02aa       |    |		.STRTAB	0x02aa->0x0473							; "THE_SHORT_ENUMERATION_LENGTH"
031f 02c4       |    |		.STRTAB	0x02c4->0x0481							; "THE_SHORT_ENUMERATION_SIZE"
0320 02dc       |    |		.STRTAB	0x02dc->0x048e							; "THE_ENUMERATION_LENGTH"
0321 02f0       |    |		.STRTAB	0x02f0->0x0499							; "THE_ENUMERATION_SIZE"
0322 0302       |    |		.STRTAB	0x0302->0x04a3							; "THE_LONG_ENUMERATION_LENGTH"
0323 031b       |    |		.STRTAB	0x031b->0x04b0							; "THE_LONG_ENUMERATION_SIZE"
0324 0332       | 2  |		.STRTAB	0x0332->0x04bd							; "THE_RECORD_COMPONENT_ALIGNMENT"
0325 034e       | N  |		.STRTAB	0x034e->0x04cc							; "THE_ARRAY_COMPONENT_ALIGNMENT"
0326 0369       | i  |		.STRTAB	0x0369->0x04da							; "THE_OBJECT_DECLARATION_ALIGNMENT"
0327 0387       |    |		.STRTAB	0x0387->0x04ea							; "THE_DISCRIMINATED_RECORD_OVERHEAD"
0328 03a6       |    |		.STRTAB	0x03a6->0x04fb							; "others => Unspecified"
0329 03b9       |    |		.STRTAB	0x03b9->0x0505							; "Had Problem parsing "
032a 03cb       |    |		.STRTAB	0x03cb->0x050f							; "had problem interpreting entry"
032b 03e7       |    |		.STRTAB	0x03e7->0x051e							; " => "
032c 03e9       |    |		.STREND 0x03e9->0x0520
032d 4e49 4c54  |NILT|		.STRTAB_STRINGS
0521 0000 0000  |    |		.BLANK	0000[0x7]
0528 ; --------------------------------------------------------------------------------------
0528 ; Debug Table
0528 ; --------------------------------------------------------------------------------------
0528 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0x2eef,0x0000,0x0001,0x0009
052e 000b 0552  |   R|		.DBG4T	0x000b,0x0552,0x8000,0x0000
0532 009e 0581  |    |		.DBG4T	0x009e,0x0581,0x8000,0x0000
0536 00cb 058b  |    |		.DBG4T	0x00cb,0x058b,0x0002,0x0000
053a 0123 0594  | #  |		.DBG4T	0x0123,0x0594,0x0002,0x0000
053e 014b 059b  | K  |		.DBG4T	0x014b,0x059b,0x0002,0x0000
0542 016b 05a3  | k  |		.DBG4T	0x016b,0x05a3,0x0001,0x4000
0546 0193 0000  |    |		.DBG4T	0x0193,0x0000,0x0005,0x0000
054a 01bb 05b2  |    |		.DBG4T	0x01bb,0x05b2,0x0002,0x0000
054e 01cb 05b8  |    |		.DBG4T	0x01cb,0x05b8,0x0004,0x4000
0552 ; --------------------------------------------------------------------------------------
0552 ; Debug chain
0552 ; --------------------------------------------------------------------------------------
0552 002d 0000  | -  |		.DBGLEN	0x002d,0x0000
0554 000b 000f  |    |		.DBGLNO	0x000b,0x000f,0x0011,0x0015,0x0018,0x001a,0x001e,0x0021,0x0024,0x0028,0x002b,0x002e,0x0033,0x0036,0x0039,0x003d,0x003f,0x0042,0x0045,0x0047,0x004b,0x004e,0x0051,0x0053,0x0057,0x005a,0x005d,0x005f,0x0063,0x0065,0x0069,0x006d,0x0071,0x0075,0x0078,0x007c,0x007f,0x0083,0x0086,0x008a,0x008c,0x0090,0x0093,0x0096,0x009b
0581 ; --------------------------------------------------------------------------------------
0581 ; Debug chain
0581 ; --------------------------------------------------------------------------------------
0581 0008 0000  |    |		.DBGLEN	0x0008,0x0000
0583 009e 00a6  |    |		.DBGLNO	0x009e,0x00a6,0x00ab,0x00bb,0x00bd,0x00bf,0x00c1,0x00c3
058b ; --------------------------------------------------------------------------------------
058b ; Debug chain
058b ; --------------------------------------------------------------------------------------
058b 0000 0007  |    |		.DBGLEN	0x0000,0x0007
058d 00cb 00d3  |    |		.DBGLNO	0x00cb,0x00d3,0x00d5,0x00dd,0x00df,0x00e7,0x00e9
0594 ; --------------------------------------------------------------------------------------
0594 ; Debug chain
0594 ; --------------------------------------------------------------------------------------
0594 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0596 0123 012f  | # /|		.DBGLNO	0x0123,0x012f,0x0131,0x013d,0x013f
059b ; --------------------------------------------------------------------------------------
059b ; Debug chain
059b ; --------------------------------------------------------------------------------------
059b 0001 0005  |    |		.DBGLEN	0x0001,0x0005
059d 014b 0155  | K U|		.DBGLNO	0x014b,0x0155,0x0159,0x015b,0x015f,0x0161
05a3 ; --------------------------------------------------------------------------------------
05a3 ; Debug chain
05a3 ; --------------------------------------------------------------------------------------
05a3 0001 0006  |    |		.DBGLEN	0x0001,0x0006
05a5 016b 016f  | k o|		.DBGLNO	0x016b,0x016f,0x0175,0x0176,0x017b,0x0182,0x018c
05ac 0001 0003  |    |		.XXX[0x6]
05ae 0004 0002  |    |
05b0 0005 0006  |    |
05b2 ; --------------------------------------------------------------------------------------
05b2 ; Debug chain
05b2 ; --------------------------------------------------------------------------------------
05b2 0002 0002  |    |		.DBGLEN	0x0002,0x0002
05b4 01bb 01bc  |    |		.DBGLNO	0x01bb,0x01bc,0x01bd,0x01c5
05b8 ; --------------------------------------------------------------------------------------
05b8 ; Debug chain
05b8 ; --------------------------------------------------------------------------------------
05b8 0002 0029  |   )|		.DBGLEN	0x0002,0x0029
05ba 01cb 01ce  |    |		.DBGLNO	0x01cb,0x01ce,0x01d3,0x01fc,0x0202,0x0208,0x020e,0x0214,0x021a,0x0220,0x0226,0x022c,0x0232,0x0238,0x023e,0x0244,0x024a,0x0252,0x025a,0x0260,0x0266,0x026e,0x0276,0x027c,0x0282,0x028a,0x0292,0x0298,0x029e,0x02a4,0x02aa,0x02b0,0x02b6,0x02bc,0x02c2,0x02c8,0x02ce,0x02d4,0x02da,0x02e0,0x02e6,0x02ed,0x02ff
05e5 0001 0028  |   (|		.XXX[0x29]
05e7 0003 0004  |    |
05e9 0005 0006  |    |
05eb 0007 0008  |    |
05ed 0009 000a  |    |
05ef 000b 000c  |    |
05f1 000d 000e  |    |
05f3 000f 0010  |    |
05f5 0011 0012  |    |
05f7 0013 0014  |    |
05f9 0015 0016  |    |
05fb 0017 0018  |    |
05fd 0019 001a  |    |
05ff 001b 001c  |    |
0601 001d 001e  |    |
0603 001f 0020  |    |
0605 0021 0022  | ! "|
0607 0023 0024  | # $|
0609 0025 0026  | % &|
060b 0027 0029  | ' )|
060d 002a       | *  |
060e 0000 0000  |    |		.BLANK	0000[0x1f2]