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

⟦2580a7c4d⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5812_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_6148f2

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 5812       |X   |		.CONST	0x5812								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 02d0       |    |		.CONST	0x02d0								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 004c       | L  |		.CONST	0x004c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0012       |    |		.CONST	0x0012								; Number of locals
000b			INIT_0008:
000b 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x030a,0x8000,0x0000,0x004c,0x55b6,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x4 = 0x13,0xfffb
0014 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x5 = 0x14,0xfffa
0015 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x6 = 0x15,0xfff9
0016 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0016,0x031a,0x8000,0x0000,0x004c,0x5ae6,0x0000,0x000d
													; Debug Table 0x1.0x0 = 0x16,0xffff
0017 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x1 = 0x17,0xfffe
0018 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0019 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x19,0xfffd
001a 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x1a,0xfffc
001b e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x4 = 0x1b,0xfffb
001c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
001d 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
001e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
001f 0322       | "  |		Declare_Variable	Record
0020 4803       |H   |		Short_Literal	0x3
0021 00d9       |    |		Load_Top	At_Offset_1
0022 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0023 4800       |H   |		Short_Literal	0x0
0024 00d9       |    |		Load_Top	At_Offset_1
0025 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0026 4801       |H   |		Short_Literal	0x1
0027 00d9       |    |		Load_Top	At_Offset_1
0028 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0029 62a2       |b   |		Indirect_Literal	Discrete,0x2cc,{0x00000000, 0x7fffffff}
002a 00d9       |    |		Load_Top	At_Offset_1
002b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
002c 629f       |b   |		Indirect_Literal	Discrete,0x2cc,{0x00000000, 0x7fffffff}
002d 00d9       |    |		Load_Top	At_Offset_1
002e 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
002f 4800       |H   |		Short_Literal	0x0
0030 00d9       |    |		Load_Top	At_Offset_1
0031 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0032 4800       |H   |		Short_Literal	0x0
0033 00d9       |    |		Load_Top	At_Offset_1
0034 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0035 4800       |H   |		Short_Literal	0x0
0036 00d9       |    |		Load_Top	At_Offset_1
0037 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0038 4800       |H   |		Short_Literal	0x0
0039 00d9       |    |		Load_Top	At_Offset_1
003a 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
003b 4800       |H   |		Short_Literal	0x0
003c 00d9       |    |		Load_Top	At_Offset_1
003d 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
003e 4800       |H   |		Short_Literal	0x0
003f 00d9       |    |		Load_Top	At_Offset_1
0040 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0041 4800       |H   |		Short_Literal	0x0
0042 00d9       |    |		Load_Top	At_Offset_1
0043 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0044 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x5 = 0x44,0xfffa
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x6 = 0x46,0xfff9
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x7 = 0x48,0xfff8
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x8 = 0x4a,0xfff7
004b 00c7       |    |		Action	Elaborate_Subprogram
004c			BODY_0008:
004c 00bc       |    |		Action	Signal_Activated
004d 00bb       |    |		Action	Signal_Completion
004e 0000 0000  |    |		.XXX[0x2]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 006f       | o  |		.CONST	0x006f								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0006       |    |		.CONST	0x0006								; Number of locals
0053			INIT_0050:
0053 e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x0053,0x032e,0x0002,0x0000,0x004c,0x55b6,0x0000,0x0006
													; Debug Table 0x2.0x0 = 0x53,0xffff
