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

⟦61a98a45e⟧

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

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 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0268       | h  |		.CONST	0x0268								; 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 002e       | .  |		.CONST	0x002e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0015       |    |		.CONST	0x0015								; Number of locals
000b			INIT_0008:
000b 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x02c2,0x0000,0x0000,0x0056,0xb985,0x0000,0x0563
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 00bf       |    |		Action	Accept_Activation
001c 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1 = .DEBUG	0x001c,0x02d4,0x0000,0x0000,0x0056,0xba55,0x0000,0x0004
													; Debug Table 0x1.0x0 = 0x1c,0xffff
001d 00c7       |    |		Action	Elaborate_Subprogram
001e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x1 = 0x1e,0xfffe
001f 00c7       |    |		Action	Elaborate_Subprogram
0020 029d 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call			; Debug Table 0x1.0x2 = 0x20,0xfffd
0022 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x3 = 0x22,0xfffc
0023 00c7       |    |		Action	Elaborate_Subprogram
0024 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x4 = 0x24,0xfffb
0025 00c7       |    |		Action	Elaborate_Subprogram
0026 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x5 = 0x26,0xfffa
0027 00c7       |    |		Action	Elaborate_Subprogram
0028 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x6 = 0x28,0xfff9
0029 00c7       |    |		Action	Elaborate_Subprogram
002a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x7 = 0x2a,0xfff8
002b 00c7       |    |		Action	Elaborate_Subprogram
002c 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x8 = 0x2c,0xfff7
002d 00c7       |    |		Action	Elaborate_Subprogram
002e			BODY_0008:
002e 00bc       |    |		Action	Signal_Activated
002f 00bb       |    |		Action	Signal_Completion
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0034       | 4  |		.CONST	0x0034								; Address of begin
0031 0004       |    |		.CONST	0x0004								; Address of exception handler
0032 0002       |    |		.CONST	0x0002								; Number of locals
0033			INIT_0030:
0033 e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x0033,0x02e8,0x0001,0x0000,0x0056,0xb985,0x0000,0x0564
													; Debug Table 0x2.0x0 = 0x33,0xffff
0034			BODY_0030:
0034 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x1 = 0x34,0x1
0035 00dc       |    |		Load_Top	At_Offset_4
0036 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
0037 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0038 480b       |H   |		Short_Literal	0xb							; Debug Table 0x2.0x2 = 0x38,0x2
													; Debug Table 0x2.0x3 = 0x38,0x3
0039 00d9       |    |		Load_Top	At_Offset_1
003a 0217       |    |		Execute	Heap_Access,All_Reference
003b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
003c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x4 = 0x3c,0x4
003d 0219       |    |		Execute	Heap_Access,All_Read
003e e002       |    |		Load	0x0,0x2
003f 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0040 4bf1       |K   |		Short_Literal	0x3f1
0041 00de       |    |		Load_Top	At_Offset_6
0042 e002       |    |		Load	0x0,0x2
0043 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0044 00d9       |    |		Load_Top	At_Offset_1
0045 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0046 00d1       |    |		Pop_Control	Pop_Count_1
0047 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x5 = 0x47,0x5
0048 0219       |    |		Execute	Heap_Access,All_Read
0049 e003       |    |		Load	0x0,0x3
004a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
004b 4805       |H   |		Short_Literal	0x5
004c 00de       |    |		Load_Top	At_Offset_6
004d e003       |    |		Load	0x0,0x3
004e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
004f 00d9       |    |		Load_Top	At_Offset_1
0050 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0051 00d1       |    |		Pop_Control	Pop_Count_1
0052 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x6 = 0x52,0x6
0053 0219       |    |		Execute	Heap_Access,All_Read
0054 e004       |    |		Load	0x0,0x4
0055 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0056 00dd       |    |		Load_Top	At_Offset_5
0057 e004       |    |		Load	0x0,0x4
0058 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0059 00d9       |    |		Load_Top	At_Offset_1
005a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
005b 00d1       |    |		Pop_Control	Pop_Count_1
005c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x7 = 0x5c,0x7
005d 0035       | 5  |		Store_Top	Heap_Access,At_Offset_5
005e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
005f 0000       |    |		.XXX[0x1]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063       | c  |		.CONST	0x0063								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0001       |    |		.CONST	0x0001								; Number of locals
0063			BODY_0060:
0063			INIT_0060:
0063 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x0063,0x02fa,0x0001,0x0000,0x0056,0xb985,0x0000,0x0572
													; Debug Table 0x3.0x0 = 0x63,0x1
