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

⟦3b923af3e⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 580b_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

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 580b       |X   |		.CONST	0x580b								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0318       |    |		.CONST	0x0318								; 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 005e       | ^  |		.CONST	0x005e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002a       | *  |		.CONST	0x002a								; Number of locals
000b			INIT_0008:
000b 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x03ba,0xc000,0x0000,0x0038,0xc736,0x0000,0x0003
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 00bf       |    |		Action	Accept_Activation
0022 0092 02a2  |    |		Action	Push_String_Extended,0x2a2					; "0.3.1"
													; Debug Table 0x1 = .DEBUG	0x0022,0x03d2,0xc000,0x0000,0x0038,0xc7d6,0x0000,0x0003
													; Debug Table 0x1.0x0 = 0x22,0xffff
0024 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1.0x1 = 0x24,0xfffe
0025 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0026 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1.0x2 = 0x26,0xfffd
0027 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0028 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x1.0x3 = 0x28,0xfffc
0029 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
002a 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x1.0x4 = 0x2a,0xfffb
002b 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
002c 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x5 = 0x2c,0xfffa
002d 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x6 = 0x2d,0xfff9
002e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x7 = 0x2e,0xfff8
002f 4801       |H   |		Short_Literal	0x1
0030 029f 017b  |   {|		Declare_Subprogram	INIT_0178,For_Call
0032 03fd       |    |		Declare_Type	Discrete,Defined
0033 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x8 = 0x33,0xfff7
0034 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0035 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x9 = 0x35,0xfff6
0036 4814       |H   |		Short_Literal	0x14
0037 00e9       |    |		Load_Encached	String_Cache
0038 0334       | 4  |		Declare_Variable	Array,With_Constraint
0039 525a       |RZ  |		Indirect_Literal	Any,0x294,{0x4e4f5f4e, 0x414d4520}
003a 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1.0xa = 0x3a,0xfff5
003b 0607       |    |		Execute_Immediate	Set_Value_Unchecked,0x7
003c 029d 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call			; Debug Table 0x1.0xb = 0x3c,0xfff4
003e 029d 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call			; Debug Table 0x1.0xc = 0x3e,0xfff3
0040 029d 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call			; Debug Table 0x1.0xd = 0x40,0xfff2
0042 029b 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Unelaborated		; Debug Table 0x1.0xe = 0x42,0xfff1
0044 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call			; Debug Table 0x1.0xf = 0x44,0xfff0
0046 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x10 = 0x46,0xffef
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x11 = 0x48,0xffee
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x12 = 0x4a,0xffed
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x13 = 0x4c,0xffec
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x14 = 0x4e,0xffeb
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x15 = 0x50,0xffea
0051 00c7       |    |		Action	Elaborate_Subprogram
0052 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x16 = 0x52,0xffe9
0053 00c7       |    |		Action	Elaborate_Subprogram
0054 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x17 = 0x54,0xffe8
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x18 = 0x56,0xffe7
0057 00c7       |    |		Action	Elaborate_Subprogram
0058 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29				; Debug Table 0x1.0x19 = 0x58,0xffe6
0059 00c7       |    |		Action	Elaborate_Subprogram
005a 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x1a = 0x5a,0xffe5
005b 00c7       |    |		Action	Elaborate_Subprogram
005c 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x1b = 0x5c,0xffe4
005d 00c7       |    |		Action	Elaborate_Subprogram
005e			BODY_0008:
005e 00bc       |    |		Action	Signal_Activated
005f 00bb       |    |		Action	Signal_Completion
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 006b       | k  |		.CONST	0x006b								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0003       |    |		.CONST	0x0003								; Number of locals
0063			INIT_0060:
0063 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2 = .DEBUG	0x0063,0x040c,0x1001,0x0000,0x0038,0xc736,0x0000,0x001d
													; Debug Table 0x2.0x0 = 0x63,0xffff
0064 4802       |H   |		Short_Literal	0x2
0065 00e9       |    |		Load_Encached	String_Cache
0066 0334       | 4  |		Declare_Variable	Array,With_Constraint
0067 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x1 = 0x67,0xfffe
0068 00d9       |    |		Load_Top	At_Offset_1
0069 01d5       |    |		Execute	Vector,Field_Reference
006a 0007       |    |		Action	Break_Optional
006b			BODY_0060:
006b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x2 = 0x6b,0x1
006c a223       | #  |		Store_Unchecked	0x1,0x23
006d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x3 = 0x6d,0x2
006e 01dc       |    |		Execute	Vector,Last
006f 0a01       |    |		Execute_Immediate	Plus,0x1
0070 0248       | H  |		Execute	Discrete,Check_In_Integer
0071 e5ff       |    |		Load	0x2,-0x1
0072 01dd       |    |		Execute	Vector,First
0073 0272       | r  |		Execute	Discrete,Minus
0074 c225       | %  |		Store	0x1,0x25
0075 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x4 = 0x75,0x3
0076 4801       |H   |		Short_Literal	0x1
0077 e225       | %  |		Load	0x1,0x25
0078 e224       | $  |		Load	0x1,0x24
0079 01ce       |    |		Execute	Vector,Slice_Write
007a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x5 = 0x7a,0x4
007b 8228       | (  |		Call	0x1,0x28
007c 0092 02a3  |    |		Action	Push_String_Extended,0x2a3					; "---- "
													; Debug Table 0x2.0x6 = 0x7c,0x5
007e e5ff       |    |		Load	0x2,-0x1
007f 01cc       |    |		Execute	Vector,Catenate
0080 0092 02a4  |    |		Action	Push_String_Extended,0x2a4					; " "
0082 01cc       |    |		Execute	Vector,Catenate
0083 e5fe       |    |		Load	0x2,-0x2
0084 01cc       |    |		Execute	Vector,Catenate
0085 0092 02a5  |    |		Action	Push_String_Extended,0x2a5					; "."
0087 01cc       |    |		Execute	Vector,Catenate
0088 822a       | *  |		Call	0x1,0x2a
0089 e21f       |    |		Load	0x1,0x1f							; Debug Table 0x2.0x7 = 0x89,0x6
008a 6809       |h   |		Jump_Zero	0x94
008b 0092 02a6  |    |		Action	Push_String_Extended,0x2a6					; "Do you want to run this test? (default answer is no) "
008d 8229       | )  |		Call	0x1,0x29
008e 6805       |h   |		Jump_Zero	0x94
008f 0092 02a7  |    |		Action	Push_String_Extended,0x2a7					; "Skipped"
													; Debug Table 0x2.0x8 = 0x8f,0x7
0091 8214       |    |		Call	0x1,0x14
0092 61fd       |a   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x38c7d601}		; Debug Table 0x2.0x9 = 0x92,0x8
0093 0257       | W  |		Execute	Discrete,Raise
0094 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0095 0000 0000  |    |		.XXX[0x3]
0097 0000       |    |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a5       |    |		.CONST	0x00a5								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0002       |    |		.CONST	0x0002								; Number of locals
009b			INIT_0098:
009b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3 = .DEBUG	0x009b,0x0422,0x1001,0x0000,0x0038,0xc736,0x0000,0x0029
													; Debug Table 0x3.0x0 = 0x9b,0xffff
