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

⟦bed31f7ba⟧

    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 01d0       |    |		.CONST	0x01d0								; 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 0064       | d  |		.CONST	0x0064								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0014       |    |		.CONST	0x0014								; Number of locals
000b			INIT_0008:
000b 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x020a,0x0000,0x0000,0x0057,0x9775,0x0000,0x0431
													; 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 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 00bf       |    |		Action	Accept_Activation
0012 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0012,0x0212,0x0000,0x0000,0x0057,0x9785,0x0000,0x0008
													; Debug Table 0x1.0x0 = 0x12,0xffff
0013 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x13,0xfffe
0014 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x14,0xfffd
0015 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x15,0xfffc
0016 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x16,0xfffb
0017 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x5 = 0x17,0xfffa
0018 61b3       |a   |		Indirect_Literal	Discrete,0x1cc,{0x004e300e, 0x000000b0}
0019 02a0       |    |		Declare_Subprogram	Null_Subprogram
001a 038e       |    |		Declare_Type	Package,Defined
001b 0387       |    |		Declare_Variable	Package
001c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x6 = 0x1c,0xfff9
001d 61aa       |a   |		Indirect_Literal	Discrete,0x1c8,{0x004e340e, 0x000000b0}
001e 02a0       |    |		Declare_Subprogram	Null_Subprogram
001f 038e       |    |		Declare_Type	Package,Defined
0020 0387       |    |		Declare_Variable	Package
0021 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x7 = 0x21,0xfff8
0022 61a1       |a   |		Indirect_Literal	Discrete,0x1c4,{0x004e380e, 0x000000b0}
0023 02a0       |    |		Declare_Subprogram	Null_Subprogram
0024 038e       |    |		Declare_Type	Package,Defined
0025 0387       |    |		Declare_Variable	Package
0026 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x8 = 0x26,0xfff7
0027 00c7       |    |		Action	Elaborate_Subprogram
0028 029d 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call			; Debug Table 0x1.0x9 = 0x28,0xfff6
002a 029d 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call			; Debug Table 0x1.0xa = 0x2a,0xfff5
002c 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0xb = 0x2c,0xfff4
002d 00c7       |    |		Action	Elaborate_Subprogram
002e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0xc = 0x2e,0xfff3
002f 00c7       |    |		Action	Elaborate_Subprogram
0030 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0xd = 0x30,0xfff2
0031 e002       |    |		Load	0x0,0x2
0032 e003       |    |		Load	0x0,0x3
0033 e004       |    |		Load	0x0,0x4
0034 e005       |    |		Load	0x0,0x5
0035 e006       |    |		Load	0x0,0x6
0036 e007       |    |		Load	0x0,0x7
0037 e008       |    |		Load	0x0,0x8
0038 e009       |    |		Load	0x0,0x9
0039 e00a       |    |		Load	0x0,0xa
003a e00b       |    |		Load	0x0,0xb
003b e00c       |    |		Load	0x0,0xc
003c e00d       |    |		Load	0x0,0xd
003d 480d       |H   |		Short_Literal	0xd
003e e210       |    |		Load	0x1,0x10
003f 020e       |    |		Execute	Module,Augment_Imports
0040 e210       |    |		Load	0x1,0x10
0041 020f       |    |		Execute	Module,Activate
0042 e210       |    |		Load	0x1,0x10							; Debug Table 0x1.0xe = 0x42,0xfff1
0043 e001       |    |		Load	0x0,0x1
0044 e00c       |    |		Load	0x0,0xc
0045 e00e       |    |		Load	0x0,0xe
0046 e00f       |    |		Load	0x0,0xf
0047 e010       |    |		Load	0x0,0x10
0048 e002       |    |		Load	0x0,0x2
0049 e011       |    |		Load	0x0,0x11
004a e008       |    |		Load	0x0,0x8
004b e012       |    |		Load	0x0,0x12
004c e00d       |    |		Load	0x0,0xd
004d 480b       |H   |		Short_Literal	0xb
004e e211       |    |		Load	0x1,0x11
004f 020e       |    |		Execute	Module,Augment_Imports
0050 00db       |    |		Load_Top	At_Offset_3
0051 020f       |    |		Execute	Module,Activate
0052 e013       |    |		Load	0x0,0x13							; Debug Table 0x1.0xf = 0x52,0xfff0
0053 e010       |    |		Load	0x0,0x10
0054 e001       |    |		Load	0x0,0x1
0055 e011       |    |		Load	0x0,0x11
0056 e014       |    |		Load	0x0,0x14
0057 e008       |    |		Load	0x0,0x8
0058 e00c       |    |		Load	0x0,0xc
0059 e012       |    |		Load	0x0,0x12
005a e00d       |    |		Load	0x0,0xd
005b e002       |    |		Load	0x0,0x2
005c e00e       |    |		Load	0x0,0xe
005d e015       |    |		Load	0x0,0x15
005e e00f       |    |		Load	0x0,0xf
005f 480d       |H   |		Short_Literal	0xd
0060 e212       |    |		Load	0x1,0x12
0061 020e       |    |		Execute	Module,Augment_Imports
0062 00da       |    |		Load_Top	At_Offset_2
0063 020f       |    |		Execute	Module,Activate
0064			BODY_0008:
0064 00bc       |    |		Action	Signal_Activated
0065 00bb       |    |		Action	Signal_Completion
0066 0000 0000  |    |		.XXX[0x2]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006d       | m  |		.CONST	0x006d								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0002       |    |		.CONST	0x0002								; Number of locals
006b			INIT_0068:
006b e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x006b,0x0234,0x0001,0x0000,0x0057,0x9775,0x0000,0x0432
													; Debug Table 0x2.0x0 = 0x6b,0xffff