0064 0217       |    |		Execute	Heap_Access,All_Reference
0065 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0066 00dc       |    |		Load_Top	At_Offset_4
0067 0217       |    |		Execute	Heap_Access,All_Reference
0068 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0069 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x1 = 0x69,0x2
006a 0219       |    |		Execute	Heap_Access,All_Read
006b 00d8       |    |		Load_Top	At_Offset_0
006c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
006d 00dc       |    |		Load_Top	At_Offset_4
006e 0217       |    |		Execute	Heap_Access,All_Reference
006f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0070 e002       |    |		Load	0x0,0x2
0071 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0072 00d9       |    |		Load_Top	At_Offset_1
0073 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0074 00d1       |    |		Pop_Control	Pop_Count_1
0075 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x2 = 0x75,0x3
0076 0219       |    |		Execute	Heap_Access,All_Read
0077 00d8       |    |		Load_Top	At_Offset_0
0078 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0079 00dc       |    |		Load_Top	At_Offset_4
007a 0217       |    |		Execute	Heap_Access,All_Reference
007b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
007c e003       |    |		Load	0x0,0x3
007d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
007e 00d9       |    |		Load_Top	At_Offset_1
007f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0080 00d1       |    |		Pop_Control	Pop_Count_1
0081 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x3 = 0x81,0x4
0082 0219       |    |		Execute	Heap_Access,All_Read
0083 00d8       |    |		Load_Top	At_Offset_0
0084 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0085 00dc       |    |		Load_Top	At_Offset_4
0086 0217       |    |		Execute	Heap_Access,All_Reference
0087 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0088 e004       |    |		Load	0x0,0x4
0089 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
008a 00d9       |    |		Load_Top	At_Offset_1
008b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
008c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
008d 0000 0000  |    |		.XXX[0x3]
008f 0000       |    |
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 009a       |    |		.CONST	0x009a								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0005       |    |		.CONST	0x0005								; Number of locals
0093			INIT_0090:
0093 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4 = .DEBUG	0x0093,0x0304,0x0001,0x0000,0x0056,0xb985,0x0000,0x057e
													; Debug Table 0x4.0x0 = 0x93,0xffff
