DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 DFS Tapes

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 DFS Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦45902104c⟧ SEG

    Length: 5120 (0x1400)
    Types: SEG
    Notes: 5811_R1K_CODE
    Names: »16403.SEG«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »16403.SEG« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »16403.SEG« 
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »16403.SEG« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »16403.SEG« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »16403.SEG« 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0558       | X  |		.CONST	0x0558								; 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 0104       |    |		.CONST	0x0104								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006c       | l  |		.CONST	0x006c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0022       | "  |		.CONST	0x0022								; Number of locals
000b			INIT_0008:
000b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x0 = .DEBUG	0x000b,0x068a,0xc000,0x0000,0x0035,0xdbb4,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 00da       |    |		Load_Top	At_Offset_2
000d e001       |    |		Load	0x0,0x1
000e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
000f 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0010 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0x10,0xfffe
0012 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x12,0xfffd
0014 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x14,0xfffc
0016 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x16,0xfffb
0018 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x18,0xfffa
001a 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x1a,0xfff9
001c 00bf       |    |		Action	Accept_Activation
001d 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x001d,0x069a,0xc000,0x0000,0x0035,0xdbc4,0x0000,0x0005
													; Debug Table 0x1.0x0 = 0x1d,0xffff
001e 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x1e,0xfffe
001f 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x1f,0xfffd
0020 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x20,0xfffc
0021 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x21,0xfffb
0022 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x5 = 0x22,0xfffa
0023 e001       |    |		Load	0x0,0x1
0024 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0025 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0026 4801       |H   |		Short_Literal	0x1
0027 e001       |    |		Load	0x0,0x1
0028 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0029 1c08       |    |		Execute_Immediate	Run_Utility,0x8
002a 4800       |H   |		Short_Literal	0x0
002b e001       |    |		Load	0x0,0x1
002c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
002d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
002e 00d9       |    |		Load_Top	At_Offset_1
002f 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0030 00d9       |    |		Load_Top	At_Offset_1
0031 016d       | m  |		Execute	Variant_Record,Structure_Write
0032 e216       |    |		Load	0x1,0x16							; Debug Table 0x1.0x6 = 0x32,0xfff9
0033 0266       | f  |		Execute	Discrete,Bounds
0034 00e1       |    |		Load_Encached	Boolean_Cache
0035 02a0       |    |		Declare_Subprogram	Null_Subprogram
0036 4801       |H   |		Short_Literal	0x1
0037 035d       | ]  |		Declare_Type	Array,Defined
0038 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x7 = 0x38,0xfff8
0039 0337       | 7  |		Declare_Variable	Array
003a 00d9       |    |		Load_Top	At_Offset_1
003b 0337       | 7  |		Declare_Variable	Array
003c 00d8       |    |		Load_Top	At_Offset_0
003d 01d9       |    |		Execute	Vector,Reverse_Bounds
003e 0263       | c  |		Execute	Discrete,Above_Bound
003f 7005       |p   |		Jump_Nonzero	0x45
0040 4800       |H   |		Short_Literal	0x0
0041 00d9       |    |		Load_Top	At_Offset_1
0042 e220       |    |		Load	0x1,0x20
0043 01d6       |    |		Execute	Vector,Field_Write
0044 3ffb       |?   |		Loop_Increasing	0x40
0045 00d9       |    |		Load_Top	At_Offset_1
0046 01d4       |    |		Execute	Vector,Structure_Write
0047 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x8 = 0x47,0xfff7
0048 0337       | 7  |		Declare_Variable	Array
0049 00d9       |    |		Load_Top	At_Offset_1
004a 00d9       |    |		Load_Top	At_Offset_1
004b 01d4       |    |		Execute	Vector,Structure_Write
004c 029d 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call			; Debug Table 0x1.0x9 = 0x4c,0xfff6
004e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0xa = 0x4e,0xfff5
004f 6138       |a8  |		Indirect_Literal	Discrete,0x188,{0x00004013, 0x00001930}		; 0x4013 = MULTIPLEXING
0050 02a0       |    |		Declare_Subprogram	Null_Subprogram
0051 037d       | }  |		Declare_Type	Task,Defined
0052 036f       | o  |		Declare_Variable	Task
0053 00b6       |    |		Action	Make_Scope							; Debug Table 0x1.0xb = 0x53,0xfff4
0054 e002       |    |		Load	0x0,0x2
0055 e001       |    |		Load	0x0,0x1
0056 e21d       |    |		Load	0x1,0x1d
0057 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0058 e220       |    |		Load	0x1,0x20
0059 e003       |    |		Load	0x0,0x3
005a e004       |    |		Load	0x0,0x4
005b e005       |    |		Load	0x0,0x5
005c 4809       |H   |		Short_Literal	0x9
005d e222       | "  |		Load	0x1,0x22
005e 020e       |    |		Execute	Module,Augment_Imports
005f 0007       |    |		Action	Break_Optional
0060 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xc = 0x60,0xfff3
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xd = 0x62,0xfff2
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xe = 0x64,0xfff1
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xf = 0x66,0xfff0
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x10 = 0x68,0xffef
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x11 = 0x6a,0xffee
006b 00c7       |    |		Action	Elaborate_Subprogram
006c			BODY_0008:
006c 00be       |    |		Action	Activate_Tasks
006d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x12 = 0x6d,0x1
006e 00d9       |    |		Load_Top	At_Offset_1
006f 170d       |    |		Execute	Task,Entry_Call,Field_Number 0xd
0070 00bc       |    |		Action	Signal_Activated
0071 00bb       |    |		Action	Signal_Completion
0072 0000 0000  |    |		.BLANK	0000[0x6]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 0083       |    |		.CONST	0x0083								; Address of begin
0079 00bd       |    |		.CONST	0x00bd								; Address of exception handler
007a 0003       |    |		.CONST	0x0003								; Number of locals
007b			INIT_0078:
007b e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x007b,0x06c2,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x0064
													; Debug Table 0x2.0x0 = 0x7b,0xffff