009c e225       | %  |		Load	0x1,0x25
009d 00e9       |    |		Load_Encached	String_Cache
009e 0334       | 4  |		Declare_Variable	Array,With_Constraint
009f 4801       |H   |		Short_Literal	0x1
00a0 e225       | %  |		Load	0x1,0x25
00a1 e224       | $  |		Load	0x1,0x24
00a2 01cf       |    |		Execute	Vector,Slice_Read
00a3 00d9       |    |		Load_Top	At_Offset_1
00a4 01d4       |    |		Execute	Vector,Structure_Write
00a5			BODY_0098:
00a5 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x3.0x1 = 0xa5,0x1
00a6 7002       |p   |		Jump_Nonzero	0xa9
00a7 61e4       |a   |		Indirect_Literal	Discrete,0x28c,{0x00000000, 0x38c7d602}		; Debug Table 0x3.0x2 = 0xa7,0x2
00a8 0257       | W  |		Execute	Discrete,Raise
00a9 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x3 = 0xa9,0x3
00aa a223       | #  |		Store_Unchecked	0x1,0x23
00ab 0092 02a8  |    |		Action	Push_String_Extended,0x2a8					; "   * "
													; Debug Table 0x3.0x4 = 0xab,0x4
00ad 00d9       |    |		Load_Top	At_Offset_1
00ae 01cc       |    |		Execute	Vector,Catenate
00af 0092 02a4  |    |		Action	Push_String_Extended,0x2a4					; " "
00b1 01cc       |    |		Execute	Vector,Catenate
00b2 e5ff       |    |		Load	0x2,-0x1
00b3 01cc       |    |		Execute	Vector,Catenate
00b4 0092 02a5  |    |		Action	Push_String_Extended,0x2a5					; "."
00b6 01cc       |    |		Execute	Vector,Catenate
00b7 822a       | *  |		Call	0x1,0x2a
00b8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00b9 0000 0000  |    |		.BLANK	0000[0x7]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00cd       |    |		.CONST	0x00cd								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0002       |    |		.CONST	0x0002								; Number of locals
00c3			INIT_00c0:
00c3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4 = .DEBUG	0x00c3,0x042e,0x1001,0x0000,0x0038,0xc736,0x0000,0x0031
													; Debug Table 0x4.0x0 = 0xc3,0xffff
00c4 e225       | %  |		Load	0x1,0x25
00c5 00e9       |    |		Load_Encached	String_Cache
00c6 0334       | 4  |		Declare_Variable	Array,With_Constraint
00c7 4801       |H   |		Short_Literal	0x1
00c8 e225       | %  |		Load	0x1,0x25
00c9 e224       | $  |		Load	0x1,0x24
00ca 01cf       |    |		Execute	Vector,Slice_Read
00cb 00d9       |    |		Load_Top	At_Offset_1
00cc 01d4       |    |		Execute	Vector,Structure_Write
00cd			BODY_00c0:
00cd 0092 02a9  |    |		Action	Push_String_Extended,0x2a9					; "   - "
													; Debug Table 0x4.0x1 = 0xcd,0x1
00cf 00d9       |    |		Load_Top	At_Offset_1
00d0 01cc       |    |		Execute	Vector,Catenate
00d1 0092 02a4  |    |		Action	Push_String_Extended,0x2a4					; " "
00d3 01cc       |    |		Execute	Vector,Catenate
00d4 e5ff       |    |		Load	0x2,-0x1
00d5 01cc       |    |		Execute	Vector,Catenate
00d6 0092 02a5  |    |		Action	Push_String_Extended,0x2a5					; "."
00d8 01cc       |    |		Execute	Vector,Catenate
00d9 822a       | *  |		Call	0x1,0x2a
00da 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00db 0000 0000  |    |		.BLANK	0000[0x5]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00ed       |    |		.CONST	0x00ed								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0002       |    |		.CONST	0x0002								; Number of locals
00e3			INIT_00e0:
00e3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5 = .DEBUG	0x00e3,0x0434,0x1001,0x0000,0x0038,0xc736,0x0000,0x0039
													; Debug Table 0x5.0x0 = 0xe3,0xffff
00e4 e225       | %  |		Load	0x1,0x25
00e5 00e9       |    |		Load_Encached	String_Cache
00e6 0334       | 4  |		Declare_Variable	Array,With_Constraint
00e7 4801       |H   |		Short_Literal	0x1
00e8 e225       | %  |		Load	0x1,0x25
00e9 e224       | $  |		Load	0x1,0x24
00ea 01cf       |    |		Execute	Vector,Slice_Read
00eb 00d9       |    |		Load_Top	At_Offset_1
00ec 01d4       |    |		Execute	Vector,Structure_Write
00ed			BODY_00e0:
00ed e223       | #  |		Load	0x1,0x23							; Debug Table 0x5.0x1 = 0xed,0x1
00ee 7027       |p'  |		Jump_Nonzero	0x116
00ef e220       |    |		Load	0x1,0x20							; Debug Table 0x5.0x2 = 0xef,0x2
00f0 0a01       |    |		Execute_Immediate	Plus,0x1
00f1 0248       | H  |		Execute	Discrete,Check_In_Integer
00f2 a220       |    |		Store_Unchecked	0x1,0x20
00f3 0092 02aa  |    |		Action	Push_String_Extended,0x2aa					; "==== "
													; Debug Table 0x5.0x3 = 0xf3,0x3
00f5 00d9       |    |		Load_Top	At_Offset_1
00f6 01cc       |    |		Execute	Vector,Catenate
00f7 0092 02ab  |    |		Action	Push_String_Extended,0x2ab					; " PASSED ===================="
00f9 01cc       |    |		Execute	Vector,Catenate
00fa 822a       | *  |		Call	0x1,0x2a
00fb e220       |    |		Load	0x1,0x20							; Debug Table 0x5.0x4 = 0xfb,0x4
00fc 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
00fd 6807       |h   |		Jump_Zero	0x105
00fe 0092 02ac  |    |		Action	Push_String_Extended,0x2ac					; "     Total passed = "
													; Debug Table 0x5.0x5 = 0xfe,0x5