0054 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0055 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0056 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x1 = 0x56,0xfffe
0057 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0058 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0059 02ff       |    |		Declare_Variable	Variant_Record
005a 00d8       |    |		Load_Top	At_Offset_0
005b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
005c e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x2 = 0x5c,0xfffd
005d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
005e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
005f 02ff       |    |		Declare_Variable	Variant_Record
0060 00d8       |    |		Load_Top	At_Offset_0
0061 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0062 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x3 = 0x62,0xfffc
0063 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0064 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0065 02ff       |    |		Declare_Variable	Variant_Record
0066 00d8       |    |		Load_Top	At_Offset_0
0067 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0068 e211       |    |		Load	0x1,0x11							; Debug Table 0x2.0x4 = 0x68,0xfffb
0069 e5ff       |    |		Load	0x2,-0x1
006a e001       |    |		Load	0x0,0x1
006b 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
006c 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
006d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
006e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
006f			BODY_0050:
006f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x5 = 0x6f,0x1
0070 e001       |    |		Load	0x0,0x1
0071 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0072 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0073 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0074 a402       |    |		Store_Unchecked	0x2,0x2
0075 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x6 = 0x75,0x2
0076 0b10       |    |		Execute_Immediate	Case_Compare,0x10
0077 7006       |p   |		Jump_Nonzero	0x7e
0078 0b16       |    |		Execute_Immediate	Case_Compare,0x16
0079 7034       |p4  |		Jump_Nonzero	0xae
007a 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
007b 703e       |p>  |		Jump_Nonzero	0xba
007c 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x2.0x7 = 0x7c,0xa
007d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
007e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x8 = 0x7e,0x3
007f e001       |    |		Load	0x0,0x1
0080 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0081 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0082 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0083 e403       |    |		Load	0x2,0x3
0084 016d       | m  |		Execute	Variant_Record,Structure_Write
0085 e403       |    |		Load	0x2,0x3								; Debug Table 0x2.0x9 = 0x85,0x4
0086 e001       |    |		Load	0x0,0x1
0087 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0088 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0089 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
008a e404       |    |		Load	0x2,0x4
008b 016d       | m  |		Execute	Variant_Record,Structure_Write
008c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xa = 0x8c,0x5
008d e001       |    |		Load	0x0,0x1
008e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
008f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0090 016f       | o  |		Execute	Variant_Record,Equal
0091 7010       |p   |		Jump_Nonzero	0xa2
0092 00db       |    |		Load_Top	At_Offset_3
0093 e001       |    |		Load	0x0,0x1
0094 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0095 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0096 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0097 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0098 6809       |h   |		Jump_Zero	0xa2
0099 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0xb = 0x99,0x6
009a e404       |    |		Load	0x2,0x4
009b e001       |    |		Load	0x0,0x1
009c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
009d 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
009e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
009f 00db       |    |		Load_Top	At_Offset_3
00a0 016d       | m  |		Execute	Variant_Record,Structure_Write
00a1 7830       |x0  |		Jump	0xd2
00a2 e403       |    |		Load	0x2,0x3								; Debug Table 0x2.0xc = 0xa2,0x7
00a3 e001       |    |		Load	0x0,0x1
00a4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00a5 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
00a6 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
00a7 e001       |    |		Load	0x0,0x1
00a8 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00a9 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
00aa 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00ab 00db       |    |		Load_Top	At_Offset_3
00ac 016d       | m  |		Execute	Variant_Record,Structure_Write
00ad 7824       |x$  |		Jump	0xd2
00ae e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0xd = 0xae,0x8
00af e001       |    |		Load	0x0,0x1
00b0 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00b1 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
00b2 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
00b3 e001       |    |		Load	0x0,0x1
00b4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00b5 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
00b6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00b7 00db       |    |		Load_Top	At_Offset_3
00b8 016d       | m  |		Execute	Variant_Record,Structure_Write
00b9 7818       |x   |		Jump	0xd2
00ba 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x2.0xe = 0xba,0x9
00bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0xf = 0xbb,0xfbff
00bc e212       |    |		Load	0x1,0x12
00bd e5ff       |    |		Load	0x2,-0x1
00be e001       |    |		Load	0x0,0x1
00bf 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00c0 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
00c1 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00c2 e001       |    |		Load	0x0,0x1
00c3 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00c4 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
00c5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00c6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x10 = 0xc6,0x401
00c7 e002       |    |		Load	0x0,0x2
00c8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00c9 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
00ca 6805       |h   |		Jump_Zero	0xd0
00cb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x11 = 0xcb,0x402
00cc e002       |    |		Load	0x0,0x2
00cd 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ce 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
00cf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d0 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x2.0x12 = 0xd0,0x403
00d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d2 00d1       |    |		Pop_Control	Pop_Count_1
00d3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x13 = 0xd3,0xb
00d4 e212       |    |		Load	0x1,0x12
00d5 00db       |    |		Load_Top	At_Offset_3
00d6 e001       |    |		Load	0x0,0x1
00d7 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00d8 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
00d9 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00da 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00db 0000 0000  |    |		.BLANK	0000[0x5]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 0111       |    |		.CONST	0x0111								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0009       |    |		.CONST	0x0009								; Number of locals
00e3			INIT_00e0:
00e3 e001       |    |		Load	0x0,0x1								; Debug Table 0x3 = .DEBUG	0x00e3,0x0358,0x0001,0x0000,0x004c,0x55b6,0x0000,0x0013
													; Debug Table 0x3.0x0 = 0xe3,0xffff