0094 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0095 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x1 = 0x95,0xfffe
0096 e005       |    |		Load	0x0,0x5								; Debug Table 0x4.0x2 = 0x96,0xfffd
0097 0322       | "  |		Declare_Variable	Record
0098 e006       |    |		Load	0x0,0x6								; Debug Table 0x4.0x3 = 0x98,0xfffc
0099 0322       | "  |		Declare_Variable	Record
009a			BODY_0090:
009a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x4 = 0x9a,0x1
009b 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
009c 460a       |F   |		Jump_Case	0xb
009d 780a       |x   |		Jump	0xa8								; case 0x0
009e 782e       |x.  |		Jump	0xcd								; case 0x1
009f 7855       |xU  |		Jump	0xf5								; case 0x2
00a0 787c       |x|  |		Jump	0x11d								; case 0x3
00a1 7890       |x   |		Jump	0x132								; case 0x4
00a2 78c6       |x   |		Jump	0x169								; case 0x5
00a3 78f0       |x   |		Jump	0x194								; case 0x6
00a4 78ff       |x   |		Jump	0x1a4								; case 0x7
00a5 791b       |y   |		Jump	0x1c1								; case 0x8
00a6 7910       |y   |		Jump	0x1b7								; case 0x9
00a7 7925       |y%  |		Jump	0x1cd								; case 0xa
00a8 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x5 = 0xa8,0x2
00a9 00da       |    |		Load_Top	At_Offset_2
00aa e007       |    |		Load	0x0,0x7
00ab 0322       | "  |		Declare_Variable	Record
00ac 00de       |    |		Load_Top	At_Offset_6
00ad 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
00ae 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00af e008       |    |		Load	0x0,0x8
00b0 025b       | [  |		Execute	Discrete,Check_In_Type
00b1 00d9       |    |		Load_Top	At_Offset_1
00b2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00b3 00de       |    |		Load_Top	At_Offset_6
00b4 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
00b5 e009       |    |		Load	0x0,0x9
00b6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b7 00d9       |    |		Load_Top	At_Offset_1
00b8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00b9 e5ff       |    |		Load	0x2,-0x1
00ba 0217       |    |		Execute	Heap_Access,All_Reference
00bb 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00bc e002       |    |		Load	0x0,0x2
00bd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00be 00d1       |    |		Pop_Control	Pop_Count_1
00bf 005b       | [  |		Store_Top	Discrete,At_Offset_3
00c0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x6 = 0xc0,0x3
00c1 7006       |p   |		Jump_Nonzero	0xc8
00c2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x7 = 0xc2,0x4
00c3 e009       |    |		Load	0x0,0x9
00c4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00c5 00dc       |    |		Load_Top	At_Offset_4
00c6 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
00c7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00c8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x8 = 0xc8,0x5
00c9 800a       |    |		Call	0x0,0xa
00ca 00dc       |    |		Load_Top	At_Offset_4
00cb 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
00cc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00cd 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0x9 = 0xcd,0x6
00ce 0219       |    |		Execute	Heap_Access,All_Read
00cf 00d8       |    |		Load_Top	At_Offset_0
00d0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00d1 4800       |H   |		Short_Literal	0x0
00d2 e005       |    |		Load	0x0,0x5
00d3 0322       | "  |		Declare_Variable	Record
00d4 e402       |    |		Load	0x2,0x2
00d5 2604       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
00d6 e009       |    |		Load	0x0,0x9
00d7 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00d8 00d9       |    |		Load_Top	At_Offset_1
00d9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00da e402       |    |		Load	0x2,0x2
00db 2604       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
00dc e009       |    |		Load	0x0,0x9
00dd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00de 00d9       |    |		Load_Top	At_Offset_1
00df 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00e0 e007       |    |		Load	0x0,0x7
00e1 0322       | "  |		Declare_Variable	Record
00e2 e402       |    |		Load	0x2,0x2
00e3 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
00e4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e5 e008       |    |		Load	0x0,0x8
00e6 025b       | [  |		Execute	Discrete,Check_In_Type
00e7 00d9       |    |		Load_Top	At_Offset_1
00e8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00e9 e402       |    |		Load	0x2,0x2
00ea 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
00eb e009       |    |		Load	0x0,0x9
00ec 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00ed 00d9       |    |		Load_Top	At_Offset_1
00ee 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00ef e002       |    |		Load	0x0,0x2
00f0 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00f1 00d9       |    |		Load_Top	At_Offset_1
00f2 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00f3 00d1       |    |		Pop_Control	Pop_Count_1
00f4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00f5 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0xa = 0xf5,0x7
00f6 0219       |    |		Execute	Heap_Access,All_Read
00f7 00d8       |    |		Load_Top	At_Offset_0
00f8 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00f9 4800       |H   |		Short_Literal	0x0
00fa e005       |    |		Load	0x0,0x5
00fb 0322       | "  |		Declare_Variable	Record
00fc e402       |    |		Load	0x2,0x2
00fd 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
00fe e009       |    |		Load	0x0,0x9
00ff 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0100 00d9       |    |		Load_Top	At_Offset_1
0101 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0102 e402       |    |		Load	0x2,0x2
0103 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0104 e009       |    |		Load	0x0,0x9
0105 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0106 00d9       |    |		Load_Top	At_Offset_1
0107 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0108 e007       |    |		Load	0x0,0x7
0109 0322       | "  |		Declare_Variable	Record
010a e402       |    |		Load	0x2,0x2
010b 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
010c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
010d e008       |    |		Load	0x0,0x8
010e 025b       | [  |		Execute	Discrete,Check_In_Type
010f 00d9       |    |		Load_Top	At_Offset_1
0110 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0111 e402       |    |		Load	0x2,0x2
0112 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
0113 e009       |    |		Load	0x0,0x9
0114 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0115 00d9       |    |		Load_Top	At_Offset_1
0116 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0117 e002       |    |		Load	0x0,0x2
0118 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0119 00d9       |    |		Load_Top	At_Offset_1
011a 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
011b 00d1       |    |		Pop_Control	Pop_Count_1
011c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
011d e007       |    |		Load	0x0,0x7								; Debug Table 0x4.0xb = 0x11d,0x8
011e 0322       | "  |		Declare_Variable	Record
011f 00dc       |    |		Load_Top	At_Offset_4
0120 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0121 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0122 e008       |    |		Load	0x0,0x8
0123 025b       | [  |		Execute	Discrete,Check_In_Type
0124 00d9       |    |		Load_Top	At_Offset_1
0125 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0126 00dc       |    |		Load_Top	At_Offset_4
0127 260a       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xa
0128 e009       |    |		Load	0x0,0x9
0129 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
012a 00d9       |    |		Load_Top	At_Offset_1
012b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
012c e5ff       |    |		Load	0x2,-0x1
012d 0217       |    |		Execute	Heap_Access,All_Reference
012e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
012f e002       |    |		Load	0x0,0x2
0130 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0131 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0132 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0xc = 0x132,0x9
0133 0217       |    |		Execute	Heap_Access,All_Reference
0134 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0135 0d3f       | ?  |		Execute_Immediate	Less,0x3f
0136 6829       |h)  |		Jump_Zero	0x160
0137 e00b       |    |		Load	0x0,0xb								; Debug Table 0x4.0xd = 0x137,0xa
0138 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0139 0322       | "  |		Declare_Variable	Record
013a e5ff       |    |		Load	0x2,-0x1
013b 0217       |    |		Execute	Heap_Access,All_Reference
013c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
013d 00d9       |    |		Load_Top	At_Offset_1
013e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
013f 00dc       |    |		Load_Top	At_Offset_4
0140 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0141 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0xe = 0x141,0xb
0142 0219       |    |		Execute	Heap_Access,All_Read
0143 00d8       |    |		Load_Top	At_Offset_0
0144 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0145 4800       |H   |		Short_Literal	0x0
0146 e006       |    |		Load	0x0,0x6
0147 0322       | "  |		Declare_Variable	Record
0148 4801       |H   |		Short_Literal	0x1
0149 00d9       |    |		Load_Top	At_Offset_1
014a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
014b e00b       |    |		Load	0x0,0xb
014c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
014d 0322       | "  |		Declare_Variable	Record
014e e5ff       |    |		Load	0x2,-0x1
014f 0217       |    |		Execute	Heap_Access,All_Reference
0150 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0151 00d9       |    |		Load_Top	At_Offset_1
0152 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0153 e003       |    |		Load	0x0,0x3
0154 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0155 00d9       |    |		Load_Top	At_Offset_1
0156 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0157 00d1       |    |		Pop_Control	Pop_Count_1
0158 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0xf = 0x158,0xc
0159 0217       |    |		Execute	Heap_Access,All_Reference
015a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
015b 0a01       |    |		Execute_Immediate	Plus,0x1
015c e5ff       |    |		Load	0x2,-0x1
015d 0217       |    |		Execute	Heap_Access,All_Reference
015e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
015f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0160 e00b       |    |		Load	0x0,0xb								; Debug Table 0x4.0x10 = 0x160,0xd
0161 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0162 0322       | "  |		Declare_Variable	Record
0163 4800       |H   |		Short_Literal	0x0
0164 00d9       |    |		Load_Top	At_Offset_1
0165 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0166 00dc       |    |		Load_Top	At_Offset_4
0167 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0168 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0169 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x11 = 0x169,0xe
016a 00d9       |    |		Load_Top	At_Offset_1
016b 00dd       |    |		Load_Top	At_Offset_5
016c 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
016d e5ff       |    |		Load	0x2,-0x1
016e 0217       |    |		Execute	Heap_Access,All_Reference
016f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0170 e003       |    |		Load	0x0,0x3
0171 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0172 00d1       |    |		Pop_Control	Pop_Count_1
0173 005b       | [  |		Store_Top	Discrete,At_Offset_3
0174 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x12 = 0x174,0xf
0175 681a       |h   |		Jump_Zero	0x190
0176 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x13 = 0x176,0x10
0177 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0178 00dc       |    |		Load_Top	At_Offset_4
0179 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
017a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x14 = 0x17a,0x11
017b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
017c 0a01       |    |		Execute_Immediate	Plus,0x1
017d 00d9       |    |		Load_Top	At_Offset_1
017e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
017f 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0x15 = 0x17f,0x12
0180 0219       |    |		Execute	Heap_Access,All_Read
0181 00d8       |    |		Load_Top	At_Offset_0
0182 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0183 4800       |H   |		Short_Literal	0x0
0184 00db       |    |		Load_Top	At_Offset_3
0185 e402       |    |		Load	0x2,0x2
0186 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0187 e003       |    |		Load	0x0,0x3
0188 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0189 00d9       |    |		Load_Top	At_Offset_1
018a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
018b 00d1       |    |		Pop_Control	Pop_Count_1
018c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x16 = 0x18c,0x13
018d 00dc       |    |		Load_Top	At_Offset_4
018e 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
018f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0190 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x17 = 0x190,0x14
0191 00dc       |    |		Load_Top	At_Offset_4
0192 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0193 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0194 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0x18 = 0x194,0x15
0195 0217       |    |		Execute	Heap_Access,All_Reference
0196 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0197 00dc       |    |		Load_Top	At_Offset_4
0198 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
0199 e00b       |    |		Load	0x0,0xb								; Debug Table 0x4.0x19 = 0x199,0x16
019a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
019b 0322       | "  |		Declare_Variable	Record
019c e5ff       |    |		Load	0x2,-0x1
019d 0217       |    |		Execute	Heap_Access,All_Reference
019e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
019f 00d9       |    |		Load_Top	At_Offset_1
01a0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01a1 00dc       |    |		Load_Top	At_Offset_4
01a2 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
01a3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01a4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1a = 0x1a4,0x17
01a5 2e11       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x11
01a6 e5ff       |    |		Load	0x2,-0x1
01a7 0217       |    |		Execute	Heap_Access,All_Reference
01a8 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01a9 e004       |    |		Load	0x0,0x4
01aa 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01ab 00dc       |    |		Load_Top	At_Offset_4
01ac 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
01ad 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0x1b = 0x1ad,0x18
01ae 0219       |    |		Execute	Heap_Access,All_Read
01af 00d8       |    |		Load_Top	At_Offset_0
01b0 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01b1 e004       |    |		Load	0x0,0x4
01b2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01b3 00d9       |    |		Load_Top	At_Offset_1
01b4 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01b5 00d1       |    |		Pop_Control	Pop_Count_1
01b6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01b7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1c = 0x1b7,0x19
01b8 2e11       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x11
01b9 e5ff       |    |		Load	0x2,-0x1
01ba 0217       |    |		Execute	Heap_Access,All_Reference
01bb 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01bc e004       |    |		Load	0x0,0x4
01bd 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01be 00dc       |    |		Load_Top	At_Offset_4
01bf 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
01c0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01c1 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0x1d = 0x1c1,0x1a
01c2 0219       |    |		Execute	Heap_Access,All_Read
01c3 00d8       |    |		Load_Top	At_Offset_0
01c4 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01c5 00dd       |    |		Load_Top	At_Offset_5
01c6 2612       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x12
01c7 e004       |    |		Load	0x0,0x4
01c8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01c9 00d9       |    |		Load_Top	At_Offset_1
01ca 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01cb 00d1       |    |		Pop_Control	Pop_Count_1
01cc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01cd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1e = 0x1cd,0x1b
01ce 2e14       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x14
01cf 00dc       |    |		Load_Top	At_Offset_4
01d0 2613       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x13
01d1 e5ff       |    |		Load	0x2,-0x1
01d2 8215       |    |		Call	0x1,0x15
01d3 00dc       |    |		Load_Top	At_Offset_4
01d4 2a14       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x14
01d5 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x4.0x1f = 0x1d5,0x1c
01d6 0217       |    |		Execute	Heap_Access,All_Reference
01d7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01d8 00dc       |    |		Load_Top	At_Offset_4
01d9 2a15       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x15
01da 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01db 0000 0000  |    |		.BLANK	0000[0x5]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3       |    |		.CONST	0x01e3								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0001       |    |		.CONST	0x0001								; Number of locals
01e3			BODY_01e0:
01e3			INIT_01e0:
01e3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5 = .DEBUG	0x01e3,0x0346,0x0001,0x0000,0x0056,0xb985,0x0000,0x058a
													; Debug Table 0x5.0x0 = 0x1e3,0x1
01e4 00db       |    |		Load_Top	At_Offset_3
01e5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01e6 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x1 = 0x1e6,0x2
01e7 00db       |    |		Load_Top	At_Offset_3
01e8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01e9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01ea 0000 0000  |    |		.BLANK	0000[0x6]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x01f3,0x034c,0x0001,0x0000,0x0056,0xb985,0x0000,0x0596
													; Debug Table 0x6.0x0 = 0x1f3,0x1
01f4 00dc       |    |		Load_Top	At_Offset_4
01f5 017d       | }  |		Execute	Record,Structure_Write
01f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01f7 0000       |    |		.XXX[0x1]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7 = .DEBUG	0x01fb,0x0350,0x0001,0x0000,0x0056,0xb985,0x0000,0x05a6
													; Debug Table 0x7.0x0 = 0x1fb,0x1
01fc 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01fd 00de       |    |		Load_Top	At_Offset_6
01fe 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01ff 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x1 = 0x1ff,0x2
0200 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0201 00de       |    |		Load_Top	At_Offset_6
0202 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0203 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0204 0000 0000  |    |		.BLANK	0000[0x4]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b e00c       |    |		Load	0x0,0xc								; Debug Table 0x8 = .DEBUG	0x020b,0x0356,0x0002,0x0000,0x0056,0xb985,0x0000,0x05ba
													; Debug Table 0x8.0x0 = 0x20b,0x1
020c 012c       | ,  |		Execute	Any,Size
020d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020e 0000 0000  |    |		.XXX[0x2]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0215       |    |		.CONST	0x0215								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0002       |    |		.CONST	0x0002								; Number of locals
0213			INIT_0210:
0213 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9 = .DEBUG	0x0213,0x035a,0x0001,0x0000,0x0056,0xb985,0x0000,0x05c3
													; Debug Table 0x9.0x0 = 0x213,0xffff
0214 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0215			BODY_0210:
0215 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x1 = 0x215,0x1
0216 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0217 4603       |F   |		Jump_Case	0x4
0218 7803       |x   |		Jump	0x21c								; case 0x0
0219 7807       |x   |		Jump	0x221								; case 0x1
021a 780b       |x   |		Jump	0x226								; case 0x2
021b 780f       |x   |		Jump	0x22b								; case 0x3
021c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x2 = 0x21c,0x2
021d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
021e 00d9       |    |		Load_Top	At_Offset_1
021f 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0220 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0221 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3 = 0x221,0x3
0222 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0223 00dc       |    |		Load_Top	At_Offset_4
0224 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0225 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0226 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x4 = 0x226,0x4
0227 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0228 00d9       |    |		Load_Top	At_Offset_1
0229 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
022a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
022b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x5 = 0x22b,0x5
022c 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
022d 00dc       |    |		Load_Top	At_Offset_4
022e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
022f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 023c       | <  |		.CONST	0x023c								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0004       |    |		.CONST	0x0004								; Number of locals
0233			INIT_0230:
0233 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa = .DEBUG	0x0233,0x0368,0x0001,0x0000,0x0056,0xba55,0x0000,0x0086
													; Debug Table 0xa.0x0 = 0x233,0xffff
0234 e009       |    |		Load	0x0,0x9
0235 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0236 e009       |    |		Load	0x0,0x9
0237 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0238 03f1       |    |		Declare_Variable	Discrete,With_Value
0239 e005       |    |		Load	0x0,0x5								; Debug Table 0xa.0x1 = 0x239,0xfffe
023a 0322       | "  |		Declare_Variable	Record
023b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xa.0x2 = 0x23b,0xfffd
023c			BODY_0230:
023c 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0xa.0x3 = 0x23c,0x1
023d 0217       |    |		Execute	Heap_Access,All_Reference
023e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
023f 0aff       |    |		Execute_Immediate	Plus,-0x1
0240 0248       | H  |		Execute	Discrete,Check_In_Integer
0241 480a       |H   |		Short_Literal	0xa
0242 e008       |    |		Load	0x0,0x8
0243 025c       | \  |		QQucode_0x025c
0244 0263       | c  |		Execute	Discrete,Above_Bound
0245 7020       |p   |		Jump_Nonzero	0x266
0246 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xa.0x4 = 0x246,0x2
0247 00dc       |    |		Load_Top	At_Offset_4
0248 e007       |    |		Load	0x0,0x7
0249 0322       | "  |		Declare_Variable	Record
024a 00db       |    |		Load_Top	At_Offset_3
024b 00d9       |    |		Load_Top	At_Offset_1
024c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
024d e402       |    |		Load	0x2,0x2
024e 00d9       |    |		Load_Top	At_Offset_1
024f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0250 e5ff       |    |		Load	0x2,-0x1
0251 0217       |    |		Execute	Heap_Access,All_Reference
0252 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0253 e002       |    |		Load	0x0,0x2
0254 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0255 00d1       |    |		Pop_Control	Pop_Count_1
0256 005b       | [  |		Store_Top	Discrete,At_Offset_3
0257 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x5 = 0x257,0x3
0258 6806       |h   |		Jump_Zero	0x25f
0259 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x6 = 0x259,0x4
025a 800a       |    |		Call	0x0,0xa
025b 00d9       |    |		Load_Top	At_Offset_1
025c e5fd       |    |		Load	0x2,-0x3
025d 01d6       |    |		Execute	Vector,Field_Write
025e 7806       |x   |		Jump	0x265
025f 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x7 = 0x25f,0x5
0260 e009       |    |		Load	0x0,0x9
0261 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0262 00d9       |    |		Load_Top	At_Offset_1
0263 e5fd       |    |		Load	0x2,-0x3
0264 01d6       |    |		Execute	Vector,Field_Write
0265 3fe0       |?   |		Loop_Increasing	0x246
0266 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0267 0000       |    |		.XXX[0x1]
0268 ; --------------------------------------------------------------------------------------
0268 ; Debug Table
0268 ; --------------------------------------------------------------------------------------
0268 0003 000b  |    |		.CONST	0x0003,0x000b
026a 000b 02c2  |    |		.DEBUG	0x000b,0x02c2,0x0000,0x0000,0x0056,0xb985,0x0000,0x0563
0272 001c 02d4  |    |		.DEBUG	0x001c,0x02d4,0x0000,0x0000,0x0056,0xba55,0x0000,0x0004
027a 0033 02e8  | 3  |		.DEBUG	0x0033,0x02e8,0x0001,0x0000,0x0056,0xb985,0x0000,0x0564
0282 0063 02fa  | c  |		.DEBUG	0x0063,0x02fa,0x0001,0x0000,0x0056,0xb985,0x0000,0x0572
028a 0093 0304  |    |		.DEBUG	0x0093,0x0304,0x0001,0x0000,0x0056,0xb985,0x0000,0x057e
0292 01e3 0346  |   F|		.DEBUG	0x01e3,0x0346,0x0001,0x0000,0x0056,0xb985,0x0000,0x058a
029a 01f3 034c  |   L|		.DEBUG	0x01f3,0x034c,0x0001,0x0000,0x0056,0xb985,0x0000,0x0596
02a2 01fb 0350  |   P|		.DEBUG	0x01fb,0x0350,0x0001,0x0000,0x0056,0xb985,0x0000,0x05a6
02aa 020b 0356  |   V|		.DEBUG	0x020b,0x0356,0x0002,0x0000,0x0056,0xb985,0x0000,0x05ba
02b2 0213 035a  |   Z|		.DEBUG	0x0213,0x035a,0x0001,0x0000,0x0056,0xb985,0x0000,0x05c3
02ba 0233 0368  | 3 h|		.DEBUG	0x0233,0x0368,0x0001,0x0000,0x0056,0xba55,0x0000,0x0086
02c2 ; --------------------------------------------------------------------------------------
02c2 ; Debug3 Subtable 0x0
02c2 ; --------------------------------------------------------------------------------------
02c2 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
02c4 000b ffff  |    |		.CONST	0x000b,0xffff
02c6 000d fffe  |    |		.CONST	0x000d,0xfffe
02c8 000f fffd  |    |		.CONST	0x000f,0xfffd
02ca 0011 fffc  |    |		.CONST	0x0011,0xfffc
02cc 0013 fffb  |    |		.CONST	0x0013,0xfffb
02ce 0015 fffa  |    |		.CONST	0x0015,0xfffa
02d0 0017 fff9  |    |		.CONST	0x0017,0xfff9
02d2 0019 fff8  |    |		.CONST	0x0019,0xfff8
02d4 ; --------------------------------------------------------------------------------------
02d4 ; Debug3 Subtable 0x1
02d4 ; --------------------------------------------------------------------------------------
02d4 0009 0000  |    |		.DBG3TAB	0x0009,0x0000
02d6 001c ffff  |    |		.CONST	0x001c,0xffff
02d8 001e fffe  |    |		.CONST	0x001e,0xfffe
02da 0020 fffd  |    |		.CONST	0x0020,0xfffd
02dc 0022 fffc  | "  |		.CONST	0x0022,0xfffc
02de 0024 fffb  | $  |		.CONST	0x0024,0xfffb
02e0 0026 fffa  | &  |		.CONST	0x0026,0xfffa
02e2 0028 fff9  | (  |		.CONST	0x0028,0xfff9
02e4 002a fff8  | *  |		.CONST	0x002a,0xfff8
02e6 002c fff7  | ,  |		.CONST	0x002c,0xfff7
02e8 ; --------------------------------------------------------------------------------------
02e8 ; Debug3 Subtable 0x2
02e8 ; --------------------------------------------------------------------------------------
02e8 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
02ea 0033 ffff  | 3  |		.CONST	0x0033,0xffff
02ec 0034 0001  | 4  |		.CONST	0x0034,0x0001
02ee 0038 0002  | 8  |		.CONST	0x0038,0x0002
02f0 0038 0003  | 8  |		.CONST	0x0038,0x0003
02f2 003c 0004  | <  |		.CONST	0x003c,0x0004
02f4 0047 0005  | G  |		.CONST	0x0047,0x0005
02f6 0052 0006  | R  |		.CONST	0x0052,0x0006
02f8 005c 0007  | \  |		.CONST	0x005c,0x0007
02fa ; --------------------------------------------------------------------------------------
02fa ; Debug3 Subtable 0x3
02fa ; --------------------------------------------------------------------------------------
02fa 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
02fc 0063 0001  | c  |		.CONST	0x0063,0x0001
02fe 0069 0002  | i  |		.CONST	0x0069,0x0002
0300 0075 0003  | u  |		.CONST	0x0075,0x0003
0302 0081 0004  |    |		.CONST	0x0081,0x0004
0304 ; --------------------------------------------------------------------------------------
0304 ; Debug3 Subtable 0x4
0304 ; --------------------------------------------------------------------------------------
0304 0004 001c  |    |		.DBG3TAB	0x0004,0x001c
0306 0093 ffff  |    |		.CONST	0x0093,0xffff
0308 0095 fffe  |    |		.CONST	0x0095,0xfffe
030a 0096 fffd  |    |		.CONST	0x0096,0xfffd
030c 0098 fffc  |    |		.CONST	0x0098,0xfffc
030e 009a 0001  |    |		.CONST	0x009a,0x0001
0310 00a8 0002  |    |		.CONST	0x00a8,0x0002
0312 00c0 0003  |    |		.CONST	0x00c0,0x0003
0314 00c2 0004  |    |		.CONST	0x00c2,0x0004
0316 00c8 0005  |    |		.CONST	0x00c8,0x0005
0318 00cd 0006  |    |		.CONST	0x00cd,0x0006
031a 00f5 0007  |    |		.CONST	0x00f5,0x0007
031c 011d 0008  |    |		.CONST	0x011d,0x0008
031e 0132 0009  | 2  |		.CONST	0x0132,0x0009
0320 0137 000a  | 7  |		.CONST	0x0137,0x000a
0322 0141 000b  | A  |		.CONST	0x0141,0x000b
0324 0158 000c  | X  |		.CONST	0x0158,0x000c
0326 0160 000d  | `  |		.CONST	0x0160,0x000d
0328 0169 000e  | i  |		.CONST	0x0169,0x000e
032a 0174 000f  | t  |		.CONST	0x0174,0x000f
032c 0176 0010  | v  |		.CONST	0x0176,0x0010
032e 017a 0011  | z  |		.CONST	0x017a,0x0011
0330 017f 0012  |    |		.CONST	0x017f,0x0012
0332 018c 0013  |    |		.CONST	0x018c,0x0013
0334 0190 0014  |    |		.CONST	0x0190,0x0014
0336 0194 0015  |    |		.CONST	0x0194,0x0015
0338 0199 0016  |    |		.CONST	0x0199,0x0016
033a 01a4 0017  |    |		.CONST	0x01a4,0x0017
033c 01ad 0018  |    |		.CONST	0x01ad,0x0018
033e 01b7 0019  |    |		.CONST	0x01b7,0x0019
0340 01c1 001a  |    |		.CONST	0x01c1,0x001a
0342 01cd 001b  |    |		.CONST	0x01cd,0x001b
0344 01d5 001c  |    |		.CONST	0x01d5,0x001c
0346 ; --------------------------------------------------------------------------------------
0346 ; Debug3 Subtable 0x5
0346 ; --------------------------------------------------------------------------------------
0346 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0348 01e3 0001  |    |		.CONST	0x01e3,0x0001
034a 01e6 0002  |    |		.CONST	0x01e6,0x0002
034c ; --------------------------------------------------------------------------------------
034c ; Debug3 Subtable 0x6
034c ; --------------------------------------------------------------------------------------
034c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
034e 01f3 0001  |    |		.CONST	0x01f3,0x0001
0350 ; --------------------------------------------------------------------------------------
0350 ; Debug3 Subtable 0x7
0350 ; --------------------------------------------------------------------------------------
0350 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0352 01fb 0001  |    |		.CONST	0x01fb,0x0001
0354 01ff 0002  |    |		.CONST	0x01ff,0x0002
0356 ; --------------------------------------------------------------------------------------
0356 ; Debug3 Subtable 0x8
0356 ; --------------------------------------------------------------------------------------
0356 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0358 020b 0001  |    |		.CONST	0x020b,0x0001
035a ; --------------------------------------------------------------------------------------
035a ; Debug3 Subtable 0x9
035a ; --------------------------------------------------------------------------------------
035a 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
035c 0213 ffff  |    |		.CONST	0x0213,0xffff
035e 0215 0001  |    |		.CONST	0x0215,0x0001
0360 021c 0002  |    |		.CONST	0x021c,0x0002
0362 0221 0003  | !  |		.CONST	0x0221,0x0003
0364 0226 0004  | &  |		.CONST	0x0226,0x0004
0366 022b 0005  | +  |		.CONST	0x022b,0x0005
0368 ; --------------------------------------------------------------------------------------
0368 ; Debug3 Subtable 0xa
0368 ; --------------------------------------------------------------------------------------
0368 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
036a 0233 ffff  | 3  |		.CONST	0x0233,0xffff
036c 0239 fffe  | 9  |		.CONST	0x0239,0xfffe
036e 023b fffd  | ;  |		.CONST	0x023b,0xfffd
0370 023c 0001  | <  |		.CONST	0x023c,0x0001
0372 0246 0002  | F  |		.CONST	0x0246,0x0002
0374 0257 0003  | W  |		.CONST	0x0257,0x0003
0376 0259 0004  | Y  |		.CONST	0x0259,0x0004
0378 025f 0005  | _  |		.CONST	0x025f,0x0005
037a 0000 0000  |    |		.BLANK	0000[0x86]