006c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
006d			BODY_0068:
006d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x1 = 0x6d,0x1
006e 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
006f 7004       |p   |		Jump_Nonzero	0x74
0070 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x2 = 0x70,0x2
0071 8213       |    |		Call	0x1,0x13
0072 00d1       |    |		Pop_Control	Pop_Count_1
0073 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x2.0x3 = 0x73,0x3
0074 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x4 = 0x74,0x4
0075 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0076 4609       |F   |		Jump_Case	0xa
0077 785b       |x[  |		Jump	0xd3								; case 0x0
0078 7829       |x)  |		Jump	0xa2								; case 0x1
0079 7807       |x   |		Jump	0x81								; case 0x2
007a 7806       |x   |		Jump	0x81								; case 0x3
007b 7809       |x   |		Jump	0x85								; case 0x4
007c 7808       |x   |		Jump	0x85								; case 0x5
007d 7824       |x$  |		Jump	0xa2								; case 0x6
007e 7823       |x#  |		Jump	0xa2								; case 0x7
007f 7822       |x"  |		Jump	0xa2								; case 0x8
0080 783e       |x>  |		Jump	0xbf								; case 0x9
0081 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x5 = 0x81,0x5
0082 8214       |    |		Call	0x1,0x14
0083 00d1       |    |		Pop_Control	Pop_Count_1
0084 784e       |xN  |		Jump	0xd3
0085 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x6 = 0x85,0x6
0086 e012       |    |		Load	0x0,0x12
0087 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0088 00d1       |    |		Pop_Control	Pop_Count_1
0089 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x7 = 0x89,0x7
008a 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
008b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
008c 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x8 = 0x8c,0x8
008d e5ff       |    |		Load	0x2,-0x1
008e 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
008f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x9 = 0x8f,0x9
0090 e00e       |    |		Load	0x0,0xe
0091 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0092 00d1       |    |		Pop_Control	Pop_Count_1
0093 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0xa = 0x93,0xa
0094 e5ff       |    |		Load	0x2,-0x1
0095 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0096 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xb = 0x96,0xb
0097 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0098 e5ff       |    |		Load	0x2,-0x1
0099 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
009a e010       |    |		Load	0x0,0x10
009b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
009c e5ff       |    |		Load	0x2,-0x1
009d 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
009e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xc = 0x9e,0xc
009f 8214       |    |		Call	0x1,0x14
00a0 00d1       |    |		Pop_Control	Pop_Count_1
00a1 7831       |x1  |		Jump	0xd3
00a2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xd = 0xa2,0xd
00a3 e012       |    |		Load	0x0,0x12
00a4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00a5 00d1       |    |		Pop_Control	Pop_Count_1
00a6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xe = 0xa6,0xe
00a7 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
00a8 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
00a9 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0xf = 0xa9,0xf
00aa e5ff       |    |		Load	0x2,-0x1
00ab 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
00ac 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x10 = 0xac,0x10
00ad e00e       |    |		Load	0x0,0xe
00ae 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00af 00d1       |    |		Pop_Control	Pop_Count_1
00b0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x11 = 0xb0,0x11
00b1 e5ff       |    |		Load	0x2,-0x1
00b2 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
00b3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x12 = 0xb3,0x12
00b4 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
00b5 e5ff       |    |		Load	0x2,-0x1
00b6 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
00b7 e010       |    |		Load	0x0,0x10
00b8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b9 e5ff       |    |		Load	0x2,-0x1
00ba 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
00bb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x13 = 0xbb,0x13
00bc 8213       |    |		Call	0x1,0x13
00bd 00d1       |    |		Pop_Control	Pop_Count_1
00be 7814       |x   |		Jump	0xd3
00bf 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x14 = 0xbf,0x14
00c0 e012       |    |		Load	0x0,0x12
00c1 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00c2 00d1       |    |		Pop_Control	Pop_Count_1
00c3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x15 = 0xc3,0x15
00c4 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
00c5 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
00c6 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x16 = 0xc6,0x16
00c7 e5ff       |    |		Load	0x2,-0x1
00c8 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
00c9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x17 = 0xc9,0x17
00ca e00e       |    |		Load	0x0,0xe
00cb 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00cc 00d1       |    |		Pop_Control	Pop_Count_1
00cd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x18 = 0xcd,0x18
00ce e5ff       |    |		Load	0x2,-0x1
00cf 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
00d0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x19 = 0xd0,0x19
00d1 8213       |    |		Call	0x1,0x13
00d2 00d1       |    |		Pop_Control	Pop_Count_1
00d3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x1a = 0xd3,0x1b
00d4 e016       |    |		Load	0x0,0x16
00d5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00d6 00d1       |    |		Pop_Control	Pop_Count_1
00d7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x1b = 0xd7,0x1c
00d8 e016       |    |		Load	0x0,0x16
00d9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00da 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00db 0000 0000  |    |		.BLANK	0000[0x5]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3       |    |		.CONST	0x00e3								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0001       |    |		.CONST	0x0001								; Number of locals
00e3			BODY_00e0:
00e3			INIT_00e0:
00e3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00e3,0x026e,0x0001,0x0000,0x0057,0x9775,0x0000,0x043a
													; Debug Table 0x3.0x0 = 0xe3,0x1