00e4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00e5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00e6 e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x1 = 0xe6,0xfffe
00e7 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00e8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00e9 02ff       |    |		Declare_Variable	Variant_Record
00ea 00d8       |    |		Load_Top	At_Offset_0
00eb 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00ec e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x2 = 0xec,0xfffd
00ed 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00ee 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00ef 02ff       |    |		Declare_Variable	Variant_Record
00f0 00d8       |    |		Load_Top	At_Offset_0
00f1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f2 e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x3 = 0xf2,0xfffc
00f3 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00f4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00f5 02ff       |    |		Declare_Variable	Variant_Record
00f6 00d8       |    |		Load_Top	At_Offset_0
00f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f8 e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x4 = 0xf8,0xfffb
00f9 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00fa 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00fb 02ff       |    |		Declare_Variable	Variant_Record
00fc 00d8       |    |		Load_Top	At_Offset_0
00fd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00fe e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x5 = 0xfe,0xfffa
00ff 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0100 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0101 02ff       |    |		Declare_Variable	Variant_Record
0102 00d8       |    |		Load_Top	At_Offset_0
0103 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0104 e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x6 = 0x104,0xfff9
0105 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0106 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0107 02ff       |    |		Declare_Variable	Variant_Record
0108 00d8       |    |		Load_Top	At_Offset_0
0109 1c00       |    |		Execute_Immediate	Run_Utility,0x0
010a e211       |    |		Load	0x1,0x11							; Debug Table 0x3.0x7 = 0x10a,0xfff8
010b e5fe       |    |		Load	0x2,-0x2
010c e001       |    |		Load	0x0,0x1
010d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
010e 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
010f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0110 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0111			BODY_00e0:
0111 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x8 = 0x111,0x1
0112 00d9       |    |		Load_Top	At_Offset_1
0113 e5ff       |    |		Load	0x2,-0x1
0114 480c       |H   |		Short_Literal	0xc
0115 e001       |    |		Load	0x0,0x1
0116 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0117 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0118 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0119 00d1       |    |		Pop_Control	Pop_Count_1
011a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x9 = 0x11a,0x2
011b e001       |    |		Load	0x0,0x1
011c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
011d 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
011e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
011f a402       |    |		Store_Unchecked	0x2,0x2
0120 e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0xa = 0x120,0x3
0121 0b10       |    |		Execute_Immediate	Case_Compare,0x10
0122 7005       |p   |		Jump_Nonzero	0x128
0123 0b16       |    |		Execute_Immediate	Case_Compare,0x16
0124 702e       |p.  |		Jump_Nonzero	0x153
0125 0b0a       |    |		Execute_Immediate	Case_Compare,0xa
0126 706c       |pl  |		Jump_Nonzero	0x193
0127 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x3.0xb = 0x127,0x17
0128 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0xc = 0x128,0x4
0129 e001       |    |		Load	0x0,0x1
012a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
012b 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
012c 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
012d e404       |    |		Load	0x2,0x4
012e 016d       | m  |		Execute	Variant_Record,Structure_Write
012f e404       |    |		Load	0x2,0x4								; Debug Table 0x3.0xd = 0x12f,0x5
0130 e001       |    |		Load	0x0,0x1
0131 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0132 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0133 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0134 e406       |    |		Load	0x2,0x6
0135 016d       | m  |		Execute	Variant_Record,Structure_Write
0136 e406       |    |		Load	0x2,0x6								; Debug Table 0x3.0xe = 0x136,0x6
0137 e001       |    |		Load	0x0,0x1
0138 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0139 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
013a 016f       | o  |		Execute	Variant_Record,Equal
013b 680f       |h   |		Jump_Zero	0x14b
013c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xf = 0x13c,0x7
013d 4813       |H   |		Short_Literal	0x13
013e e001       |    |		Load	0x0,0x1
013f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0140 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0141 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0142 e406       |    |		Load	0x2,0x6
0143 016d       | m  |		Execute	Variant_Record,Structure_Write
0144 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x10 = 0x144,0x8
0145 e406       |    |		Load	0x2,0x6
0146 e404       |    |		Load	0x2,0x4
0147 e001       |    |		Load	0x0,0x1
0148 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0149 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
014a 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
014b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x11 = 0x14b,0x9
014c 4801       |H   |		Short_Literal	0x1
014d e406       |    |		Load	0x2,0x6
014e e001       |    |		Load	0x0,0x1
014f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0150 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0151 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0152 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0153 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x12 = 0x153,0xa
0154 4813       |H   |		Short_Literal	0x13
0155 e001       |    |		Load	0x0,0x1
0156 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0157 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0158 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0159 e406       |    |		Load	0x2,0x6
015a 016d       | m  |		Execute	Variant_Record,Structure_Write
015b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x13 = 0x15b,0xb
015c 4801       |H   |		Short_Literal	0x1
015d e406       |    |		Load	0x2,0x6
015e e001       |    |		Load	0x0,0x1
015f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0160 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0161 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0162 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x14 = 0x162,0xc
0163 4810       |H   |		Short_Literal	0x10
0164 e001       |    |		Load	0x0,0x1
0165 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0166 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0167 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0168 e405       |    |		Load	0x2,0x5
0169 016d       | m  |		Execute	Variant_Record,Structure_Write
016a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x15 = 0x16a,0xd
016b 481e       |H   |		Short_Literal	0x1e
016c e001       |    |		Load	0x0,0x1
016d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
016e 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
016f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0170 e404       |    |		Load	0x2,0x4
0171 016d       | m  |		Execute	Variant_Record,Structure_Write
0172 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x16 = 0x172,0xe
0173 e5fe       |    |		Load	0x2,-0x2
0174 e001       |    |		Load	0x0,0x1
0175 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0176 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0177 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0178 e404       |    |		Load	0x2,0x4
0179 e001       |    |		Load	0x0,0x1
017a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
017b 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
017c 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
017d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x17 = 0x17d,0xf
017e e406       |    |		Load	0x2,0x6
017f e404       |    |		Load	0x2,0x4
0180 e001       |    |		Load	0x0,0x1
0181 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0182 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0183 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0184 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x18 = 0x184,0x10
0185 e404       |    |		Load	0x2,0x4
0186 e5fe       |    |		Load	0x2,-0x2
0187 e001       |    |		Load	0x0,0x1
0188 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0189 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
018a 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
018b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x19 = 0x18b,0x11
018c e405       |    |		Load	0x2,0x5
018d e5fe       |    |		Load	0x2,-0x2
018e e001       |    |		Load	0x0,0x1
018f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0190 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0191 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0192 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0193 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x1a = 0x193,0x12
0194 4816       |H   |		Short_Literal	0x16
0195 e001       |    |		Load	0x0,0x1
0196 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0197 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0198 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0199 e403       |    |		Load	0x2,0x3
019a 016d       | m  |		Execute	Variant_Record,Structure_Write
019b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x1b = 0x19b,0x13
019c e407       |    |		Load	0x2,0x7
019d e403       |    |		Load	0x2,0x3
019e e001       |    |		Load	0x0,0x1
019f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01a0 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
01a1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01a2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x1c = 0x1a2,0x14
01a3 00da       |    |		Load_Top	At_Offset_2
01a4 00db       |    |		Load_Top	At_Offset_3
01a5 e001       |    |		Load	0x0,0x1
01a6 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01a7 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
01a8 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01a9 e5fe       |    |		Load	0x2,-0x2
01aa e001       |    |		Load	0x0,0x1
01ab 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01ac 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
01ad 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
01ae e001       |    |		Load	0x0,0x1
01af 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01b0 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
01b1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01b2 480d       |H   |		Short_Literal	0xd
01b3 e001       |    |		Load	0x0,0x1
01b4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01b5 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
01b6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01b7 00d1       |    |		Pop_Control	Pop_Count_1
01b8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x1d = 0x1b8,0x15
01b9 00db       |    |		Load_Top	At_Offset_3
01ba e403       |    |		Load	0x2,0x3
01bb e001       |    |		Load	0x0,0x1
01bc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01bd 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
01be 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01bf 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x1e = 0x1bf,0x16
01c0 e403       |    |		Load	0x2,0x3
01c1 e5fe       |    |		Load	0x2,-0x2
01c2 e001       |    |		Load	0x0,0x1
01c3 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01c4 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
01c5 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
01c6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01c7 0000       |    |		.XXX[0x1]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01ef       |    |		.CONST	0x01ef								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0008       |    |		.CONST	0x0008								; Number of locals
01cb			INIT_01c8:
01cb e001       |    |		Load	0x0,0x1								; Debug Table 0x4 = .DEBUG	0x01cb,0x0398,0x0001,0x0000,0x004c,0x55b6,0x0000,0x0023
													; Debug Table 0x4.0x0 = 0x1cb,0xffff
