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

⟦5fe1c8ba0⟧

    Length: 2048 (0x800)
    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 0270       | p  |		.CONST	0x0270								; 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 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0030       | 0  |		.CONST	0x0030								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0014       |    |		.CONST	0x0014								; Number of locals
000b			INIT_0008:
000b 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated
000d 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated
000f 0007       |    |		Action	Break_Optional
0010 0007       |    |		Action	Break_Optional
0011 0007       |    |		Action	Break_Optional
0012 0007       |    |		Action	Break_Optional
0013 0007       |    |		Action	Break_Optional
0014 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated
0016 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated
0018 00bf       |    |		Action	Accept_Activation
0019 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
001a 00c7       |    |		Action	Elaborate_Subprogram
001b 029d 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call
001d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
001e 00c7       |    |		Action	Elaborate_Subprogram
001f 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0020 00c6       |    |		Action	Check_Subprogram_Elaborated
0021 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0022 0093 0000  |    |		push_full_address	0x0
0024 602f       |`/  |		Indirect_Literal	Discrete,0x54,{0x80000000, 0x00010000}
0025 0273       | s  |		Execute	Discrete,Plus
0026 e002       |    |		Load	0x0,0x2
0027 0273       | s  |		Execute	Discrete,Plus
0028 e003       |    |		Load	0x0,0x3
0029 0273       | s  |		Execute	Discrete,Plus
002a 4800       |H   |		Short_Literal	0x0
002b 0007       |    |		Action	Break_Optional
002c 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
002d 00c7       |    |		Action	Elaborate_Subprogram
002e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
002f 00c7       |    |		Action	Elaborate_Subprogram
0030			BODY_0008:
0030 00bc       |    |		Action	Signal_Activated
0031 00bb       |    |		Action	Signal_Completion
0032 0000 0000  |    |		.BLANK	0000[0x6]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003d       | =  |		.CONST	0x003d								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0002       |    |		.CONST	0x0002								; Number of locals
003b			INIT_0038:
003b e004       |    |		Load	0x0,0x4
003c 0007       |    |		Action	Break_Optional
003d			BODY_0038:
003d e004       |    |		Load	0x0,0x4
003e 4801       |H   |		Short_Literal	0x1
003f e005       |    |		Load	0x0,0x5
0040 e006       |    |		Load	0x0,0x6
0041 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
0042 0039       | 9  |		Store_Top	Access,At_Offset_1
0043 e5f6       |    |		Load	0x2,-0xa
0044 e5f7       |    |		Load	0x2,-0x9
0045 e5f8       |    |		Load	0x2,-0x8
0046 e5f9       |    |		Load	0x2,-0x7
0047 e5fa       |    |		Load	0x2,-0x6
0048 e5fb       |    |		Load	0x2,-0x5
0049 e5fc       |    |		Load	0x2,-0x4
004a e5fd       |    |		Load	0x2,-0x3
004b e5fe       |    |		Load	0x2,-0x2
004c e5ff       |    |		Load	0x2,-0x1
004d e402       |    |		Load	0x2,0x2
004e 8007       |    |		Call	0x0,0x7
004f 8008       |    |		Call	0x0,0x8
0050 450b       |E   |		Exit_Suprogram	New_Top_Offset 0xb
0051 0000 0000  |    |		.XXX[0x3]
0053 0000       |    |
0054 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b       | [  |		.CONST	0x005b								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0001       |    |		.CONST	0x0001								; Number of locals
005b			BODY_0058:
005b			INIT_0058:
005b 4801       |H   |		Short_Literal	0x1
005c 4801       |H   |		Short_Literal	0x1
005d e009       |    |		Load	0x0,0x9
005e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
005f 800a       |    |		Call	0x0,0xa
0060 00ca       |    |		Action	Exit_Nullary_Function
0061 0000 0000  |    |		.BLANK	0000[0x7]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b e5f6       |    |		Load	0x2,-0xa
006c e5f7       |    |		Load	0x2,-0x9
006d e5f8       |    |		Load	0x2,-0x8
006e e5f9       |    |		Load	0x2,-0x7
006f e5fa       |    |		Load	0x2,-0x6
0070 e5fb       |    |		Load	0x2,-0x5
0071 e5fc       |    |		Load	0x2,-0x4
0072 e5fd       |    |		Load	0x2,-0x3
0073 e5fe       |    |		Load	0x2,-0x2
0074 e5ff       |    |		Load	0x2,-0x1
0075 800b       |    |		Call	0x0,0xb
0076 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0077 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0078 8210       |    |		Call	0x1,0x10
0079 450b       |E   |		Exit_Suprogram	New_Top_Offset 0xb
007a 0000 0000  |    |		.BLANK	0000[0x6]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 00cc       |    |		.CONST	0x00cc								; Address of begin
0081 0004       |    |		.CONST	0x0004								; Address of exception handler
0082 000c       |    |		.CONST	0x000c								; Number of locals
0083			INIT_0080:
0083 4801       |H   |		Short_Literal	0x1
0084 4880       |H   |		Short_Literal	0x80
0085 e00c       |    |		Load	0x0,0xc
0086 035b       | [  |		Declare_Type	Array,Constrained
0087 0337       | 7  |		Declare_Variable	Array
0088 e00d       |    |		Load	0x0,0xd
0089 0007       |    |		Action	Break_Optional
008a e00d       |    |		Load	0x0,0xd
008b 0007       |    |		Action	Break_Optional
008c e5fc       |    |		Load	0x2,-0x4
008d 4800       |H   |		Short_Literal	0x0
008e 00e5       |    |		Load_Encached	Long_Integer_Cache
008f 00d9       |    |		Load_Top	At_Offset_1
0090 0267       | g  |		Execute	Discrete,Predecessor
0091 e00c       |    |		Load	0x0,0xc
0092 0334       | 4  |		Declare_Variable	Array,With_Constraint
0093 01de       |    |		Execute	Vector,Not_Equal
0094 00e1       |    |		Load_Encached	Boolean_Cache
0095 03f1       |    |		Declare_Variable	Discrete,With_Value
0096 e5fb       |    |		Load	0x2,-0x5
0097 4800       |H   |		Short_Literal	0x0
0098 00e5       |    |		Load_Encached	Long_Integer_Cache
0099 00d9       |    |		Load_Top	At_Offset_1
009a 0267       | g  |		Execute	Discrete,Predecessor
009b e00c       |    |		Load	0x0,0xc
009c 0334       | 4  |		Declare_Variable	Array,With_Constraint
009d 01de       |    |		Execute	Vector,Not_Equal
009e 00e1       |    |		Load_Encached	Boolean_Cache
009f 03f1       |    |		Declare_Variable	Discrete,With_Value
00a0 e5fa       |    |		Load	0x2,-0x6
00a1 4800       |H   |		Short_Literal	0x0
00a2 00e5       |    |		Load_Encached	Long_Integer_Cache
00a3 00d9       |    |		Load_Top	At_Offset_1
00a4 0267       | g  |		Execute	Discrete,Predecessor
00a5 e00c       |    |		Load	0x0,0xc
00a6 0334       | 4  |		Declare_Variable	Array,With_Constraint
00a7 01de       |    |		Execute	Vector,Not_Equal
00a8 00e1       |    |		Load_Encached	Boolean_Cache
00a9 03f1       |    |		Declare_Variable	Discrete,With_Value
00aa e5f9       |    |		Load	0x2,-0x7
00ab 4800       |H   |		Short_Literal	0x0
00ac 00e5       |    |		Load_Encached	Long_Integer_Cache
00ad 00d9       |    |		Load_Top	At_Offset_1
00ae 0267       | g  |		Execute	Discrete,Predecessor
00af e00c       |    |		Load	0x0,0xc
00b0 0334       | 4  |		Declare_Variable	Array,With_Constraint
00b1 01de       |    |		Execute	Vector,Not_Equal
00b2 00e1       |    |		Load_Encached	Boolean_Cache
00b3 03f1       |    |		Declare_Variable	Discrete,With_Value
00b4 e5f8       |    |		Load	0x2,-0x8
00b5 4800       |H   |		Short_Literal	0x0
00b6 00e5       |    |		Load_Encached	Long_Integer_Cache
00b7 00d9       |    |		Load_Top	At_Offset_1
00b8 0267       | g  |		Execute	Discrete,Predecessor
00b9 e00c       |    |		Load	0x0,0xc
00ba 0334       | 4  |		Declare_Variable	Array,With_Constraint
00bb 01de       |    |		Execute	Vector,Not_Equal
00bc 00e1       |    |		Load_Encached	Boolean_Cache
00bd 03f1       |    |		Declare_Variable	Discrete,With_Value
00be e5f7       |    |		Load	0x2,-0x9
00bf 4800       |H   |		Short_Literal	0x0
00c0 00e5       |    |		Load_Encached	Long_Integer_Cache
00c1 00d9       |    |		Load_Top	At_Offset_1
00c2 0267       | g  |		Execute	Discrete,Predecessor
00c3 e00c       |    |		Load	0x0,0xc
00c4 0334       | 4  |		Declare_Variable	Array,With_Constraint
00c5 01de       |    |		Execute	Vector,Not_Equal
00c6 00e1       |    |		Load_Encached	Boolean_Cache
00c7 03f1       |    |		Declare_Variable	Discrete,With_Value
00c8 029f 0233  |   3|		Declare_Subprogram	INIT_0230,For_Call
00ca 029f 024b  |   K|		Declare_Subprogram	INIT_0248,For_Call
00cc			BODY_0080:
00cc 4800       |H   |		Short_Literal	0x0
00cd a403       |    |		Store_Unchecked	0x2,0x3
00ce e5fd       |    |		Load	0x2,-0x3
00cf 01dd       |    |		Execute	Vector,First
00d0 c404       |    |		Store	0x2,0x4
00d1 00cf       |    |		Action	Mark_Auxiliary
00d2 0007       |    |		Action	Break_Optional
00d3 e404       |    |		Load	0x2,0x4
00d4 e5fd       |    |		Load	0x2,-0x3
00d5 01dc       |    |		Execute	Vector,Last
00d6 027d       | }  |		Execute	Discrete,Greater
00d7 7005       |p   |		Jump_Nonzero	0xdd
00d8 e404       |    |		Load	0x2,0x4
00d9 e5fd       |    |		Load	0x2,-0x3
00da 01d7       |    |		Execute	Vector,Field_Read
00db 0f0a       |    |		Execute_Immediate	Equal,0xa
00dc 6811       |h   |		Jump_Zero	0xee
00dd e403       |    |		Load	0x2,0x3
00de 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
00df 6808       |h   |		Jump_Zero	0xe8
00e0 4801       |H   |		Short_Literal	0x1
00e1 e403       |    |		Load	0x2,0x3
00e2 e402       |    |		Load	0x2,0x2
00e3 01cf       |    |		Execute	Vector,Slice_Read
00e4 e5f6       |    |		Load	0x2,-0xa
00e5 85fe       |    |		Call	0x2,-0x2
00e6 4800       |H   |		Short_Literal	0x0
00e7 a403       |    |		Store_Unchecked	0x2,0x3
00e8 e404       |    |		Load	0x2,0x4
00e9 e5fd       |    |		Load	0x2,-0x3
00ea 01dc       |    |		Execute	Vector,Last
00eb 027d       | }  |		Execute	Discrete,Greater
00ec 68a9       |h   |		Jump_Zero	0x196
00ed 78ad       |x   |		Jump	0x19b
00ee e404       |    |		Load	0x2,0x4
00ef e5fd       |    |		Load	0x2,-0x3
00f0 01d7       |    |		Execute	Vector,Field_Read
00f1 0f25       | %  |		Execute_Immediate	Equal,0x25
00f2 689f       |h   |		Jump_Zero	0x192
00f3 e404       |    |		Load	0x2,0x4
00f4 e5fd       |    |		Load	0x2,-0x3
00f5 01dc       |    |		Execute	Vector,Last
00f6 027c       | |  |		Execute	Discrete,Less
00f7 689a       |h   |		Jump_Zero	0x192
00f8 e404       |    |		Load	0x2,0x4
00f9 0a01       |    |		Execute_Immediate	Plus,0x1
00fa e5fd       |    |		Load	0x2,-0x3
00fb 01d7       |    |		Execute	Vector,Field_Read
00fc 0f25       | %  |		Execute_Immediate	Equal,0x25
00fd 6803       |h   |		Jump_Zero	0x101
00fe 4825       |H%  |		Short_Literal	0x25
00ff 840b       |    |		Call	0x2,0xb
0100 7895       |x   |		Jump	0x196
0101 e404       |    |		Load	0x2,0x4
0102 0a01       |    |		Execute_Immediate	Plus,0x1
0103 e5fd       |    |		Load	0x2,-0x3
0104 01d7       |    |		Execute	Vector,Field_Read
0105 0f2e       | .  |		Execute_Immediate	Equal,0x2e
0106 683a       |h:  |		Jump_Zero	0x141
0107 e404       |    |		Load	0x2,0x4
0108 0a01       |    |		Execute_Immediate	Plus,0x1
0109 e5fd       |    |		Load	0x2,-0x3
010a 01dc       |    |		Execute	Vector,Last
010b 027c       | |  |		Execute	Discrete,Less
010c 6834       |h4  |		Jump_Zero	0x141
010d e404       |    |		Load	0x2,0x4
010e 0a02       |    |		Execute_Immediate	Plus,0x2
010f e5fd       |    |		Load	0x2,-0x3
0110 01d7       |    |		Execute	Vector,Field_Read
0111 4831       |H1  |		Short_Literal	0x31
0112 4836       |H6  |		Short_Literal	0x36
0113 0262       | b  |		Execute	Discrete,In_Range
0114 682c       |h,  |		Jump_Zero	0x141
0115 e404       |    |		Load	0x2,0x4
0116 0a02       |    |		Execute_Immediate	Plus,0x2
0117 e5fd       |    |		Load	0x2,-0x3
0118 01d7       |    |		Execute	Vector,Field_Read
0119 0ad0       |    |		Execute_Immediate	Plus,-0x30
011a 00d8       |    |		Load_Top	At_Offset_0
011b 00e3       |    |		Load_Encached	Natural_Cache
011c 0260       | `  |		Execute	Discrete,In_Type
011d 7001       |p   |		Jump_Nonzero	0x11f
011e 0801       |    |		Execute_Immediate	Raise,0x1
011f 00d8       |    |		Load_Top	At_Offset_0
0120 0c07       |    |		Execute_Immediate	Greater_Equal,0x7
0121 700b       |p   |		Jump_Nonzero	0x12d
0122 4606       |F   |		Jump_Case	0x7
0123 780a       |x   |		Jump	0x12e								; case 0x0
0124 780a       |x   |		Jump	0x12f								; case 0x1
0125 780c       |x   |		Jump	0x132								; case 0x2
0126 780e       |x   |		Jump	0x135								; case 0x3
0127 7810       |x   |		Jump	0x138								; case 0x4
0128 7812       |x   |		Jump	0x13b								; case 0x5
0129 7800       |x   |		Jump	0x12a								; case 0x6
012a 4800       |H   |		Short_Literal	0x0
012b a40a       |    |		Store_Unchecked	0x2,0xa
012c 7810       |x   |		Jump	0x13d
012d 00d1       |    |		Pop_Control	Pop_Count_1
012e 08e2       |    |		Execute_Immediate	Raise,0xe2
012f 4800       |H   |		Short_Literal	0x0
0130 a405       |    |		Store_Unchecked	0x2,0x5
0131 780b       |x   |		Jump	0x13d
0132 4800       |H   |		Short_Literal	0x0
0133 a406       |    |		Store_Unchecked	0x2,0x6
0134 7808       |x   |		Jump	0x13d
0135 4800       |H   |		Short_Literal	0x0
0136 a407       |    |		Store_Unchecked	0x2,0x7
0137 7805       |x   |		Jump	0x13d
0138 4800       |H   |		Short_Literal	0x0
0139 a408       |    |		Store_Unchecked	0x2,0x8
013a 7802       |x   |		Jump	0x13d
013b 4800       |H   |		Short_Literal	0x0
013c a409       |    |		Store_Unchecked	0x2,0x9
013d e404       |    |		Load	0x2,0x4
013e 0a02       |    |		Execute_Immediate	Plus,0x2
013f c404       |    |		Store	0x2,0x4
0140 7855       |xU  |		Jump	0x196
0141 e404       |    |		Load	0x2,0x4
0142 0a01       |    |		Execute_Immediate	Plus,0x1
0143 e5fd       |    |		Load	0x2,-0x3
0144 01d7       |    |		Execute	Vector,Field_Read
0145 4831       |H1  |		Short_Literal	0x31
0146 4836       |H6  |		Short_Literal	0x36
0147 0262       | b  |		Execute	Discrete,In_Range
0148 6838       |h8  |		Jump_Zero	0x181
0149 e404       |    |		Load	0x2,0x4
014a 0a01       |    |		Execute_Immediate	Plus,0x1
014b e5fd       |    |		Load	0x2,-0x3
014c 01d7       |    |		Execute	Vector,Field_Read
014d 0ad0       |    |		Execute_Immediate	Plus,-0x30
014e 00d8       |    |		Load_Top	At_Offset_0
014f 00e3       |    |		Load_Encached	Natural_Cache
0150 0260       | `  |		Execute	Discrete,In_Type
0151 7001       |p   |		Jump_Nonzero	0x153
0152 0801       |    |		Execute_Immediate	Raise,0x1
0153 00d8       |    |		Load_Top	At_Offset_0
0154 0c07       |    |		Execute_Immediate	Greater_Equal,0x7
0155 700d       |p   |		Jump_Nonzero	0x163
0156 4606       |F   |		Jump_Case	0x7
0157 780c       |x   |		Jump	0x164								; case 0x0
0158 780c       |x   |		Jump	0x165								; case 0x1
0159 7810       |x   |		Jump	0x16a								; case 0x2
015a 7814       |x   |		Jump	0x16f								; case 0x3
015b 7818       |x   |		Jump	0x174								; case 0x4
015c 781c       |x   |		Jump	0x179								; case 0x5
015d 7800       |x   |		Jump	0x15e								; case 0x6
015e e5f7       |    |		Load	0x2,-0x9
015f 840c       |    |		Call	0x2,0xc
0160 4800       |H   |		Short_Literal	0x0
0161 a40a       |    |		Store_Unchecked	0x2,0xa
0162 781a       |x   |		Jump	0x17d
0163 00d1       |    |		Pop_Control	Pop_Count_1
0164 08e2       |    |		Execute_Immediate	Raise,0xe2
0165 e5fc       |    |		Load	0x2,-0x4
0166 840c       |    |		Call	0x2,0xc
0167 4800       |H   |		Short_Literal	0x0
0168 a405       |    |		Store_Unchecked	0x2,0x5
0169 7813       |x   |		Jump	0x17d
016a e5fb       |    |		Load	0x2,-0x5
016b 840c       |    |		Call	0x2,0xc
016c 4800       |H   |		Short_Literal	0x0
016d a406       |    |		Store_Unchecked	0x2,0x6
016e 780e       |x   |		Jump	0x17d
016f e5fa       |    |		Load	0x2,-0x6
0170 840c       |    |		Call	0x2,0xc
0171 4800       |H   |		Short_Literal	0x0
0172 a407       |    |		Store_Unchecked	0x2,0x7
0173 7809       |x   |		Jump	0x17d
0174 e5f9       |    |		Load	0x2,-0x7
0175 840c       |    |		Call	0x2,0xc
0176 4800       |H   |		Short_Literal	0x0
0177 a408       |    |		Store_Unchecked	0x2,0x8
0178 7804       |x   |		Jump	0x17d
0179 e5f8       |    |		Load	0x2,-0x8
017a 840c       |    |		Call	0x2,0xc
017b 4800       |H   |		Short_Literal	0x0
017c a409       |    |		Store_Unchecked	0x2,0x9
017d e404       |    |		Load	0x2,0x4
017e 0a01       |    |		Execute_Immediate	Plus,0x1
017f c404       |    |		Store	0x2,0x4
0180 7815       |x   |		Jump	0x196
0181 483f       |H?  |		Short_Literal	0x3f
0182 840b       |    |		Call	0x2,0xb
0183 e404       |    |		Load	0x2,0x4
0184 e5fd       |    |		Load	0x2,-0x3
0185 01d7       |    |		Execute	Vector,Field_Read
0186 840b       |    |		Call	0x2,0xb
0187 e404       |    |		Load	0x2,0x4
0188 0a01       |    |		Execute_Immediate	Plus,0x1
0189 e5fd       |    |		Load	0x2,-0x3
018a 01d7       |    |		Execute	Vector,Field_Read
018b 840b       |    |		Call	0x2,0xb
018c 483f       |H?  |		Short_Literal	0x3f
018d 840b       |    |		Call	0x2,0xb
018e e404       |    |		Load	0x2,0x4
018f 0a01       |    |		Execute_Immediate	Plus,0x1
0190 c404       |    |		Store	0x2,0x4
0191 7804       |x   |		Jump	0x196
0192 e404       |    |		Load	0x2,0x4
0193 e5fd       |    |		Load	0x2,-0x3
0194 01d7       |    |		Execute	Vector,Field_Read
0195 840b       |    |		Call	0x2,0xb
0196 e404       |    |		Load	0x2,0x4
0197 0a01       |    |		Execute_Immediate	Plus,0x1
0198 c404       |    |		Store	0x2,0x4
0199 00c9       |    |		Action	Pop_Auxiliary_Loop
019a 7f38       | 8  |		Jump	0xd3
019b 00ce       |    |		Action	Pop_Auxiliary
019c 4800       |H   |		Short_Literal	0x0
019d a403       |    |		Store_Unchecked	0x2,0x3
019e e405       |    |		Load	0x2,0x5
019f 680a       |h   |		Jump_Zero	0x1aa
01a0 487d       |H}  |		Short_Literal	0x7d
01a1 4800       |H   |		Short_Literal	0x0
01a2 4803       |H   |		Short_Literal	0x3
01a3 e00c       |    |		Load	0x0,0xc
01a4 0334       | 4  |		Declare_Variable	Array,With_Constraint
01a5 504a       |PJ  |		Indirect_Literal	Any,0x1f0,{0x207b313a, 0x00000000}
01a6 e5fc       |    |		Load	0x2,-0x4
01a7 01cc       |    |		Execute	Vector,Catenate
01a8 01cb       |    |		Execute	Vector,Append
01a9 840c       |    |		Call	0x2,0xc
01aa e406       |    |		Load	0x2,0x6
01ab 680a       |h   |		Jump_Zero	0x1b6
01ac 487d       |H}  |		Short_Literal	0x7d
01ad 4800       |H   |		Short_Literal	0x0
01ae 4803       |H   |		Short_Literal	0x3
01af e00c       |    |		Load	0x0,0xc
01b0 0334       | 4  |		Declare_Variable	Array,With_Constraint
01b1 5042       |PB  |		Indirect_Literal	Any,0x1f4,{0x207b323a, 0x00000000}
01b2 e5fb       |    |		Load	0x2,-0x5
01b3 01cc       |    |		Execute	Vector,Catenate
01b4 01cb       |    |		Execute	Vector,Append
01b5 840c       |    |		Call	0x2,0xc
01b6 e407       |    |		Load	0x2,0x7
01b7 680a       |h   |		Jump_Zero	0x1c2
01b8 487d       |H}  |		Short_Literal	0x7d
01b9 4800       |H   |		Short_Literal	0x0
01ba 4803       |H   |		Short_Literal	0x3
01bb e00c       |    |		Load	0x0,0xc
01bc 0334       | 4  |		Declare_Variable	Array,With_Constraint
01bd 503a       |P:  |		Indirect_Literal	Any,0x1f8,{0x207b333a, 0x00000000}
01be e5fa       |    |		Load	0x2,-0x6
01bf 01cc       |    |		Execute	Vector,Catenate
01c0 01cb       |    |		Execute	Vector,Append
01c1 840c       |    |		Call	0x2,0xc
01c2 e408       |    |		Load	0x2,0x8
01c3 680a       |h   |		Jump_Zero	0x1ce
01c4 487d       |H}  |		Short_Literal	0x7d
01c5 4800       |H   |		Short_Literal	0x0
01c6 4803       |H   |		Short_Literal	0x3
01c7 e00c       |    |		Load	0x0,0xc
01c8 0334       | 4  |		Declare_Variable	Array,With_Constraint
01c9 5032       |P2  |		Indirect_Literal	Any,0x1fc,{0x207b343a, 0x00000000}
01ca e5f9       |    |		Load	0x2,-0x7
01cb 01cc       |    |		Execute	Vector,Catenate
01cc 01cb       |    |		Execute	Vector,Append
01cd 840c       |    |		Call	0x2,0xc
01ce 00db       |    |		Load_Top	At_Offset_3
01cf 680a       |h   |		Jump_Zero	0x1da
01d0 487d       |H}  |		Short_Literal	0x7d
01d1 4800       |H   |		Short_Literal	0x0
01d2 4803       |H   |		Short_Literal	0x3
01d3 e00c       |    |		Load	0x0,0xc
01d4 0334       | 4  |		Declare_Variable	Array,With_Constraint
01d5 502a       |P*  |		Indirect_Literal	Any,0x200,{0x207b353a, 0x00000000}
01d6 e5f8       |    |		Load	0x2,-0x8
01d7 01cc       |    |		Execute	Vector,Catenate
01d8 01cb       |    |		Execute	Vector,Append
01d9 840c       |    |		Call	0x2,0xc
01da 00da       |    |		Load_Top	At_Offset_2
01db 680a       |h   |		Jump_Zero	0x1e6
01dc 487d       |H}  |		Short_Literal	0x7d
01dd 4800       |H   |		Short_Literal	0x0
01de 4803       |H   |		Short_Literal	0x3
01df e00c       |    |		Load	0x0,0xc
01e0 0334       | 4  |		Declare_Variable	Array,With_Constraint
01e1 5022       |P"  |		Indirect_Literal	Any,0x204,{0x207b363a, 0x00000000}
01e2 e5f7       |    |		Load	0x2,-0x9
01e3 01cc       |    |		Execute	Vector,Catenate
01e4 01cb       |    |		Execute	Vector,Append
01e5 840c       |    |		Call	0x2,0xc
01e6 e403       |    |		Load	0x2,0x3
01e7 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
01e8 6806       |h   |		Jump_Zero	0x1ef
01e9 4801       |H   |		Short_Literal	0x1
01ea e403       |    |		Load	0x2,0x3
01eb e402       |    |		Load	0x2,0x2
01ec 01cf       |    |		Execute	Vector,Slice_Read
01ed e5f6       |    |		Load	0x2,-0xa
01ee 85fe       |    |		Call	0x2,-0x2
01ef 450b       |E   |		Exit_Suprogram	New_Top_Offset 0xb
01f0 207b 313a  | {1:|		.LITERAL	{0x207b313a, 0x00000000}
01f4 207b 323a  | {2:|		.LITERAL	{0x207b323a, 0x00000000}
01f8 207b 333a  | {3:|		.LITERAL	{0x207b333a, 0x00000000}
01fc 207b 343a  | {4:|		.LITERAL	{0x207b343a, 0x00000000}
0200 207b 353a  | {5:|		.LITERAL	{0x207b353a, 0x00000000}
0204 207b 363a  | {6:|		.LITERAL	{0x207b363a, 0x00000000}
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020d       |    |		.CONST	0x020d								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0002       |    |		.CONST	0x0002								; Number of locals
020b			INIT_0208:
020b e00e       |    |		Load	0x0,0xe
020c 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
020d			BODY_0208:
020d 00db       |    |		Load_Top	At_Offset_3
020e 4604       |F   |		Jump_Case	0x5
020f 7807       |x   |		Jump	0x217								; case 0x0
0210 7809       |x   |		Jump	0x21a								; case 0x1
0211 780b       |x   |		Jump	0x21d								; case 0x2
0212 780d       |x   |		Jump	0x220								; case 0x3
0213 7800       |x   |		Jump	0x214								; case 0x4
0214 4807       |H   |		Short_Literal	0x7
0215 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0216 780b       |x   |		Jump	0x222
0217 4802       |H   |		Short_Literal	0x2
0218 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0219 7808       |x   |		Jump	0x222
021a 4806       |H   |		Short_Literal	0x6
021b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
021c 7805       |x   |		Jump	0x222
021d 4807       |H   |		Short_Literal	0x7
021e 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
021f 7802       |x   |		Jump	0x222
0220 4808       |H   |		Short_Literal	0x8
0221 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0222 e00e       |    |		Load	0x0,0xe
0223 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0224 00d9       |    |		Load_Top	At_Offset_1
0225 e5fe       |    |		Load	0x2,-0x2
0226 800f       |    |		Call	0x0,0xf
0227 e010       |    |		Load	0x0,0x10
0228 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0229 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
022a 0000 0000  |    |		.BLANK	0000[0x6]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233       | 3  |		.CONST	0x0233								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0001       |    |		.CONST	0x0001								; Number of locals
0233			BODY_0230:
0233			INIT_0230:
0233 e403       |    |		Load	0x2,0x3
0234 0c80       |    |		Execute_Immediate	Greater_Equal,-0x80
0235 6805       |h   |		Jump_Zero	0x23b
0236 e402       |    |		Load	0x2,0x2
0237 e5f6       |    |		Load	0x2,-0xa
0238 85fe       |    |		Call	0x2,-0x2
0239 4800       |H   |		Short_Literal	0x0
023a a403       |    |		Store_Unchecked	0x2,0x3
023b e403       |    |		Load	0x2,0x3
023c 0a01       |    |		Execute_Immediate	Plus,0x1
023d c403       |    |		Store	0x2,0x3
023e 00da       |    |		Load_Top	At_Offset_2
023f e403       |    |		Load	0x2,0x3
0240 e402       |    |		Load	0x2,0x2
0241 01d6       |    |		Execute	Vector,Field_Write
0242 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0243 0000 0000  |    |		.BLANK	0000[0x5]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b e403       |    |		Load	0x2,0x3
024c 00db       |    |		Load_Top	At_Offset_3
024d 01db       |    |		Execute	Vector,Length
024e 0273       | s  |		Execute	Discrete,Plus
024f 0c81       |    |		Execute_Immediate	Greater_Equal,-0x7f
0250 680d       |h   |		Jump_Zero	0x25e
0251 00cf       |    |		Action	Mark_Auxiliary
0252 00db       |    |		Load_Top	At_Offset_3
0253 01d9       |    |		Execute	Vector,Reverse_Bounds
0254 0263       | c  |		Execute	Discrete,Above_Bound
0255 7006       |p   |		Jump_Nonzero	0x25c
0256 00d8       |    |		Load_Top	At_Offset_0
0257 e7ff       |    |		Load	0x3,-0x1
0258 01d7       |    |		Execute	Vector,Field_Read
0259 840b       |    |		Call	0x2,0xb
025a 00c8       |    |		Action	Pop_Auxiliary_Range
025b 3ffa       |?   |		Loop_Increasing	0x256
025c 00ce       |    |		Action	Pop_Auxiliary
025d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
025e 00da       |    |		Load_Top	At_Offset_2
025f e403       |    |		Load	0x2,0x3
0260 0a01       |    |		Execute_Immediate	Plus,0x1
0261 e403       |    |		Load	0x2,0x3
0262 e7ff       |    |		Load	0x3,-0x1
0263 01db       |    |		Execute	Vector,Length
0264 0273       | s  |		Execute	Discrete,Plus
0265 e402       |    |		Load	0x2,0x2
0266 01ce       |    |		Execute	Vector,Slice_Write
0267 e403       |    |		Load	0x2,0x3
0268 00db       |    |		Load_Top	At_Offset_3
0269 01db       |    |		Execute	Vector,Length
026a 0273       | s  |		Execute	Discrete,Plus
026b c403       |    |		Store	0x2,0x3
026c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
026d 0000 0000  |    |		.XXX[0x3]
026f 0000       |    |
0270 ; --------------------------------------------------------------------------------------
0270 ; Debug Table
0270 ; --------------------------------------------------------------------------------------
0270 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x6861,0x0000,0x0001,0x0009
0276 000b 029a  |    |		.DBG4T	0x000b,0x029a,0x8000,0x0000
027a 0019 02a5  |    |		.DBG4T	0x0019,0x02a5,0x8000,0x0000
027e 003b 02ad  | ;  |		.DBG4T	0x003b,0x02ad,0x0001,0x0000
0282 005b 02b2  | [  |		.DBG4T	0x005b,0x02b2,0x0002,0x0000
0286 006b 02b5  | k  |		.DBG4T	0x006b,0x02b5,0x0001,0x0000
028a 0083 02b8  |    |		.DBG4T	0x0083,0x02b8,0x2801,0x4002
028e 020b 033d  |   =|		.DBG4T	0x020b,0x033d,0x0001,0x4000
0292 0233 034e  | 3 N|		.DBG4T	0x0233,0x034e,0x0801,0x0002
0296 024b 0355  | K U|		.DBG4T	0x024b,0x0355,0x0801,0x0002
029a ; --------------------------------------------------------------------------------------
029a ; Debug chain
029a ; --------------------------------------------------------------------------------------
029a 0009 0000  |    |		.DBGLEN	0x0009,0x0000
029c 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0010,0x0011,0x0012,0x0013,0x0014,0x0016
02a5 ; --------------------------------------------------------------------------------------
02a5 ; Debug chain
02a5 ; --------------------------------------------------------------------------------------
02a5 0006 0000  |    |		.DBGLEN	0x0006,0x0000
02a7 0019 001b  |    |		.DBGLNO	0x0019,0x001b,0x001d,0x001f,0x002c,0x002e
02ad ; --------------------------------------------------------------------------------------
02ad ; Debug chain
02ad ; --------------------------------------------------------------------------------------
02ad 0001 0002  |    |		.DBGLEN	0x0001,0x0002
02af 003b 003d  | ; =|		.DBGLNO	0x003b,0x003d,0x0043
02b2 ; --------------------------------------------------------------------------------------
02b2 ; Debug chain
02b2 ; --------------------------------------------------------------------------------------
02b2 0000 0001  |    |		.DBGLEN	0x0000,0x0001
02b4 005b       | [  |		.DBGLNO	0x005b
02b5 ; --------------------------------------------------------------------------------------
02b5 ; Debug chain
02b5 ; --------------------------------------------------------------------------------------
02b5 0000 0001  |    |		.DBGLEN	0x0000,0x0001
02b7 006b       | k  |		.DBGLNO	0x006b
02b8 ; --------------------------------------------------------------------------------------
02b8 ; Debug chain
02b8 ; --------------------------------------------------------------------------------------
02b8 000b 003c  |   <|		.DBGLEN	0x000b,0x003c
02ba 0083 0088  |    |		.DBGLNO	0x0083,0x0088,0x008a,0x008c,0x0096,0x00a0,0x00aa,0x00b4,0x00be,0x00c8,0x00ca,0x00cc,0x00ce,0x00d2,0x00d3,0x00dd,0x00e0,0x00e6,0x00e8,0x00ed,0x00ee,0x00f8,0x00fe,0x0101,0x0115,0x012a,0x012e,0x012f,0x0132,0x0135,0x0138,0x013b,0x013d,0x0141,0x0149,0x015e,0x0160,0x0164,0x0165,0x0167,0x016a,0x016c,0x016f,0x0171,0x0174,0x0176,0x0179,0x017b,0x017d,0x0181,0x0183,0x0187,0x018c,0x018e,0x0192,0x0196,0x019c,0x019e,0x01a0,0x01aa,0x01ac,0x01b6,0x01b8,0x01c2,0x01c4,0x01ce,0x01d0,0x01da,0x01dc,0x01e6,0x01e9
0301 0001 0002  |    |		.XXX[0x3c]
0303 0003 0004  |    |
0305 0005 0006  |    |
0307 0007 0008  |    |
0309 0009 000a  |    |
030b 000b 000c  |    |
030d 000d 000e  |    |
030f 0014 0015  |    |
0311 000f 0010  |    |
0313 0011 0012  |    |
0315 0013 0016  |    |
0317 0017 0018  |    |
0319 0023 0024  | # $|
031b 0025 0019  | %  |
031d 001a 001b  |    |
031f 001c 001d  |    |
0321 001e 001f  |    |
0323 0020 0021  |   !|
0325 0022 0026  | " &|
0327 0027 0028  | ' (|
0329 0029 002a  | ) *|
032b 002b 002c  | + ,|
032d 002d 002e  | - .|
032f 002f 0030  | / 0|
0331 0031 0032  | 1 2|
0333 0033 0034  | 3 4|
0335 0035 0036  | 5 6|
0337 0037 0038  | 7 8|
0339 0039 003a  | 9 :|
033b 003b 003c  | ; <|
033d ; --------------------------------------------------------------------------------------
033d ; Debug chain
033d ; --------------------------------------------------------------------------------------
033d 0001 0007  |    |		.DBGLEN	0x0001,0x0007
033f 020b 020d  |    |		.DBGLNO	0x020b,0x020d,0x0214,0x0217,0x021a,0x021d,0x0220,0x0222
0347 0001 0006  |    |		.XXX[0x7]
0349 0002 0003  |    |
034b 0004 0005  |    |
034d 0007       |    |
034e ; --------------------------------------------------------------------------------------
034e ; Debug chain
034e ; --------------------------------------------------------------------------------------
034e 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0350 0233 0236  | 3 6|		.DBGLNO	0x0233,0x0236,0x0239,0x023b,0x023e
0355 ; --------------------------------------------------------------------------------------
0355 ; Debug chain
0355 ; --------------------------------------------------------------------------------------
0355 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0357 024b 0252  | K R|		.DBGLNO	0x024b,0x0252,0x0256,0x025d,0x025e,0x0267
035d 0000 0000  |    |		.BLANK	0000[0xa3]