00e4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e5 0217       |    |		Execute	Heap_Access,All_Reference
00e6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e7 4605       |F   |		Jump_Case	0x6
00e8 7805       |x   |		Jump	0xee								; case 0x0
00e9 780e       |x   |		Jump	0xf8								; case 0x1
00ea 783d       |x=  |		Jump	0x128								; case 0x2
00eb 7860       |x`  |		Jump	0x14c								; case 0x3
00ec 785f       |x_  |		Jump	0x14c								; case 0x4
00ed 785e       |x^  |		Jump	0x14c								; case 0x5
00ee 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x1 = 0xee,0x2
00ef 820d       |    |		Call	0x1,0xd
00f0 00d1       |    |		Pop_Control	Pop_Count_1
00f1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x2 = 0xf1,0x3
00f2 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
00f3 00db       |    |		Load_Top	At_Offset_3
00f4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00f5 0217       |    |		Execute	Heap_Access,All_Reference
00f6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x3.0x3 = 0xf7,0x4
00f8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x4 = 0xf8,0x5
00f9 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
00fa 7004       |p   |		Jump_Nonzero	0xff
00fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x5 = 0xfb,0x6
00fc 8213       |    |		Call	0x1,0x13
00fd 00d1       |    |		Pop_Control	Pop_Count_1
00fe 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x3.0x6 = 0xfe,0x7
00ff 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x7 = 0xff,0x8
0100 e016       |    |		Load	0x0,0x16
0101 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0102 00d1       |    |		Pop_Control	Pop_Count_1
0103 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x8 = 0x103,0x9
0104 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0105 e008       |    |		Load	0x0,0x8
0106 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0107 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x9 = 0x107,0xa
0108 e00e       |    |		Load	0x0,0xe
0109 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
010a 00d1       |    |		Pop_Control	Pop_Count_1
010b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0xa = 0x10b,0xb
010c 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
010d 00db       |    |		Load_Top	At_Offset_3
010e 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
010f e010       |    |		Load	0x0,0x10
0110 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0111 00db       |    |		Load_Top	At_Offset_3
0112 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0113 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0xb = 0x113,0xc
0114 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0115 4609       |F   |		Jump_Case	0xa
0116 780d       |x   |		Jump	0x124								; case 0x0
0117 780c       |x   |		Jump	0x124								; case 0x1
0118 780b       |x   |		Jump	0x124								; case 0x2
0119 780a       |x   |		Jump	0x124								; case 0x3
011a 7805       |x   |		Jump	0x120								; case 0x4
011b 7804       |x   |		Jump	0x120								; case 0x5
011c 7807       |x   |		Jump	0x124								; case 0x6
011d 7806       |x   |		Jump	0x124								; case 0x7
011e 7805       |x   |		Jump	0x124								; case 0x8
011f 7804       |x   |		Jump	0x124								; case 0x9
0120 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0xc = 0x120,0xd
0121 8214       |    |		Call	0x1,0x14
0122 00d1       |    |		Pop_Control	Pop_Count_1
0123 7833       |x3  |		Jump	0x157
0124 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0xd = 0x124,0xe
0125 8213       |    |		Call	0x1,0x13
0126 00d1       |    |		Pop_Control	Pop_Count_1
0127 782f       |x/  |		Jump	0x157
0128 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0xe = 0x128,0xf
0129 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
012a 7004       |p   |		Jump_Nonzero	0x12f
012b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0xf = 0x12b,0x10
012c 8213       |    |		Call	0x1,0x13
012d 00d1       |    |		Pop_Control	Pop_Count_1
012e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x3.0x10 = 0x12e,0x11
012f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x11 = 0x12f,0x12
0130 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0131 00db       |    |		Load_Top	At_Offset_3
0132 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0133 e010       |    |		Load	0x0,0x10
0134 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0135 00db       |    |		Load_Top	At_Offset_3
0136 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0137 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x12 = 0x137,0x13
0138 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0139 4609       |F   |		Jump_Case	0xa
013a 780d       |x   |		Jump	0x148								; case 0x0
013b 780c       |x   |		Jump	0x148								; case 0x1
013c 780b       |x   |		Jump	0x148								; case 0x2
013d 780a       |x   |		Jump	0x148								; case 0x3
013e 7805       |x   |		Jump	0x144								; case 0x4
013f 7804       |x   |		Jump	0x144								; case 0x5
0140 7807       |x   |		Jump	0x148								; case 0x6
0141 7806       |x   |		Jump	0x148								; case 0x7
0142 7805       |x   |		Jump	0x148								; case 0x8
0143 7804       |x   |		Jump	0x148								; case 0x9
0144 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x13 = 0x144,0x14
0145 8214       |    |		Call	0x1,0x14
0146 00d1       |    |		Pop_Control	Pop_Count_1
0147 780f       |x   |		Jump	0x157
0148 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x14 = 0x148,0x15
0149 8213       |    |		Call	0x1,0x13
014a 00d1       |    |		Pop_Control	Pop_Count_1
014b 780b       |x   |		Jump	0x157
014c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x15 = 0x14c,0x16
014d 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
014e 00db       |    |		Load_Top	At_Offset_3
014f 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0150 e010       |    |		Load	0x0,0x10
0151 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0152 00db       |    |		Load_Top	At_Offset_3
0153 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0154 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x16 = 0x154,0x17
0155 8213       |    |		Call	0x1,0x13
0156 00d1       |    |		Pop_Control	Pop_Count_1
0157 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x17 = 0x157,0x18
0158 e016       |    |		Load	0x0,0x16
0159 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
015a 00d1       |    |		Pop_Control	Pop_Count_1
015b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x18 = 0x15b,0x19
015c e016       |    |		Load	0x0,0x16
015d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
015e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x19 = 0x15e,0x1a
015f 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0160 00db       |    |		Load_Top	At_Offset_3
0161 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0162 0217       |    |		Execute	Heap_Access,All_Reference
0163 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0164 027d       | }  |		Execute	Discrete,Greater
0165 6806       |h   |		Jump_Zero	0x16c
0166 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x1a = 0x166,0x1b
0167 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0168 00db       |    |		Load_Top	At_Offset_3
0169 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
016a 0217       |    |		Execute	Heap_Access,All_Reference
016b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
016c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
016d 0000 0000  |    |		.XXX[0x3]
016f 0000       |    |
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4 = .DEBUG	0x0173,0x02a6,0x0001,0x0000,0x0057,0x9775,0x0000,0x0442
													; Debug Table 0x4.0x0 = 0x173,0x1
0174 00db       |    |		Load_Top	At_Offset_3
0175 e210       |    |		Load	0x1,0x10
0176 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0177 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b       | {  |		.CONST	0x017b								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0001       |    |		.CONST	0x0001								; Number of locals
017b			BODY_0178:
017b			INIT_0178:
017b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x017b,0x02aa,0x0001,0x0000,0x0057,0x9785,0x0000,0x008d
													; Debug Table 0x5.0x0 = 0x17b,0x1
017c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
017d 4605       |F   |		Jump_Case	0x6
017e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x0
017f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x1
0180 7808       |x   |		Jump	0x189								; case 0x2
0181 7807       |x   |		Jump	0x189								; case 0x3
0182 7801       |x   |		Jump	0x184								; case 0x4
0183 780a       |x   |		Jump	0x18e								; case 0x5
0184 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x1 = 0x184,0x2
0185 e210       |    |		Load	0x1,0x10
0186 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0187 00d1       |    |		Pop_Control	Pop_Count_1
0188 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0189 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x2 = 0x189,0x3
018a e212       |    |		Load	0x1,0x12
018b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
018c 00d1       |    |		Pop_Control	Pop_Count_1
018d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
018e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x3 = 0x18e,0x4
018f e211       |    |		Load	0x1,0x11
0190 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0191 00d1       |    |		Pop_Control	Pop_Count_1
0192 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0193 0000 0000  |    |		.BLANK	0000[0x5]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x019b,0x02b4,0x0001,0x0000,0x0057,0x9785,0x0000,0x00c2
													; Debug Table 0x6.0x0 = 0x19b,0x1
019c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
019d 4605       |F   |		Jump_Case	0x6
019e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x0
019f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x1
01a0 781d       |x   |		Jump	0x1be								; case 0x2
01a1 781c       |x   |		Jump	0x1be								; case 0x3
01a2 7801       |x   |		Jump	0x1a4								; case 0x4
01a3 780d       |x   |		Jump	0x1b1								; case 0x5
01a4 4803       |H   |		Short_Literal	0x3							; Debug Table 0x6.0x1 = 0x1a4,0x2
01a5 00db       |    |		Load_Top	At_Offset_3
01a6 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01a7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x2 = 0x1a7,0x3
01a8 8213       |    |		Call	0x1,0x13
01a9 00d1       |    |		Pop_Control	Pop_Count_1
01aa 4804       |H   |		Short_Literal	0x4							; Debug Table 0x6.0x3 = 0x1aa,0x4
01ab 00db       |    |		Load_Top	At_Offset_3
01ac 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01ad 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x4 = 0x1ad,0x5
01ae 8213       |    |		Call	0x1,0x13
01af 00d1       |    |		Pop_Control	Pop_Count_1
01b0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01b1 4803       |H   |		Short_Literal	0x3							; Debug Table 0x6.0x5 = 0x1b1,0x6
01b2 00db       |    |		Load_Top	At_Offset_3
01b3 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01b4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x6 = 0x1b4,0x7
01b5 8213       |    |		Call	0x1,0x13
01b6 00d1       |    |		Pop_Control	Pop_Count_1
01b7 4805       |H   |		Short_Literal	0x5							; Debug Table 0x6.0x7 = 0x1b7,0x8
01b8 00db       |    |		Load_Top	At_Offset_3
01b9 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01ba 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x8 = 0x1ba,0x9
01bb 8213       |    |		Call	0x1,0x13
01bc 00d1       |    |		Pop_Control	Pop_Count_1
01bd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01be 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x9 = 0x1be,0xa
01bf 8213       |    |		Call	0x1,0x13
01c0 00d1       |    |		Pop_Control	Pop_Count_1
01c1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01c2 0000 0000  |    |		.XXX[0x2]
01c4 004e 380e  | N8 |		.LITERAL	{0x004e380e, 0x000000b0}
01c8 004e 340e  | N4 |		.LITERAL	{0x004e340e, 0x000000b0}
01cc 004e 300e  | N0 |		.LITERAL	{0x004e300e, 0x000000b0}
01d0 ; --------------------------------------------------------------------------------------
01d0 ; Debug Table
01d0 ; --------------------------------------------------------------------------------------
01d0 0003 0007  |    |		.CONST	0x0003,0x0007
01d2 000b 020a  |    |		.DEBUG	0x000b,0x020a,0x0000,0x0000,0x0057,0x9775,0x0000,0x0431
01da 0012 0212  |    |		.DEBUG	0x0012,0x0212,0x0000,0x0000,0x0057,0x9785,0x0000,0x0008
01e2 006b 0234  | k 4|		.DEBUG	0x006b,0x0234,0x0001,0x0000,0x0057,0x9775,0x0000,0x0432
01ea 00e3 026e  |   n|		.DEBUG	0x00e3,0x026e,0x0001,0x0000,0x0057,0x9775,0x0000,0x043a
01f2 0173 02a6  | s  |		.DEBUG	0x0173,0x02a6,0x0001,0x0000,0x0057,0x9775,0x0000,0x0442
01fa 017b 02aa  | {  |		.DEBUG	0x017b,0x02aa,0x0001,0x0000,0x0057,0x9785,0x0000,0x008d
0202 019b 02b4  |    |		.DEBUG	0x019b,0x02b4,0x0001,0x0000,0x0057,0x9785,0x0000,0x00c2
020a ; --------------------------------------------------------------------------------------
020a ; Debug3 Subtable 0x0
020a ; --------------------------------------------------------------------------------------
020a 0003 0000  |    |		.DBG3TAB	0x0003,0x0000
020c 000b ffff  |    |		.CONST	0x000b,0xffff
020e 000d fffe  |    |		.CONST	0x000d,0xfffe
0210 000f fffd  |    |		.CONST	0x000f,0xfffd
0212 ; --------------------------------------------------------------------------------------
0212 ; Debug3 Subtable 0x1
0212 ; --------------------------------------------------------------------------------------
0212 0010 0000  |    |		.DBG3TAB	0x0010,0x0000
0214 0012 ffff  |    |		.CONST	0x0012,0xffff
0216 0013 fffe  |    |		.CONST	0x0013,0xfffe
0218 0014 fffd  |    |		.CONST	0x0014,0xfffd
021a 0015 fffc  |    |		.CONST	0x0015,0xfffc
021c 0016 fffb  |    |		.CONST	0x0016,0xfffb
021e 0017 fffa  |    |		.CONST	0x0017,0xfffa
0220 001c fff9  |    |		.CONST	0x001c,0xfff9
0222 0021 fff8  | !  |		.CONST	0x0021,0xfff8
0224 0026 fff7  | &  |		.CONST	0x0026,0xfff7
0226 0028 fff6  | (  |		.CONST	0x0028,0xfff6
0228 002a fff5  | *  |		.CONST	0x002a,0xfff5
022a 002c fff4  | ,  |		.CONST	0x002c,0xfff4
022c 002e fff3  | .  |		.CONST	0x002e,0xfff3
022e 0030 fff2  | 0  |		.CONST	0x0030,0xfff2
0230 0042 fff1  | B  |		.CONST	0x0042,0xfff1
0232 0052 fff0  | R  |		.CONST	0x0052,0xfff0
0234 ; --------------------------------------------------------------------------------------
0234 ; Debug3 Subtable 0x2
0234 ; --------------------------------------------------------------------------------------
0234 0001 001b  |    |		.DBG3TAB	0x0001,0x001b
0236 006b ffff  | k  |		.CONST	0x006b,0xffff
0238 006d 0001  | m  |		.CONST	0x006d,0x0001
023a 0070 0002  | p  |		.CONST	0x0070,0x0002
023c 0073 0003  | s  |		.CONST	0x0073,0x0003
023e 0074 0004  | t  |		.CONST	0x0074,0x0004
0240 0081 0005  |    |		.CONST	0x0081,0x0005
0242 0085 0006  |    |		.CONST	0x0085,0x0006
0244 0089 0007  |    |		.CONST	0x0089,0x0007
0246 008c 0008  |    |		.CONST	0x008c,0x0008
0248 008f 0009  |    |		.CONST	0x008f,0x0009
024a 0093 000a  |    |		.CONST	0x0093,0x000a
024c 0096 000b  |    |		.CONST	0x0096,0x000b
024e 009e 000c  |    |		.CONST	0x009e,0x000c
0250 00a2 000d  |    |		.CONST	0x00a2,0x000d
0252 00a6 000e  |    |		.CONST	0x00a6,0x000e
0254 00a9 000f  |    |		.CONST	0x00a9,0x000f
0256 00ac 0010  |    |		.CONST	0x00ac,0x0010
0258 00b0 0011  |    |		.CONST	0x00b0,0x0011
025a 00b3 0012  |    |		.CONST	0x00b3,0x0012
025c 00bb 0013  |    |		.CONST	0x00bb,0x0013
025e 00bf 0014  |    |		.CONST	0x00bf,0x0014
0260 00c3 0015  |    |		.CONST	0x00c3,0x0015
0262 00c6 0016  |    |		.CONST	0x00c6,0x0016
0264 00c9 0017  |    |		.CONST	0x00c9,0x0017
0266 00cd 0018  |    |		.CONST	0x00cd,0x0018
0268 00d0 0019  |    |		.CONST	0x00d0,0x0019
026a 00d3 001b  |    |		.CONST	0x00d3,0x001b
026c 00d7 001c  |    |		.CONST	0x00d7,0x001c
026e ; --------------------------------------------------------------------------------------
026e ; Debug3 Subtable 0x3
026e ; --------------------------------------------------------------------------------------
026e 0000 001b  |    |		.DBG3TAB	0x0000,0x001b
0270 00e3 0001  |    |		.CONST	0x00e3,0x0001
0272 00ee 0002  |    |		.CONST	0x00ee,0x0002
0274 00f1 0003  |    |		.CONST	0x00f1,0x0003
0276 00f7 0004  |    |		.CONST	0x00f7,0x0004
0278 00f8 0005  |    |		.CONST	0x00f8,0x0005
027a 00fb 0006  |    |		.CONST	0x00fb,0x0006
027c 00fe 0007  |    |		.CONST	0x00fe,0x0007
027e 00ff 0008  |    |		.CONST	0x00ff,0x0008
0280 0103 0009  |    |		.CONST	0x0103,0x0009
0282 0107 000a  |    |		.CONST	0x0107,0x000a
0284 010b 000b  |    |		.CONST	0x010b,0x000b
0286 0113 000c  |    |		.CONST	0x0113,0x000c
0288 0120 000d  |    |		.CONST	0x0120,0x000d
028a 0124 000e  | $  |		.CONST	0x0124,0x000e
028c 0128 000f  | (  |		.CONST	0x0128,0x000f
028e 012b 0010  | +  |		.CONST	0x012b,0x0010
0290 012e 0011  | .  |		.CONST	0x012e,0x0011
0292 012f 0012  | /  |		.CONST	0x012f,0x0012
0294 0137 0013  | 7  |		.CONST	0x0137,0x0013
0296 0144 0014  | D  |		.CONST	0x0144,0x0014
0298 0148 0015  | H  |		.CONST	0x0148,0x0015
029a 014c 0016  | L  |		.CONST	0x014c,0x0016
029c 0154 0017  | T  |		.CONST	0x0154,0x0017
029e 0157 0018  | W  |		.CONST	0x0157,0x0018
02a0 015b 0019  | [  |		.CONST	0x015b,0x0019
02a2 015e 001a  | ^  |		.CONST	0x015e,0x001a
02a4 0166 001b  | f  |		.CONST	0x0166,0x001b
02a6 ; --------------------------------------------------------------------------------------
02a6 ; Debug3 Subtable 0x4
02a6 ; --------------------------------------------------------------------------------------
02a6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
02a8 0173 0001  | s  |		.CONST	0x0173,0x0001
02aa ; --------------------------------------------------------------------------------------
02aa ; Debug3 Subtable 0x5
02aa ; --------------------------------------------------------------------------------------
02aa 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
02ac 017b 0001  | {  |		.CONST	0x017b,0x0001
02ae 0184 0002  |    |		.CONST	0x0184,0x0002
02b0 0189 0003  |    |		.CONST	0x0189,0x0003
02b2 018e 0004  |    |		.CONST	0x018e,0x0004
02b4 ; --------------------------------------------------------------------------------------
02b4 ; Debug3 Subtable 0x6
02b4 ; --------------------------------------------------------------------------------------
02b4 0000 000a  |    |		.DBG3TAB	0x0000,0x000a
02b6 019b 0001  |    |		.CONST	0x019b,0x0001
02b8 01a4 0002  |    |		.CONST	0x01a4,0x0002
02ba 01a7 0003  |    |		.CONST	0x01a7,0x0003
02bc 01aa 0004  |    |		.CONST	0x01aa,0x0004
02be 01ad 0005  |    |		.CONST	0x01ad,0x0005
02c0 01b1 0006  |    |		.CONST	0x01b1,0x0006
02c2 01b4 0007  |    |		.CONST	0x01b4,0x0007
02c4 01b7 0008  |    |		.CONST	0x01b7,0x0008
02c6 01ba 0009  |    |		.CONST	0x01ba,0x0009
02c8 01be 000a  |    |		.CONST	0x01be,0x000a
02ca 0000 0000  |    |		.BLANK	0000[0x136]