01cc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01cd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01ce e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x1 = 0x1ce,0xfffe
01cf 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01d0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01d1 02ff       |    |		Declare_Variable	Variant_Record
01d2 00d8       |    |		Load_Top	At_Offset_0
01d3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d4 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x2 = 0x1d4,0xfffd
01d5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01d6 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01d7 02ff       |    |		Declare_Variable	Variant_Record
01d8 00d8       |    |		Load_Top	At_Offset_0
01d9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01da e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x3 = 0x1da,0xfffc
01db 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01dc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01dd 02ff       |    |		Declare_Variable	Variant_Record
01de 00d8       |    |		Load_Top	At_Offset_0
01df 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e0 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x4 = 0x1e0,0xfffb
01e1 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01e2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01e3 02ff       |    |		Declare_Variable	Variant_Record
01e4 00d8       |    |		Load_Top	At_Offset_0
01e5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e6 e211       |    |		Load	0x1,0x11							; Debug Table 0x4.0x5 = 0x1e6,0xfffa
01e7 e5ff       |    |		Load	0x2,-0x1
01e8 e001       |    |		Load	0x0,0x1
01e9 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01ea 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01eb 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01ec 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01ed 029f 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Call
01ef			BODY_01c8:
01ef e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x6 = 0x1ef,0x1
01f0 e001       |    |		Load	0x0,0x1
01f1 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01f2 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
01f3 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01f4 a402       |    |		Store_Unchecked	0x2,0x2
01f5 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x7 = 0x1f5,0x2
01f6 0b10       |    |		Execute_Immediate	Case_Compare,0x10
01f7 7005       |p   |		Jump_Nonzero	0x1fd
01f8 0b16       |    |		Execute_Immediate	Case_Compare,0x16
01f9 705a       |pZ  |		Jump_Nonzero	0x254
01fa 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
01fb 708c       |p   |		Jump_Nonzero	0x288
01fc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x4.0x8 = 0x1fc,0x12
01fd e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x9 = 0x1fd,0x3
01fe e001       |    |		Load	0x0,0x1
01ff 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0200 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0201 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0202 e404       |    |		Load	0x2,0x4
0203 016d       | m  |		Execute	Variant_Record,Structure_Write
0204 e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0xa = 0x204,0x4
0205 e001       |    |		Load	0x0,0x1
0206 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0207 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0208 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0209 e405       |    |		Load	0x2,0x5
020a 016d       | m  |		Execute	Variant_Record,Structure_Write
020b e405       |    |		Load	0x2,0x5								; Debug Table 0x4.0xb = 0x20b,0x5
020c e001       |    |		Load	0x0,0x1
020d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
020e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
020f 016f       | o  |		Execute	Variant_Record,Equal
0210 7006       |p   |		Jump_Nonzero	0x217
0211 e405       |    |		Load	0x2,0x5
0212 e001       |    |		Load	0x0,0x1
0213 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0214 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0215 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0216 7034       |p4  |		Jump_Nonzero	0x24b
0217 e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0xc = 0x217,0x6
0218 e001       |    |		Load	0x0,0x1
0219 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
021a 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
021b 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
021c e403       |    |		Load	0x2,0x3
021d 016d       | m  |		Execute	Variant_Record,Structure_Write
021e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xd = 0x21e,0x7
021f e403       |    |		Load	0x2,0x3
0220 e001       |    |		Load	0x0,0x1
0221 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0222 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0223 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0224 e001       |    |		Load	0x0,0x1
0225 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0226 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0227 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0228 e406       |    |		Load	0x2,0x6
0229 016d       | m  |		Execute	Variant_Record,Structure_Write
022a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0xe = 0x22a,0x8
022b 4801       |H   |		Short_Literal	0x1
022c e001       |    |		Load	0x0,0x1
022d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
022e 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
022f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0230 00d1       |    |		Pop_Control	Pop_Count_1
0231 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0xf = 0x231,0x9
0232 00db       |    |		Load_Top	At_Offset_3
0233 e407       |    |		Load	0x2,0x7
0234 e001       |    |		Load	0x0,0x1
0235 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0236 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0237 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0238 e406       |    |		Load	0x2,0x6
0239 e001       |    |		Load	0x0,0x1
023a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
023b 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
023c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
023d 481b       |H   |		Short_Literal	0x1b
023e e001       |    |		Load	0x0,0x1
023f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0240 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0241 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0242 00d1       |    |		Pop_Control	Pop_Count_1
0243 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x10 = 0x243,0xa
0244 4801       |H   |		Short_Literal	0x1
0245 e001       |    |		Load	0x0,0x1
0246 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0247 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0248 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0249 00d1       |    |		Pop_Control	Pop_Count_1
024a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
024b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x11 = 0x24b,0xb
024c 4801       |H   |		Short_Literal	0x1
024d 4801       |H   |		Short_Literal	0x1
024e e405       |    |		Load	0x2,0x5
024f e001       |    |		Load	0x0,0x1
0250 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0251 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0252 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0253 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0254 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x12 = 0x254,0xc
0255 e001       |    |		Load	0x0,0x1
0256 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0257 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0258 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0259 e403       |    |		Load	0x2,0x3
025a 016d       | m  |		Execute	Variant_Record,Structure_Write
025b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x13 = 0x25b,0xd
025c e403       |    |		Load	0x2,0x3
025d e001       |    |		Load	0x0,0x1
025e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
025f 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0260 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0261 e001       |    |		Load	0x0,0x1
0262 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0263 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0264 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0265 e406       |    |		Load	0x2,0x6
0266 016d       | m  |		Execute	Variant_Record,Structure_Write
0267 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x14 = 0x267,0xe
0268 4801       |H   |		Short_Literal	0x1
0269 e001       |    |		Load	0x0,0x1
026a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
026b 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
026c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
026d 00d1       |    |		Pop_Control	Pop_Count_1
026e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x15 = 0x26e,0xf
026f 00db       |    |		Load_Top	At_Offset_3
0270 e407       |    |		Load	0x2,0x7
0271 e001       |    |		Load	0x0,0x1
0272 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0273 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0274 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0275 e406       |    |		Load	0x2,0x6
0276 e001       |    |		Load	0x0,0x1
0277 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0278 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0279 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
027a 481b       |H   |		Short_Literal	0x1b
027b e001       |    |		Load	0x0,0x1
027c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
027d 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
027e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
027f 00d1       |    |		Pop_Control	Pop_Count_1
0280 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x16 = 0x280,0x10
0281 4801       |H   |		Short_Literal	0x1
0282 e001       |    |		Load	0x0,0x1
0283 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0284 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0285 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0286 00d1       |    |		Pop_Control	Pop_Count_1
0287 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0288 8408       |    |		Call	0x2,0x8								; Debug Table 0x4.0x17 = 0x288,0x11
0289 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
028a 0000 0000  |    |		.BLANK	0000[0x6]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0295       |    |		.CONST	0x0295								; Address of begin
0291 02a3       |    |		.CONST	0x02a3								; Address of exception handler
0292 0002       |    |		.CONST	0x0002								; Number of locals
0293			INIT_0290:
0293 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x0293,0x03ca,0x0002,0x0000,0x004c,0x55b6,0x0000,0x002f
													; Debug Table 0x5.0x0 = 0x293,0xffff