0100 e220       |    |		Load	0x1,0x20
0101 00e0       |    |		Load_Encached	Standard_Cache
0102 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0103 01cc       |    |		Execute	Vector,Catenate
0104 822a       | *  |		Call	0x1,0x2a
0105 e221       | !  |		Load	0x1,0x21							; Debug Table 0x5.0x6 = 0x105,0x6
0106 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0107 6807       |h   |		Jump_Zero	0x10f
0108 0092 02ad  |    |		Action	Push_String_Extended,0x2ad					; "     Total failures: "
													; Debug Table 0x5.0x7 = 0x108,0x7
010a e221       | !  |		Load	0x1,0x21
010b 00e0       |    |		Load_Encached	Standard_Cache
010c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
010d 01cc       |    |		Execute	Vector,Catenate
010e 822a       | *  |		Call	0x1,0x2a
010f e21e       |    |		Load	0x1,0x1e							; Debug Table 0x5.0x8 = 0x10f,0x8
0110 701f       |p   |		Jump_Nonzero	0x130
0111 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x9 = 0x111,0x9
0112 e224       | $  |		Load	0x1,0x24
0113 01d7       |    |		Execute	Vector,Field_Read
0114 8210       |    |		Call	0x1,0x10
0115 781a       |x   |		Jump	0x130
0116 e221       | !  |		Load	0x1,0x21							; Debug Table 0x5.0xa = 0x116,0xa
0117 0a01       |    |		Execute_Immediate	Plus,0x1
0118 0248       | H  |		Execute	Discrete,Check_In_Integer
0119 a221       | !  |		Store_Unchecked	0x1,0x21
011a 0092 02ae  |    |		Action	Push_String_Extended,0x2ae					; "**** "
													; Debug Table 0x5.0xb = 0x11a,0xb
011c 00d9       |    |		Load_Top	At_Offset_1
011d 01cc       |    |		Execute	Vector,Catenate
011e 0092 02af  |    |		Action	Push_String_Extended,0x2af					; " FAILED ********************"
0120 01cc       |    |		Execute	Vector,Catenate
0121 822a       | *  |		Call	0x1,0x2a
0122 0092 02ac  |    |		Action	Push_String_Extended,0x2ac					; "     Total passed = "
													; Debug Table 0x5.0xc = 0x122,0xc
0124 e220       |    |		Load	0x1,0x20
0125 00e0       |    |		Load_Encached	Standard_Cache
0126 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0127 01cc       |    |		Execute	Vector,Catenate
0128 822a       | *  |		Call	0x1,0x2a
0129 0092 02ad  |    |		Action	Push_String_Extended,0x2ad					; "     Total failures: "
													; Debug Table 0x5.0xd = 0x129,0xd
012b e221       | !  |		Load	0x1,0x21
012c 00e0       |    |		Load_Encached	Standard_Cache
012d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
012e 01cc       |    |		Execute	Vector,Catenate
012f 822a       | *  |		Call	0x1,0x2a
0130 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0xe = 0x130,0xe
0131 a223       | #  |		Store_Unchecked	0x1,0x23
0132 4807       |H   |		Short_Literal	0x7							; Debug Table 0x5.0xf = 0x132,0xf
0133 a225       | %  |		Store_Unchecked	0x1,0x25
0134 0092 02b0  |    |		Action	Push_String_Extended,0x2b0					; "NO_NAME"
													; Debug Table 0x5.0x10 = 0x134,0x10
0136 4801       |H   |		Short_Literal	0x1
0137 4807       |H   |		Short_Literal	0x7
0138 e224       | $  |		Load	0x1,0x24
0139 01ce       |    |		Execute	Vector,Slice_Write
013a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
013b 0000 0000  |    |		.BLANK	0000[0x5]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x0143,0x0458,0x1002,0x0000,0x0038,0xc736,0x0000,0x003d
													; Debug Table 0x6.0x0 = 0x143,0x1
0144 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0145 0000 0000  |    |		.XXX[0x3]
0147 0000       |    |
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x014b,0x045c,0x1002,0x0000,0x0038,0xc736,0x0000,0x0046
													; Debug Table 0x7.0x0 = 0x14b,0x1
014c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
014d 0000 0000  |    |		.XXX[0x3]
014f 0000       |    |
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153       | S  |		.CONST	0x0153								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0001       |    |		.CONST	0x0001								; Number of locals
0153			BODY_0150:
0153			INIT_0150:
0153 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x0153,0x0460,0x1002,0x0000,0x0038,0xc736,0x0000,0x004f
													; Debug Table 0x8.0x0 = 0x153,0x1