007c 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
007d 02ff       |    |		Declare_Variable	Variant_Record
007e e21d       |    |		Load	0x1,0x1d
007f 00d9       |    |		Load_Top	At_Offset_1
0080 016d       | m  |		Execute	Variant_Record,Structure_Write
0081 029f 0133  |   3|		Declare_Subprogram	INIT_0130,For_Call				; Debug Table 0x2.0x1 = 0x81,0xfffe
0083			BODY_0078:
0083 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x2 = 0x83,0x1
0084 6831       |h1  |		Jump_Zero	0xb6
0085 00cf       |    |		Action	Mark_Auxiliary
0086 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x3 = 0x86,0x2
0087 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2.0x4 = 0x87,0x3
0088 4801       |H   |		Short_Literal	0x1
0089 e222       | "  |		Load	0x1,0x22
008a 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
008b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x5 = 0x8b,0x4
008c e5ff       |    |		Load	0x2,-0x1
008d 4802       |H   |		Short_Literal	0x2
008e e222       | "  |		Load	0x1,0x22
008f 170f       |    |		Execute	Task,Entry_Call,Field_Number 0xf
0090 00d1       |    |		Pop_Control	Pop_Count_1
0091 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x6 = 0x91,0x5
0092 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0093 4604       |F   |		Jump_Case	0x5
0094 7819       |x   |		Jump	0xae								; case 0x0
0095 7803       |x   |		Jump	0x99								; case 0x1
0096 7813       |x   |		Jump	0xaa								; case 0x2
0097 7812       |x   |		Jump	0xaa								; case 0x3
0098 7811       |x   |		Jump	0xaa								; case 0x4
0099 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x7 = 0x99,0x7
009a 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
009b 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
009c 4608       |F   |		Jump_Case	0x9
009d 7808       |x   |		Jump	0xa6								; case 0x0
009e 780f       |x   |		Jump	0xae								; case 0x1
009f 7806       |x   |		Jump	0xa6								; case 0x2
00a0 7805       |x   |		Jump	0xa6								; case 0x3
00a1 7804       |x   |		Jump	0xa6								; case 0x4
00a2 7803       |x   |		Jump	0xa6								; case 0x5
00a3 7802       |x   |		Jump	0xa6								; case 0x6
00a4 7809       |x   |		Jump	0xae								; case 0x7
00a5 7808       |x   |		Jump	0xae								; case 0x8
00a6 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x8 = 0xa6,0x9
00a7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a8 6801       |h   |		Jump_Zero	0xaa
00a9 8403       |    |		Call	0x2,0x3								; Debug Table 0x2.0x9 = 0xa9,0xa
00aa 60d9       |`   |		Indirect_Literal	Discrete,0x184,{0x00000000, 0x00050000}		; Debug Table 0x2.0xa = 0xaa,0xc
00ab 00ba       |    |		Action	Initiate_Delay
00ac 00c9       |    |		Action	Pop_Auxiliary_Loop
00ad 7fd9       |    |		Jump	0x87
00ae 00ce       |    |		Action	Pop_Auxiliary
00af 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0xb = 0xaf,0xd
00b0 e002       |    |		Load	0x0,0x2
00b1 1a0d       |    |		Execute	Package,Field_Write,Field_Number 0xd
00b2 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0xc = 0xb2,0xe
00b3 e5fb       |    |		Load	0x2,-0x5
00b4 016d       | m  |		Execute	Variant_Record,Structure_Write
00b5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00b6 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2.0xd = 0xb6,0xf
00b7 e5ff       |    |		Load	0x2,-0x1
00b8 4802       |H   |		Short_Literal	0x2
00b9 e222       | "  |		Load	0x1,0x22
00ba 1710       |    |		Execute	Task,Entry_Call,Field_Number 0x10
00bb 00d1       |    |		Pop_Control	Pop_Count_1
00bc 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
00bd			TRAP_0078:
00bd 0007       |    |		Action	Break_Optional
00be 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0xe = 0xbe,0x10
00bf e002       |    |		Load	0x0,0x2
00c0 1a0d       |    |		Execute	Package,Field_Write,Field_Number 0xd
00c1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0xf = 0xc1,0x11
00c2 0101       |    |		Execute	Exception,Reraise
00c3 0000 0000  |    |		.BLANK	0000[0x5]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00cb,0x06e4,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x0082
													; Debug Table 0x3.0x0 = 0xcb,0x1
00cc 4801       |H   |		Short_Literal	0x1
00cd e222       | "  |		Load	0x1,0x22
00ce 1712       |    |		Execute	Task,Entry_Call,Field_Number 0x12
00cf 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00da       |    |		.CONST	0x00da								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0004       |    |		.CONST	0x0004								; Number of locals
00d3			INIT_00d0:
00d3 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4 = .DEBUG	0x00d3,0x06e8,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x008c
													; Debug Table 0x4.0x0 = 0xd3,0xffff
00d4 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00d5 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4.0x1 = 0xd5,0xfffe
00d6 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00d7 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x2 = 0xd7,0xfffd
00d8 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00d9 0602       |    |		Execute_Immediate	Set_Value_Unchecked,0x2
00da			BODY_00d0:
00da 00cf       |    |		Action	Mark_Auxiliary
00db 781a       |x   |		Jump	0xf6
00dc 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4.0x3 = 0xdc,0x2
00dd e001       |    |		Load	0x0,0x1
00de 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00df e5fe       |    |		Load	0x2,-0x2
00e0 01dd       |    |		Execute	Vector,First
00e1 e403       |    |		Load	0x2,0x3
00e2 0273       | s  |		Execute	Discrete,Plus
00e3 0248       | H  |		Execute	Discrete,Check_In_Integer
00e4 e5fe       |    |		Load	0x2,-0x2
00e5 01dc       |    |		Execute	Vector,Last
00e6 e5fe       |    |		Load	0x2,-0x2
00e7 01cf       |    |		Execute	Vector,Slice_Read
00e8 e5ff       |    |		Load	0x2,-0x1
00e9 4804       |H   |		Short_Literal	0x4
00ea e222       | "  |		Load	0x1,0x22
00eb 1714       |    |		Execute	Task,Entry_Call,Field_Number 0x14
00ec 005b       | [  |		Store_Top	Discrete,At_Offset_3
00ed c402       |    |		Store	0x2,0x2
00ee 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x4 = 0xee,0x3
00ef 0e02       |    |		Execute_Immediate	Not_Equal,0x2
00f0 700a       |p   |		Jump_Nonzero	0xfb
00f1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x5 = 0xf1,0x4
00f2 e402       |    |		Load	0x2,0x2
00f3 0273       | s  |		Execute	Discrete,Plus
00f4 005b       | [  |		Store_Top	Discrete,At_Offset_3
00f5 00c9       |    |		Action	Pop_Auxiliary_Loop
00f6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x6 = 0xf6,0x1
00f7 e5fe       |    |		Load	0x2,-0x2
00f8 01db       |    |		Execute	Vector,Length
00f9 027c       | |  |		Execute	Discrete,Less
00fa 77e1       |w   |		Jump_Nonzero	0xdc
00fb 00ce       |    |		Action	Pop_Auxiliary
00fc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x7 = 0xfc,0x5
00fd a5fd       |    |		Store_Unchecked	0x2,-0x3
00fe 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00ff 0000       |    |		.XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0105       |    |		.CONST	0x0105								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0002       |    |		.CONST	0x0002								; Number of locals
0103			INIT_0100:
0103 e001       |    |		Load	0x0,0x1								; Debug Table 0x5 = .DEBUG	0x0103,0x06fa,0x1002,0x0000,0x0035,0xdbb4,0x0000,0x00a2
													; Debug Table 0x5.0x0 = 0x103,0xffff
0104 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0105			BODY_0100:
0105 e001       |    |		Load	0x0,0x1								; Debug Table 0x5.0x1 = 0x105,0x1
0106 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0107 e5ff       |    |		Load	0x2,-0x1
0108 4802       |H   |		Short_Literal	0x2
0109 e222       | "  |		Load	0x1,0x22
010a 1713       |    |		Execute	Task,Entry_Call,Field_Number 0x13
010b 0059       | Y  |		Store_Top	Discrete,At_Offset_1
010c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x2 = 0x10c,0x2
010d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
010e 0000 0000  |    |		.XXX[0x2]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113       |    |		.CONST	0x0113								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0001       |    |		.CONST	0x0001								; Number of locals
0113			BODY_0110:
0113			INIT_0110:
0113 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x0113,0x0702,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x00af
													; Debug Table 0x6.0x0 = 0x113,0x1
0114 4801       |H   |		Short_Literal	0x1
0115 e222       | "  |		Load	0x1,0x22
0116 1716       |    |		Execute	Task,Entry_Call,Field_Number 0x16
0117 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011d       |    |		.CONST	0x011d								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0002       |    |		.CONST	0x0002								; Number of locals
011b			INIT_0118:
011b 029f 015b  |   [|		Declare_Subprogram	INIT_0158,For_Call				; Debug Table 0x7 = .DEBUG	0x011b,0x0706,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x00b9
													; Debug Table 0x7.0x0 = 0x11b,0xffff
011d			BODY_0118:
011d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x1 = 0x11d,0x1
011e 7003       |p   |		Jump_Nonzero	0x122
011f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x2 = 0x11f,0x2
0120 8402       |    |		Call	0x2,0x2
0121 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0122 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x3 = 0x122,0x3
0123 e5ff       |    |		Load	0x2,-0x1
0124 4802       |H   |		Short_Literal	0x2
0125 e222       | "  |		Load	0x1,0x22
0126 1715       |    |		Execute	Task,Entry_Call,Field_Number 0x15
0127 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x012b,0x0710,0x1002,0x0000,0x0035,0xdbc4,0x0000,0x0066
													; Debug Table 0x8.0x0 = 0x12b,0x1
012c e216       |    |		Load	0x1,0x16
012d 0260       | `  |		Execute	Discrete,In_Type
012e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
012f 0000       |    |		.XXX[0x1]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0139       | 9  |		.CONST	0x0139								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0002       |    |		.CONST	0x0002								; Number of locals
0133			INIT_0130:
0133 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9 = .DEBUG	0x0133,0x0714,0x1001,0x0000,0x0035,0xdbc4,0x0000,0x012c
													; Debug Table 0x9.0x0 = 0x133,0xffff
0134 e002       |    |		Load	0x0,0x2
0135 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0136 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0137 00d8       |    |		Load_Top	At_Offset_0
0138 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0139			BODY_0130:
0139 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x1 = 0x139,0x1
013a 0092 0454  |   T|		Action	Push_String_Extended,0x454					; "++* Failed to initiate a diagnostic connection to Rational."
013c e002       |    |		Load	0x0,0x2
013d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
013e 00d1       |    |		Pop_Control	Pop_Count_1
013f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x2 = 0x13f,0x2
0140 0092 0455  |   U|		Action	Push_String_Extended,0x455					; "I will keep trying until I can connect to Rational."
0142 e002       |    |		Load	0x0,0x2
0143 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0144 00d1       |    |		Pop_Control	Pop_Count_1
0145 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3 = 0x145,0x3
0146 0092 0456  |   V|		Action	Push_String_Extended,0x456					; "Please connect the diagnostic communication equipment,"
0148 e002       |    |		Load	0x0,0x2
0149 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
014a 00d1       |    |		Pop_Control	Pop_Count_1
014b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x4 = 0x14b,0x4
014c 0092 0457  |   W|		Action	Push_String_Extended,0x457					; "or crash the machine if you prefer to take a dump."
014e e002       |    |		Load	0x0,0x2
014f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0150 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0151 0000 0000  |    |		.BLANK	0000[0x7]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015d       | ]  |		.CONST	0x015d								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0002       |    |		.CONST	0x0002								; Number of locals
015b			INIT_0158:
015b e001       |    |		Load	0x0,0x1								; Debug Table 0xa = .DEBUG	0x015b,0x0720,0x1001,0x0000,0x0035,0xdbc4,0x0000,0x028d
													; Debug Table 0xa.0x0 = 0x15b,0xffff