0294 820d       |    |		Call	0x1,0xd
0295			BODY_0290:
0295 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x1 = 0x295,0x1
0296 e003       |    |		Load	0x0,0x3
0297 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0298 00d9       |    |		Load_Top	At_Offset_1
0299 e003       |    |		Load	0x0,0x3
029a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
029b e004       |    |		Load	0x0,0x4
029c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
029d 01df       |    |		Execute	Vector,Equal
029e 6802       |h   |		Jump_Zero	0x2a1
029f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x2 = 0x29f,0x2
02a0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x3 = 0x2a1,0x3
02a2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a3			TRAP_0290:
02a3 0007       |    |		Action	Break_Optional
02a4 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x4 = 0x2a4,0x4
02a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a6 0000 0000  |    |		.XXX[0x2]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02b6       |    |		.CONST	0x02b6								; Address of begin
02a9 02c8       |    |		.CONST	0x02c8								; Address of exception handler
02aa 0002       |    |		.CONST	0x0002								; Number of locals
02ab			INIT_02a8:
02ab e407       |    |		Load	0x2,0x7								; Debug Table 0x6 = .DEBUG	0x02ab,0x03d6,0x0004,0x0000,0x004c,0x5ae6,0x0000,0x04df
													; Debug Table 0x6.0x0 = 0x2ab,0xffff