0154 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0155 0000 0000  |    |		.XXX[0x3]
0157 0000       |    |
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b       | [  |		.CONST	0x015b								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0001       |    |		.CONST	0x0001								; Number of locals
015b			BODY_0158:
015b			INIT_0158:
015b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x015b,0x0464,0x1002,0x0000,0x0038,0xc736,0x0000,0x0058
													; Debug Table 0x9.0x0 = 0x15b,0x1
015c 0335       | 5  |		Declare_Variable	Array,Duplicate
015d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
015e 0000 0000  |    |		.XXX[0x2]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x0163,0x0468,0x1002,0x0000,0x0038,0xc736,0x0000,0x0061
													; Debug Table 0xa.0x0 = 0x163,0x1
0164 e5fe       |    |		Load	0x2,-0x2
0165 027f       |    |		Execute	Discrete,Equal
0166 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0167 0000       |    |		.XXX[0x1]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x016b,0x046c,0x1001,0x0000,0x0038,0xc736,0x0000,0x006b
													; Debug Table 0xb.0x0 = 0x16b,0x1
016c a21f       |    |		Store_Unchecked	0x1,0x1f
016d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
016e 0000 0000  |    |		.XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x0173,0x0470,0x1001,0x0000,0x0038,0xc736,0x0000,0x0073
													; Debug Table 0xc.0x0 = 0x173,0x1
0174 a21e       |    |		Store_Unchecked	0x1,0x1e
0175 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0176 0000 0000  |    |		.XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b       | {  |		.CONST	0x017b								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0001       |    |		.CONST	0x0001								; Number of locals
017b			BODY_0178:
017b			INIT_0178:
017b 4603       |F   |		Jump_Case	0x4							; Debug Table 0xd = .DEBUG	0x017b,0x0474,0x1005,0x0000,0x0038,0xc7d6,0x0000,0x0028
017c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
017d 7802       |x   |		Jump	0x180								; case 0x1
017e 7805       |x   |		Jump	0x184								; case 0x2
017f 7809       |x   |		Jump	0x189								; case 0x3
0180 00da       |    |		Load_Top	At_Offset_2
0181 0091 02a0  |    |		Action	Push_String_Extended_Indexed,0x2a0				; "PASS"
0183 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0184 00db       |    |		Load_Top	At_Offset_3
0185 00db       |    |		Load_Top	At_Offset_3
0186 00e0       |    |		Load_Encached	Standard_Cache
0187 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0188 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0189 00da       |    |		Load_Top	At_Offset_2
018a 00e0       |    |		Load_Encached	Standard_Cache
018b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
018c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
018d 0000 0000  |    |		.XXX[0x3]
018f 0000       |    |
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 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xe = .DEBUG	0x0193,0x0476,0x1001,0x0000,0x0038,0xc7d6,0x0000,0x0044
													; Debug Table 0xe.0x0 = 0x193,0x1
0194 6802       |h   |		Jump_Zero	0x197
0195 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x1 = 0x195,0x2
0196 820f       |    |		Call	0x1,0xf
0197 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b e21e       |    |		Load	0x1,0x1e							; Debug Table 0xf = .DEBUG	0x019b,0x047c,0x1001,0x0000,0x0038,0xc7d6,0x0000,0x0058
													; Debug Table 0xf.0x0 = 0x19b,0x1
019c 6802       |h   |		Jump_Zero	0x19f
019d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xf.0x1 = 0x19d,0x2
019e 8210       |    |		Call	0x1,0x10
019f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x10 = .DEBUG	0x01a3,0x0482,0x1001,0x0000,0x0038,0xc7d6,0x0000,0x006c
													; Debug Table 0x10.0x0 = 0x1a3,0x1
01a4 6815       |h   |		Jump_Zero	0x1ba
01a5 00cf       |    |		Action	Mark_Auxiliary
01a6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x1 = 0x1a6,0x2
01a7 4801       |H   |		Short_Literal	0x1
01a8 0263       | c  |		Execute	Discrete,Above_Bound
01a9 700f       |p   |		Jump_Nonzero	0x1b9
01aa 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x2 = 0x1aa,0x3
01ab 4802       |H   |		Short_Literal	0x2
01ac 00e9       |    |		Load_Encached	String_Cache
01ad 0334       | 4  |		Declare_Variable	Array,With_Constraint
01ae 480d       |H   |		Short_Literal	0xd
01af 4801       |H   |		Short_Literal	0x1
01b0 00da       |    |		Load_Top	At_Offset_2
01b1 01d6       |    |		Execute	Vector,Field_Write
01b2 480a       |H   |		Short_Literal	0xa
01b3 4802       |H   |		Short_Literal	0x2
01b4 00da       |    |		Load_Top	At_Offset_2
01b5 01d6       |    |		Execute	Vector,Field_Write
01b6 820f       |    |		Call	0x1,0xf
01b7 00c8       |    |		Action	Pop_Auxiliary_Range
01b8 3ff1       |?   |		Loop_Increasing	0x1aa
01b9 00ce       |    |		Action	Pop_Auxiliary
01ba 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01bb 0000 0000  |    |		.BLANK	0000[0x5]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c5       |    |		.CONST	0x01c5								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0002       |    |		.CONST	0x0002								; Number of locals
01c3			INIT_01c0:
01c3 029f 0273  |   s|		Declare_Subprogram	INIT_0270,For_Call				; Debug Table 0x11 = .DEBUG	0x01c3,0x048a,0x1002,0x0000,0x0038,0xc7d6,0x0000,0x0096
01c5			BODY_01c0:
01c5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x0 = 0x1c5,0x1
01c6 820f       |    |		Call	0x1,0xf
01c7 8402       |    |		Call	0x2,0x2								; Debug Table 0x11.0x1 = 0x1c7,0x2
01c8 4831       |H1  |		Short_Literal	0x31
01c9 0257       | W  |		Execute	Discrete,Raise
01ca 0000 0000  |    |		.BLANK	0000[0x6]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 0203       |    |		.CONST	0x0203								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0007       |    |		.CONST	0x0007								; Number of locals
01d3			INIT_01d0:
01d3 0007       |    |		Action	Break_Optional							; Debug Table 0x12 = .DEBUG	0x01d3,0x0490,0x1001,0x0000,0x0038,0xc7d6,0x0000,0x009f
													; Debug Table 0x12.0x0 = 0x1d3,0xffff
01d4 0007       |    |		Action	Break_Optional							; Debug Table 0x12.0x1 = 0x1d4,0xfffe
01d5 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x12.0x2 = 0x1d5,0xfffd
01d6 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01d7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x3 = 0x1d7,0xfffc
01d8 01dd       |    |		Execute	Vector,First
01d9 00e2       |    |		Load_Encached	Integer_Cache
01da 03f1       |    |		Declare_Variable	Discrete,With_Value
01db e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x12.0x4 = 0x1db,0xfffb
01dc 01dc       |    |		Execute	Vector,Last
01dd 00e2       |    |		Load_Encached	Integer_Cache
01de 03f1       |    |		Declare_Variable	Discrete,With_Value
01df 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x12.0x5 = 0x1df,0xfffa
01e0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x6 = 0x1e0,0xfff9
01e1 4808       |H   |		Short_Literal	0x8
01e2 00e9       |    |		Load_Encached	String_Cache
01e3 0334       | 4  |		Declare_Variable	Array,With_Constraint
01e4 4801       |H   |		Short_Literal	0x1
01e5 4808       |H   |		Short_Literal	0x8
01e6 00e9       |    |		Load_Encached	String_Cache
01e7 0334       | 4  |		Declare_Variable	Array,With_Constraint
01e8 4808       |H   |		Short_Literal	0x8
01e9 4801       |H   |		Short_Literal	0x1
01ea 4820       |H   |		Short_Literal	0x20
01eb 00d9       |    |		Load_Top	At_Offset_1
01ec e407       |    |		Load	0x2,0x7
01ed 01d6       |    |		Execute	Vector,Field_Write
01ee 3ffb       |?   |		Loop_Increasing	0x1ea
01ef 00d9       |    |		Load_Top	At_Offset_1
01f0 01d4       |    |		Execute	Vector,Structure_Write
01f1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x7 = 0x1f1,0xfff8
01f2 4802       |H   |		Short_Literal	0x2
01f3 00e9       |    |		Load_Encached	String_Cache
01f4 0334       | 4  |		Declare_Variable	Array,With_Constraint
01f5 4801       |H   |		Short_Literal	0x1
01f6 4802       |H   |		Short_Literal	0x2
01f7 00e9       |    |		Load_Encached	String_Cache
01f8 0334       | 4  |		Declare_Variable	Array,With_Constraint
01f9 480a       |H   |		Short_Literal	0xa
01fa 4801       |H   |		Short_Literal	0x1
01fb 00da       |    |		Load_Top	At_Offset_2
01fc 01d6       |    |		Execute	Vector,Field_Write
01fd 480d       |H   |		Short_Literal	0xd
01fe 4802       |H   |		Short_Literal	0x2
01ff 00da       |    |		Load_Top	At_Offset_2
0200 01d6       |    |		Execute	Vector,Field_Write
0201 00d9       |    |		Load_Top	At_Offset_1
0202 01d4       |    |		Execute	Vector,Structure_Write
0203			BODY_01d0:
0203 00cf       |    |		Action	Mark_Auxiliary
0204 0007       |    |		Action	Break_Optional							; Debug Table 0x12.0x8 = 0x204,0x1
0205 e402       |    |		Load	0x2,0x2								; Debug Table 0x12.0x9 = 0x205,0x2
0206 e404       |    |		Load	0x2,0x4
0207 e403       |    |		Load	0x2,0x3
0208 0272       | r  |		Execute	Discrete,Minus
0209 0a01       |    |		Execute_Immediate	Plus,0x1
020a 0248       | H  |		Execute	Discrete,Check_In_Integer
020b 0273       | s  |		Execute	Discrete,Plus
020c 0c49       | I  |		Execute_Immediate	Greater_Equal,0x49
020d 682f       |h/  |		Jump_Zero	0x23d
020e e403       |    |		Load	0x2,0x3								; Debug Table 0x12.0xa = 0x20e,0x3
020f 4848       |HH  |		Short_Literal	0x48
0210 e402       |    |		Load	0x2,0x2
0211 0272       | r  |		Execute	Discrete,Minus
0212 0248       | H  |		Execute	Discrete,Check_In_Integer
0213 0273       | s  |		Execute	Discrete,Plus
0214 0aff       |    |		Execute_Immediate	Plus,-0x1
0215 0248       | H  |		Execute	Discrete,Check_In_Integer
0216 a405       |    |		Store_Unchecked	0x2,0x5
0217 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0xb = 0x217,0x4
0218 e5ff       |    |		Load	0x2,-0x1
0219 01d7       |    |		Execute	Vector,Field_Read
021a 0e20       |    |		Execute_Immediate	Not_Equal,0x20
021b 6823       |h#  |		Jump_Zero	0x23f
021c 00cf       |    |		Action	Mark_Auxiliary
021d 7805       |x   |		Jump	0x223
021e e405       |    |		Load	0x2,0x5								; Debug Table 0x12.0xc = 0x21e,0x6
021f 0aff       |    |		Execute_Immediate	Plus,-0x1
0220 0248       | H  |		Execute	Discrete,Check_In_Integer
0221 a405       |    |		Store_Unchecked	0x2,0x5
0222 00c9       |    |		Action	Pop_Auxiliary_Loop
0223 e405       |    |		Load	0x2,0x5								; Debug Table 0x12.0xd = 0x223,0x5
0224 e403       |    |		Load	0x2,0x3
0225 027b       | {  |		Execute	Discrete,Greater_Equal
0226 6807       |h   |		Jump_Zero	0x22e
0227 e405       |    |		Load	0x2,0x5
0228 0a01       |    |		Execute_Immediate	Plus,0x1
0229 0248       | H  |		Execute	Discrete,Check_In_Integer
022a e5ff       |    |		Load	0x2,-0x1
022b 01d7       |    |		Execute	Vector,Field_Read
022c 0e20       |    |		Execute_Immediate	Not_Equal,0x20
022d 77f0       |w   |		Jump_Nonzero	0x21e
022e 00ce       |    |		Action	Pop_Auxiliary
022f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0xe = 0x22f,0x7
0230 e403       |    |		Load	0x2,0x3
0231 027c       | |  |		Execute	Discrete,Less
0232 680c       |h   |		Jump_Zero	0x23f
0233 e403       |    |		Load	0x2,0x3								; Debug Table 0x12.0xf = 0x233,0x8
0234 4848       |HH  |		Short_Literal	0x48
0235 e402       |    |		Load	0x2,0x2
0236 0272       | r  |		Execute	Discrete,Minus
0237 0248       | H  |		Execute	Discrete,Check_In_Integer
0238 0273       | s  |		Execute	Discrete,Plus
0239 0aff       |    |		Execute_Immediate	Plus,-0x1
023a 0248       | H  |		Execute	Discrete,Check_In_Integer
023b a405       |    |		Store_Unchecked	0x2,0x5
023c 7802       |x   |		Jump	0x23f
023d e404       |    |		Load	0x2,0x4								; Debug Table 0x12.0x10 = 0x23d,0x9
023e a405       |    |		Store_Unchecked	0x2,0x5
023f e402       |    |		Load	0x2,0x2								; Debug Table 0x12.0x11 = 0x23f,0xa
0240 0f08       |    |		Execute_Immediate	Equal,0x8
0241 6802       |h   |		Jump_Zero	0x244
0242 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x12 = 0x242,0xb
0243 8226       | &  |		Call	0x1,0x26
0244 e403       |    |		Load	0x2,0x3								; Debug Table 0x12.0x13 = 0x244,0xc
0245 e405       |    |		Load	0x2,0x5
0246 e5ff       |    |		Load	0x2,-0x1
0247 01cf       |    |		Execute	Vector,Slice_Read
0248 00da       |    |		Load_Top	At_Offset_2
0249 01cc       |    |		Execute	Vector,Catenate
024a 8226       | &  |		Call	0x1,0x26
024b 4808       |H   |		Short_Literal	0x8							; Debug Table 0x12.0x14 = 0x24b,0xd
024c a402       |    |		Store_Unchecked	0x2,0x2
024d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x15 = 0x24d,0xe
024e 0a01       |    |		Execute_Immediate	Plus,0x1
024f 0248       | H  |		Execute	Discrete,Check_In_Integer
0250 a403       |    |		Store_Unchecked	0x2,0x3
0251 00cf       |    |		Action	Mark_Auxiliary
0252 7805       |x   |		Jump	0x258
0253 e403       |    |		Load	0x2,0x3								; Debug Table 0x12.0x16 = 0x253,0x10
0254 0a01       |    |		Execute_Immediate	Plus,0x1
0255 0248       | H  |		Execute	Discrete,Check_In_Integer
0256 a403       |    |		Store_Unchecked	0x2,0x3
0257 00c9       |    |		Action	Pop_Auxiliary_Loop
0258 e403       |    |		Load	0x2,0x3								; Debug Table 0x12.0x17 = 0x258,0xf
0259 e404       |    |		Load	0x2,0x4
025a 027a       | z  |		Execute	Discrete,Less_Equal
025b 6805       |h   |		Jump_Zero	0x261
025c e403       |    |		Load	0x2,0x3
025d e5ff       |    |		Load	0x2,-0x1
025e 01d7       |    |		Execute	Vector,Field_Read
025f 0f20       |    |		Execute_Immediate	Equal,0x20
0260 77f2       |w   |		Jump_Nonzero	0x253
0261 00ce       |    |		Action	Pop_Auxiliary
0262 e403       |    |		Load	0x2,0x3								; Debug Table 0x12.0x18 = 0x262,0x11
0263 e404       |    |		Load	0x2,0x4
0264 027d       | }  |		Execute	Discrete,Greater
0265 7002       |p   |		Jump_Nonzero	0x268
0266 00c9       |    |		Action	Pop_Auxiliary_Loop
0267 7f9d       |    |		Jump	0x205
0268 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0269 0000 0000  |    |		.BLANK	0000[0x7]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0275       | u  |		.CONST	0x0275								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0003       |    |		.CONST	0x0003								; Number of locals
0273			INIT_0270:
0273 8211       |    |		Call	0x1,0x11							; Debug Table 0x13 = .DEBUG	0x0273,0x04c4,0x1004,0x0000,0x0038,0xc7d6,0x0000,0x039e
													; Debug Table 0x13.0x0 = 0x273,0xffff
0274 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x13.0x1 = 0x274,0xfffe
0275			BODY_0270:
0275 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x13.0x2 = 0x275,0x1
0276 01db       |    |		Execute	Vector,Length
0277 0d01       |    |		Execute_Immediate	Less,0x1
0278 6803       |h   |		Jump_Zero	0x27c
0279 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x3 = 0x279,0x2
027a 00cb       |    |		Action	Pop_Block_With_Result
027b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
027c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x13.0x4 = 0x27c,0x3
027d 01dd       |    |		Execute	Vector,First
027e 00da       |    |		Load_Top	At_Offset_2
027f 01d7       |    |		Execute	Vector,Field_Read
0280 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0281 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x5 = 0x281,0x4
0282 0f79       | y  |		Execute_Immediate	Equal,0x79
0283 7003       |p   |		Jump_Nonzero	0x287
0284 00d8       |    |		Load_Top	At_Offset_0
0285 0f59       | Y  |		Execute_Immediate	Equal,0x59
0286 7801       |x   |		Jump	0x288
0287 4801       |H   |		Short_Literal	0x1
0288 00cb       |    |		Action	Pop_Block_With_Result
0289 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028a 0000 0000  |    |		.XXX[0x2]
028c 0000 0000  |    |		.LITERAL	{0x00000000, 0x38c7d602}
0290 0000 0000  |    |		.LITERAL	{0x00000000, 0x38c7d601}
0294 4e4f 5f4e  |NO_N|		.LITERAL	{0x4e4f5f4e, 0x414d4520}
0298 2020 2020  |    |		.BLANK	2020[0x8]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; STRING TABLE
02a0 ; --------------------------------------------------------------------------------------
02a0 0024       | $  |		.STRTAB	0x0024->0x02b2							; "PASS"
02a1 0026       | &  |		.STRTAB	0x0026->0x02b4							; "FAIL"
02a2 0028       | (  |		.STRTAB	0x0028->0x02b6							; "0.3.1"
02a3 002b       | +  |		.STRTAB	0x002b->0x02b8							; "---- "
02a4 002e       | .  |		.STRTAB	0x002e->0x02bb							; " "
02a5 002d       | -  |		.STRTAB	0x002d->0x02bb							; "."
02a6 002c       | ,  |		.STRTAB	0x002c->0x02bc							; "Do you want to run this test? (default answer is no) "
02a7 005f       | _  |		.STRTAB	0x005f->0x02d6							; "Skipped"
02a8 0064       | d  |		.STRTAB	0x0064->0x02da							; "   * "
02a9 0067       | g  |		.STRTAB	0x0067->0x02dc							; "   - "
02aa 006a       | j  |		.STRTAB	0x006a->0x02df							; "==== "
02ab 006d       | m  |		.STRTAB	0x006d->0x02e1							; " PASSED ===================="
02ac 0087       |    |		.STRTAB	0x0087->0x02ef							; "     Total passed = "
02ad 0099       |    |		.STRTAB	0x0099->0x02f9							; "     Total failures: "
02ae 00ac       |    |		.STRTAB	0x00ac->0x0304							; "**** "
02af 00af       |    |		.STRTAB	0x00af->0x0306							; " FAILED ********************"
02b0 00c9       |    |		.STRTAB	0x00c9->0x0314							; "NO_NAME"
02b1 00ce       |    |		.STREND 0x00ce->0x0318
02b2 5041 5353  |PASS|		.STRTAB_STRINGS
0318 ; --------------------------------------------------------------------------------------
0318 ; Debug Table
0318 ; --------------------------------------------------------------------------------------
0318 0003 0014  |    |		.CONST	0x0003,0x0014
031a 000b 03ba  |    |		.DEBUG	0x000b,0x03ba,0xc000,0x0000,0x0038,0xc736,0x0000,0x0003
0322 0022 03d2  | "  |		.DEBUG	0x0022,0x03d2,0xc000,0x0000,0x0038,0xc7d6,0x0000,0x0003
032a 0063 040c  | c  |		.DEBUG	0x0063,0x040c,0x1001,0x0000,0x0038,0xc736,0x0000,0x001d
0332 009b 0422  |   "|		.DEBUG	0x009b,0x0422,0x1001,0x0000,0x0038,0xc736,0x0000,0x0029
033a 00c3 042e  |   .|		.DEBUG	0x00c3,0x042e,0x1001,0x0000,0x0038,0xc736,0x0000,0x0031
0342 00e3 0434  |   4|		.DEBUG	0x00e3,0x0434,0x1001,0x0000,0x0038,0xc736,0x0000,0x0039
034a 0143 0458  | C X|		.DEBUG	0x0143,0x0458,0x1002,0x0000,0x0038,0xc736,0x0000,0x003d
0352 014b 045c  | K \|		.DEBUG	0x014b,0x045c,0x1002,0x0000,0x0038,0xc736,0x0000,0x0046
035a 0153 0460  | S `|		.DEBUG	0x0153,0x0460,0x1002,0x0000,0x0038,0xc736,0x0000,0x004f
0362 015b 0464  | [ d|		.DEBUG	0x015b,0x0464,0x1002,0x0000,0x0038,0xc736,0x0000,0x0058
036a 0163 0468  | c h|		.DEBUG	0x0163,0x0468,0x1002,0x0000,0x0038,0xc736,0x0000,0x0061
0372 016b 046c  | k l|		.DEBUG	0x016b,0x046c,0x1001,0x0000,0x0038,0xc736,0x0000,0x006b
037a 0173 0470  | s p|		.DEBUG	0x0173,0x0470,0x1001,0x0000,0x0038,0xc736,0x0000,0x0073
0382 017b 0474  | { t|		.DEBUG	0x017b,0x0474,0x1005,0x0000,0x0038,0xc7d6,0x0000,0x0028
038a 0193 0476  |   v|		.DEBUG	0x0193,0x0476,0x1001,0x0000,0x0038,0xc7d6,0x0000,0x0044
0392 019b 047c  |   ||		.DEBUG	0x019b,0x047c,0x1001,0x0000,0x0038,0xc7d6,0x0000,0x0058
039a 01a3 0482  |    |		.DEBUG	0x01a3,0x0482,0x1001,0x0000,0x0038,0xc7d6,0x0000,0x006c
03a2 01c3 048a  |    |		.DEBUG	0x01c3,0x048a,0x1002,0x0000,0x0038,0xc7d6,0x0000,0x0096
03aa 01d3 0490  |    |		.DEBUG	0x01d3,0x0490,0x1001,0x0000,0x0038,0xc7d6,0x0000,0x009f
03b2 0273 04c4  | s  |		.DEBUG	0x0273,0x04c4,0x1004,0x0000,0x0038,0xc7d6,0x0000,0x039e
03ba ; --------------------------------------------------------------------------------------
03ba ; Debug3 Subtable 0x0
03ba ; --------------------------------------------------------------------------------------
03ba 000b 0000  |    |		.DBG3TAB	0x000b,0x0000
03bc 000b ffff  |    |		.CONST	0x000b,0xffff
03be 000d fffe  |    |		.CONST	0x000d,0xfffe
03c0 000f fffd  |    |		.CONST	0x000f,0xfffd
03c2 0011 fffc  |    |		.CONST	0x0011,0xfffc
03c4 0013 fffb  |    |		.CONST	0x0013,0xfffb
03c6 0015 fffa  |    |		.CONST	0x0015,0xfffa
03c8 0017 fff9  |    |		.CONST	0x0017,0xfff9
03ca 0019 fff8  |    |		.CONST	0x0019,0xfff8
03cc 001b fff7  |    |		.CONST	0x001b,0xfff7
03ce 001d fff6  |    |		.CONST	0x001d,0xfff6
03d0 001f fff5  |    |		.CONST	0x001f,0xfff5
03d2 ; --------------------------------------------------------------------------------------
03d2 ; Debug3 Subtable 0x1
03d2 ; --------------------------------------------------------------------------------------
03d2 001c 0000  |    |		.DBG3TAB	0x001c,0x0000
03d4 0022 ffff  | "  |		.CONST	0x0022,0xffff
03d6 0024 fffe  | $  |		.CONST	0x0024,0xfffe
03d8 0026 fffd  | &  |		.CONST	0x0026,0xfffd
03da 0028 fffc  | (  |		.CONST	0x0028,0xfffc
03dc 002a fffb  | *  |		.CONST	0x002a,0xfffb
03de 002c fffa  | ,  |		.CONST	0x002c,0xfffa
03e0 002d fff9  | -  |		.CONST	0x002d,0xfff9
03e2 002e fff8  | .  |		.CONST	0x002e,0xfff8
03e4 0033 fff7  | 3  |		.CONST	0x0033,0xfff7
03e6 0035 fff6  | 5  |		.CONST	0x0035,0xfff6
03e8 003a fff5  | :  |		.CONST	0x003a,0xfff5
03ea 003c fff4  | <  |		.CONST	0x003c,0xfff4
03ec 003e fff3  | >  |		.CONST	0x003e,0xfff3
03ee 0040 fff2  | @  |		.CONST	0x0040,0xfff2
03f0 0042 fff1  | B  |		.CONST	0x0042,0xfff1
03f2 0044 fff0  | D  |		.CONST	0x0044,0xfff0
03f4 0046 ffef  | F  |		.CONST	0x0046,0xffef
03f6 0048 ffee  | H  |		.CONST	0x0048,0xffee
03f8 004a ffed  | J  |		.CONST	0x004a,0xffed
03fa 004c ffec  | L  |		.CONST	0x004c,0xffec
03fc 004e ffeb  | N  |		.CONST	0x004e,0xffeb
03fe 0050 ffea  | P  |		.CONST	0x0050,0xffea
0400 0052 ffe9  | R  |		.CONST	0x0052,0xffe9
0402 0054 ffe8  | T  |		.CONST	0x0054,0xffe8
0404 0056 ffe7  | V  |		.CONST	0x0056,0xffe7
0406 0058 ffe6  | X  |		.CONST	0x0058,0xffe6
0408 005a ffe5  | Z  |		.CONST	0x005a,0xffe5
040a 005c ffe4  | \  |		.CONST	0x005c,0xffe4
040c ; --------------------------------------------------------------------------------------
040c ; Debug3 Subtable 0x2
040c ; --------------------------------------------------------------------------------------
040c 0002 0008  |    |		.DBG3TAB	0x0002,0x0008
040e 0063 ffff  | c  |		.CONST	0x0063,0xffff
0410 0067 fffe  | g  |		.CONST	0x0067,0xfffe
0412 006b 0001  | k  |		.CONST	0x006b,0x0001
0414 006d 0002  | m  |		.CONST	0x006d,0x0002
0416 0075 0003  | u  |		.CONST	0x0075,0x0003
0418 007a 0004  | z  |		.CONST	0x007a,0x0004
041a 007c 0005  | |  |		.CONST	0x007c,0x0005
041c 0089 0006  |    |		.CONST	0x0089,0x0006
041e 008f 0007  |    |		.CONST	0x008f,0x0007
0420 0092 0008  |    |		.CONST	0x0092,0x0008
0422 ; --------------------------------------------------------------------------------------
0422 ; Debug3 Subtable 0x3
0422 ; --------------------------------------------------------------------------------------
0422 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0424 009b ffff  |    |		.CONST	0x009b,0xffff
0426 00a5 0001  |    |		.CONST	0x00a5,0x0001
0428 00a7 0002  |    |		.CONST	0x00a7,0x0002
042a 00a9 0003  |    |		.CONST	0x00a9,0x0003
042c 00ab 0004  |    |		.CONST	0x00ab,0x0004
042e ; --------------------------------------------------------------------------------------
042e ; Debug3 Subtable 0x4
042e ; --------------------------------------------------------------------------------------
042e 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0430 00c3 ffff  |    |		.CONST	0x00c3,0xffff
0432 00cd 0001  |    |		.CONST	0x00cd,0x0001
0434 ; --------------------------------------------------------------------------------------
0434 ; Debug3 Subtable 0x5
0434 ; --------------------------------------------------------------------------------------
0434 0001 0010  |    |		.DBG3TAB	0x0001,0x0010
0436 00e3 ffff  |    |		.CONST	0x00e3,0xffff
0438 00ed 0001  |    |		.CONST	0x00ed,0x0001
043a 00ef 0002  |    |		.CONST	0x00ef,0x0002
043c 00f3 0003  |    |		.CONST	0x00f3,0x0003
043e 00fb 0004  |    |		.CONST	0x00fb,0x0004
0440 00fe 0005  |    |		.CONST	0x00fe,0x0005
0442 0105 0006  |    |		.CONST	0x0105,0x0006
0444 0108 0007  |    |		.CONST	0x0108,0x0007
0446 010f 0008  |    |		.CONST	0x010f,0x0008
0448 0111 0009  |    |		.CONST	0x0111,0x0009
044a 0116 000a  |    |		.CONST	0x0116,0x000a
044c 011a 000b  |    |		.CONST	0x011a,0x000b
044e 0122 000c  | "  |		.CONST	0x0122,0x000c
0450 0129 000d  | )  |		.CONST	0x0129,0x000d
0452 0130 000e  | 0  |		.CONST	0x0130,0x000e
0454 0132 000f  | 2  |		.CONST	0x0132,0x000f
0456 0134 0010  | 4  |		.CONST	0x0134,0x0010
0458 ; --------------------------------------------------------------------------------------
0458 ; Debug3 Subtable 0x6
0458 ; --------------------------------------------------------------------------------------
0458 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
045a 0143 0001  | C  |		.CONST	0x0143,0x0001
045c ; --------------------------------------------------------------------------------------
045c ; Debug3 Subtable 0x7
045c ; --------------------------------------------------------------------------------------
045c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
045e 014b 0001  | K  |		.CONST	0x014b,0x0001
0460 ; --------------------------------------------------------------------------------------
0460 ; Debug3 Subtable 0x8
0460 ; --------------------------------------------------------------------------------------
0460 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0462 0153 0001  | S  |		.CONST	0x0153,0x0001
0464 ; --------------------------------------------------------------------------------------
0464 ; Debug3 Subtable 0x9
0464 ; --------------------------------------------------------------------------------------
0464 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0466 015b 0001  | [  |		.CONST	0x015b,0x0001
0468 ; --------------------------------------------------------------------------------------
0468 ; Debug3 Subtable 0xa
0468 ; --------------------------------------------------------------------------------------
0468 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
046a 0163 0001  | c  |		.CONST	0x0163,0x0001
046c ; --------------------------------------------------------------------------------------
046c ; Debug3 Subtable 0xb
046c ; --------------------------------------------------------------------------------------
046c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
046e 016b 0001  | k  |		.CONST	0x016b,0x0001
0470 ; --------------------------------------------------------------------------------------
0470 ; Debug3 Subtable 0xc
0470 ; --------------------------------------------------------------------------------------
0470 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0472 0173 0001  | s  |		.CONST	0x0173,0x0001
0474 ; --------------------------------------------------------------------------------------
0474 ; Debug3 Subtable 0xd
0474 ; --------------------------------------------------------------------------------------
0474 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0476 ; --------------------------------------------------------------------------------------
0476 ; Debug3 Subtable 0xe
0476 ; --------------------------------------------------------------------------------------
0476 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0478 0193 0001  |    |		.CONST	0x0193,0x0001
047a 0195 0002  |    |		.CONST	0x0195,0x0002
047c ; --------------------------------------------------------------------------------------
047c ; Debug3 Subtable 0xf
047c ; --------------------------------------------------------------------------------------
047c 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
047e 019b 0001  |    |		.CONST	0x019b,0x0001
0480 019d 0002  |    |		.CONST	0x019d,0x0002
0482 ; --------------------------------------------------------------------------------------
0482 ; Debug3 Subtable 0x10
0482 ; --------------------------------------------------------------------------------------
0482 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0484 01a3 0001  |    |		.CONST	0x01a3,0x0001
0486 01a6 0002  |    |		.CONST	0x01a6,0x0002
0488 01aa 0003  |    |		.CONST	0x01aa,0x0003
048a ; --------------------------------------------------------------------------------------
048a ; Debug3 Subtable 0x11
048a ; --------------------------------------------------------------------------------------
048a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
048c 01c5 0001  |    |		.CONST	0x01c5,0x0001
048e 01c7 0002  |    |		.CONST	0x01c7,0x0002
0490 ; --------------------------------------------------------------------------------------
0490 ; Debug3 Subtable 0x12
0490 ; --------------------------------------------------------------------------------------
0490 0008 0011  |    |		.DBG3TAB	0x0008,0x0011
0492 01d3 ffff  |    |		.CONST	0x01d3,0xffff
0494 01d4 fffe  |    |		.CONST	0x01d4,0xfffe
0496 01d5 fffd  |    |		.CONST	0x01d5,0xfffd
0498 01d7 fffc  |    |		.CONST	0x01d7,0xfffc
049a 01db fffb  |    |		.CONST	0x01db,0xfffb
049c 01df fffa  |    |		.CONST	0x01df,0xfffa
049e 01e0 fff9  |    |		.CONST	0x01e0,0xfff9
04a0 01f1 fff8  |    |		.CONST	0x01f1,0xfff8
04a2 0204 0001  |    |		.CONST	0x0204,0x0001
04a4 0205 0002  |    |		.CONST	0x0205,0x0002
04a6 020e 0003  |    |		.CONST	0x020e,0x0003
04a8 0217 0004  |    |		.CONST	0x0217,0x0004
04aa 021e 0006  |    |		.CONST	0x021e,0x0006
04ac 0223 0005  | #  |		.CONST	0x0223,0x0005
04ae 022f 0007  | /  |		.CONST	0x022f,0x0007
04b0 0233 0008  | 3  |		.CONST	0x0233,0x0008
04b2 023d 0009  | =  |		.CONST	0x023d,0x0009
04b4 023f 000a  | ?  |		.CONST	0x023f,0x000a
04b6 0242 000b  | B  |		.CONST	0x0242,0x000b
04b8 0244 000c  | D  |		.CONST	0x0244,0x000c
04ba 024b 000d  | K  |		.CONST	0x024b,0x000d
04bc 024d 000e  | M  |		.CONST	0x024d,0x000e
04be 0253 0010  | S  |		.CONST	0x0253,0x0010
04c0 0258 000f  | X  |		.CONST	0x0258,0x000f
04c2 0262 0011  | b  |		.CONST	0x0262,0x0011
04c4 ; --------------------------------------------------------------------------------------
04c4 ; Debug3 Subtable 0x13
04c4 ; --------------------------------------------------------------------------------------
04c4 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
04c6 0273 ffff  | s  |		.CONST	0x0273,0xffff
04c8 0274 fffe  | t  |		.CONST	0x0274,0xfffe
04ca 0275 0001  | u  |		.CONST	0x0275,0x0001
04cc 0279 0002  | y  |		.CONST	0x0279,0x0002
04ce 027c 0003  | |  |		.CONST	0x027c,0x0003
04d0 0281 0004  |    |		.CONST	0x0281,0x0004
04d2 0000 0000  |    |		.BLANK	0000[0x12e]