015c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
015d			BODY_0158:
015d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x1 = 0x15d,0x1
015e 01db       |    |		Execute	Vector,Length
015f 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0160 6822       |h"  |		Jump_Zero	0x183
0161 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x2 = 0x161,0x2
0162 01dd       |    |		Execute	Vector,First
0163 e7ff       |    |		Load	0x3,-0x1
0164 01d7       |    |		Execute	Vector,Field_Read
0165 00d8       |    |		Load_Top	At_Offset_0
0166 e001       |    |		Load	0x0,0x1
0167 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0168 0122       | "  |		Execute	Any,Make_Root_Type
0169 0260       | `  |		Execute	Discrete,In_Type
016a 7002       |p   |		Jump_Nonzero	0x16d
016b 48e0       |H   |		Short_Literal	0xe0
016c 0257       | W  |		Execute	Discrete,Raise
016d 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
016e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x3 = 0x16e,0x3
016f 8221       | !  |		Call	0x1,0x21
0170 6812       |h   |		Jump_Zero	0x183
0171 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x4 = 0x171,0x4
0172 e220       |    |		Load	0x1,0x20
0173 01d7       |    |		Execute	Vector,Field_Read
0174 7004       |p   |		Jump_Nonzero	0x179
0175 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x5 = 0x175,0x5
0176 4801       |H   |		Short_Literal	0x1
0177 e222       | "  |		Load	0x1,0x22
0178 1711       |    |		Execute	Task,Entry_Call,Field_Number 0x11
0179 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x6 = 0x179,0x6
017a 01dd       |    |		Execute	Vector,First
017b 0a01       |    |		Execute_Immediate	Plus,0x1
017c 0248       | H  |		Execute	Discrete,Check_In_Integer
017d e7ff       |    |		Load	0x3,-0x1
017e 01dc       |    |		Execute	Vector,Last
017f e7ff       |    |		Load	0x3,-0x1
0180 01cf       |    |		Execute	Vector,Slice_Read
0181 00d9       |    |		Load_Top	At_Offset_1
0182 820f       |    |		Call	0x1,0xf
0183 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0184 0000 0000  |    |		.LITERAL	{0x00000000, 0x00050000}
0188 0000 4013  |  @ |		.LITERAL	{0x00004013, 0x00001930}
018c 0000 0000  |    |		.BLANK	0000[0x4]
0190 01de 0004  |    |		.XXX[0x3]
0192 0029       | )  |
0193 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb = .DEBUG	0x0193,0x0730,0x0000,0x0000,0x0035,0xdbc4,0x0000,0x007a
0194 02cb       |    |		Declare_Variable	Entry
0195 4801       |H   |		Short_Literal	0x1
0196 02cb       |    |		Declare_Variable	Entry
0197 4802       |H   |		Short_Literal	0x2
0198 02cb       |    |		Declare_Variable	Entry
0199 4802       |H   |		Short_Literal	0x2
019a 02cb       |    |		Declare_Variable	Entry
019b 4801       |H   |		Short_Literal	0x1
019c 02cb       |    |		Declare_Variable	Entry
019d 4801       |H   |		Short_Literal	0x1
019e 02cb       |    |		Declare_Variable	Entry
019f 4802       |H   |		Short_Literal	0x2
01a0 02cb       |    |		Declare_Variable	Entry
01a1 4804       |H   |		Short_Literal	0x4
01a2 02cb       |    |		Declare_Variable	Entry
01a3 4802       |H   |		Short_Literal	0x2
01a4 02cb       |    |		Declare_Variable	Entry
01a5 4801       |H   |		Short_Literal	0x1
01a6 02cb       |    |		Declare_Variable	Entry
01a7 00bf       |    |		Action	Accept_Activation
01a8 e001       |    |		Load	0x0,0x1								; Debug Table 0xc = .DEBUG	0x01a8,0x0732,0x0000,0x0000,0x0035,0xdbd4,0x0000,0x000a
													; Debug Table 0xc.0x0 = 0x1a8,0xffff
01a9 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
01aa 00e4       |    |		Load_Encached	Positive_Cache
01ab 03f1       |    |		Declare_Variable	Discrete,With_Value
01ac 624f       |bO  |		Indirect_Literal	Discrete,0x3fc,{0x00000000, 0x0000ffff}		; Debug Table 0xc.0x1 = 0x1ac,0xfffe
01ad 00e4       |    |		Load_Encached	Positive_Cache
01ae 03f1       |    |		Declare_Variable	Discrete,With_Value
01af 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x2 = 0x1af,0xfffd
01b0 e002       |    |		Load	0x0,0x2
01b1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01b2 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01b3 00d8       |    |		Load_Top	At_Offset_0
01b4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b5 0092 0458  |   X|		Action	Push_String_Extended,0x458					; "diagnostic modem: error: Multiplexing.Worker"
													; Debug Table 0xc.0x3 = 0x1b5,0xfffc
01b7 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x4 = 0x1b7,0xfffb
01b8 029d 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call			; Debug Table 0xc.0x5 = 0x1b8,0xfffa
01ba e003       |    |		Load	0x0,0x3								; Debug Table 0xc.0x6 = 0x1ba,0xfff9
01bb 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01bc 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01bd e003       |    |		Load	0x0,0x3								; Debug Table 0xc.0x7 = 0x1bd,0xfff8
01be 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
01bf 02ff       |    |		Declare_Variable	Variant_Record
01c0 e004       |    |		Load	0x0,0x4
01c1 00d9       |    |		Load_Top	At_Offset_1
01c2 016d       | m  |		Execute	Variant_Record,Structure_Write
01c3 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x8 = 0x1c3,0xfff7
01c4 029d 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call			; Debug Table 0xc.0x9 = 0x1c4,0xfff6
01c6 029d 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call			; Debug Table 0xc.0xa = 0x1c6,0xfff5
01c8 029d 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call			; Debug Table 0xc.0xb = 0x1c8,0xfff4
01ca 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0xc = 0x1ca,0xfff3
01cb 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01cc 029d 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call			; Debug Table 0xc.0xd = 0x1cc,0xfff2
01ce 029d 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call			; Debug Table 0xc.0xe = 0x1ce,0xfff1
01d0 029d 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call			; Debug Table 0xc.0xf = 0x1d0,0xfff0
01d2 029d 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call			; Debug Table 0xc.0x10 = 0x1d2,0xffef
01d4 029d 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call			; Debug Table 0xc.0x11 = 0x1d4,0xffee
01d6 029d 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call			; Debug Table 0xc.0x12 = 0x1d6,0xffed
01d8 480d       |H   |		Short_Literal	0xd
01d9 0299 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Accept
01db 029f 02f3  |    |		Declare_Subprogram	INIT_02f0,For_Call
01dd 00bc       |    |		Action	Signal_Activated
01de 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0xc.0x13 = 0x1de,0x1
01df 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
01e0 0137       | 7  |		Execute	Entry,Rendezvous
01e1 00cf       |    |		Action	Mark_Auxiliary
01e2 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x14 = 0x1e2,0x2
01e3 8229       | )  |		Call	0x1,0x29							; Debug Table 0xc.0x15 = 0x1e3,0x3
01e4 00c9       |    |		Action	Pop_Auxiliary_Loop
01e5 7ffd       |    |		Jump	0x1e3
01e6 0000 0000  |    |		.XXX[0x2]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x01eb,0x0760,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0039
													; Debug Table 0xd.0x0 = 0x1eb,0x1
01ec e5fe       |    |		Load	0x2,-0x2
01ed 027c       | |  |		Execute	Discrete,Less
01ee 6802       |h   |		Jump_Zero	0x1f1
01ef 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x1 = 0x1ef,0x2
01f0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01f1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x2 = 0x1f1,0x3
01f2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01f3 0000 0000  |    |		.BLANK	0000[0x5]
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 e21c       |    |		Load	0x1,0x1c							; Debug Table 0xe = .DEBUG	0x01fb,0x0768,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0077
													; Debug Table 0xe.0x0 = 0x1fb,0x1
01fc 0f02       |    |		Execute_Immediate	Equal,0x2
01fd 00ca       |    |		Action	Exit_Nullary_Function
01fe 0000 0000  |    |		.XXX[0x2]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 e21c       |    |		Load	0x1,0x1c							; Debug Table 0xf = .DEBUG	0x0203,0x076c,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0088
													; Debug Table 0xf.0x0 = 0x203,0x1
0204 0f01       |    |		Execute_Immediate	Equal,0x1
0205 00ca       |    |		Action	Exit_Nullary_Function
0206 0000 0000  |    |		.XXX[0x2]
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 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x10 = .DEBUG	0x020b,0x0770,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0099
													; Debug Table 0x10.0x0 = 0x20b,0x1
020c 0f03       |    |		Execute_Immediate	Equal,0x3
020d 00ca       |    |		Action	Exit_Nullary_Function
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 029f 032b  |   +|		Declare_Subprogram	INIT_0328,For_Call				; Debug Table 0x11 = .DEBUG	0x0213,0x0774,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x00b0
													; Debug Table 0x11.0x0 = 0x213,0xffff
0215			BODY_0210:
0215 e217       |    |		Load	0x1,0x17							; Debug Table 0x11.0x1 = 0x215,0x1
0216 8402       |    |		Call	0x2,0x2
0217 4804       |H   |		Short_Literal	0x4
0218 e001       |    |		Load	0x0,0x1
0219 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
021a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
021b 0000 0000  |    |		.BLANK	0000[0x5]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12 = .DEBUG	0x0223,0x077a,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x00fb
													; Debug Table 0x12.0x0 = 0x223,0x1
0224 01db       |    |		Execute	Vector,Length
0225 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0226 680e       |h   |		Jump_Zero	0x235
0227 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x1 = 0x227,0x2
0228 01dd       |    |		Execute	Vector,First
0229 00db       |    |		Load_Top	At_Offset_3
022a 01d7       |    |		Execute	Vector,Field_Read
022b 0908       |    |		Execute_Immediate	Binary_Scale,0x8
022c 0248       | H  |		Execute	Discrete,Check_In_Integer
022d 00db       |    |		Load_Top	At_Offset_3
022e 01dd       |    |		Execute	Vector,First
022f 0a01       |    |		Execute_Immediate	Plus,0x1
0230 0248       | H  |		Execute	Discrete,Check_In_Integer
0231 e5ff       |    |		Load	0x2,-0x1
0232 01d7       |    |		Execute	Vector,Field_Read
0233 0273       | s  |		Execute	Discrete,Plus
0234 c5fe       |    |		Store	0x2,-0x2
0235 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0236 0000 0000  |    |		.XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b e21c       |    |		Load	0x1,0x1c							; Debug Table 0x13 = .DEBUG	0x023b,0x0780,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x0136
													; Debug Table 0x13.0x0 = 0x23b,0x1
023c 7009       |p   |		Jump_Nonzero	0x246
023d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x1 = 0x23d,0x2
023e 4800       |H   |		Short_Literal	0x0
023f e003       |    |		Load	0x0,0x3
0240 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0241 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0242 e001       |    |		Load	0x0,0x1
0243 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0244 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13.0x2 = 0x244,0x3
0245 a21c       |    |		Store_Unchecked	0x1,0x1c
0246 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0247 0000       |    |		.XXX[0x1]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b 821e       |    |		Call	0x1,0x1e							; Debug Table 0x14 = .DEBUG	0x024b,0x0788,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x0160
													; Debug Table 0x14.0x0 = 0x24b,0x1
024c 7004       |p   |		Jump_Nonzero	0x251
024d e21d       |    |		Load	0x1,0x1d							; Debug Table 0x14.0x1 = 0x24d,0x2
024e e5fe       |    |		Load	0x2,-0x2
024f 016d       | m  |		Execute	Variant_Record,Structure_Write
0250 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0251 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x2 = 0x251,0x3
0252 8005       |    |		Call	0x0,0x5
0253 700d       |p   |		Jump_Nonzero	0x261
0254 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x3 = 0x254,0x4
0255 e003       |    |		Load	0x0,0x3
0256 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0257 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0258 4803       |H   |		Short_Literal	0x3
0259 e003       |    |		Load	0x0,0x3
025a 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
025b 1c08       |    |		Execute_Immediate	Run_Utility,0x8
025c 00d9       |    |		Load_Top	At_Offset_1
025d 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
025e e5fe       |    |		Load	0x2,-0x2
025f 016d       | m  |		Execute	Variant_Record,Structure_Write
0260 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0261 4800       |H   |		Short_Literal	0x0							; Debug Table 0x14.0x4 = 0x261,0x5
0262 e003       |    |		Load	0x0,0x3
0263 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0264 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0265 e5fe       |    |		Load	0x2,-0x2
0266 016d       | m  |		Execute	Variant_Record,Structure_Write
0267 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x5 = 0x267,0x6
0268 e006       |    |		Load	0x0,0x6
0269 01d7       |    |		Execute	Vector,Field_Read
026a 700b       |p   |		Jump_Nonzero	0x276
026b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x6 = 0x26b,0x7
026c 00db       |    |		Load_Top	At_Offset_3
026d e006       |    |		Load	0x0,0x6
026e 01d6       |    |		Execute	Vector,Field_Write
026f 4802       |H   |		Short_Literal	0x2							; Debug Table 0x14.0x7 = 0x26f,0x8
0270 00db       |    |		Load_Top	At_Offset_3
0271 e001       |    |		Load	0x0,0x1
0272 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0273 e221       | !  |		Load	0x1,0x21							; Debug Table 0x14.0x8 = 0x273,0x9
0274 0a01       |    |		Execute_Immediate	Plus,0x1
0275 c221       | !  |		Store	0x1,0x21
0276 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0277 0000       |    |		.XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b       | {  |		.CONST	0x027b								; Address of begin
0279 029d       |    |		.CONST	0x029d								; Address of exception handler
027a 0001       |    |		.CONST	0x0001								; Number of locals
027b			BODY_0278:
027b			INIT_0278:
027b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x027b,0x079c,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x01c3
													; Debug Table 0x15.0x0 = 0x27b,0x1
027c 8005       |    |		Call	0x0,0x5
027d 681e       |h   |		Jump_Zero	0x29c
027e 00da       |    |		Load_Top	At_Offset_2
027f e006       |    |		Load	0x0,0x6
0280 01d7       |    |		Execute	Vector,Field_Read
0281 681a       |h   |		Jump_Zero	0x29c
0282 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x1 = 0x282,0x2
0283 00db       |    |		Load_Top	At_Offset_3
0284 e006       |    |		Load	0x0,0x6
0285 01d6       |    |		Execute	Vector,Field_Write
0286 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x2 = 0x286,0x3
0287 00db       |    |		Load_Top	At_Offset_3
0288 e001       |    |		Load	0x0,0x1
0289 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
028a e221       | !  |		Load	0x1,0x21							; Debug Table 0x15.0x3 = 0x28a,0x4
028b 0aff       |    |		Execute_Immediate	Plus,-0x1
028c c221       | !  |		Store	0x1,0x21
028d 821e       |    |		Call	0x1,0x1e							; Debug Table 0x15.0x4 = 0x28d,0x5
028e e221       | !  |		Load	0x1,0x21
028f 0f00       |    |		Execute_Immediate	Equal,0x0
0290 0279       | y  |		Execute	Discrete,And
0291 680a       |h   |		Jump_Zero	0x29c
0292 e003       |    |		Load	0x0,0x3								; Debug Table 0x15.0x5 = 0x292,0x6
0293 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0294 4801       |H   |		Short_Literal	0x1
0295 e003       |    |		Load	0x0,0x3
0296 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0297 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0298 e001       |    |		Load	0x0,0x1
0299 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
029a 4803       |H   |		Short_Literal	0x3							; Debug Table 0x15.0x6 = 0x29a,0x7
029b a21c       |    |		Store_Unchecked	0x1,0x1c
029c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
029d			TRAP_0278:
029d 0007       |    |		Action	Break_Optional
029e e219       |    |		Load	0x1,0x19							; Debug Table 0x15.0x7 = 0x29e,0x8
029f e21a       |    |		Load	0x1,0x1a
02a0 0092 0459  |   Y|		Action	Push_String_Extended,0x459					; ".Do_Disconnect ("
02a2 01cc       |    |		Execute	Vector,Catenate
02a3 e5ff       |    |		Load	0x2,-0x1
02a4 00e0       |    |		Load_Encached	Standard_Cache
02a5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02a6 01cc       |    |		Execute	Vector,Catenate
02a7 0092 045a  |   Z|		Action	Push_String_Extended,0x45a					; "): exception raised"
02a9 01cc       |    |		Execute	Vector,Catenate
02aa e002       |    |		Load	0x0,0x2
02ab 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02ac 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ad 0000 0000  |    |		.XXX[0x3]
02af 0000       |    |
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b6       |    |		.CONST	0x02b6								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0003       |    |		.CONST	0x0003								; Number of locals
02b3			INIT_02b0:
02b3 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x16 = .DEBUG	0x02b3,0x07ae,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x022a
													; Debug Table 0x16.0x0 = 0x2b3,0xffff
02b4 029f 0353  |   S|		Declare_Subprogram	INIT_0350,For_Call				; Debug Table 0x16.0x1 = 0x2b4,0xfffe
02b6			BODY_02b0:
02b6 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x16.0x2 = 0x2b6,0x1
02b7 e006       |    |		Load	0x0,0x6
02b8 01d7       |    |		Execute	Vector,Field_Read
02b9 7005       |p   |		Jump_Nonzero	0x2bf
02ba 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x3 = 0x2ba,0x2
02bb a5fd       |    |		Store_Unchecked	0x2,-0x3
02bc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x4 = 0x2bc,0x3
02bd 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
02be 7817       |x   |		Jump	0x2d6
02bf 4802       |H   |		Short_Literal	0x2							; Debug Table 0x16.0x5 = 0x2bf,0x4
02c0 a5fd       |    |		Store_Unchecked	0x2,-0x3
02c1 e218       |    |		Load	0x1,0x18							; Debug Table 0x16.0x6 = 0x2c1,0x5
02c2 e5fe       |    |		Load	0x2,-0x2
02c3 01db       |    |		Execute	Vector,Length
02c4 821b       |    |		Call	0x1,0x1b
02c5 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02c6 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x16.0x7 = 0x2c6,0x6
02c7 8403       |    |		Call	0x2,0x3
02c8 e5fe       |    |		Load	0x2,-0x2
02c9 01dd       |    |		Execute	Vector,First
02ca e5fe       |    |		Load	0x2,-0x2
02cb 01dd       |    |		Execute	Vector,First
02cc e402       |    |		Load	0x2,0x2
02cd 0273       | s  |		Execute	Discrete,Plus
02ce 0aff       |    |		Execute_Immediate	Plus,-0x1
02cf 0248       | H  |		Execute	Discrete,Check_In_Integer
02d0 e5fe       |    |		Load	0x2,-0x2
02d1 01cf       |    |		Execute	Vector,Slice_Read
02d2 01cc       |    |		Execute	Vector,Catenate
02d3 4800       |H   |		Short_Literal	0x0
02d4 e001       |    |		Load	0x0,0x1
02d5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02d6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x8 = 0x2d6,0x7
02d7 a5fc       |    |		Store_Unchecked	0x2,-0x4
02d8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02d9 0000 0000  |    |		.BLANK	0000[0x7]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 e007       |    |		Load	0x0,0x7								; Debug Table 0x17 = .DEBUG	0x02e3,0x07c2,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x02e2
													; Debug Table 0x17.0x0 = 0x2e3,0x1
02e4 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02e5 480f       |H   |		Short_Literal	0xf
02e6 4801       |H   |		Short_Literal	0x1
02e7 4801       |H   |		Short_Literal	0x1
02e8 4805       |H   |		Short_Literal	0x5
02e9 4800       |H   |		Short_Literal	0x0
02ea e008       |    |		Load	0x0,0x8
02eb 1851       | Q  |		Execute	Package,Field_Execute,Field_Number 0x51
02ec 4800       |H   |		Short_Literal	0x0							; Debug Table 0x17.0x1 = 0x2ec,0x2
02ed e009       |    |		Load	0x0,0x9
02ee 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02ef 4100       |A   |		End_Rendezvous	0x0
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 030c       |    |		.CONST	0x030c								; Address of begin
02f1 031c       |    |		.CONST	0x031c								; Address of exception handler
02f2 0002       |    |		.CONST	0x0002								; Number of locals
02f3			INIT_02f0:
02f3 480d 486d  |H Hm|		Declare_Variable	Select	0x000, 0x00a,				; Debug Table 0x18 = .DEBUG	0x02f3,0x07c8,0x0004,0x0000,0x0035,0xdbd4,0x0000,0x04b6
02f5 4815 486f  |H Ho|				[0x000]: 0x000 = 0x0000,
02f7 4816 4876  |H Hv|				[0x00e]: 0x088 = 0x0440,
02f9 4814 4880  |H H |				[0x00f]: 0x087 = 0x0438,
02fb 4813 4882  |H H |				[0x010]: 0x086 = 0x0430,
02fd 4812 4884  |H H |				[0x011]: 0x085 = 0x0428,
02ff 4811 4885  |H H |				[0x012]: 0x084 = 0x0420,
0301 4810 4886  |H H |				[0x013]: 0x082 = 0x0410,
0303 480f 4887  |H H |				[0x014]: 0x080 = 0x0400,
0305 480e 4888  |H H |				[0x016]: 0x076 = 0x03b0,
0307 4800 4800  |H H |				[0x015]: 0x06f = 0x0378,
0309 4800 480a  |H H |				[0x00d]: 0x06d = 0x0368
030b 02cf       |    |
030c			BODY_02f0:
030c 821e       |    |		Call	0x1,0x1e							; Debug Table 0x18.0x0 = 0x30c,0x1
030d 00d9       |    |		Load_Top	At_Offset_1
030e 1007       |    |		Execute	Select,Guard_Write,Field_Number 0x7
030f 821f       |    |		Call	0x1,0x1f
0310 8220       |    |		Call	0x1,0x20
0311 0278       | x  |		Execute	Discrete,Or
0312 0f00       |    |		Execute_Immediate	Equal,0x0
0313 00d9       |    |		Load_Top	At_Offset_1
0314 1008       |    |		Execute	Select,Guard_Write,Field_Number 0x8
0315 8220       |    |		Call	0x1,0x20
0316 0f00       |    |		Execute_Immediate	Equal,0x0
0317 00d9       |    |		Load_Top	At_Offset_1
0318 1009       |    |		Execute	Select,Guard_Write,Field_Number 0x9
0319 00d8       |    |		Load_Top	At_Offset_0
031a 013f       | ?  |		Execute	Select,Rendezvous
031b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
031c			TRAP_02f0:
031c 0007       |    |		Action	Break_Optional
031d e219       |    |		Load	0x1,0x19							; Debug Table 0x18.0x1 = 0x31d,0xc
031e e21a       |    |		Load	0x1,0x1a
031f 0092 045b  |   [|		Action	Push_String_Extended,0x45b					; ": exception raised"
0321 01cc       |    |		Execute	Vector,Catenate
0322 e002       |    |		Load	0x0,0x2
0323 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0324 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0325 0000 0000  |    |		.XXX[0x3]
0327 0000       |    |
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0330       | 0  |		.CONST	0x0330								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0002       |    |		.CONST	0x0002								; Number of locals
032b			INIT_0328:
032b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x19 = .DEBUG	0x032b,0x07ce,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x00b3
													; Debug Table 0x19.0x0 = 0x32b,0xffff
032c 4802       |H   |		Short_Literal	0x2
032d e003       |    |		Load	0x0,0x3
032e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
032f 035b       | [  |		Declare_Type	Array,Constrained
0330			BODY_0328:
0330 4801       |H   |		Short_Literal	0x1							; Debug Table 0x19.0x1 = 0x330,0x1
0331 4802       |H   |		Short_Literal	0x2
0332 e007       |    |		Load	0x0,0x7
0333 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0334 0334       | 4  |		Declare_Variable	Array,With_Constraint
0335 e7ff       |    |		Load	0x3,-0x1
0336 09f8       |    |		Execute_Immediate	Binary_Scale,-0x8
0337 e007       |    |		Load	0x0,0x7
0338 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0339 025b       | [  |		Execute	Discrete,Check_In_Type
033a 4801       |H   |		Short_Literal	0x1
033b 00da       |    |		Load_Top	At_Offset_2
033c 01d6       |    |		Execute	Vector,Field_Write
033d e7ff       |    |		Load	0x3,-0x1
033e 48ff       |H   |		Short_Literal	0xff
033f 0279       | y  |		Execute	Discrete,And
0340 e007       |    |		Load	0x0,0x7
0341 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0342 025b       | [  |		Execute	Discrete,Check_In_Type
0343 4802       |H   |		Short_Literal	0x2
0344 00da       |    |		Load_Top	At_Offset_2
0345 01d6       |    |		Execute	Vector,Field_Write
0346 00d9       |    |		Load_Top	At_Offset_1
0347 01c3       |    |		Execute	Vector,Check_In_Type
0348 e007       |    |		Load	0x0,0x7
0349 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
034a 01c6       |    |		Execute	Vector,Convert_To_Formal
034b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
034c 0000 0000  |    |		.BLANK	0000[0x4]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0359       | Y  |		.CONST	0x0359								; Address of begin
0351 0004       |    |		.CONST	0x0004								; Address of exception handler
0352 0002       |    |		.CONST	0x0002								; Number of locals
0353			INIT_0350:
0353 0007       |    |		Action	Break_Optional							; Debug Table 0x1a = .DEBUG	0x0353,0x07d4,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0248
													; Debug Table 0x1a.0x0 = 0x353,0xffff
0354 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1a.0x1 = 0x354,0xfffe
0355 4801       |H   |		Short_Literal	0x1
0356 e007       |    |		Load	0x0,0x7
0357 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0358 0334       | 4  |		Declare_Variable	Array,With_Constraint
0359			BODY_0350:
0359 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1a.0x2 = 0x359,0x1
035a 4801       |H   |		Short_Literal	0x1
035b e007       |    |		Load	0x0,0x7
035c 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
035d 035b       | [  |		Declare_Type	Array,Constrained
035e 0337       | 7  |		Declare_Variable	Array
035f e7ff       |    |		Load	0x3,-0x1
0360 4801       |H   |		Short_Literal	0x1
0361 00da       |    |		Load_Top	At_Offset_2
0362 01d6       |    |		Execute	Vector,Field_Write
0363 00d9       |    |		Load_Top	At_Offset_1
0364 01d4       |    |		Execute	Vector,Structure_Write
0365 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x3 = 0x365,0x2
0366 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0367 0000       |    |		.XXX[0x1]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; See instruction 0x02cf at 0x2f3, index=0xd
0368 ; --------------------------------------------------------------------------------------
0368 036b       | k  |		.CONST	0x036b								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0001       |    |		.CONST	0x0001								; Number of locals
036b			BODY_0368:
036b			INIT_0368:
036b e219       |    |		Load	0x1,0x19							; Debug Table 0x1b = .DEBUG	0x036b,0x07de,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x049f
													; Debug Table 0x1b.0x0 = 0x36b,0x1
036c e21a       |    |		Load	0x1,0x1a
036d 0092 045c  |   \|		Action	Push_String_Extended,0x45c					; ".Initialized twice"
036f 01cc       |    |		Execute	Vector,Catenate
0370 e002       |    |		Load	0x0,0x2
0371 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0372 4100       |A   |		End_Rendezvous	0x0
0373 0000 0000  |    |		.BLANK	0000[0x5]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; See instruction 0x02cf at 0x2f3, index=0x15
0378 ; --------------------------------------------------------------------------------------
0378 037b       | {  |		.CONST	0x037b								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0001       |    |		.CONST	0x0001								; Number of locals
037b			BODY_0378:
037b			INIT_0378:
037b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c = .DEBUG	0x037b,0x07e2,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x048e
													; Debug Table 0x1c.0x0 = 0x37b,0x1
037c 0b01       |    |		Execute_Immediate	Case_Compare,0x1
037d 7013       |p   |		Jump_Nonzero	0x391
037e 0b04       |    |		Execute_Immediate	Case_Compare,0x4
037f 7016       |p   |		Jump_Nonzero	0x396
0380 0b03       |    |		Execute_Immediate	Case_Compare,0x3
0381 7019       |p   |		Jump_Nonzero	0x39b
0382 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0383 7019       |p   |		Jump_Nonzero	0x39d
0384 e219       |    |		Load	0x1,0x19							; Debug Table 0x1c.0x1 = 0x384,0x6
0385 e21a       |    |		Load	0x1,0x1a
0386 0092 045d  |   ]|		Action	Push_String_Extended,0x45d					; ".Receive_Packet.Kind = "
0388 01cc       |    |		Execute	Vector,Catenate
0389 e7fe       |    |		Load	0x3,-0x2
038a 00e0       |    |		Load_Encached	Standard_Cache
038b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
038c 01cc       |    |		Execute	Vector,Catenate
038d e002       |    |		Load	0x0,0x2
038e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
038f 00d1       |    |		Pop_Control	Pop_Count_1
0390 4100       |A   |		End_Rendezvous	0x0
0391 e7fd       |    |		Load	0x3,-0x3							; Debug Table 0x1c.0x2 = 0x391,0x2
0392 4802       |H   |		Short_Literal	0x2
0393 e001       |    |		Load	0x0,0x1
0394 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0395 4100       |A   |		End_Rendezvous	0x0
0396 e218       |    |		Load	0x1,0x18							; Debug Table 0x1c.0x3 = 0x396,0x3
0397 e7fd       |    |		Load	0x3,-0x3
0398 8223       | #  |		Call	0x1,0x23
0399 c218       |    |		Store	0x1,0x18
039a 4100       |A   |		End_Rendezvous	0x0
039b 8222       | "  |		Call	0x1,0x22							; Debug Table 0x1c.0x4 = 0x39b,0x4
039c 4100       |A   |		End_Rendezvous	0x0
039d e219       |    |		Load	0x1,0x19							; Debug Table 0x1c.0x5 = 0x39d,0x5
039e e21a       |    |		Load	0x1,0x1a
039f 0092 045e  |   ^|		Action	Push_String_Extended,0x45e					; "Receive_Packet.Kind = "
03a1 01cc       |    |		Execute	Vector,Catenate
03a2 0092 045f  |   _|		Action	Push_String_Extended,0x45f					; "Multiplexing.Datagram"
03a4 01cc       |    |		Execute	Vector,Catenate
03a5 e002       |    |		Load	0x0,0x2
03a6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03a7 00d1       |    |		Pop_Control	Pop_Count_1
03a8 4100       |A   |		End_Rendezvous	0x0
03a9 0000 0000  |    |		.BLANK	0000[0x7]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; See instruction 0x02cf at 0x2f3, index=0x16
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3       |    |		.CONST	0x03b3								; Address of begin
03b1 0004       |    |		.CONST	0x0004								; Address of exception handler
03b2 0001       |    |		.CONST	0x0001								; Number of locals
03b3			BODY_03b0:
03b3			INIT_03b0:
03b3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d = .DEBUG	0x03b3,0x07f0,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x0428
													; Debug Table 0x1d.0x0 = 0x3b3,0x1
03b4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03b5 4604       |F   |		Jump_Case	0x5
03b6 7804       |x   |		Jump	0x3bb								; case 0x0
03b7 7807       |x   |		Jump	0x3bf								; case 0x1
03b8 782d       |x-  |		Jump	0x3e6								; case 0x2
03b9 7827       |x'  |		Jump	0x3e1								; case 0x3
03ba 782b       |x+  |		Jump	0x3e6								; case 0x4
03bb 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1d.0x1 = 0x3bb,0x2
03bc a21c       |    |		Store_Unchecked	0x1,0x1c
03bd 8222       | "  |		Call	0x1,0x22							; Debug Table 0x1d.0x2 = 0x3bd,0x3
03be 4100       |A   |		End_Rendezvous	0x0
03bf e21c       |    |		Load	0x1,0x1c							; Debug Table 0x1d.0x3 = 0x3bf,0x4
03c0 6812       |h   |		Jump_Zero	0x3d3
03c1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x4 = 0x3c1,0x5
03c2 a21c       |    |		Store_Unchecked	0x1,0x1c
03c3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x5 = 0x3c3,0x6
03c4 e21d       |    |		Load	0x1,0x1d
03c5 016d       | m  |		Execute	Variant_Record,Structure_Write
03c6 00cf       |    |		Action	Mark_Auxiliary
03c7 e001       |    |		Load	0x0,0x1								; Debug Table 0x1d.0x6 = 0x3c7,0x7
03c8 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
03c9 0265       | e  |		Execute	Discrete,Reverse_Bounds
03ca 0263       | c  |		Execute	Discrete,Above_Bound
03cb 7004       |p   |		Jump_Nonzero	0x3d0
03cc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x7 = 0x3cc,0x8
03cd 8226       | &  |		Call	0x1,0x26
03ce 00c8       |    |		Action	Pop_Auxiliary_Range
03cf 3ffc       |?   |		Loop_Increasing	0x3cc
03d0 00ce       |    |		Action	Pop_Auxiliary
03d1 6026       |`&  |		Indirect_Literal	Discrete,0x3f8,{0x00000000, 0x001e0000}		; Debug Table 0x1d.0x8 = 0x3d1,0x9
03d2 00ba       |    |		Action	Initiate_Delay
03d3 e221       | !  |		Load	0x1,0x21							; Debug Table 0x1d.0x9 = 0x3d3,0xa
03d4 680b       |h   |		Jump_Zero	0x3e0
03d5 e219       |    |		Load	0x1,0x19							; Debug Table 0x1d.0xa = 0x3d5,0xb
03d6 e21a       |    |		Load	0x1,0x1a
03d7 0092 0460  |   `|		Action	Push_String_Extended,0x460					; ".Receive_Status (Disconnect): "
03d9 01cc       |    |		Execute	Vector,Catenate
03da 0092 0461  |   a|		Action	Push_String_Extended,0x461					; "streams_connected /= 0"
03dc 01cc       |    |		Execute	Vector,Catenate
03dd e002       |    |		Load	0x0,0x2
03de 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03df 00d1       |    |		Pop_Control	Pop_Count_1
03e0 4100       |A   |		End_Rendezvous	0x0
03e1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0xb = 0x3e1,0xc
03e2 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
03e3 c217       |    |		Store	0x1,0x17
03e4 8222       | "  |		Call	0x1,0x22							; Debug Table 0x1d.0xc = 0x3e4,0xd
03e5 4100       |A   |		End_Rendezvous	0x0
03e6 e219       |    |		Load	0x1,0x19							; Debug Table 0x1d.0xd = 0x3e6,0xe
03e7 e21a       |    |		Load	0x1,0x1a
03e8 0092 0462  |   b|		Action	Push_String_Extended,0x462					; ".Receive_Status.Status.Kind = "
03ea 01cc       |    |		Execute	Vector,Catenate
03eb e7fe       |    |		Load	0x3,-0x2
03ec 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03ed e003       |    |		Load	0x0,0x3
03ee 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
03ef 025e       | ^  |		Execute	Discrete,Convert
03f0 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03f1 01cc       |    |		Execute	Vector,Catenate
03f2 e002       |    |		Load	0x0,0x2
03f3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03f4 00d1       |    |		Pop_Control	Pop_Count_1
03f5 4100       |A   |		End_Rendezvous	0x0
03f6 0000 0000  |    |		.XXX[0x2]
03f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x001e0000}
03fc 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; See instruction 0x02cf at 0x2f3, index=0x14
0400 ; --------------------------------------------------------------------------------------
0400 0403       |    |		.CONST	0x0403								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0001       |    |		.CONST	0x0001								; Number of locals
0403			BODY_0400:
0403			INIT_0400:
0403 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1e = .DEBUG	0x0403,0x080e,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x03a1
													; Debug Table 0x1e.0x0 = 0x403,0x1
0404 e003       |    |		Load	0x0,0x3
0405 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0406 e7fd       |    |		Load	0x3,-0x3
0407 e7fe       |    |		Load	0x3,-0x2
0408 8227       | '  |		Call	0x1,0x27
0409 c7fc       |    |		Store	0x3,-0x4
040a c7fb       |    |		Store	0x3,-0x5
040b 4102       |A   |		End_Rendezvous	0x2
040c 0000 0000  |    |		.BLANK	0000[0x4]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; See instruction 0x02cf at 0x2f3, index=0x13
0410 ; --------------------------------------------------------------------------------------
0410 0413       |    |		.CONST	0x0413								; Address of begin
0411 0004       |    |		.CONST	0x0004								; Address of exception handler
0412 0001       |    |		.CONST	0x0001								; Number of locals
0413			BODY_0410:
0413			INIT_0410:
0413 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1f = .DEBUG	0x0413,0x0812,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x037e
													; Debug Table 0x1f.0x0 = 0x413,0x1
0414 e006       |    |		Load	0x0,0x6
0415 01d7       |    |		Execute	Vector,Field_Read
0416 6803       |h   |		Jump_Zero	0x41a
0417 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1f.0x1 = 0x417,0x2
0418 a7fd       |    |		Store_Unchecked	0x3,-0x3
0419 4101       |A   |		End_Rendezvous	0x1
041a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x2 = 0x41a,0x3
041b a7fd       |    |		Store_Unchecked	0x3,-0x3
041c 4101       |A   |		End_Rendezvous	0x1
041d 0000 0000  |    |		.XXX[0x3]
041f 0000       |    |
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; See instruction 0x02cf at 0x2f3, index=0x12
0420 ; --------------------------------------------------------------------------------------
0420 0423       | #  |		.CONST	0x0423								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0001       |    |		.CONST	0x0001								; Number of locals
0423			BODY_0420:
0423			INIT_0420:
0423 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20 = .DEBUG	0x0423,0x081a,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x0359
													; Debug Table 0x20.0x0 = 0x423,0x1
0424 8226       | &  |		Call	0x1,0x26
0425 4100       |A   |		End_Rendezvous	0x0
0426 0000 0000  |    |		.XXX[0x2]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; See instruction 0x02cf at 0x2f3, index=0x11
0428 ; --------------------------------------------------------------------------------------
0428 042b       | +  |		.CONST	0x042b								; Address of begin
0429 0004       |    |		.CONST	0x0004								; Address of exception handler
042a 0001       |    |		.CONST	0x0001								; Number of locals
042b			BODY_0428:
042b			INIT_0428:
042b 029f 044b  |   K|		Declare_Subprogram	INIT_0448,For_Call				; Debug Table 0x21 = .DEBUG	0x042b,0x081e,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x0349
042d 8602       |    |		Call	0x3,0x2								; Debug Table 0x21.0x0 = 0x42d,0x1
042e 4100       |A   |		End_Rendezvous	0x0
042f 0000       |    |		.XXX[0x1]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; See instruction 0x02cf at 0x2f3, index=0x10
0430 ; --------------------------------------------------------------------------------------
0430 0433       | 3  |		.CONST	0x0433								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0001       |    |		.CONST	0x0001								; Number of locals
0433			BODY_0430:
0433			INIT_0430:
0433 e7fd       |    |		Load	0x3,-0x3							; Debug Table 0x22 = .DEBUG	0x0433,0x0822,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x032d
													; Debug Table 0x22.0x0 = 0x433,0x1
0434 e7fe       |    |		Load	0x3,-0x2
0435 8225       | %  |		Call	0x1,0x25
0436 4101       |A   |		End_Rendezvous	0x1
0437 0000       |    |		.XXX[0x1]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; See instruction 0x02cf at 0x2f3, index=0xf
0438 ; --------------------------------------------------------------------------------------
0438 043b       | ;  |		.CONST	0x043b								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0001       |    |		.CONST	0x0001								; Number of locals
043b			BODY_0438:
043b			INIT_0438:
043b e7fd       |    |		Load	0x3,-0x3							; Debug Table 0x23 = .DEBUG	0x043b,0x0826,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x0315
													; Debug Table 0x23.0x0 = 0x43b,0x1
043c e7fe       |    |		Load	0x3,-0x2
043d 8225       | %  |		Call	0x1,0x25
043e 4101       |A   |		End_Rendezvous	0x1
043f 0000       |    |		.XXX[0x1]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; See instruction 0x02cf at 0x2f3, index=0xe
0440 ; --------------------------------------------------------------------------------------
0440 0443       | C  |		.CONST	0x0443								; Address of begin
0441 0004       |    |		.CONST	0x0004								; Address of exception handler
0442 0001       |    |		.CONST	0x0001								; Number of locals
0443			BODY_0440:
0443			INIT_0440:
0443 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x24 = .DEBUG	0x0443,0x082a,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x02f5
													; Debug Table 0x24.0x0 = 0x443,0x1
0444 8224       | $  |		Call	0x1,0x24
0445 4100       |A   |		End_Rendezvous	0x0
0446 0000 0000  |    |		.XXX[0x2]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 0450       | P  |		.CONST	0x0450								; Address of begin
0449 0004       |    |		.CONST	0x0004								; Address of exception handler
044a 0002       |    |		.CONST	0x0002								; Number of locals
044b			INIT_0448:
044b e003       |    |		Load	0x0,0x3								; Debug Table 0x25 = .DEBUG	0x044b,0x082e,0x0004,0x0000,0x0035,0xdbd4,0x0000,0x0347
													; Debug Table 0x25.0x0 = 0x44b,0xffff
044c 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
044d 02ff       |    |		Declare_Variable	Variant_Record
044e 00d8       |    |		Load_Top	At_Offset_0
044f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0450			BODY_0448:
0450 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x1 = 0x450,0x1
0451 e7fe       |    |		Load	0x3,-0x2
0452 8225       | %  |		Call	0x1,0x25
0453 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0454 ; --------------------------------------------------------------------------------------
0454 ; STRING TABLE
0454 ; --------------------------------------------------------------------------------------
0454 0020       |    |		.STRTAB	0x0020->0x0464							; "++* Failed to initiate a diagnostic connection to Rational."
0455 0059       | Y  |		.STRTAB	0x0059->0x0481							; "I will keep trying until I can connect to Rational."
0456 008a       |    |		.STRTAB	0x008a->0x049b							; "Please connect the diagnostic communication equipment,"
0457 00be       |    |		.STRTAB	0x00be->0x04b6							; "or crash the machine if you prefer to take a dump."
0458 00ee       |    |		.STRTAB	0x00ee->0x04cf							; "diagnostic modem: error: Multiplexing.Worker"
0459 0118       |    |		.STRTAB	0x0118->0x04e5							; ".Do_Disconnect ("
045a 0126       | &  |		.STRTAB	0x0126->0x04ed							; "): exception raised"
045b 0137       | 7  |		.STRTAB	0x0137->0x04f6							; ": exception raised"
045c 0147       | G  |		.STRTAB	0x0147->0x04ff							; ".Initialized twice"
045d 0157       | W  |		.STRTAB	0x0157->0x0508							; ".Receive_Packet.Kind = "
045e 016c       | l  |		.STRTAB	0x016c->0x0514							; "Receive_Packet.Kind = "
045f 0180       |    |		.STRTAB	0x0180->0x051f							; "Multiplexing.Datagram"
0460 0193       |    |		.STRTAB	0x0193->0x0529							; ".Receive_Status (Disconnect): "
0461 01af       |    |		.STRTAB	0x01af->0x0538							; "streams_connected /= 0"
0462 01c3       |    |		.STRTAB	0x01c3->0x0543							; ".Receive_Status.Status.Kind = "
0463 01df       |    |		.STREND 0x01df->0x0552
0464 2b2b 2a20  |++* |		.STRTAB_STRINGS
0553 0000 0000  |    |		.BLANK	0000[0x5]
0558 ; --------------------------------------------------------------------------------------
0558 ; Debug Table
0558 ; --------------------------------------------------------------------------------------
0558 0003 0026  |   &|		.CONST	0x0003,0x0026
055a 000b 068a  |    |		.DEBUG	0x000b,0x068a,0xc000,0x0000,0x0035,0xdbb4,0x0000,0x0007
0562 001d 069a  |    |		.DEBUG	0x001d,0x069a,0xc000,0x0000,0x0035,0xdbc4,0x0000,0x0005
056a 007b 06c2  | {  |		.DEBUG	0x007b,0x06c2,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x0064
0572 00cb 06e4  |    |		.DEBUG	0x00cb,0x06e4,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x0082
057a 00d3 06e8  |    |		.DEBUG	0x00d3,0x06e8,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x008c
0582 0103 06fa  |    |		.DEBUG	0x0103,0x06fa,0x1002,0x0000,0x0035,0xdbb4,0x0000,0x00a2
058a 0113 0702  |    |		.DEBUG	0x0113,0x0702,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x00af
0592 011b 0706  |    |		.DEBUG	0x011b,0x0706,0x1001,0x0000,0x0035,0xdbb4,0x0000,0x00b9
059a 012b 0710  | +  |		.DEBUG	0x012b,0x0710,0x1002,0x0000,0x0035,0xdbc4,0x0000,0x0066
05a2 0133 0714  | 3  |		.DEBUG	0x0133,0x0714,0x1001,0x0000,0x0035,0xdbc4,0x0000,0x012c
05aa 015b 0720  | [  |		.DEBUG	0x015b,0x0720,0x1001,0x0000,0x0035,0xdbc4,0x0000,0x028d
05b2 0193 0730  |   0|		.DEBUG	0x0193,0x0730,0x0000,0x0000,0x0035,0xdbc4,0x0000,0x007a
05ba 01a8 0732  |   2|		.DEBUG	0x01a8,0x0732,0x0000,0x0000,0x0035,0xdbd4,0x0000,0x000a
05c2 01eb 0760  |   `|		.DEBUG	0x01eb,0x0760,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0039
05ca 01fb 0768  |   h|		.DEBUG	0x01fb,0x0768,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0077
05d2 0203 076c  |   l|		.DEBUG	0x0203,0x076c,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0088
05da 020b 0770  |   p|		.DEBUG	0x020b,0x0770,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0099
05e2 0213 0774  |   t|		.DEBUG	0x0213,0x0774,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x00b0
05ea 0223 077a  | # z|		.DEBUG	0x0223,0x077a,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x00fb
05f2 023b 0780  | ;  |		.DEBUG	0x023b,0x0780,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x0136
05fa 024b 0788  | K  |		.DEBUG	0x024b,0x0788,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x0160
0602 027b 079c  | {  |		.DEBUG	0x027b,0x079c,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x01c3
060a 02b3 07ae  |    |		.DEBUG	0x02b3,0x07ae,0x0001,0x0000,0x0035,0xdbd4,0x0000,0x022a
0612 02e3 07c2  |    |		.DEBUG	0x02e3,0x07c2,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x02e2
061a 02f3 07c8  |    |		.DEBUG	0x02f3,0x07c8,0x0004,0x0000,0x0035,0xdbd4,0x0000,0x04b6
0622 032b 07ce  | +  |		.DEBUG	0x032b,0x07ce,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x00b3
062a 0353 07d4  | S  |		.DEBUG	0x0353,0x07d4,0x0002,0x0000,0x0035,0xdbd4,0x0000,0x0248
0632 036b 07de  | k  |		.DEBUG	0x036b,0x07de,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x049f
063a 037b 07e2  | {  |		.DEBUG	0x037b,0x07e2,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x048e
0642 03b3 07f0  |    |		.DEBUG	0x03b3,0x07f0,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x0428
064a 0403 080e  |    |		.DEBUG	0x0403,0x080e,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x03a1
0652 0413 0812  |    |		.DEBUG	0x0413,0x0812,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x037e
065a 0423 081a  | #  |		.DEBUG	0x0423,0x081a,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x0359
0662 042b 081e  | +  |		.DEBUG	0x042b,0x081e,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x0349
066a 0433 0822  | 3 "|		.DEBUG	0x0433,0x0822,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x032d
0672 043b 0826  | ; &|		.DEBUG	0x043b,0x0826,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x0315
067a 0443 082a  | C *|		.DEBUG	0x0443,0x082a,0x0003,0x0000,0x0035,0xdbd4,0x0000,0x02f5
0682 044b 082e  | K .|		.DEBUG	0x044b,0x082e,0x0004,0x0000,0x0035,0xdbd4,0x0000,0x0347
068a ; --------------------------------------------------------------------------------------
068a ; Debug3 Subtable 0x0
068a ; --------------------------------------------------------------------------------------
068a 0007 0000  |    |		.DBG3TAB	0x0007,0x0000
068c 000b ffff  |    |		.CONST	0x000b,0xffff
068e 0010 fffe  |    |		.CONST	0x0010,0xfffe
0690 0012 fffd  |    |		.CONST	0x0012,0xfffd
0692 0014 fffc  |    |		.CONST	0x0014,0xfffc
0694 0016 fffb  |    |		.CONST	0x0016,0xfffb
0696 0018 fffa  |    |		.CONST	0x0018,0xfffa
0698 001a fff9  |    |		.CONST	0x001a,0xfff9
069a ; --------------------------------------------------------------------------------------
069a ; Debug3 Subtable 0x1
069a ; --------------------------------------------------------------------------------------
069a 0012 0001  |    |		.DBG3TAB	0x0012,0x0001
069c 001d ffff  |    |		.CONST	0x001d,0xffff
069e 001e fffe  |    |		.CONST	0x001e,0xfffe
06a0 001f fffd  |    |		.CONST	0x001f,0xfffd
06a2 0020 fffc  |    |		.CONST	0x0020,0xfffc
06a4 0021 fffb  | !  |		.CONST	0x0021,0xfffb
06a6 0022 fffa  | "  |		.CONST	0x0022,0xfffa
06a8 0032 fff9  | 2  |		.CONST	0x0032,0xfff9
06aa 0038 fff8  | 8  |		.CONST	0x0038,0xfff8
06ac 0047 fff7  | G  |		.CONST	0x0047,0xfff7
06ae 004c fff6  | L  |		.CONST	0x004c,0xfff6
06b0 004e fff5  | N  |		.CONST	0x004e,0xfff5
06b2 0053 fff4  | S  |		.CONST	0x0053,0xfff4
06b4 0060 fff3  | `  |		.CONST	0x0060,0xfff3
06b6 0062 fff2  | b  |		.CONST	0x0062,0xfff2
06b8 0064 fff1  | d  |		.CONST	0x0064,0xfff1
06ba 0066 fff0  | f  |		.CONST	0x0066,0xfff0
06bc 0068 ffef  | h  |		.CONST	0x0068,0xffef
06be 006a ffee  | j  |		.CONST	0x006a,0xffee
06c0 006d 0001  | m  |		.CONST	0x006d,0x0001
06c2 ; --------------------------------------------------------------------------------------
06c2 ; Debug3 Subtable 0x2
06c2 ; --------------------------------------------------------------------------------------
06c2 0002 000e  |    |		.DBG3TAB	0x0002,0x000e
06c4 007b ffff  | {  |		.CONST	0x007b,0xffff
06c6 0081 fffe  |    |		.CONST	0x0081,0xfffe
06c8 0083 0001  |    |		.CONST	0x0083,0x0001
06ca 0086 0002  |    |		.CONST	0x0086,0x0002
06cc 0087 0003  |    |		.CONST	0x0087,0x0003
06ce 008b 0004  |    |		.CONST	0x008b,0x0004
06d0 0091 0005  |    |		.CONST	0x0091,0x0005
06d2 0099 0007  |    |		.CONST	0x0099,0x0007
06d4 00a6 0009  |    |		.CONST	0x00a6,0x0009
06d6 00a9 000a  |    |		.CONST	0x00a9,0x000a
06d8 00aa 000c  |    |		.CONST	0x00aa,0x000c
06da 00af 000d  |    |		.CONST	0x00af,0x000d
06dc 00b2 000e  |    |		.CONST	0x00b2,0x000e
06de 00b6 000f  |    |		.CONST	0x00b6,0x000f
06e0 00be 0010  |    |		.CONST	0x00be,0x0010
06e2 00c1 0011  |    |		.CONST	0x00c1,0x0011
06e4 ; --------------------------------------------------------------------------------------
06e4 ; Debug3 Subtable 0x3
06e4 ; --------------------------------------------------------------------------------------
06e4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
06e6 00cb 0001  |    |		.CONST	0x00cb,0x0001
06e8 ; --------------------------------------------------------------------------------------
06e8 ; Debug3 Subtable 0x4
06e8 ; --------------------------------------------------------------------------------------
06e8 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
06ea 00d3 ffff  |    |		.CONST	0x00d3,0xffff
06ec 00d5 fffe  |    |		.CONST	0x00d5,0xfffe
06ee 00d7 fffd  |    |		.CONST	0x00d7,0xfffd
06f0 00dc 0002  |    |		.CONST	0x00dc,0x0002
06f2 00ee 0003  |    |		.CONST	0x00ee,0x0003
06f4 00f1 0004  |    |		.CONST	0x00f1,0x0004
06f6 00f6 0001  |    |		.CONST	0x00f6,0x0001
06f8 00fc 0005  |    |		.CONST	0x00fc,0x0005
06fa ; --------------------------------------------------------------------------------------
06fa ; Debug3 Subtable 0x5
06fa ; --------------------------------------------------------------------------------------
06fa 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
06fc 0103 ffff  |    |		.CONST	0x0103,0xffff
06fe 0105 0001  |    |		.CONST	0x0105,0x0001
0700 010c 0002  |    |		.CONST	0x010c,0x0002
0702 ; --------------------------------------------------------------------------------------
0702 ; Debug3 Subtable 0x6
0702 ; --------------------------------------------------------------------------------------
0702 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0704 0113 0001  |    |		.CONST	0x0113,0x0001
0706 ; --------------------------------------------------------------------------------------
0706 ; Debug3 Subtable 0x7
0706 ; --------------------------------------------------------------------------------------
0706 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0708 011b ffff  |    |		.CONST	0x011b,0xffff
070a 011d 0001  |    |		.CONST	0x011d,0x0001
070c 011f 0002  |    |		.CONST	0x011f,0x0002
070e 0122 0003  | "  |		.CONST	0x0122,0x0003
0710 ; --------------------------------------------------------------------------------------
0710 ; Debug3 Subtable 0x8
0710 ; --------------------------------------------------------------------------------------
0710 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0712 012b 0001  | +  |		.CONST	0x012b,0x0001
0714 ; --------------------------------------------------------------------------------------
0714 ; Debug3 Subtable 0x9
0714 ; --------------------------------------------------------------------------------------
0714 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0716 0133 ffff  | 3  |		.CONST	0x0133,0xffff
0718 0139 0001  | 9  |		.CONST	0x0139,0x0001
071a 013f 0002  | ?  |		.CONST	0x013f,0x0002
071c 0145 0003  | E  |		.CONST	0x0145,0x0003
071e 014b 0004  | K  |		.CONST	0x014b,0x0004
0720 ; --------------------------------------------------------------------------------------
0720 ; Debug3 Subtable 0xa
0720 ; --------------------------------------------------------------------------------------
0720 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0722 015b ffff  | [  |		.CONST	0x015b,0xffff
0724 015d 0001  | ]  |		.CONST	0x015d,0x0001
0726 0161 0002  | a  |		.CONST	0x0161,0x0002
0728 016e 0003  | n  |		.CONST	0x016e,0x0003
072a 0171 0004  | q  |		.CONST	0x0171,0x0004
072c 0175 0005  | u  |		.CONST	0x0175,0x0005
072e 0179 0006  | y  |		.CONST	0x0179,0x0006
0730 ; --------------------------------------------------------------------------------------
0730 ; Debug3 Subtable 0xb
0730 ; --------------------------------------------------------------------------------------
0730 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0732 ; --------------------------------------------------------------------------------------
0732 ; Debug3 Subtable 0xc
0732 ; --------------------------------------------------------------------------------------
0732 0013 0003  |    |		.DBG3TAB	0x0013,0x0003
0734 01a8 ffff  |    |		.CONST	0x01a8,0xffff
0736 01ac fffe  |    |		.CONST	0x01ac,0xfffe
0738 01af fffd  |    |		.CONST	0x01af,0xfffd
073a 01b5 fffc  |    |		.CONST	0x01b5,0xfffc
073c 01b7 fffb  |    |		.CONST	0x01b7,0xfffb
073e 01b8 fffa  |    |		.CONST	0x01b8,0xfffa
0740 01ba fff9  |    |		.CONST	0x01ba,0xfff9
0742 01bd fff8  |    |		.CONST	0x01bd,0xfff8
0744 01c3 fff7  |    |		.CONST	0x01c3,0xfff7
0746 01c4 fff6  |    |		.CONST	0x01c4,0xfff6
0748 01c6 fff5  |    |		.CONST	0x01c6,0xfff5
074a 01c8 fff4  |    |		.CONST	0x01c8,0xfff4
074c 01ca fff3  |    |		.CONST	0x01ca,0xfff3
074e 01cc fff2  |    |		.CONST	0x01cc,0xfff2
0750 01ce fff1  |    |		.CONST	0x01ce,0xfff1
0752 01d0 fff0  |    |		.CONST	0x01d0,0xfff0
0754 01d2 ffef  |    |		.CONST	0x01d2,0xffef
0756 01d4 ffee  |    |		.CONST	0x01d4,0xffee
0758 01d6 ffed  |    |		.CONST	0x01d6,0xffed
075a 01de 0001  |    |		.CONST	0x01de,0x0001
075c 01e2 0002  |    |		.CONST	0x01e2,0x0002
075e 01e3 0003  |    |		.CONST	0x01e3,0x0003
0760 ; --------------------------------------------------------------------------------------
0760 ; Debug3 Subtable 0xd
0760 ; --------------------------------------------------------------------------------------
0760 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0762 01eb 0001  |    |		.CONST	0x01eb,0x0001
0764 01ef 0002  |    |		.CONST	0x01ef,0x0002
0766 01f1 0003  |    |		.CONST	0x01f1,0x0003
0768 ; --------------------------------------------------------------------------------------
0768 ; Debug3 Subtable 0xe
0768 ; --------------------------------------------------------------------------------------
0768 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
076a 01fb 0001  |    |		.CONST	0x01fb,0x0001
076c ; --------------------------------------------------------------------------------------
076c ; Debug3 Subtable 0xf
076c ; --------------------------------------------------------------------------------------
076c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
076e 0203 0001  |    |		.CONST	0x0203,0x0001
0770 ; --------------------------------------------------------------------------------------
0770 ; Debug3 Subtable 0x10
0770 ; --------------------------------------------------------------------------------------
0770 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0772 020b 0001  |    |		.CONST	0x020b,0x0001
0774 ; --------------------------------------------------------------------------------------
0774 ; Debug3 Subtable 0x11
0774 ; --------------------------------------------------------------------------------------
0774 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0776 0213 ffff  |    |		.CONST	0x0213,0xffff
0778 0215 0001  |    |		.CONST	0x0215,0x0001
077a ; --------------------------------------------------------------------------------------
077a ; Debug3 Subtable 0x12
077a ; --------------------------------------------------------------------------------------
077a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
077c 0223 0001  | #  |		.CONST	0x0223,0x0001
077e 0227 0002  | '  |		.CONST	0x0227,0x0002
0780 ; --------------------------------------------------------------------------------------
0780 ; Debug3 Subtable 0x13
0780 ; --------------------------------------------------------------------------------------
0780 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0782 023b 0001  | ;  |		.CONST	0x023b,0x0001
0784 023d 0002  | =  |		.CONST	0x023d,0x0002
0786 0244 0003  | D  |		.CONST	0x0244,0x0003
0788 ; --------------------------------------------------------------------------------------
0788 ; Debug3 Subtable 0x14
0788 ; --------------------------------------------------------------------------------------
0788 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
078a 024b 0001  | K  |		.CONST	0x024b,0x0001
078c 024d 0002  | M  |		.CONST	0x024d,0x0002
078e 0251 0003  | Q  |		.CONST	0x0251,0x0003
0790 0254 0004  | T  |		.CONST	0x0254,0x0004
0792 0261 0005  | a  |		.CONST	0x0261,0x0005
0794 0267 0006  | g  |		.CONST	0x0267,0x0006
0796 026b 0007  | k  |		.CONST	0x026b,0x0007
0798 026f 0008  | o  |		.CONST	0x026f,0x0008
079a 0273 0009  | s  |		.CONST	0x0273,0x0009
079c ; --------------------------------------------------------------------------------------
079c ; Debug3 Subtable 0x15
079c ; --------------------------------------------------------------------------------------
079c 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
079e 027b 0001  | {  |		.CONST	0x027b,0x0001
07a0 0282 0002  |    |		.CONST	0x0282,0x0002
07a2 0286 0003  |    |		.CONST	0x0286,0x0003
07a4 028a 0004  |    |		.CONST	0x028a,0x0004
07a6 028d 0005  |    |		.CONST	0x028d,0x0005
07a8 0292 0006  |    |		.CONST	0x0292,0x0006
07aa 029a 0007  |    |		.CONST	0x029a,0x0007
07ac 029e 0008  |    |		.CONST	0x029e,0x0008
07ae ; --------------------------------------------------------------------------------------
07ae ; Debug3 Subtable 0x16
07ae ; --------------------------------------------------------------------------------------
07ae 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
07b0 02b3 ffff  |    |		.CONST	0x02b3,0xffff
07b2 02b4 fffe  |    |		.CONST	0x02b4,0xfffe
07b4 02b6 0001  |    |		.CONST	0x02b6,0x0001
07b6 02ba 0002  |    |		.CONST	0x02ba,0x0002
07b8 02bc 0003  |    |		.CONST	0x02bc,0x0003
07ba 02bf 0004  |    |		.CONST	0x02bf,0x0004
07bc 02c1 0005  |    |		.CONST	0x02c1,0x0005
07be 02c6 0006  |    |		.CONST	0x02c6,0x0006
07c0 02d6 0007  |    |		.CONST	0x02d6,0x0007
07c2 ; --------------------------------------------------------------------------------------
07c2 ; Debug3 Subtable 0x17
07c2 ; --------------------------------------------------------------------------------------
07c2 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
07c4 02e3 0001  |    |		.CONST	0x02e3,0x0001
07c6 02ec 0002  |    |		.CONST	0x02ec,0x0002
07c8 ; --------------------------------------------------------------------------------------
07c8 ; Debug3 Subtable 0x18
07c8 ; --------------------------------------------------------------------------------------
07c8 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
07ca 030c 0001  |    |		.CONST	0x030c,0x0001
07cc 031d 000c  |    |		.CONST	0x031d,0x000c
07ce ; --------------------------------------------------------------------------------------
07ce ; Debug3 Subtable 0x19
07ce ; --------------------------------------------------------------------------------------
07ce 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
07d0 032b ffff  | +  |		.CONST	0x032b,0xffff
07d2 0330 0001  | 0  |		.CONST	0x0330,0x0001
07d4 ; --------------------------------------------------------------------------------------
07d4 ; Debug3 Subtable 0x1a
07d4 ; --------------------------------------------------------------------------------------
07d4 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
07d6 0353 ffff  | S  |		.CONST	0x0353,0xffff
07d8 0354 fffe  | T  |		.CONST	0x0354,0xfffe
07da 0359 0001  | Y  |		.CONST	0x0359,0x0001
07dc 0365 0002  | e  |		.CONST	0x0365,0x0002
07de ; --------------------------------------------------------------------------------------
07de ; Debug3 Subtable 0x1b
07de ; --------------------------------------------------------------------------------------
07de 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07e0 036b 0001  | k  |		.CONST	0x036b,0x0001
07e2 ; --------------------------------------------------------------------------------------
07e2 ; Debug3 Subtable 0x1c
07e2 ; --------------------------------------------------------------------------------------
07e2 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
07e4 037b 0001  | {  |		.CONST	0x037b,0x0001
07e6 0384 0006  |    |		.CONST	0x0384,0x0006
07e8 0391 0002  |    |		.CONST	0x0391,0x0002
07ea 0396 0003  |    |		.CONST	0x0396,0x0003
07ec 039b 0004  |    |		.CONST	0x039b,0x0004
07ee 039d 0005  |    |		.CONST	0x039d,0x0005
07f0 ; --------------------------------------------------------------------------------------
07f0 ; Debug3 Subtable 0x1d
07f0 ; --------------------------------------------------------------------------------------
07f0 0000 000e  |    |		.DBG3TAB	0x0000,0x000e
07f2 03b3 0001  |    |		.CONST	0x03b3,0x0001
07f4 03bb 0002  |    |		.CONST	0x03bb,0x0002
07f6 03bd 0003  |    |		.CONST	0x03bd,0x0003
07f8 03bf 0004  |    |		.CONST	0x03bf,0x0004
07fa 03c1 0005  |    |		.CONST	0x03c1,0x0005
07fc 03c3 0006  |    |		.CONST	0x03c3,0x0006
07fe 03c7 0007  |    |		.CONST	0x03c7,0x0007
0800 03cc 0008  |    |		.CONST	0x03cc,0x0008
0802 03d1 0009  |    |		.CONST	0x03d1,0x0009
0804 03d3 000a  |    |		.CONST	0x03d3,0x000a
0806 03d5 000b  |    |		.CONST	0x03d5,0x000b
0808 03e1 000c  |    |		.CONST	0x03e1,0x000c
080a 03e4 000d  |    |		.CONST	0x03e4,0x000d
080c 03e6 000e  |    |		.CONST	0x03e6,0x000e
080e ; --------------------------------------------------------------------------------------
080e ; Debug3 Subtable 0x1e
080e ; --------------------------------------------------------------------------------------
080e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0810 0403 0001  |    |		.CONST	0x0403,0x0001
0812 ; --------------------------------------------------------------------------------------
0812 ; Debug3 Subtable 0x1f
0812 ; --------------------------------------------------------------------------------------
0812 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0814 0413 0001  |    |		.CONST	0x0413,0x0001
0816 0417 0002  |    |		.CONST	0x0417,0x0002
0818 041a 0003  |    |		.CONST	0x041a,0x0003
081a ; --------------------------------------------------------------------------------------
081a ; Debug3 Subtable 0x20
081a ; --------------------------------------------------------------------------------------
081a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
081c 0423 0001  | #  |		.CONST	0x0423,0x0001
081e ; --------------------------------------------------------------------------------------
081e ; Debug3 Subtable 0x21
081e ; --------------------------------------------------------------------------------------
081e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0820 042d 0001  | -  |		.CONST	0x042d,0x0001
0822 ; --------------------------------------------------------------------------------------
0822 ; Debug3 Subtable 0x22
0822 ; --------------------------------------------------------------------------------------
0822 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0824 0433 0001  | 3  |		.CONST	0x0433,0x0001
0826 ; --------------------------------------------------------------------------------------
0826 ; Debug3 Subtable 0x23
0826 ; --------------------------------------------------------------------------------------
0826 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0828 043b 0001  | ;  |		.CONST	0x043b,0x0001
082a ; --------------------------------------------------------------------------------------
082a ; Debug3 Subtable 0x24
082a ; --------------------------------------------------------------------------------------
082a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
082c 0443 0001  | C  |		.CONST	0x0443,0x0001
082e ; --------------------------------------------------------------------------------------
082e ; Debug3 Subtable 0x25
082e ; --------------------------------------------------------------------------------------
082e 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0830 044b ffff  | K  |		.CONST	0x044b,0xffff
0832 0450 0001  | P  |		.CONST	0x0450,0x0001
0834 0000 0000  |    |		.BLANK	0000[0x1cc]