02ac e212       |    |		Load	0x1,0x12
02ad e5ff       |    |		Load	0x2,-0x1
02ae e001       |    |		Load	0x0,0x1
02af 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02b0 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
02b1 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02b2 e001       |    |		Load	0x0,0x1
02b3 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02b4 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
02b5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02b6			BODY_02a8:
02b6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x1 = 0x2b6,0x1
02b7 e002       |    |		Load	0x0,0x2
02b8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02b9 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
02ba 680c       |h   |		Jump_Zero	0x2c7
02bb e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x2 = 0x2bb,0x2
02bc e407       |    |		Load	0x2,0x7
02bd 00da       |    |		Load_Top	At_Offset_2
02be e002       |    |		Load	0x0,0x2
02bf 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02c0 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
02c1 481b       |H   |		Short_Literal	0x1b
02c2 e001       |    |		Load	0x0,0x1
02c3 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02c4 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
02c5 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02c6 00d1       |    |		Pop_Control	Pop_Count_1
02c7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02c8			TRAP_02a8:
02c8 0007       |    |		Action	Break_Optional
02c9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x6.0x3 = 0x2c9,0x3
02ca 0000 0000  |    |		.XXX[0x2]
02cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug Table
02d0 ; --------------------------------------------------------------------------------------
02d0 0003 0007  |    |		.CONST	0x0003,0x0007
02d2 000b 030a  |    |		.DEBUG	0x000b,0x030a,0x8000,0x0000,0x004c,0x55b6,0x0000,0x0005
02da 0016 031a  |    |		.DEBUG	0x0016,0x031a,0x8000,0x0000,0x004c,0x5ae6,0x0000,0x000d
02e2 0053 032e  | S .|		.DEBUG	0x0053,0x032e,0x0002,0x0000,0x004c,0x55b6,0x0000,0x0006
02ea 00e3 0358  |   X|		.DEBUG	0x00e3,0x0358,0x0001,0x0000,0x004c,0x55b6,0x0000,0x0013
02f2 01cb 0398  |    |		.DEBUG	0x01cb,0x0398,0x0001,0x0000,0x004c,0x55b6,0x0000,0x0023
02fa 0293 03ca  |    |		.DEBUG	0x0293,0x03ca,0x0002,0x0000,0x004c,0x55b6,0x0000,0x002f
0302 02ab 03d6  |    |		.DEBUG	0x02ab,0x03d6,0x0004,0x0000,0x004c,0x5ae6,0x0000,0x04df
030a ; --------------------------------------------------------------------------------------
030a ; Debug3 Subtable 0x0
030a ; --------------------------------------------------------------------------------------
030a 0007 0000  |    |		.DBG3TAB	0x0007,0x0000
030c 000b ffff  |    |		.CONST	0x000b,0xffff
030e 000d fffe  |    |		.CONST	0x000d,0xfffe
0310 000f fffd  |    |		.CONST	0x000f,0xfffd
0312 0011 fffc  |    |		.CONST	0x0011,0xfffc
0314 0013 fffb  |    |		.CONST	0x0013,0xfffb
0316 0014 fffa  |    |		.CONST	0x0014,0xfffa
0318 0015 fff9  |    |		.CONST	0x0015,0xfff9
031a ; --------------------------------------------------------------------------------------
031a ; Debug3 Subtable 0x1
031a ; --------------------------------------------------------------------------------------
031a 0009 0000  |    |		.DBG3TAB	0x0009,0x0000
031c 0016 ffff  |    |		.CONST	0x0016,0xffff
031e 0017 fffe  |    |		.CONST	0x0017,0xfffe
0320 0019 fffd  |    |		.CONST	0x0019,0xfffd
0322 001a fffc  |    |		.CONST	0x001a,0xfffc
0324 001b fffb  |    |		.CONST	0x001b,0xfffb
0326 0044 fffa  | D  |		.CONST	0x0044,0xfffa
0328 0046 fff9  | F  |		.CONST	0x0046,0xfff9
032a 0048 fff8  | H  |		.CONST	0x0048,0xfff8
032c 004a fff7  | J  |		.CONST	0x004a,0xfff7
032e ; --------------------------------------------------------------------------------------
032e ; Debug3 Subtable 0x2
032e ; --------------------------------------------------------------------------------------
032e 0006 000e  |    |		.DBG3TAB	0x0006,0x000e
0330 0053 ffff  | S  |		.CONST	0x0053,0xffff
0332 0056 fffe  | V  |		.CONST	0x0056,0xfffe
0334 005c fffd  | \  |		.CONST	0x005c,0xfffd
0336 0062 fffc  | b  |		.CONST	0x0062,0xfffc
0338 0068 fffb  | h  |		.CONST	0x0068,0xfffb
033a 006f 0001  | o  |		.CONST	0x006f,0x0001
033c 0075 0002  | u  |		.CONST	0x0075,0x0002
033e 007c 000a  | |  |		.CONST	0x007c,0x000a
0340 007e 0003  | ~  |		.CONST	0x007e,0x0003
0342 0085 0004  |    |		.CONST	0x0085,0x0004
0344 008c 0005  |    |		.CONST	0x008c,0x0005
0346 0099 0006  |    |		.CONST	0x0099,0x0006
0348 00a2 0007  |    |		.CONST	0x00a2,0x0007
034a 00ae 0008  |    |		.CONST	0x00ae,0x0008
034c 00ba 0009  |    |		.CONST	0x00ba,0x0009
034e 00bb fbff  |    |		.CONST	0x00bb,0xfbff
0350 00c6 0401  |    |		.CONST	0x00c6,0x0401
0352 00cb 0402  |    |		.CONST	0x00cb,0x0402
0354 00d0 0403  |    |		.CONST	0x00d0,0x0403
0356 00d3 000b  |    |		.CONST	0x00d3,0x000b
0358 ; --------------------------------------------------------------------------------------
0358 ; Debug3 Subtable 0x3
0358 ; --------------------------------------------------------------------------------------
0358 0008 0017  |    |		.DBG3TAB	0x0008,0x0017
035a 00e3 ffff  |    |		.CONST	0x00e3,0xffff
035c 00e6 fffe  |    |		.CONST	0x00e6,0xfffe
035e 00ec fffd  |    |		.CONST	0x00ec,0xfffd
0360 00f2 fffc  |    |		.CONST	0x00f2,0xfffc
0362 00f8 fffb  |    |		.CONST	0x00f8,0xfffb
0364 00fe fffa  |    |		.CONST	0x00fe,0xfffa
0366 0104 fff9  |    |		.CONST	0x0104,0xfff9
0368 010a fff8  |    |		.CONST	0x010a,0xfff8
036a 0111 0001  |    |		.CONST	0x0111,0x0001
036c 011a 0002  |    |		.CONST	0x011a,0x0002
036e 0120 0003  |    |		.CONST	0x0120,0x0003
0370 0127 0017  | '  |		.CONST	0x0127,0x0017
0372 0128 0004  | (  |		.CONST	0x0128,0x0004
0374 012f 0005  | /  |		.CONST	0x012f,0x0005
0376 0136 0006  | 6  |		.CONST	0x0136,0x0006
0378 013c 0007  | <  |		.CONST	0x013c,0x0007
037a 0144 0008  | D  |		.CONST	0x0144,0x0008
037c 014b 0009  | K  |		.CONST	0x014b,0x0009
037e 0153 000a  | S  |		.CONST	0x0153,0x000a
0380 015b 000b  | [  |		.CONST	0x015b,0x000b
0382 0162 000c  | b  |		.CONST	0x0162,0x000c
0384 016a 000d  | j  |		.CONST	0x016a,0x000d
0386 0172 000e  | r  |		.CONST	0x0172,0x000e
0388 017d 000f  | }  |		.CONST	0x017d,0x000f
038a 0184 0010  |    |		.CONST	0x0184,0x0010
038c 018b 0011  |    |		.CONST	0x018b,0x0011
038e 0193 0012  |    |		.CONST	0x0193,0x0012
0390 019b 0013  |    |		.CONST	0x019b,0x0013
0392 01a2 0014  |    |		.CONST	0x01a2,0x0014
0394 01b8 0015  |    |		.CONST	0x01b8,0x0015
0396 01bf 0016  |    |		.CONST	0x01bf,0x0016
0398 ; --------------------------------------------------------------------------------------
0398 ; Debug3 Subtable 0x4
0398 ; --------------------------------------------------------------------------------------
0398 0006 0012  |    |		.DBG3TAB	0x0006,0x0012
039a 01cb ffff  |    |		.CONST	0x01cb,0xffff
039c 01ce fffe  |    |		.CONST	0x01ce,0xfffe
039e 01d4 fffd  |    |		.CONST	0x01d4,0xfffd
03a0 01da fffc  |    |		.CONST	0x01da,0xfffc
03a2 01e0 fffb  |    |		.CONST	0x01e0,0xfffb
03a4 01e6 fffa  |    |		.CONST	0x01e6,0xfffa
03a6 01ef 0001  |    |		.CONST	0x01ef,0x0001
03a8 01f5 0002  |    |		.CONST	0x01f5,0x0002
03aa 01fc 0012  |    |		.CONST	0x01fc,0x0012
03ac 01fd 0003  |    |		.CONST	0x01fd,0x0003
03ae 0204 0004  |    |		.CONST	0x0204,0x0004
03b0 020b 0005  |    |		.CONST	0x020b,0x0005
03b2 0217 0006  |    |		.CONST	0x0217,0x0006
03b4 021e 0007  |    |		.CONST	0x021e,0x0007
03b6 022a 0008  | *  |		.CONST	0x022a,0x0008
03b8 0231 0009  | 1  |		.CONST	0x0231,0x0009
03ba 0243 000a  | C  |		.CONST	0x0243,0x000a
03bc 024b 000b  | K  |		.CONST	0x024b,0x000b
03be 0254 000c  | T  |		.CONST	0x0254,0x000c
03c0 025b 000d  | [  |		.CONST	0x025b,0x000d
03c2 0267 000e  | g  |		.CONST	0x0267,0x000e
03c4 026e 000f  | n  |		.CONST	0x026e,0x000f
03c6 0280 0010  |    |		.CONST	0x0280,0x0010
03c8 0288 0011  |    |		.CONST	0x0288,0x0011
03ca ; --------------------------------------------------------------------------------------
03ca ; Debug3 Subtable 0x5
03ca ; --------------------------------------------------------------------------------------
03ca 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
03cc 0293 ffff  |    |		.CONST	0x0293,0xffff
03ce 0295 0001  |    |		.CONST	0x0295,0x0001
03d0 029f 0002  |    |		.CONST	0x029f,0x0002
03d2 02a1 0003  |    |		.CONST	0x02a1,0x0003
03d4 02a4 0004  |    |		.CONST	0x02a4,0x0004
03d6 ; --------------------------------------------------------------------------------------
03d6 ; Debug3 Subtable 0x6
03d6 ; --------------------------------------------------------------------------------------
03d6 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
03d8 02ab ffff  |    |		.CONST	0x02ab,0xffff
03da 02b6 0001  |    |		.CONST	0x02b6,0x0001
03dc 02bb 0002  |    |		.CONST	0x02bb,0x0002
03de 02c9 0003  |    |		.CONST	0x02c9,0x0003
03e0 0000 0000  |    |		.BLANK	0000[0x20]