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

⟦3033528e8⟧

    Length: 3072 (0xc00)
    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 0520       |    |		.CONST	0x0520								; 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 0002       |    |		.CONST	0x0002								; 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 0074       | t  |		.CONST	0x0074								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0012       |    |		.CONST	0x0012								; Number of locals
001b			INIT_0018:
001b 4801       |H   |		Short_Literal	0x1
001c 4800       |H   |		Short_Literal	0x0
001d 4809       |H   |		Short_Literal	0x9
001e e002       |    |		Load	0x0,0x2
001f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0020 5057       |PW  |		Indirect_Literal	Any,0x78,{0x5265705f, 0x53747269}
0021 8003       |    |		Call	0x0,0x3
0022 4801       |H   |		Short_Literal	0x1
0023 4800       |H   |		Short_Literal	0x0
0024 4809       |H   |		Short_Literal	0x9
0025 e002       |    |		Load	0x0,0x2
0026 0334       | 4  |		Declare_Variable	Array,With_Constraint
0027 5058       |PX  |		Indirect_Literal	Any,0x80,{0x5265705f, 0x535f4c6f}
0028 8003       |    |		Call	0x0,0x3
0029 4801       |H   |		Short_Literal	0x1
002a 4800       |H   |		Short_Literal	0x0
002b 480a       |H   |		Short_Literal	0xa
002c e002       |    |		Load	0x0,0x2
002d 0334       | 4  |		Declare_Variable	Array,With_Constraint
002e 5059       |PY  |		Indirect_Literal	Any,0x88,{0x5265705f, 0x426f6f6c}
002f 8003       |    |		Call	0x0,0x3
0030 4801       |H   |		Short_Literal	0x1
0031 4800       |H   |		Short_Literal	0x0
0032 480f       |H   |		Short_Literal	0xf
0033 e002       |    |		Load	0x0,0x2
0034 0334       | 4  |		Declare_Variable	Array,With_Constraint
0035 505a       |PZ  |		Indirect_Literal	Any,0x90,{0x5265705f, 0x555f4368}
0036 8003       |    |		Call	0x0,0x3
0037 4801       |H   |		Short_Literal	0x1
0038 4800       |H   |		Short_Literal	0x0
0039 480c       |H   |		Short_Literal	0xc
003a e002       |    |		Load	0x0,0x2
003b 0334       | 4  |		Declare_Variable	Array,With_Constraint
003c 505b       |P[  |		Indirect_Literal	Any,0x98,{0x5265705f, 0x556e6976}
003d 8003       |    |		Call	0x0,0x3
003e 4801       |H   |		Short_Literal	0x1
003f 4800       |H   |		Short_Literal	0x0
0040 4802       |H   |		Short_Literal	0x2
0041 e002       |    |		Load	0x0,0x2
0042 0334       | 4  |		Declare_Variable	Array,With_Constraint
0043 505c       |P\  |		Indirect_Literal	Any,0xa0,{0x6f6e6500, 0x00000000}
0044 8004       |    |		Call	0x0,0x4
0045 4801       |H   |		Short_Literal	0x1
0046 4800       |H   |		Short_Literal	0x0
0047 4802       |H   |		Short_Literal	0x2
0048 e002       |    |		Load	0x0,0x2
0049 0334       | 4  |		Declare_Variable	Array,With_Constraint
004a 5059       |PY  |		Indirect_Literal	Any,0xa4,{0x74776f00, 0x00000000}
004b 8004       |    |		Call	0x0,0x4
004c 4801       |H   |		Short_Literal	0x1
004d 4800       |H   |		Short_Literal	0x0
004e 4804       |H   |		Short_Literal	0x4
004f e002       |    |		Load	0x0,0x2
0050 0334       | 4  |		Declare_Variable	Array,With_Constraint
0051 5056       |PV  |		Indirect_Literal	Any,0xa8,{0x74687265, 0x65000000}
0052 8004       |    |		Call	0x0,0x4
0053 4801       |H   |		Short_Literal	0x1
0054 4800       |H   |		Short_Literal	0x0
0055 4803       |H   |		Short_Literal	0x3
0056 e002       |    |		Load	0x0,0x2
0057 0334       | 4  |		Declare_Variable	Array,With_Constraint
0058 5053       |PS  |		Indirect_Literal	Any,0xac,{0x666f7572, 0x00000000}
0059 8004       |    |		Call	0x0,0x4
005a 4801       |H   |		Short_Literal	0x1
005b 4800       |H   |		Short_Literal	0x0
005c 4802       |H   |		Short_Literal	0x2
005d e002       |    |		Load	0x0,0x2
005e 0334       | 4  |		Declare_Variable	Array,With_Constraint
005f 5050       |PP  |		Indirect_Literal	Any,0xb0,{0x4f6e6500, 0x00000000}
0060 8005       |    |		Call	0x0,0x5
0061 4801       |H   |		Short_Literal	0x1
0062 4800       |H   |		Short_Literal	0x0
0063 4802       |H   |		Short_Literal	0x2
0064 e002       |    |		Load	0x0,0x2
0065 0334       | 4  |		Declare_Variable	Array,With_Constraint
0066 504d       |PM  |		Indirect_Literal	Any,0xb4,{0x4f4e4500, 0x00000000}
0067 8006       |    |		Call	0x0,0x6
0068 029f 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Call
006a 029f 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Call
006c 029f 00db  |    |		Declare_Subprogram	INIT_00d8,For_Call
006e 029f 015b  |   [|		Declare_Subprogram	INIT_0158,For_Call
0070 029f 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Call
0072 029f 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Call
0074			BODY_0018:
0074 8410       |    |		Call	0x2,0x10
0075 8411       |    |		Call	0x2,0x11
0076 8412       |    |		Call	0x2,0x12
0077 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0078 5265 705f  |Rep_|		.LITERAL	{0x5265705f, 0x53747269}
007c 6e67 0000  |ng  |		.XXX[0x4]
007e 0000 0000  |    |
0080 5265 705f  |Rep_|		.LITERAL	{0x5265705f, 0x535f4c6f}
0084 6e67 0000  |ng  |		.XXX[0x4]
0086 0000 0000  |    |
0088 5265 705f  |Rep_|		.LITERAL	{0x5265705f, 0x426f6f6c}
008c 6561 6e00  |ean |		.XXX[0x4]
008e 0000 0000  |    |
0090 5265 705f  |Rep_|		.LITERAL	{0x5265705f, 0x555f4368}
0094 6172 5f41  |ar_A|		.XXX[0x4]
0096 7272 6179  |rray|
0098 5265 705f  |Rep_|		.LITERAL	{0x5265705f, 0x556e6976}
009c 6572 7361  |ersa|		.XXX[0x4]
009e 6c00 0000  |l   |
00a0 6f6e 6500  |one |		.LITERAL	{0x6f6e6500, 0x00000000}
00a4 7477 6f00  |two |		.LITERAL	{0x74776f00, 0x00000000}
00a8 7468 7265  |thre|		.LITERAL	{0x74687265, 0x65000000}
00ac 666f 7572  |four|		.LITERAL	{0x666f7572, 0x00000000}
00b0 4f6e 6500  |One |		.LITERAL	{0x4f6e6500, 0x00000000}
00b4 4f4e 4500  |ONE |		.LITERAL	{0x4f4e4500, 0x00000000}
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 00da       |    |		Load_Top	At_Offset_2
00bc 7005       |p   |		Jump_Nonzero	0xc2
00bd e007       |    |		Load	0x0,0x7
00be 7002       |p   |		Jump_Nonzero	0xc1
00bf 00db       |    |		Load_Top	At_Offset_3
00c0 8008       |    |		Call	0x0,0x8
00c1 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00c2 e7fd       |    |		Load	0x3,-0x3
00c3 01db       |    |		Execute	Vector,Length
00c4 6802       |h   |		Jump_Zero	0xc7
00c5 e7fd       |    |		Load	0x3,-0x3
00c6 8009       |    |		Call	0x0,0x9
00c7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
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 00ea       |    |		Load_Encached	Null_String_Cache
00cc 0092 04b0  |    |		Action	Push_String_Extended,0x4b0					; "RM error"
00ce e7ff       |    |		Load	0x3,-0x1
00cf 0f00       |    |		Execute_Immediate	Equal,0x0
00d0 840d       |    |		Call	0x2,0xd
00d1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00d2 0000 0000  |    |		.BLANK	0000[0x6]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e5       |    |		.CONST	0x00e5								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0004       |    |		.CONST	0x0004								; Number of locals
00db			INIT_00d8:
00db e00a       |    |		Load	0x0,0xa
00dc 0007       |    |		Action	Break_Optional
00dd e00b       |    |		Load	0x0,0xb
00de 0322       | "  |		Declare_Variable	Record
00df 00d8       |    |		Load_Top	At_Offset_0
00e0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e1 e00c       |    |		Load	0x0,0xc
00e2 02ff       |    |		Declare_Variable	Variant_Record
00e3 00d8       |    |		Load_Top	At_Offset_0
00e4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e5			BODY_00d8:
00e5 e7fc       |    |		Load	0x3,-0x4
00e6 c007       |    |		Store	0x0,0x7
00e7 4800       |H   |		Short_Literal	0x0
00e8 c00d       |    |		Store	0x0,0xd
00e9 4822       |H"  |		Short_Literal	0x22
00ea 0092 04b1  |    |		Action	Push_String_Extended,0x4b1					; "Resource \x22"
00ec e7ff       |    |		Load	0x3,-0x1
00ed 800e       |    |		Call	0x0,0xe
00ee 01cc       |    |		Execute	Vector,Catenate
00ef 01cb       |    |		Execute	Vector,Append
00f0 8009       |    |		Call	0x0,0x9
00f1 e00a       |    |		Load	0x0,0xa
00f2 e7fb       |    |		Load	0x3,-0x5
00f3 e7ff       |    |		Load	0x3,-0x1
00f4 800f       |    |		Call	0x0,0xf
00f5 c7fb       |    |		Store	0x3,-0x5
00f6 005b       | [  |		Store_Top	Discrete,At_Offset_3
00f7 00da       |    |		Load_Top	At_Offset_2
00f8 840e       |    |		Call	0x2,0xe
00f9 4800       |H   |		Short_Literal	0x0
00fa 4804       |H   |		Short_Literal	0x4
00fb e002       |    |		Load	0x0,0x2
00fc 0334       | 4  |		Declare_Variable	Array,With_Constraint
00fd 504e       |PN  |		Indirect_Literal	Any,0x14c,{0x20202020, 0x22000000}
00fe e7fe       |    |		Load	0x3,-0x2
00ff 01cc       |    |		Execute	Vector,Catenate
0100 4800       |H   |		Short_Literal	0x0
0101 4804       |H   |		Short_Literal	0x4
0102 e002       |    |		Load	0x0,0x2
0103 0334       | 4  |		Declare_Variable	Array,With_Constraint
0104 504b       |PK  |		Indirect_Literal	Any,0x150,{0x22203d3e, 0x20000000}
0105 01cc       |    |		Execute	Vector,Catenate
0106 8010       |    |		Call	0x0,0x10
0107 00d8       |    |		Load_Top	At_Offset_0
0108 00da       |    |		Load_Top	At_Offset_2
0109 e7fe       |    |		Load	0x3,-0x2
010a 00d8       |    |		Load_Top	At_Offset_0
010b e7fb       |    |		Load	0x3,-0x5
010c 8011       |    |		Call	0x0,0x11
010d 00d2       |    |		Pop_Control	Pop_Count_2
010e 00d8       |    |		Load_Top	At_Offset_0
010f 8012       |    |		Call	0x0,0x12
0110 8009       |    |		Call	0x0,0x9
0111 e7fd       |    |		Load	0x3,-0x3
0112 4800       |H   |		Short_Literal	0x0
0113 00e5       |    |		Load_Encached	Long_Integer_Cache
0114 00d9       |    |		Load_Top	At_Offset_1
0115 0267       | g  |		Execute	Discrete,Predecessor
0116 e002       |    |		Load	0x0,0x2
0117 0334       | 4  |		Declare_Variable	Array,With_Constraint
0118 01df       |    |		Execute	Vector,Equal
0119 6808       |h   |		Jump_Zero	0x122
011a 00ea       |    |		Load_Encached	Null_String_Cache
011b 0092 04b2  |    |		Action	Push_String_Extended,0x4b2					; "Expected: no value"
011d 00da       |    |		Load_Top	At_Offset_2
011e e013       |    |		Load	0x0,0x13
011f 016f       | o  |		Execute	Variant_Record,Equal
0120 840d       |    |		Call	0x2,0xd
0121 781a       |x   |		Jump	0x13c
0122 00ea       |    |		Load_Encached	Null_String_Cache
0123 4822       |H"  |		Short_Literal	0x22
0124 0092 04b3  |    |		Action	Push_String_Extended,0x4b3					; "Expected: \x22"
0126 e7fd       |    |		Load	0x3,-0x3
0127 800e       |    |		Call	0x0,0xe
0128 01cc       |    |		Execute	Vector,Catenate
0129 01cb       |    |		Execute	Vector,Append
012a 00da       |    |		Load_Top	At_Offset_2
012b e013       |    |		Load	0x0,0x13
012c 016e       | n  |		Execute	Variant_Record,Not_Equal
012d 680c       |h   |		Jump_Zero	0x13a
012e 00da       |    |		Load_Top	At_Offset_2
012f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0130 0f0b       |    |		Execute_Immediate	Equal,0xb
0131 6806       |h   |		Jump_Zero	0x138
0132 00da       |    |		Load_Top	At_Offset_2
0133 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
0134 0227       | '  |		Execute	Access,All_Reference
0135 e7fd       |    |		Load	0x3,-0x3
0136 01df       |    |		Execute	Vector,Equal
0137 7803       |x   |		Jump	0x13b
0138 4800       |H   |		Short_Literal	0x0
0139 7801       |x   |		Jump	0x13b
013a 4800       |H   |		Short_Literal	0x0
013b 840d       |    |		Call	0x2,0xd
013c 00ea       |    |		Load_Encached	Null_String_Cache
013d 0092 04b4  |    |		Action	Push_String_Extended,0x4b4					; "Error reporting inconsistency: expect error = "
013f e7fc       |    |		Load	0x3,-0x4
0140 00e1       |    |		Load_Encached	Boolean_Cache
0141 011c       |    |		Execute	Any,Convert_Unchecked
0142 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0143 01cc       |    |		Execute	Vector,Catenate
0144 e00d       |    |		Load	0x0,0xd
0145 e7fc       |    |		Load	0x3,-0x4
0146 027f       |    |		Execute	Discrete,Equal
0147 840d       |    |		Call	0x2,0xd
0148 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0149 0000 0000  |    |		.XXX[0x3]
014b 0000       |    |
014c 2020 2020  |    |		.LITERAL	{0x20202020, 0x22000000}
0150 2220 3d3e  |" =>|		.LITERAL	{0x22203d3e, 0x20000000}
0154 0000 0000  |    |		.BLANK	0000[0x4]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015d       | ]  |		.CONST	0x015d								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0002       |    |		.CONST	0x0002								; Number of locals
015b			INIT_0158:
015b e014       |    |		Load	0x0,0x14
015c 0007       |    |		Action	Break_Optional
015d			BODY_0158:
015d 0092 04b5  |    |		Action	Push_String_Extended,0x4b5					; "Creation/Deletion"
015f 8015       |    |		Call	0x0,0x15
0160 8016       |    |		Call	0x0,0x16
0161 0039       | 9  |		Store_Top	Access,At_Offset_1
0162 00d8       |    |		Load_Top	At_Offset_0
0163 8017       |    |		Call	0x0,0x17
0164 0039       | 9  |		Store_Top	Access,At_Offset_1
0165 00ea       |    |		Load_Encached	Null_String_Cache
0166 0092 04b6  |    |		Action	Push_String_Extended,0x4b6					; "Free_X_Rm_Database didn't return null."
0168 00da       |    |		Load_Top	At_Offset_2
0169 e014       |    |		Load	0x0,0x14
016a 022f       | /  |		Execute	Access,Equal
016b 840d       |    |		Call	0x2,0xd
016c 8016       |    |		Call	0x0,0x16
016d 0039       | 9  |		Store_Top	Access,At_Offset_1
016e 00d8       |    |		Load_Top	At_Offset_0
016f 4800       |H   |		Short_Literal	0x0
0170 4808       |H   |		Short_Literal	0x8
0171 e002       |    |		Load	0x0,0x2
0172 0334       | 4  |		Declare_Variable	Array,With_Constraint
0173 5050       |PP  |		Indirect_Literal	Any,0x1c4,{0x61626320, 0x76616c75}
0174 4800       |H   |		Short_Literal	0x0
0175 4802       |H   |		Short_Literal	0x2
0176 e002       |    |		Load	0x0,0x2
0177 0334       | 4  |		Declare_Variable	Array,With_Constraint
0178 4861       |Ha  |		Short_Literal	0x61
0179 4800       |H   |		Short_Literal	0x0
017a 00da       |    |		Load_Top	At_Offset_2
017b 01d6       |    |		Execute	Vector,Field_Write
017c 4862       |Hb  |		Short_Literal	0x62
017d 4801       |H   |		Short_Literal	0x1
017e 00da       |    |		Load_Top	At_Offset_2
017f 01d6       |    |		Execute	Vector,Field_Write
0180 4863       |Hc  |		Short_Literal	0x63
0181 4802       |H   |		Short_Literal	0x2
0182 00da       |    |		Load_Top	At_Offset_2
0183 01d6       |    |		Execute	Vector,Field_Write
0184 8018       |    |		Call	0x0,0x18
0185 0039       | 9  |		Store_Top	Access,At_Offset_1
0186 00d8       |    |		Load_Top	At_Offset_0
0187 4800       |H   |		Short_Literal	0x0
0188 4808       |H   |		Short_Literal	0x8
0189 e002       |    |		Load	0x0,0x2
018a 0334       | 4  |		Declare_Variable	Array,With_Constraint
018b 5040       |P@  |		Indirect_Literal	Any,0x1cc,{0x64656620, 0x76616c75}
018c 4802       |H   |		Short_Literal	0x2
018d 4804       |H   |		Short_Literal	0x4
018e e002       |    |		Load	0x0,0x2
018f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0190 4864       |Hd  |		Short_Literal	0x64
0191 4802       |H   |		Short_Literal	0x2
0192 00da       |    |		Load_Top	At_Offset_2
0193 01d6       |    |		Execute	Vector,Field_Write
0194 4865       |He  |		Short_Literal	0x65
0195 4803       |H   |		Short_Literal	0x3
0196 00da       |    |		Load_Top	At_Offset_2
0197 01d6       |    |		Execute	Vector,Field_Write
0198 4866       |Hf  |		Short_Literal	0x66
0199 4804       |H   |		Short_Literal	0x4
019a 00da       |    |		Load_Top	At_Offset_2
019b 01d6       |    |		Execute	Vector,Field_Write
019c 8018       |    |		Call	0x0,0x18
019d 0039       | 9  |		Store_Top	Access,At_Offset_1
019e 00d8       |    |		Load_Top	At_Offset_0
019f 4800       |H   |		Short_Literal	0x0
01a0 480a       |H   |		Short_Literal	0xa
01a1 e002       |    |		Load	0x0,0x2
01a2 0334       | 4  |		Declare_Variable	Array,With_Constraint
01a3 5030       |P0  |		Indirect_Literal	Any,0x1d4,{0x612e622e, 0x63207661}
01a4 4800       |H   |		Short_Literal	0x0
01a5 4804       |H   |		Short_Literal	0x4
01a6 e002       |    |		Load	0x0,0x2
01a7 0334       | 4  |		Declare_Variable	Array,With_Constraint
01a8 5033       |P3  |		Indirect_Literal	Any,0x1dc,{0x612e622e, 0x63000000}
01a9 8018       |    |		Call	0x0,0x18
01aa 0039       | 9  |		Store_Top	Access,At_Offset_1
01ab 00d8       |    |		Load_Top	At_Offset_0
01ac 4800       |H   |		Short_Literal	0x0
01ad 4809       |H   |		Short_Literal	0x9
01ae e002       |    |		Load	0x0,0x2
01af 0334       | 4  |		Declare_Variable	Array,With_Constraint
01b0 502f       |P/  |		Indirect_Literal	Any,0x1e0,{0x61622a63, 0x2076616c}
01b1 4800       |H   |		Short_Literal	0x0
01b2 4803       |H   |		Short_Literal	0x3
01b3 e002       |    |		Load	0x0,0x2
01b4 0334       | 4  |		Declare_Variable	Array,With_Constraint
01b5 5032       |P2  |		Indirect_Literal	Any,0x1e8,{0x61622a63, 0x00000000}
01b6 8018       |    |		Call	0x0,0x18
01b7 0039       | 9  |		Store_Top	Access,At_Offset_1
01b8 00d8       |    |		Load_Top	At_Offset_0
01b9 8017       |    |		Call	0x0,0x17
01ba 0039       | 9  |		Store_Top	Access,At_Offset_1
01bb 00ea       |    |		Load_Encached	Null_String_Cache
01bc 0092 04b6  |    |		Action	Push_String_Extended,0x4b6					; "Free_X_Rm_Database didn't return null."
01be 00da       |    |		Load_Top	At_Offset_2
01bf e014       |    |		Load	0x0,0x14
01c0 022f       | /  |		Execute	Access,Equal
01c1 840d       |    |		Call	0x2,0xd
01c2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01c3 0000       |    |		.XXX[0x1]
01c4 6162 6320  |abc |		.LITERAL	{0x61626320, 0x76616c75}
01c8 6500 0000  |e   |		.XXX[0x4]
01ca 0000 0000  |    |
01cc 6465 6620  |def |		.LITERAL	{0x64656620, 0x76616c75}
01d0 6500 0000  |e   |		.XXX[0x4]
01d2 0000 0000  |    |
01d4 612e 622e  |a.b.|		.LITERAL	{0x612e622e, 0x63207661}
01d8 6c75 6500  |lue |		.XXX[0x4]
01da 0000 0000  |    |
01dc 612e 622e  |a.b.|		.LITERAL	{0x612e622e, 0x63000000}
01e0 6162 2a63  |ab*c|		.LITERAL	{0x61622a63, 0x2076616c}
01e4 7565 0000  |ue  |		.XXX[0x4]
01e6 0000 0000  |    |
01e8 6162 2a63  |ab*c|		.LITERAL	{0x61622a63, 0x00000000}
01ec 0000 0000  |    |		.BLANK	0000[0x4]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f6       |    |		.CONST	0x01f6								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0003       |    |		.CONST	0x0003								; Number of locals
01f3			INIT_01f0:
01f3 e014       |    |		Load	0x0,0x14
01f4 029f 046b  |   k|		Declare_Subprogram	INIT_0468,For_Call
01f6			BODY_01f0:
01f6 0092 04b7  |    |		Action	Push_String_Extended,0x4b7					; "Put smoke tests."
01f8 8015       |    |		Call	0x0,0x15
01f9 8016       |    |		Call	0x0,0x16
01fa 003a       | :  |		Store_Top	Access,At_Offset_2
01fb 00d9       |    |		Load_Top	At_Offset_1
01fc 4801       |H   |		Short_Literal	0x1
01fd 4809       |H   |		Short_Literal	0x9
01fe e00c       |    |		Load	0x0,0xc
01ff 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0200 4801       |H   |		Short_Literal	0x1
0201 00d9       |    |		Load_Top	At_Offset_1
0202 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0203 e403       |    |		Load	0x2,0x3
0204 4800       |H   |		Short_Literal	0x0
0205 4800       |H   |		Short_Literal	0x0
0206 e019       |    |		Load	0x0,0x19
0207 0334       | 4  |		Declare_Variable	Array,With_Constraint
0208 e407       |    |		Load	0x2,0x7
0209 4800       |H   |		Short_Literal	0x0
020a 00da       |    |		Load_Top	At_Offset_2
020b 01d6       |    |		Execute	Vector,Field_Write
020c 4802       |H   |		Short_Literal	0x2
020d 4802       |H   |		Short_Literal	0x2
020e e01a       |    |		Load	0x0,0x1a
020f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0210 4801       |H   |		Short_Literal	0x1
0211 4802       |H   |		Short_Literal	0x2
0212 00da       |    |		Load_Top	At_Offset_2
0213 01d6       |    |		Execute	Vector,Field_Write
0214 801b       |    |		Call	0x0,0x1b
0215 003a       | :  |		Store_Top	Access,At_Offset_2
0216 00d9       |    |		Load_Top	At_Offset_1
0217 4801       |H   |		Short_Literal	0x1
0218 4809       |H   |		Short_Literal	0x9
0219 e00c       |    |		Load	0x0,0xc
021a 1c08       |    |		Execute_Immediate	Run_Utility,0x8
021b 4801       |H   |		Short_Literal	0x1
021c 00d9       |    |		Load_Top	At_Offset_1
021d 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
021e e403       |    |		Load	0x2,0x3
021f 4802       |H   |		Short_Literal	0x2
0220 4803       |H   |		Short_Literal	0x3
0221 e01c       |    |		Load	0x0,0x1c
0222 0334       | 4  |		Declare_Variable	Array,With_Constraint
0223 4803       |H   |		Short_Literal	0x3
0224 4802       |H   |		Short_Literal	0x2
0225 e40b       |    |		Load	0x2,0xb
0226 00d9       |    |		Load_Top	At_Offset_1
0227 e608       |    |		Load	0x3,0x8
0228 01d6       |    |		Execute	Vector,Field_Write
0229 3ffb       |?   |		Loop_Increasing	0x225
022a 4800       |H   |		Short_Literal	0x0
022b 4801       |H   |		Short_Literal	0x1
022c e01a       |    |		Load	0x0,0x1a
022d 0334       | 4  |		Declare_Variable	Array,With_Constraint
022e 4800       |H   |		Short_Literal	0x0
022f 4800       |H   |		Short_Literal	0x0
0230 00da       |    |		Load_Top	At_Offset_2
0231 01d6       |    |		Execute	Vector,Field_Write
0232 4800       |H   |		Short_Literal	0x0
0233 4801       |H   |		Short_Literal	0x1
0234 00da       |    |		Load_Top	At_Offset_2
0235 01d6       |    |		Execute	Vector,Field_Write
0236 801d       |    |		Call	0x0,0x1d
0237 003a       | :  |		Store_Top	Access,At_Offset_2
0238 00d9       |    |		Load_Top	At_Offset_1
0239 4801       |H   |		Short_Literal	0x1
023a 4809       |H   |		Short_Literal	0x9
023b e00c       |    |		Load	0x0,0xc
023c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
023d 4801       |H   |		Short_Literal	0x1
023e 00d9       |    |		Load_Top	At_Offset_1
023f 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0240 e403       |    |		Load	0x2,0x3
0241 4801       |H   |		Short_Literal	0x1
0242 4803       |H   |		Short_Literal	0x3
0243 e01e       |    |		Load	0x0,0x1e
0244 0334       | 4  |		Declare_Variable	Array,With_Constraint
0245 4803       |H   |		Short_Literal	0x3
0246 4801       |H   |		Short_Literal	0x1
0247 e40c       |    |		Load	0x2,0xc
0248 00d9       |    |		Load_Top	At_Offset_1
0249 e608       |    |		Load	0x3,0x8
024a 01d6       |    |		Execute	Vector,Field_Write
024b 3ffb       |?   |		Loop_Increasing	0x247
024c 4801       |H   |		Short_Literal	0x1
024d 4803       |H   |		Short_Literal	0x3
024e e01a       |    |		Load	0x0,0x1a
024f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0250 4803       |H   |		Short_Literal	0x3
0251 4801       |H   |		Short_Literal	0x1
0252 4801       |H   |		Short_Literal	0x1
0253 00d9       |    |		Load_Top	At_Offset_1
0254 e609       |    |		Load	0x3,0x9
0255 01d6       |    |		Execute	Vector,Field_Write
0256 3ffb       |?   |		Loop_Increasing	0x252
0257 801f       |    |		Call	0x0,0x1f
0258 003a       | :  |		Store_Top	Access,At_Offset_2
0259 00d9       |    |		Load_Top	At_Offset_1
025a 4800       |H   |		Short_Literal	0x0
025b 4800       |H   |		Short_Literal	0x0
025c e002       |    |		Load	0x0,0x2
025d 0334       | 4  |		Declare_Variable	Array,With_Constraint
025e 5045       |PE  |		Indirect_Literal	Any,0x2a4,{0x32000000, 0x00000000}
025f 4802       |H   |		Short_Literal	0x2
0260 4802       |H   |		Short_Literal	0x2
0261 e019       |    |		Load	0x0,0x19
0262 0334       | 4  |		Declare_Variable	Array,With_Constraint
0263 e408       |    |		Load	0x2,0x8
0264 4802       |H   |		Short_Literal	0x2
0265 00da       |    |		Load_Top	At_Offset_2
0266 01d6       |    |		Execute	Vector,Field_Write
0267 4800       |H   |		Short_Literal	0x0
0268 4800       |H   |		Short_Literal	0x0
0269 e01a       |    |		Load	0x0,0x1a
026a 0334       | 4  |		Declare_Variable	Array,With_Constraint
026b 4800       |H   |		Short_Literal	0x0
026c 4800       |H   |		Short_Literal	0x0
026d 00da       |    |		Load_Top	At_Offset_2
026e 01d6       |    |		Execute	Vector,Field_Write
026f 8020       |    |		Call	0x0,0x20
0270 003a       | :  |		Store_Top	Access,At_Offset_2
0271 00d9       |    |		Load_Top	At_Offset_1
0272 4801       |H   |		Short_Literal	0x1
0273 4809       |H   |		Short_Literal	0x9
0274 e00c       |    |		Load	0x0,0xc
0275 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0276 4803       |H   |		Short_Literal	0x3
0277 00d9       |    |		Load_Top	At_Offset_1
0278 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0279 4800       |H   |		Short_Literal	0x0
027a 4805       |H   |		Short_Literal	0x5
027b e002       |    |		Load	0x0,0x2
027c 0334       | 4  |		Declare_Variable	Array,With_Constraint
027d 502a       |P*  |		Indirect_Literal	Any,0x2a8,{0x52616e64, 0x6f6d0000}
027e 4800       |H   |		Short_Literal	0x0
027f 4804       |H   |		Short_Literal	0x4
0280 e002       |    |		Load	0x0,0x2
0281 0334       | 4  |		Declare_Variable	Array,With_Constraint
0282 5029       |P)  |		Indirect_Literal	Any,0x2ac,{0x74687265, 0x65000000}
0283 8021       | !  |		Call	0x0,0x21
0284 003a       | :  |		Store_Top	Access,At_Offset_2
0285 00d9       |    |		Load_Top	At_Offset_1
0286 4800       |H   |		Short_Literal	0x0
0287 4800       |H   |		Short_Literal	0x0
0288 e002       |    |		Load	0x0,0x2
0289 0334       | 4  |		Declare_Variable	Array,With_Constraint
028a 5025       |P%  |		Indirect_Literal	Any,0x2b0,{0x34000000, 0x00000000}
028b 4800       |H   |		Short_Literal	0x0
028c 4804       |H   |		Short_Literal	0x4
028d e002       |    |		Load	0x0,0x2
028e 0334       | 4  |		Declare_Variable	Array,With_Constraint
028f 5024       |P$  |		Indirect_Literal	Any,0x2b4,{0x2a666f75, 0x72000000}
0290 8018       |    |		Call	0x0,0x18
0291 003a       | :  |		Store_Top	Access,At_Offset_2
0292 0092 04b8  |    |		Action	Push_String_Extended,0x4b8					; "Get smoke tests."
0294 8015       |    |		Call	0x0,0x15
0295 8603       |    |		Call	0x3,0x3
0296 00d9       |    |		Load_Top	At_Offset_1
0297 8017       |    |		Call	0x0,0x17
0298 003a       | :  |		Store_Top	Access,At_Offset_2
0299 00ea       |    |		Load_Encached	Null_String_Cache
029a 0092 04b6  |    |		Action	Push_String_Extended,0x4b6					; "Free_X_Rm_Database didn't return null."
029c 00db       |    |		Load_Top	At_Offset_3
029d e014       |    |		Load	0x0,0x14
029e 022f       | /  |		Execute	Access,Equal
029f 840d       |    |		Call	0x2,0xd
02a0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a1 0000 0000  |    |		.XXX[0x3]
02a3 0000       |    |
02a4 3200 0000  |2   |		.LITERAL	{0x32000000, 0x00000000}
02a8 5261 6e64  |Rand|		.LITERAL	{0x52616e64, 0x6f6d0000}
02ac 7468 7265  |thre|		.LITERAL	{0x74687265, 0x65000000}
02b0 3400 0000  |4   |		.LITERAL	{0x34000000, 0x00000000}
02b4 2a66 6f75  |*fou|		.LITERAL	{0x2a666f75, 0x72000000}
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bf       |    |		.CONST	0x02bf								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0003       |    |		.CONST	0x0003								; Number of locals
02bb			INIT_02b8:
02bb e014       |    |		Load	0x0,0x14
02bc 0007       |    |		Action	Break_Optional
02bd e022       | "  |		Load	0x0,0x22
02be 0007       |    |		Action	Break_Optional
02bf			BODY_02b8:
02bf 0092 04b9  |    |		Action	Push_String_Extended,0x4b9					; "Put quoting tests"
02c1 8015       |    |		Call	0x0,0x15
02c2 8016       |    |		Call	0x0,0x16
02c3 003a       | :  |		Store_Top	Access,At_Offset_2
02c4 e022       | "  |		Load	0x0,0x22
02c5 8023       | #  |		Call	0x0,0x23
02c6 0039       | 9  |		Store_Top	Access,At_Offset_1
02c7 00d9       |    |		Load_Top	At_Offset_1
02c8 4800       |H   |		Short_Literal	0x0
02c9 4800       |H   |		Short_Literal	0x0
02ca 4800       |H   |		Short_Literal	0x0
02cb e002       |    |		Load	0x0,0x2
02cc 0334       | 4  |		Declare_Variable	Array,With_Constraint
02cd 50ea       |P   |		Indirect_Literal	Any,0x3b8,{0x61000000, 0x00000000}
02ce 4800       |H   |		Short_Literal	0x0
02cf 4805       |H   |		Short_Literal	0x5
02d0 e002       |    |		Load	0x0,0x2
02d1 0334       | 4  |		Declare_Variable	Array,With_Constraint
02d2 50e9       |P   |		Indirect_Literal	Any,0x3bc,{0x6e6f726d, 0x616c0000}
02d3 4800       |H   |		Short_Literal	0x0
02d4 4808       |H   |		Short_Literal	0x8
02d5 e002       |    |		Load	0x0,0x2
02d6 0334       | 4  |		Declare_Variable	Array,With_Constraint
02d7 50e8       |P   |		Indirect_Literal	Any,0x3c0,{0x6e6f726d, 0x616c3a20}
02d8 840f       |    |		Call	0x2,0xf
02d9 003a       | :  |		Store_Top	Access,At_Offset_2
02da 00d9       |    |		Load_Top	At_Offset_1
02db 4800       |H   |		Short_Literal	0x0
02dc 4800       |H   |		Short_Literal	0x0
02dd 4800       |H   |		Short_Literal	0x0
02de e002       |    |		Load	0x0,0x2
02df 0334       | 4  |		Declare_Variable	Array,With_Constraint
02e0 50e7       |P   |		Indirect_Literal	Any,0x3c8,{0x62000000, 0x00000000}
02e1 4800       |H   |		Short_Literal	0x0
02e2 4804       |H   |		Short_Literal	0x4
02e3 e002       |    |		Load	0x0,0x2
02e4 0334       | 4  |		Declare_Variable	Array,With_Constraint
02e5 50e6       |P   |		Indirect_Literal	Any,0x3cc,{0x6f637461, 0x6c000000}
02e6 4800       |H   |		Short_Literal	0x0
02e7 480a       |H   |		Short_Literal	0xa
02e8 e002       |    |		Load	0x0,0x2
02e9 0334       | 4  |		Declare_Variable	Array,With_Constraint
02ea 50e5       |P   |		Indirect_Literal	Any,0x3d0,{0x6f637461, 0x6c3a205c}
02eb 840f       |    |		Call	0x2,0xf
02ec 003a       | :  |		Store_Top	Access,At_Offset_2
02ed 00d9       |    |		Load_Top	At_Offset_1
02ee 4800       |H   |		Short_Literal	0x0
02ef 4801       |H   |		Short_Literal	0x1
02f0 4801       |H   |		Short_Literal	0x1
02f1 e002       |    |		Load	0x0,0x2
02f2 0334       | 4  |		Declare_Variable	Array,With_Constraint
02f3 480a       |H   |		Short_Literal	0xa
02f4 4801       |H   |		Short_Literal	0x1
02f5 00da       |    |		Load_Top	At_Offset_2
02f6 01d6       |    |		Execute	Vector,Field_Write
02f7 4800       |H   |		Short_Literal	0x0
02f8 4806       |H   |		Short_Literal	0x6
02f9 e002       |    |		Load	0x0,0x2
02fa 0334       | 4  |		Declare_Variable	Array,With_Constraint
02fb 50dc       |P   |		Indirect_Literal	Any,0x3d8,{0x6e65776c, 0x696e6500}
02fc 4800       |H   |		Short_Literal	0x0
02fd 480a       |H   |		Short_Literal	0xa
02fe e002       |    |		Load	0x0,0x2
02ff 0334       | 4  |		Declare_Variable	Array,With_Constraint
0300 50db       |P   |		Indirect_Literal	Any,0x3dc,{0x6e65776c, 0x696e653a}
0301 840f       |    |		Call	0x2,0xf
0302 003a       | :  |		Store_Top	Access,At_Offset_2
0303 00d9       |    |		Load_Top	At_Offset_1
0304 4800       |H   |		Short_Literal	0x0
0305 4801       |H   |		Short_Literal	0x1
0306 4801       |H   |		Short_Literal	0x1
0307 e002       |    |		Load	0x0,0x2
0308 0334       | 4  |		Declare_Variable	Array,With_Constraint
0309 480a       |H   |		Short_Literal	0xa
030a 4801       |H   |		Short_Literal	0x1
030b 00da       |    |		Load_Top	At_Offset_2
030c 01d6       |    |		Execute	Vector,Field_Write
030d 4800       |H   |		Short_Literal	0x0
030e 4804       |H   |		Short_Literal	0x4
030f e002       |    |		Load	0x0,0x2
0310 0334       | 4  |		Declare_Variable	Array,With_Constraint
0311 50d2       |P   |		Indirect_Literal	Any,0x3e4,{0x6e6c2e6c, 0x66000000}
0312 480a       |H   |		Short_Literal	0xa
0313 4800       |H   |		Short_Literal	0x0
0314 4808       |H   |		Short_Literal	0x8
0315 e002       |    |		Load	0x0,0x2
0316 0334       | 4  |		Declare_Variable	Array,With_Constraint
0317 50d0       |P   |		Indirect_Literal	Any,0x3e8,{0x6e6c2e6c, 0x663a205c}
0318 01cb       |    |		Execute	Vector,Append
0319 840f       |    |		Call	0x2,0xf
031a 003a       | :  |		Store_Top	Access,At_Offset_2
031b 00d9       |    |		Load_Top	At_Offset_1
031c 4800       |H   |		Short_Literal	0x0
031d 4800       |H   |		Short_Literal	0x0
031e 4800       |H   |		Short_Literal	0x0
031f e002       |    |		Load	0x0,0x2
0320 0334       | 4  |		Declare_Variable	Array,With_Constraint
0321 50ce       |P   |		Indirect_Literal	Any,0x3f0,{0x5c000000, 0x00000000}
0322 4800       |H   |		Short_Literal	0x0
0323 4808       |H   |		Short_Literal	0x8
0324 e002       |    |		Load	0x0,0x2
0325 0334       | 4  |		Declare_Variable	Array,With_Constraint
0326 50cd       |P   |		Indirect_Literal	Any,0x3f4,{0x6261636b, 0x736c6173}
0327 4800       |H   |		Short_Literal	0x0
0328 480c       |H   |		Short_Literal	0xc
0329 e002       |    |		Load	0x0,0x2
032a 0334       | 4  |		Declare_Variable	Array,With_Constraint
032b 50d0       |P   |		Indirect_Literal	Any,0x3fc,{0x6261636b, 0x736c6173}
032c 840f       |    |		Call	0x2,0xf
032d 003a       | :  |		Store_Top	Access,At_Offset_2
032e 00d9       |    |		Load_Top	At_Offset_1
032f 4800       |H   |		Short_Literal	0x0
0330 4800       |H   |		Short_Literal	0x0
0331 4801       |H   |		Short_Literal	0x1
0332 e002       |    |		Load	0x0,0x2
0333 0334       | 4  |		Declare_Variable	Array,With_Constraint
0334 50cf       |P   |		Indirect_Literal	Any,0x404,{0x53340000, 0x00000000}
0335 4800       |H   |		Short_Literal	0x0
0336 4803       |H   |		Short_Literal	0x3
0337 e002       |    |		Load	0x0,0x2
0338 0334       | 4  |		Declare_Variable	Array,With_Constraint
0339 50ce       |P   |		Indirect_Literal	Any,0x408,{0x6c6f6e67, 0x00000000}
033a 4800       |H   |		Short_Literal	0x0
033b 480a       |H   |		Short_Literal	0xa
033c e002       |    |		Load	0x0,0x2
033d 0334       | 4  |		Declare_Variable	Array,With_Constraint
033e 50cd       |P   |		Indirect_Literal	Any,0x40c,{0x6c6f6e67, 0x3a205c31}
033f 840f       |    |		Call	0x2,0xf
0340 003a       | :  |		Store_Top	Access,At_Offset_2
0341 00d9       |    |		Load_Top	At_Offset_1
0342 4801       |H   |		Short_Literal	0x1
0343 4800       |H   |		Short_Literal	0x0
0344 4800       |H   |		Short_Literal	0x0
0345 e002       |    |		Load	0x0,0x2
0346 0334       | 4  |		Declare_Variable	Array,With_Constraint
0347 50cc       |P   |		Indirect_Literal	Any,0x414,{0x3f000000, 0x00000000}
0348 4800       |H   |		Short_Literal	0x0
0349 4806       |H   |		Short_Literal	0x6
034a e002       |    |		Load	0x0,0x2
034b 0334       | 4  |		Declare_Variable	Array,With_Constraint
034c 50cb       |P   |		Indirect_Literal	Any,0x418,{0x756e6b6e, 0x6f776e00}
034d 4800       |H   |		Short_Literal	0x0
034e 480a       |H   |		Short_Literal	0xa
034f e002       |    |		Load	0x0,0x2
0350 0334       | 4  |		Declare_Variable	Array,With_Constraint
0351 50ca       |P   |		Indirect_Literal	Any,0x41c,{0x756e6b6e, 0x6f776e3a}
0352 840f       |    |		Call	0x2,0xf
0353 003a       | :  |		Store_Top	Access,At_Offset_2
0354 00d9       |    |		Load_Top	At_Offset_1
0355 4801       |H   |		Short_Literal	0x1
0356 4800       |H   |		Short_Literal	0x0
0357 4800       |H   |		Short_Literal	0x0
0358 e002       |    |		Load	0x0,0x2
0359 0334       | 4  |		Declare_Variable	Array,With_Constraint
035a 50c9       |P   |		Indirect_Literal	Any,0x424,{0x30000000, 0x00000000}
035b 4800       |H   |		Short_Literal	0x0
035c 4804       |H   |		Short_Literal	0x4
035d e002       |    |		Load	0x0,0x2
035e 0334       | 4  |		Declare_Variable	Array,With_Constraint
035f 50c8       |P   |		Indirect_Literal	Any,0x428,{0x73686f72, 0x74000000}
0360 4800       |H   |		Short_Literal	0x0
0361 4808       |H   |		Short_Literal	0x8
0362 e002       |    |		Load	0x0,0x2
0363 0334       | 4  |		Declare_Variable	Array,With_Constraint
0364 50c7       |P   |		Indirect_Literal	Any,0x42c,{0x73686f72, 0x743a205c}
0365 840f       |    |		Call	0x2,0xf
0366 003a       | :  |		Store_Top	Access,At_Offset_2
0367 00d9       |    |		Load_Top	At_Offset_1
0368 4801       |H   |		Short_Literal	0x1
0369 4800       |H   |		Short_Literal	0x0
036a 4800       |H   |		Short_Literal	0x0
036b e002       |    |		Load	0x0,0x2
036c 0334       | 4  |		Declare_Variable	Array,With_Constraint
036d 50c6       |P   |		Indirect_Literal	Any,0x434,{0x58000000, 0x00000000}
036e 4800       |H   |		Short_Literal	0x0
036f 4805       |H   |		Short_Literal	0x5
0370 e002       |    |		Load	0x0,0x2
0371 0334       | 4  |		Declare_Variable	Array,With_Constraint
0372 50c5       |P   |		Indirect_Literal	Any,0x438,{0x6269676e, 0x756d0000}
0373 4800       |H   |		Short_Literal	0x0
0374 480b       |H   |		Short_Literal	0xb
0375 e002       |    |		Load	0x0,0x2
0376 0334       | 4  |		Declare_Variable	Array,With_Constraint
0377 50c4       |P   |		Indirect_Literal	Any,0x43c,{0x6269676e, 0x756d3a20}
0378 840f       |    |		Call	0x2,0xf
0379 003a       | :  |		Store_Top	Access,At_Offset_2
037a 00d9       |    |		Load_Top	At_Offset_1
037b 4800       |H   |		Short_Literal	0x0
037c 4800       |H   |		Short_Literal	0x0
037d 4801       |H   |		Short_Literal	0x1
037e e002       |    |		Load	0x0,0x2
037f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0380 50c3       |P   |		Indirect_Literal	Any,0x444,{0x61620000, 0x00000000}
0381 4800       |H   |		Short_Literal	0x0
0382 4806       |H   |		Short_Literal	0x6
0383 e002       |    |		Load	0x0,0x2
0384 0334       | 4  |		Declare_Variable	Array,With_Constraint
0385 50c2       |P   |		Indirect_Literal	Any,0x448,{0x77726170, 0x70656400}
0386 480a       |H   |		Short_Literal	0xa
0387 4800       |H   |		Short_Literal	0x0
0388 480a       |H   |		Short_Literal	0xa
0389 e002       |    |		Load	0x0,0x2
038a 0334       | 4  |		Declare_Variable	Array,With_Constraint
038b 50c0       |P   |		Indirect_Literal	Any,0x44c,{0x77726170, 0x7065643a}
038c 01cb       |    |		Execute	Vector,Append
038d 4800       |H   |		Short_Literal	0x0
038e 4800       |H   |		Short_Literal	0x0
038f e002       |    |		Load	0x0,0x2
0390 0334       | 4  |		Declare_Variable	Array,With_Constraint
0391 50c2       |P   |		Indirect_Literal	Any,0x454,{0x62000000, 0x00000000}
0392 01cc       |    |		Execute	Vector,Catenate
0393 840f       |    |		Call	0x2,0xf
0394 003a       | :  |		Store_Top	Access,At_Offset_2
0395 00d9       |    |		Load_Top	At_Offset_1
0396 4800       |H   |		Short_Literal	0x0
0397 4800       |H   |		Short_Literal	0x0
0398 4800       |H   |		Short_Literal	0x0
0399 e002       |    |		Load	0x0,0x2
039a 0334       | 4  |		Declare_Variable	Array,With_Constraint
039b 50bc       |P   |		Indirect_Literal	Any,0x458,{0x63000000, 0x00000000}
039c 4800       |H   |		Short_Literal	0x0
039d 4806       |H   |		Short_Literal	0x6
039e e002       |    |		Load	0x0,0x2
039f 0334       | 4  |		Declare_Variable	Array,With_Constraint
03a0 50bb       |P   |		Indirect_Literal	Any,0x45c,{0x636c6970, 0x70656400}
03a1 4800       |H   |		Short_Literal	0x0
03a2 480a       |H   |		Short_Literal	0xa
03a3 e002       |    |		Load	0x0,0x2
03a4 0334       | 4  |		Declare_Variable	Array,With_Constraint
03a5 50ba       |P   |		Indirect_Literal	Any,0x460,{0x636c6970, 0x7065643a}
03a6 840f       |    |		Call	0x2,0xf
03a7 003a       | :  |		Store_Top	Access,At_Offset_2
03a8 00d8       |    |		Load_Top	At_Offset_0
03a9 8024       | $  |		Call	0x0,0x24
03aa 00d9       |    |		Load_Top	At_Offset_1
03ab 8017       |    |		Call	0x0,0x17
03ac 003a       | :  |		Store_Top	Access,At_Offset_2
03ad 00ea       |    |		Load_Encached	Null_String_Cache
03ae 0092 04b6  |    |		Action	Push_String_Extended,0x4b6					; "Free_X_Rm_Database didn't return null."
03b0 00db       |    |		Load_Top	At_Offset_3
03b1 e014       |    |		Load	0x0,0x14
03b2 022f       | /  |		Execute	Access,Equal
03b3 840d       |    |		Call	0x2,0xd
03b4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b5 0000 0000  |    |		.XXX[0x3]
03b7 0000       |    |
03b8 6100 0000  |a   |		.LITERAL	{0x61000000, 0x00000000}
03bc 6e6f 726d  |norm|		.LITERAL	{0x6e6f726d, 0x616c0000}
03c0 6e6f 726d  |norm|		.LITERAL	{0x6e6f726d, 0x616c3a20}
03c4 6100 0000  |a   |		.XXX[0x4]
03c6 0000 0000  |    |
03c8 6200 0000  |b   |		.LITERAL	{0x62000000, 0x00000000}
03cc 6f63 7461  |octa|		.LITERAL	{0x6f637461, 0x6c000000}
03d0 6f63 7461  |octa|		.LITERAL	{0x6f637461, 0x6c3a205c}
03d4 3134 3200  |142 |		.XXX[0x4]
03d6 0000 0000  |    |
03d8 6e65 776c  |newl|		.LITERAL	{0x6e65776c, 0x696e6500}
03dc 6e65 776c  |newl|		.LITERAL	{0x6e65776c, 0x696e653a}
03e0 205c 6e00  | \n |		.XXX[0x4]
03e2 0000 0000  |    |
03e4 6e6c 2e6c  |nl.l|		.LITERAL	{0x6e6c2e6c, 0x66000000}
03e8 6e6c 2e6c  |nl.l|		.LITERAL	{0x6e6c2e6c, 0x663a205c}
03ec 6e00 0000  |n   |		.XXX[0x4]
03ee 0000 0000  |    |
03f0 5c00 0000  |\   |		.LITERAL	{0x5c000000, 0x00000000}
03f4 6261 636b  |back|		.LITERAL	{0x6261636b, 0x736c6173}
03f8 6800 0000  |h   |		.XXX[0x4]
03fa 0000 0000  |    |
03fc 6261 636b  |back|		.LITERAL	{0x6261636b, 0x736c6173}
0400 683a 205c  |h: \|		.XXX[0x4]
0402 5c00 0000  |\   |
0404 5334 0000  |S4  |		.LITERAL	{0x53340000, 0x00000000}
0408 6c6f 6e67  |long|		.LITERAL	{0x6c6f6e67, 0x00000000}
040c 6c6f 6e67  |long|		.LITERAL	{0x6c6f6e67, 0x3a205c31}
0410 3233 3400  |234 |		.XXX[0x4]
0412 0000 0000  |    |
0414 3f00 0000  |?   |		.LITERAL	{0x3f000000, 0x00000000}
0418 756e 6b6e  |unkn|		.LITERAL	{0x756e6b6e, 0x6f776e00}
041c 756e 6b6e  |unkn|		.LITERAL	{0x756e6b6e, 0x6f776e3a}
0420 205c 3f00  | \? |		.XXX[0x4]
0422 0000 0000  |    |
0424 3000 0000  |0   |		.LITERAL	{0x30000000, 0x00000000}
0428 7368 6f72  |shor|		.LITERAL	{0x73686f72, 0x74000000}
042c 7368 6f72  |shor|		.LITERAL	{0x73686f72, 0x743a205c}
0430 3000 0000  |0   |		.XXX[0x4]
0432 0000 0000  |    |
0434 5800 0000  |X   |		.LITERAL	{0x58000000, 0x00000000}
0438 6269 676e  |bign|		.LITERAL	{0x6269676e, 0x756d0000}
043c 6269 676e  |bign|		.LITERAL	{0x6269676e, 0x756d3a20}
0440 5c35 3330  |\530|		.XXX[0x4]
0442 0000 0000  |    |
0444 6162 0000  |ab  |		.LITERAL	{0x61620000, 0x00000000}
0448 7772 6170  |wrap|		.LITERAL	{0x77726170, 0x70656400}
044c 7772 6170  |wrap|		.LITERAL	{0x77726170, 0x7065643a}
0450 2061 5c00  | a\ |		.XXX[0x4]
0452 0000 0000  |    |
0454 6200 0000  |b   |		.LITERAL	{0x62000000, 0x00000000}
0458 6300 0000  |c   |		.LITERAL	{0x63000000, 0x00000000}
045c 636c 6970  |clip|		.LITERAL	{0x636c6970, 0x70656400}
0460 636c 6970  |clip|		.LITERAL	{0x636c6970, 0x7065643a}
0464 2063 5c00  | c\ |		.XXX[0x4]
0466 0000 0000  |    |
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 0473       | s  |		.CONST	0x0473								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0003       |    |		.CONST	0x0003								; Number of locals
046b			INIT_0468:
046b e00b       |    |		Load	0x0,0xb
046c 0322       | "  |		Declare_Variable	Record
046d 00d8       |    |		Load_Top	At_Offset_0
046e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
046f e00c       |    |		Load	0x0,0xc
0470 02ff       |    |		Declare_Variable	Variant_Record
0471 00d8       |    |		Load_Top	At_Offset_0
0472 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0473			BODY_0468:
0473 00d8       |    |		Load_Top	At_Offset_0
0474 00da       |    |		Load_Top	At_Offset_2
0475 4800       |H   |		Short_Literal	0x0
0476 480b       |H   |		Short_Literal	0xb
0477 e002       |    |		Load	0x0,0x2
0478 0334       | 4  |		Declare_Variable	Array,With_Constraint
0479 5026       |P&  |		Indirect_Literal	Any,0x4a0,{0x536f6d65, 0x2e436c61}
047a 4800       |H   |		Short_Literal	0x0
047b 4809       |H   |		Short_Literal	0x9
047c e002       |    |		Load	0x0,0x2
047d 0334       | 4  |		Declare_Variable	Array,With_Constraint
047e 5029       |P)  |		Indirect_Literal	Any,0x4a8,{0x736f6d65, 0x2e6e616d}
047f e602       |    |		Load	0x3,0x2
0480 8011       |    |		Call	0x0,0x11
0481 00d2       |    |		Pop_Control	Pop_Count_2
0482 00d8       |    |		Load_Top	At_Offset_0
0483 00da       |    |		Load_Top	At_Offset_2
0484 4802       |H   |		Short_Literal	0x2
0485 4803       |H   |		Short_Literal	0x3
0486 e01c       |    |		Load	0x0,0x1c
0487 0334       | 4  |		Declare_Variable	Array,With_Constraint
0488 e40b       |    |		Load	0x2,0xb
0489 4802       |H   |		Short_Literal	0x2
048a 00da       |    |		Load_Top	At_Offset_2
048b 01d6       |    |		Execute	Vector,Field_Write
048c e025       | %  |		Load	0x0,0x25
048d 4803       |H   |		Short_Literal	0x3
048e 00da       |    |		Load_Top	At_Offset_2
048f 01d6       |    |		Execute	Vector,Field_Write
0490 4800       |H   |		Short_Literal	0x0
0491 4801       |H   |		Short_Literal	0x1
0492 e019       |    |		Load	0x0,0x19
0493 0334       | 4  |		Declare_Variable	Array,With_Constraint
0494 e407       |    |		Load	0x2,0x7
0495 4800       |H   |		Short_Literal	0x0
0496 00da       |    |		Load_Top	At_Offset_2
0497 01d6       |    |		Execute	Vector,Field_Write
0498 e026       | &  |		Load	0x0,0x26
0499 4801       |H   |		Short_Literal	0x1
049a 00da       |    |		Load_Top	At_Offset_2
049b 01d6       |    |		Execute	Vector,Field_Write
049c e602       |    |		Load	0x3,0x2
049d 8027       | '  |		Call	0x0,0x27
049e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
049f 0000       |    |		.XXX[0x1]
04a0 536f 6d65  |Some|		.LITERAL	{0x536f6d65, 0x2e436c61}
04a4 7373 6573  |sses|		.XXX[0x4]
04a6 0000 0000  |    |
04a8 736f 6d65  |some|		.LITERAL	{0x736f6d65, 0x2e6e616d}
04ac 6573 0000  |es  |		.XXX[0x4]
04ae 0000 0000  |    |
04b0 ; --------------------------------------------------------------------------------------
04b0 ; STRING TABLE
04b0 ; --------------------------------------------------------------------------------------
04b0 0016       |    |		.STRTAB	0x0016->0x04bb							; "RM error"
04b1 001c       |    |		.STRTAB	0x001c->0x04bf							; "Resource \x22"
04b2 0024       | $  |		.STRTAB	0x0024->0x04c4							; "Expected: no value"
04b3 0034       | 4  |		.STRTAB	0x0034->0x04cd							; "Expected: \x22"
04b4 003d       | =  |		.STRTAB	0x003d->0x04d2							; "Error reporting inconsistency: expect error = "
04b5 0069       | i  |		.STRTAB	0x0069->0x04e9							; "Creation/Deletion"
04b6 0078       | x  |		.STRTAB	0x0078->0x04f2							; "Free_X_Rm_Database didn't return null."
04b7 009c       |    |		.STRTAB	0x009c->0x0505							; "Put smoke tests."
04b8 00aa       |    |		.STRTAB	0x00aa->0x050d							; "Get smoke tests."
04b9 00b8       |    |		.STRTAB	0x00b8->0x0515							; "Put quoting tests"
04ba 00c7       |    |		.STREND 0x00c7->0x051d
04bb 524d 2065  |RM e|		.STRTAB_STRINGS
051e 0000 0000  |    |		.XXX[0x2]
0520 ; --------------------------------------------------------------------------------------
0520 ; Debug Table
0520 ; --------------------------------------------------------------------------------------
0520 0004 0000  |    |		.DEBUG4	0x0004,0x0000,0x6843,0x0000,0x0001,0x0009
0526 000b 0000  |    |		.DBG4T	0x000b,0x0000,0x8000,0x0000
052a 001b 054a  |   J|		.DBG4T	0x001b,0x054a,0x8001,0x0000
052e 00bb 0560  |   `|		.DBG4T	0x00bb,0x0560,0x0001,0x0000
0532 00cb 0567  |   g|		.DBG4T	0x00cb,0x0567,0x0001,0x0000
0536 00db 056a  |   j|		.DBG4T	0x00db,0x056a,0x0001,0x0000
053a 015b 057b  | [ {|		.DBG4T	0x015b,0x057b,0x0001,0x0000
053e 01f3 0589  |    |		.DBG4T	0x01f3,0x0589,0x0001,0x0000
0542 02bb 0598  |    |		.DBG4T	0x02bb,0x0598,0x0001,0x0000
0546 046b 05ad  | k  |		.DBG4T	0x046b,0x05ad,0x0004,0x0000
054a ; --------------------------------------------------------------------------------------
054a ; Debug chain
054a ; --------------------------------------------------------------------------------------
054a 0011 0003  |    |		.DBGLEN	0x0011,0x0003
054c 001b 0022  |   "|		.DBGLNO	0x001b,0x0022,0x0029,0x0030,0x0037,0x003e,0x0045,0x004c,0x0053,0x005a,0x0061,0x0068,0x006a,0x006c,0x006e,0x0070,0x0072,0x0074,0x0075,0x0076
0560 ; --------------------------------------------------------------------------------------
0560 ; Debug chain
0560 ; --------------------------------------------------------------------------------------
0560 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0562 00bb 00bd  |    |		.DBGLNO	0x00bb,0x00bd,0x00bf,0x00c2,0x00c5
0567 ; --------------------------------------------------------------------------------------
0567 ; Debug chain
0567 ; --------------------------------------------------------------------------------------
0567 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0569 00cb       |    |		.DBGLNO	0x00cb
056a ; --------------------------------------------------------------------------------------
056a ; Debug chain
056a ; --------------------------------------------------------------------------------------
056a 0003 000c  |    |		.DBGLEN	0x0003,0x000c
056c 00db 00dd  |    |		.DBGLNO	0x00db,0x00dd,0x00e1,0x00e5,0x00e7,0x00e9,0x00f1,0x00f7,0x00f9,0x0107,0x010e,0x0111,0x011a,0x0122,0x013c
057b ; --------------------------------------------------------------------------------------
057b ; Debug chain
057b ; --------------------------------------------------------------------------------------
057b 0001 000b  |    |		.DBGLEN	0x0001,0x000b
057d 015b 015d  | [ ]|		.DBGLNO	0x015b,0x015d,0x0160,0x0162,0x0165,0x016c,0x016e,0x0186,0x019e,0x01ab,0x01b8,0x01bb
0589 ; --------------------------------------------------------------------------------------
0589 ; Debug chain
0589 ; --------------------------------------------------------------------------------------
0589 0001 000c  |    |		.DBGLEN	0x0001,0x000c
058b 01f3 01f6  |    |		.DBGLNO	0x01f3,0x01f6,0x01f9,0x01fb,0x0216,0x0238,0x0259,0x0271,0x0285,0x0292,0x0295,0x0296,0x0299
0598 ; --------------------------------------------------------------------------------------
0598 ; Debug chain
0598 ; --------------------------------------------------------------------------------------
0598 0002 0011  |    |		.DBGLEN	0x0002,0x0011
059a 02bb 02bd  |    |		.DBGLNO	0x02bb,0x02bd,0x02bf,0x02c2,0x02c4,0x02c7,0x02da,0x02ed,0x0303,0x031b,0x032e,0x0341,0x0354,0x0367,0x037a,0x0395,0x03a8,0x03aa,0x03ad
05ad ; --------------------------------------------------------------------------------------
05ad ; Debug chain
05ad ; --------------------------------------------------------------------------------------
05ad 0002 0002  |    |		.DBGLEN	0x0002,0x0002
05af 046b 046f  | k o|		.DBGLNO	0x046b,0x046f,0x0473,0x0482
05b3 0000 0000  |    |		.BLANK	0000[0x4d]