DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦b4ad783f4⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 03b8       |    |		.CONST	0x03b8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00c1       |    |		.CONST	0x00c1								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002d       | -  |		.CONST	0x002d								; Number of locals
000b			INIT_0008:
000b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x0 = .DEBUG	0x000b,0x047a,0x8000,0x0000,0x0036,0xf7e4,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 032b       | +  |		Declare_Type	Record,Incomplete,Visible
000d 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 62cc       |b   |		Indirect_Literal	Discrete,0x2e4,{0x00000000, 0x7fffff00}		; Debug Table 0x0.0x6 = 0x17,0xfff9
0018 62c7       |b   |		Indirect_Literal	Discrete,0x2e0,{0x00000000, 0x7fffffff}
0019 00e3       |    |		Load_Encached	Natural_Cache
001a 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
001b 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x1b,0xfff8
001d 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1d,0xfff7
001f 029a 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1f,0xfff6
0021 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x21,0xfff5
0023 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0xb = 0x23,0xfff4
0024 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0xc = 0x24,0xfff3
0025 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0xd = 0x25,0xfff2
0026 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0xe = 0x26,0xfff1
0027 1b5a       | Z  |		Execute	Package,Field_Read,Field_Number 0x5a
0028 00e1       |    |		Load_Encached	Boolean_Cache
0029 029f 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Call
002b e20d       |    |		Load	0x1,0xd
002c 0326       | &  |		Complete_Type	Record,By_Defining
002d 00bf       |    |		Action	Accept_Activation
002e 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x002e,0x049a,0x8000,0x0000,0x0036,0xf934,0x0000,0x0019
													; Debug Table 0x1.0x0 = 0x2e,0xffff
002f 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x2f,0xfffe
0030 e20d       |    |		Load	0x1,0xd								; Debug Table 0x1.0x2 = 0x30,0xfffd
0031 0322       | "  |		Declare_Variable	Record
0032 e218       |    |		Load	0x1,0x18
0033 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0034 4800       |H   |		Short_Literal	0x0
0035 e219       |    |		Load	0x1,0x19
0036 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0037 4800       |H   |		Short_Literal	0x0
0038 00d0       |    |		Action	Swap_Control
0039 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
003a 4800       |H   |		Short_Literal	0x0
003b e218       |    |		Load	0x1,0x18
003c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
003d e20d       |    |		Load	0x1,0xd								; Debug Table 0x1.0x3 = 0x3d,0xfffc
003e 012c       | ,  |		Execute	Any,Size
003f 0f81       |    |		Execute_Immediate	Equal,-0x7f
0040 7002       |p   |		Jump_Nonzero	0x43
0041 4887       |H   |		Short_Literal	0x87
0042 0257       | W  |		Execute	Discrete,Raise
0043 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x1.0x4 = 0x43,0xfffb
0044 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x5 = 0x44,0xfffa
0045 4804       |H   |		Short_Literal	0x4
0046 e219       |    |		Load	0x1,0x19
0047 02a0       |    |		Declare_Subprogram	Null_Subprogram
0048 4801       |H   |		Short_Literal	0x1
0049 035d       | ]  |		Declare_Type	Array,Defined
004a 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x1.0x6 = 0x4a,0xfff9
004b 00e2       |    |		Load_Encached	Integer_Cache
004c e21a       |    |		Load	0x1,0x1a
004d 02a0       |    |		Declare_Subprogram	Null_Subprogram
004e 4803       |H   |		Short_Literal	0x3
004f 032d       | -  |		Declare_Type	Record,Defined
0050 e21b       |    |		Load	0x1,0x1b							; Debug Table 0x1.0x7 = 0x50,0xfff8
0051 0322       | "  |		Declare_Variable	Record
0052 4800       |H   |		Short_Literal	0x0
0053 e21c       |    |		Load	0x1,0x1c
0054 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0055 4800       |H   |		Short_Literal	0x0
0056 e21c       |    |		Load	0x1,0x1c
0057 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0058 e21a       |    |		Load	0x1,0x1a
0059 0337       | 7  |		Declare_Variable	Array
005a 4800       |H   |		Short_Literal	0x0
005b 4801       |H   |		Short_Literal	0x1
005c e21d       |    |		Load	0x1,0x1d
005d 01d6       |    |		Execute	Vector,Field_Write
005e 4800       |H   |		Short_Literal	0x0
005f 4802       |H   |		Short_Literal	0x2
0060 e21d       |    |		Load	0x1,0x1d
0061 01d6       |    |		Execute	Vector,Field_Write
0062 4800       |H   |		Short_Literal	0x0
0063 4803       |H   |		Short_Literal	0x3
0064 e21d       |    |		Load	0x1,0x1d
0065 01d6       |    |		Execute	Vector,Field_Write
0066 4800       |H   |		Short_Literal	0x0
0067 4804       |H   |		Short_Literal	0x4
0068 e21d       |    |		Load	0x1,0x1d
0069 01d6       |    |		Execute	Vector,Field_Write
006a e21a       |    |		Load	0x1,0x1a
006b 0119       |    |		Execute	Any,Check_In_Formal_Type
006c e21c       |    |		Load	0x1,0x1c
006d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
006e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0x8 = 0x6e,0xfff7
006f e21b       |    |		Load	0x1,0x1b
0070 e20d       |    |		Load	0x1,0xd
0071 029f 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Call
0073 4803       |H   |		Short_Literal	0x3
0074 032d       | -  |		Declare_Type	Record,Defined
0075 029b 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x9 = 0x75,0xfff6
0077 6264       |bd  |		Indirect_Literal	Discrete,0x2dc,{0x00000000, 0x0036f934}		; Debug Table 0x1.0xa = 0x77,0xfff5
0078 4894       |H   |		Short_Literal	0x94
0079 48ff       |H   |		Short_Literal	0xff
007a e21b       |    |		Load	0x1,0x1b
007b e213       |    |		Load	0x1,0x13
007c 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
007d e002       |    |		Load	0x0,0x2
007e 0387       |    |		Declare_Variable	Package
007f 00d8       |    |		Load_Top	At_Offset_0
0080 020f       |    |		Execute	Module,Activate
0081 6262       |bb  |		Indirect_Literal	Discrete,0x2e4,{0x00000000, 0x7fffff00}		; Debug Table 0x1.0xb = 0x81,0xfff4
0082 625d       |b]  |		Indirect_Literal	Discrete,0x2e0,{0x00000000, 0x7fffffff}
0083 e20d       |    |		Load	0x1,0xd
0084 029f 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Call
0086 4801       |H   |		Short_Literal	0x1
0087 035d       | ]  |		Declare_Type	Array,Defined
0088 e21f       |    |		Load	0x1,0x1f							; Debug Table 0x1.0xc = 0x88,0xfff3
0089 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
008a e220       |    |		Load	0x1,0x20							; Debug Table 0x1.0xd = 0x8a,0xfff2
008b 0337       | 7  |		Declare_Variable	Array
008c e222       | "  |		Load	0x1,0x22
008d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
008e 6249       |bI  |		Indirect_Literal	Discrete,0x2d8,{0x00000000, 0x7fffff01}		; Debug Table 0x1.0xe = 0x8e,0xfff1
008f e213       |    |		Load	0x1,0x13
0090 03f1       |    |		Declare_Variable	Discrete,With_Value
0091 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0xf = 0x91,0xfff0
0092 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x10 = 0x92,0xffef
0093 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0094 02c7       |    |		Declare_Variable	Any
0095 4801       |H   |		Short_Literal	0x1
0096 0092 038c  |    |		Action	Push_String_Extended,0x38c					; "Problem registering type"
0098 e003       |    |		Load	0x0,0x3
0099 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
009a c224       | $  |		Store	0x1,0x24
009b 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x11 = 0x9b,0xffee
009c 00c7       |    |		Action	Elaborate_Subprogram
009d 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x12 = 0x9d,0xffed
009e 00c7       |    |		Action	Elaborate_Subprogram
009f 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x13 = 0x9f,0xffec
00a0 00c7       |    |		Action	Elaborate_Subprogram
00a1 029d 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call			; Debug Table 0x1.0x14 = 0xa1,0xffeb
00a3 029d 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call			; Debug Table 0x1.0x15 = 0xa3,0xffea
00a5 029d 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call			; Debug Table 0x1.0x16 = 0xa5,0xffe9
00a7 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x17 = 0xa7,0xffe8
00a8 00c7       |    |		Action	Elaborate_Subprogram
00a9 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x18 = 0xa9,0xffe7
00aa 00c7       |    |		Action	Elaborate_Subprogram
00ab 029d 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call			; Debug Table 0x1.0x19 = 0xab,0xffe6
00ad 029d 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call			; Debug Table 0x1.0x1a = 0xad,0xffe5
00af 029d 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call			; Debug Table 0x1.0x1b = 0xaf,0xffe4
00b1 029d 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call			; Debug Table 0x1.0x1c = 0xb1,0xffe3
00b3 029d 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call			; Debug Table 0x1.0x1d = 0xb3,0xffe2
00b5 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x1e = 0xb5,0xffe1
00b6 00c7       |    |		Action	Elaborate_Subprogram
00b7 029d 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call			; Debug Table 0x1.0x1f = 0xb7,0xffe0
00b9 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x20 = 0xb9,0xffdf
00ba 00c7       |    |		Action	Elaborate_Subprogram
00bb 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x21 = 0xbb,0xffde
00bc 00c7       |    |		Action	Elaborate_Subprogram
00bd 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x22 = 0xbd,0xffdd
00be 00c7       |    |		Action	Elaborate_Subprogram
00bf 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x23 = 0xbf,0xffdc
00c0 00c7       |    |		Action	Elaborate_Subprogram
00c1			BODY_0008:
00c1 e21f       |    |		Load	0x1,0x1f							; Debug Table 0x1.0x24 = 0xc1,0x1
00c2 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00c3 48ff       |H   |		Short_Literal	0xff
00c4 e21f       |    |		Load	0x1,0x1f
00c5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00c6 c221       | !  |		Store	0x1,0x21
00c7 00bc       |    |		Action	Signal_Activated
00c8 00bb       |    |		Action	Signal_Completion
00c9 0000 0000  |    |		.BLANK	0000[0x7]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 e218       |    |		Load	0x1,0x18							; Debug Table 0x2 = .DEBUG	0x00d3,0x04e6,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x000e
													; Debug Table 0x2.0x0 = 0xd3,0x1
00d4 00ca       |    |		Action	Exit_Nullary_Function
00d5 0000 0000  |    |		.XXX[0x3]
00d7 0000       |    |
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3 = .DEBUG	0x00db,0x04ea,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x0013
													; Debug Table 0x3.0x0 = 0xdb,0x1
00dc 8216       |    |		Call	0x1,0x16
00dd 7002       |p   |		Jump_Nonzero	0xe0
00de 4887       |H   |		Short_Literal	0x87
00df 0257       | W  |		Execute	Discrete,Raise
00e0 e20d       |    |		Load	0x1,0xd								; Debug Table 0x3.0x1 = 0xe0,0x2
00e1 0322       | "  |		Declare_Variable	Record
00e2 e5ff       |    |		Load	0x2,-0x1
00e3 e402       |    |		Load	0x2,0x2
00e4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00e5 4801       |H   |		Short_Literal	0x1
00e6 e402       |    |		Load	0x2,0x2
00e7 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00e8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e9 0000 0000  |    |		.BLANK	0000[0x7]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4 = .DEBUG	0x00f3,0x04f0,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x0020
													; Debug Table 0x4.0x0 = 0xf3,0x1
00f4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00f5 7002       |p   |		Jump_Nonzero	0xf8
00f6 4887       |H   |		Short_Literal	0x87
00f7 0257       | W  |		Execute	Discrete,Raise
00f8 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x1 = 0xf8,0x2
00f9 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00fa 0320       |    |		Declare_Variable	Record,Duplicate
00fb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00fc 0000 0000  |    |		.BLANK	0000[0x4]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103       |    |		.CONST	0x0103								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0001       |    |		.CONST	0x0001								; Number of locals
0103			BODY_0100:
0103			INIT_0100:
0103 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5 = .DEBUG	0x0103,0x04f6,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x002d
													; Debug Table 0x5.0x0 = 0x103,0x1
0104 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0105 6808       |h   |		Jump_Zero	0x10e
0106 e5ff       |    |		Load	0x2,-0x1
0107 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0108 8216       |    |		Call	0x1,0x16
0109 6804       |h   |		Jump_Zero	0x10e
010a e5ff       |    |		Load	0x2,-0x1
010b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
010c 8227       | '  |		Call	0x1,0x27
010d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
010e 4800       |H   |		Short_Literal	0x0
010f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 012a       | *  |		.CONST	0x012a								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0005       |    |		.CONST	0x0005								; Number of locals
0113			INIT_0110:
0113 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x6 = .DEBUG	0x0113,0x04fa,0x2801,0x0002,0x0036,0xf7e4,0x0000,0x0036
													; Debug Table 0x6.0x0 = 0x113,0xffff
0114 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x1 = 0x114,0xfffe
0115 e001       |    |		Load	0x0,0x1
0116 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
0117 e001       |    |		Load	0x0,0x1
0118 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0119 e001       |    |		Load	0x0,0x1
011a 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
011b 03f1       |    |		Declare_Variable	Discrete,With_Value
011c 4802       |H   |		Short_Literal	0x2							; Debug Table 0x6.0x2 = 0x11c,0xfffd
011d 4802       |H   |		Short_Literal	0x2
011e 0099       |    |		Action	Reference_Dynamic
011f 012d       | -  |		Execute	Any,Address
0120 e001       |    |		Load	0x0,0x1
0121 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0122 0afc       |    |		Execute_Immediate	Plus,-0x4
0123 e001       |    |		Load	0x0,0x1
0124 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0125 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0126 e404       |    |		Load	0x2,0x4								; Debug Table 0x6.0x3 = 0x126,0xfffc
0127 e403       |    |		Load	0x2,0x3
0128 e001       |    |		Load	0x0,0x1
0129 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
012a			BODY_0110:
012a e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0x4 = 0x12a,0x1
012b 820f       |    |		Call	0x1,0xf
012c e5fc       |    |		Load	0x2,-0x4
012d 822d       | -  |		Call	0x1,0x2d
012e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
012f 0000       |    |		.XXX[0x1]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0139       | 9  |		.CONST	0x0139								; Address of begin
0131 015d       | ]  |		.CONST	0x015d								; Address of exception handler
0132 0004       |    |		.CONST	0x0004								; Number of locals
0133			INIT_0130:
0133 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7 = .DEBUG	0x0133,0x0506,0x0001,0x0000,0x0036,0xf7e4,0x0000,0x006c
													; Debug Table 0x7.0x0 = 0x133,0xffff
0134 e21b       |    |		Load	0x1,0x1b							; Debug Table 0x7.0x1 = 0x134,0xfffe
0135 0322       | "  |		Declare_Variable	Record
0136 61ad       |a   |		Indirect_Literal	Discrete,0x2e4,{0x00000000, 0x7fffff00}		; Debug Table 0x7.0x2 = 0x136,0xfffd
0137 e213       |    |		Load	0x1,0x13
0138 03f1       |    |		Declare_Variable	Discrete,With_Value
0139			BODY_0130:
0139 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x3 = 0x139,0x1
013a 00eb       |    |		Load_Encached	Diana_Cache
013b 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
013c 00eb       |    |		Load_Encached	Diana_Cache
013d 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
013e a402       |    |		Store_Unchecked	0x2,0x2
013f e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x4 = 0x13f,0x2
0140 00eb       |    |		Load_Encached	Diana_Cache
0141 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0142 0b2a       | *  |		Execute_Immediate	Case_Compare,0x2a
0143 7009       |p   |		Jump_Nonzero	0x14d
0144 0b2b       | +  |		Execute_Immediate	Case_Compare,0x2b
0145 7007       |p   |		Jump_Nonzero	0x14d
0146 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
0147 7005       |p   |		Jump_Nonzero	0x14d
0148 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x5 = 0x148,0x4
0149 490b       |I   |		Short_Literal	0x10b
014a 00eb       |    |		Load_Encached	Diana_Cache
014b 0096       |    |		Execute	Package,Entry
014c a402       |    |		Store_Unchecked	0x2,0x2
014d 00d1       |    |		Pop_Control	Pop_Count_1
014e e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x6 = 0x14e,0x5
014f 822b       | +  |		Call	0x1,0x2b
0150 e403       |    |		Load	0x2,0x3
0151 017d       | }  |		Execute	Record,Structure_Write
0152 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x7 = 0x152,0x6
0153 e404       |    |		Load	0x2,0x4
0154 e403       |    |		Load	0x2,0x3
0155 e221       | !  |		Load	0x1,0x21
0156 e21f       |    |		Load	0x1,0x1f
0157 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0158 c404       |    |		Store	0x2,0x4
0159 c5fe       |    |		Store	0x2,-0x2
015a e404       |    |		Load	0x2,0x4								; Debug Table 0x7.0x8 = 0x15a,0x7
015b a5fd       |    |		Store_Unchecked	0x2,-0x3
015c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
015d			TRAP_0130:
015d 0007       |    |		Action	Break_Optional
015e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x9 = 0x15e,0x8
015f a5fe       |    |		Store_Unchecked	0x2,-0x2
0160 6183       |a   |		Indirect_Literal	Discrete,0x2e4,{0x00000000, 0x7fffff00}		; Debug Table 0x7.0xa = 0x160,0x9
0161 a5fd       |    |		Store_Unchecked	0x2,-0x3
0162 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0163 0000 0000  |    |		.BLANK	0000[0x5]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 0184       |    |		.CONST	0x0184								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8 = .DEBUG	0x016b,0x051e,0x0001,0x0000,0x0036,0xf7e4,0x0000,0x007e
													; Debug Table 0x8.0x0 = 0x16b,0x1
016c 616b       |ak  |		Indirect_Literal	Discrete,0x2d8,{0x00000000, 0x7fffff01}
016d e223       | #  |		Load	0x1,0x23
016e 0aff       |    |		Execute_Immediate	Plus,-0x1
016f 0262       | b  |		Execute	Discrete,In_Range
0170 680d       |h   |		Jump_Zero	0x17e
0171 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x1 = 0x171,0x2
0172 a5fe       |    |		Store_Unchecked	0x2,-0x2
0173 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x2 = 0x173,0x3
0174 e222       | "  |		Load	0x1,0x22
0175 01d5       |    |		Execute	Vector,Field_Reference
0176 e5fd       |    |		Load	0x2,-0x3
0177 017d       | }  |		Execute	Record,Structure_Write
0178 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8.0x3 = 0x178,0x4
0179 8211       |    |		Call	0x1,0x11
017a 7002       |p   |		Jump_Nonzero	0x17d
017b 4887       |H   |		Short_Literal	0x87
017c 0257       | W  |		Execute	Discrete,Raise
017d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
017e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x4 = 0x17e,0x5
017f a5fe       |    |		Store_Unchecked	0x2,-0x2
0180 e218       |    |		Load	0x1,0x18							; Debug Table 0x8.0x5 = 0x180,0x6
0181 e5fd       |    |		Load	0x2,-0x3
0182 017d       | }  |		Execute	Record,Structure_Write
0183 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0184			TRAP_0168:
0184 0007       |    |		Action	Break_Optional
0185 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x6 = 0x185,0x7
0186 a5fe       |    |		Store_Unchecked	0x2,-0x2
0187 e218       |    |		Load	0x1,0x18							; Debug Table 0x8.0x7 = 0x187,0x8
0188 e5fd       |    |		Load	0x2,-0x3
0189 017d       | }  |		Execute	Record,Structure_Write
018a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
018b 0000 0000  |    |		.BLANK	0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0199       |    |		.CONST	0x0199								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0002       |    |		.CONST	0x0002								; Number of locals
0193			INIT_0190:
0193 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9 = .DEBUG	0x0193,0x0530,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x008e
													; Debug Table 0x9.0x0 = 0x193,0xffff
0194 e001       |    |		Load	0x0,0x1
0195 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0196 e001       |    |		Load	0x0,0x1
0197 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0198 03f1       |    |		Declare_Variable	Discrete,With_Value
0199			BODY_0190:
0199 e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x1 = 0x199,0x1
019a 0b02       |    |		Execute_Immediate	Case_Compare,0x2
019b 7008       |p   |		Jump_Nonzero	0x1a4
019c 0b12       |    |		Execute_Immediate	Case_Compare,0x12
019d 7006       |p   |		Jump_Nonzero	0x1a4
019e 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
019f 7004       |p   |		Jump_Nonzero	0x1a4
01a0 0b32       | 2  |		Execute_Immediate	Case_Compare,0x32
01a1 7002       |p   |		Jump_Nonzero	0x1a4
01a2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x2 = 0x1a2,0x3
01a3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x3 = 0x1a4,0x2
01a5 822c       | ,  |		Call	0x1,0x2c
01a6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a7 0000       |    |		.XXX[0x1]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab       |    |		.CONST	0x01ab								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0001       |    |		.CONST	0x0001								; Number of locals
01ab			BODY_01a8:
01ab			INIT_01a8:
01ab 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0xa = .DEBUG	0x01ab,0x053a,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x009b
													; Debug Table 0xa.0x0 = 0x1ab,0x1
01ac 00ca       |    |		Action	Exit_Nullary_Function
01ad 0000 0000  |    |		.XXX[0x3]
01af 0000       |    |
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 4608       |F   |		Jump_Case	0x9							; Debug Table 0xb = .DEBUG	0x01b3,0x053e,0x0005,0x0000,0x0036,0xf7e4,0x0000,0x00ae
01b4 7808       |x   |		Jump	0x1bd								; case 0x0
01b5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
01b6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
01b7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
01b8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
01b9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
01ba 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
01bb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
01bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
01bd 4800       |H   |		Short_Literal	0x0
01be e5ff       |    |		Load	0x2,-0x1
01bf 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01c0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
01c1 0000 0000  |    |		.BLANK	0000[0x7]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb       |    |		.CONST	0x01cb								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0001       |    |		.CONST	0x0001								; Number of locals
01cb			BODY_01c8:
01cb			INIT_01c8:
01cb 4608       |F   |		Jump_Case	0x9							; Debug Table 0xc = .DEBUG	0x01cb,0x0540,0x0005,0x0000,0x0036,0xf934,0x0000,0x0076
01cc 7808       |x   |		Jump	0x1d5								; case 0x0
01cd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
01ce 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
01cf 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
01d0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
01d1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
01d2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
01d3 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
01d4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
01d5 e5ff       |    |		Load	0x2,-0x1
01d6 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
01d7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
01d9 0000 0000  |    |		.BLANK	0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3       |    |		.CONST	0x01e3								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0001       |    |		.CONST	0x0001								; Number of locals
01e3			BODY_01e0:
01e3			INIT_01e0:
01e3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xd = .DEBUG	0x01e3,0x0542,0x0002,0x0000,0x0036,0xf934,0x0000,0x008b
													; Debug Table 0xd.0x0 = 0x1e3,0x1
01e4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
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 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0xe = .DEBUG	0x01eb,0x0546,0x0005,0x0000,0x0036,0xf934,0x0000,0x009d
01ec e5ff       |    |		Load	0x2,-0x1
01ed 01d8       |    |		Execute	Vector,Element_Type
01ee 0322       | "  |		Declare_Variable	Record
01ef 00d8       |    |		Load_Top	At_Offset_0
01f0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01f1 e5ff       |    |		Load	0x2,-0x1
01f2 01dc       |    |		Execute	Vector,Last
01f3 e5ff       |    |		Load	0x2,-0x1
01f4 01dd       |    |		Execute	Vector,First
01f5 0263       | c  |		Execute	Discrete,Above_Bound
01f6 7006       |p   |		Jump_Nonzero	0x1fd
01f7 e402       |    |		Load	0x2,0x2
01f8 e404       |    |		Load	0x2,0x4
01f9 e5ff       |    |		Load	0x2,-0x1
01fa 01d6       |    |		Execute	Vector,Field_Write
01fb 0a01       |    |		Execute_Immediate	Plus,0x1
01fc 7ff8       |    |		Jump	0x1f5
01fd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
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 4820       |H   |		Short_Literal	0x20							; Debug Table 0xf = .DEBUG	0x0203,0x0548,0x0002,0x0000,0x0036,0xf934,0x0000,0x0120
													; Debug Table 0xf.0x0 = 0x203,0x1
0204 4800       |H   |		Short_Literal	0x0
0205 e5ff       |    |		Load	0x2,-0x1
0206 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0207 e004       |    |		Load	0x0,0x4
0208 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0209 e005       |    |		Load	0x0,0x5
020a 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
020b 025b       | [  |		Execute	Discrete,Check_In_Type
020c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020d 0000 0000  |    |		.XXX[0x3]
020f 0000       |    |
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 4814       |H   |		Short_Literal	0x14							; Debug Table 0x10 = .DEBUG	0x0213,0x054c,0x0002,0x0000,0x0036,0xf934,0x0000,0x0145
													; Debug Table 0x10.0x0 = 0x213,0x1
0214 4825       |H%  |		Short_Literal	0x25
0215 e5ff       |    |		Load	0x2,-0x1
0216 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0217 e004       |    |		Load	0x0,0x4
0218 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0219 e001       |    |		Load	0x0,0x1
021a 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
021b 025b       | [  |		Execute	Discrete,Check_In_Type
021c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021d 0000 0000  |    |		.XXX[0x3]
021f 0000       |    |
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 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11 = .DEBUG	0x0223,0x0550,0x0002,0x0000,0x0036,0xf934,0x0000,0x016a
													; Debug Table 0x11.0x0 = 0x223,0x1
0224 8225       | %  |		Call	0x1,0x25
0225 e001       |    |		Load	0x0,0x1
0226 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0227 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12 = .DEBUG	0x022b,0x0554,0x0002,0x0000,0x0036,0xf934,0x0000,0x01b7
													; Debug Table 0x12.0x0 = 0x22b,0x1
022c e5ff       |    |		Load	0x2,-0x1
022d 0092 038d  |    |		Action	Push_String_Extended,0x38d					; "Dtia"
022f e006       |    |		Load	0x0,0x6
0230 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0231 7008       |p   |		Jump_Nonzero	0x23a
0232 4801       |H   |		Short_Literal	0x1
0233 e5ff       |    |		Load	0x2,-0x1
0234 0092 038e  |    |		Action	Push_String_Extended,0x38e					; "Gateway"
0236 e006       |    |		Load	0x0,0x6
0237 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0238 0e00       |    |		Execute_Immediate	Not_Equal,0x0
0239 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023a 4801       |H   |		Short_Literal	0x1
023b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023c 0000 0000  |    |		.BLANK	0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243       | C  |		.CONST	0x0243								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0001       |    |		.CONST	0x0001								; Number of locals
0243			BODY_0240:
0243			INIT_0240:
0243 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13 = .DEBUG	0x0243,0x0558,0x0001,0x0000,0x0036,0xf934,0x0000,0x01ed
													; Debug Table 0x13.0x0 = 0x243,0x1
0244 8228       | (  |		Call	0x1,0x28
0245 7006       |p   |		Jump_Nonzero	0x24c
0246 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13.0x1 = 0x246,0x2
0247 e224       | $  |		Load	0x1,0x24
0248 0092 038f  |    |		Action	Push_String_Extended,0x38f					; "Debugger Elaboration"
024a e003       |    |		Load	0x0,0x3
024b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
024c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
024d 0000 0000  |    |		.XXX[0x3]
024f 0000       |    |
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0256       | V  |		.CONST	0x0256								; Address of begin
0251 0273       | s  |		.CONST	0x0273								; Address of exception handler
0252 0003       |    |		.CONST	0x0003								; Number of locals
0253			INIT_0250:
0253 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x14 = .DEBUG	0x0253,0x055e,0x0002,0x0000,0x0036,0xf934,0x0000,0x020b
													; Debug Table 0x14.0x0 = 0x253,0xffff
0254 e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0x1 = 0x254,0xfffe
0255 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0256			BODY_0250:
0256 e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0x2 = 0x256,0x1
0257 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0258 e007       |    |		Load	0x0,0x7
0259 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
025a 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
025b e5ff       |    |		Load	0x2,-0x1
025c e007       |    |		Load	0x0,0x7
025d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
025e 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
025f c402       |    |		Store	0x2,0x2
0260 c403       |    |		Store	0x2,0x3
0261 e403       |    |		Load	0x2,0x3								; Debug Table 0x14.0x3 = 0x261,0x2
0262 6802       |h   |		Jump_Zero	0x265
0263 4887       |H   |		Short_Literal	0x87
0264 0257       | W  |		Execute	Discrete,Raise
0265 e402       |    |		Load	0x2,0x2								; Debug Table 0x14.0x4 = 0x265,0x3
0266 00eb       |    |		Load_Encached	Diana_Cache
0267 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0268 0fa8       |    |		Execute_Immediate	Equal,-0x58
0269 6806       |h   |		Jump_Zero	0x270
026a e402       |    |		Load	0x2,0x2								; Debug Table 0x14.0x5 = 0x26a,0x4
026b 4976       |Iv  |		Short_Literal	0x176
026c 00eb       |    |		Load_Encached	Diana_Cache
026d 0098       |    |		Execute	Package,Field_Read_Dynamic
026e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
026f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0270 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x14.0x6 = 0x270,0x5
0271 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0272 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0273			TRAP_0250:
0273 0007       |    |		Action	Break_Optional
0274 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x14.0x7 = 0x274,0x6
0275 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0276 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0277 0000       |    |		.XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0285       |    |		.CONST	0x0285								; Address of begin
0279 02d2       |    |		.CONST	0x02d2								; Address of exception handler
027a 0006       |    |		.CONST	0x0006								; Number of locals
027b			INIT_0278:
027b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15 = .DEBUG	0x027b,0x0570,0x0002,0x0000,0x0036,0xf934,0x0000,0x0266
													; Debug Table 0x15.0x0 = 0x27b,0xffff
027c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15.0x1 = 0x27c,0xfffe
027d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15.0x2 = 0x27d,0xfffd
027e e21b       |    |		Load	0x1,0x1b							; Debug Table 0x15.0x3 = 0x27e,0xfffc
027f 0322       | "  |		Declare_Variable	Record
0280 e21c       |    |		Load	0x1,0x1c
0281 e405       |    |		Load	0x2,0x5
0282 017d       | }  |		Execute	Record,Structure_Write
0283 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x15.0x4 = 0x283,0xfffb
0284 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0285			BODY_0278:
0285 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x15.0x5 = 0x285,0x1
0286 822a       | *  |		Call	0x1,0x2a
0287 a402       |    |		Store_Unchecked	0x2,0x2
0288 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x6 = 0x288,0x2
0289 00eb       |    |		Load_Encached	Diana_Cache
028a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
028b 6802       |h   |		Jump_Zero	0x28e
028c e21c       |    |		Load	0x1,0x1c							; Debug Table 0x15.0x7 = 0x28c,0x3
028d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028e e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x8 = 0x28e,0x4
028f e008       |    |		Load	0x0,0x8
0290 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0291 e405       |    |		Load	0x2,0x5
0292 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0293 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x9 = 0x293,0x5
0294 e008       |    |		Load	0x0,0x8
0295 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0296 e405       |    |		Load	0x2,0x5
0297 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0298 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x15.0xa = 0x298,0x6
0299 e009       |    |		Load	0x0,0x9
029a 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
029b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
029c e406       |    |		Load	0x2,0x6
029d e405       |    |		Load	0x2,0x5
029e 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
029f 01d6       |    |		Execute	Vector,Field_Write
02a0 e406       |    |		Load	0x2,0x6								; Debug Table 0x15.0xb = 0x2a0,0x7
02a1 0a01       |    |		Execute_Immediate	Plus,0x1
02a2 c406       |    |		Store	0x2,0x6
02a3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x15.0xc = 0x2a3,0x8
02a4 00eb       |    |		Load_Encached	Diana_Cache
02a5 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
02a6 a403       |    |		Store_Unchecked	0x2,0x3
02a7 7824       |x$  |		Jump	0x2cc
02a8 e403       |    |		Load	0x2,0x3								; Debug Table 0x15.0xd = 0x2a8,0xa
02a9 00eb       |    |		Load_Encached	Diana_Cache
02aa 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02ab 0f3e       | >  |		Execute_Immediate	Equal,0x3e
02ac 681b       |h   |		Jump_Zero	0x2c8
02ad e403       |    |		Load	0x2,0x3								; Debug Table 0x15.0xe = 0x2ad,0xb
02ae 00eb       |    |		Load_Encached	Diana_Cache
02af 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
02b0 a404       |    |		Store_Unchecked	0x2,0x4
02b1 e404       |    |		Load	0x2,0x4								; Debug Table 0x15.0xf = 0x2b1,0xc
02b2 e402       |    |		Load	0x2,0x2
02b3 021f       |    |		Execute	Heap_Access,Equal
02b4 701b       |p   |		Jump_Nonzero	0x2d0
02b5 e404       |    |		Load	0x2,0x4								; Debug Table 0x15.0x10 = 0x2b5,0xd
02b6 e009       |    |		Load	0x0,0x9
02b7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02b8 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02b9 680e       |h   |		Jump_Zero	0x2c8
02ba e404       |    |		Load	0x2,0x4								; Debug Table 0x15.0x11 = 0x2ba,0xe
02bb e009       |    |		Load	0x0,0x9
02bc 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02bd 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02be e406       |    |		Load	0x2,0x6
02bf e405       |    |		Load	0x2,0x5
02c0 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
02c1 01d6       |    |		Execute	Vector,Field_Write
02c2 e406       |    |		Load	0x2,0x6								; Debug Table 0x15.0x12 = 0x2c2,0xf
02c3 0a01       |    |		Execute_Immediate	Plus,0x1
02c4 c406       |    |		Store	0x2,0x6
02c5 e406       |    |		Load	0x2,0x6								; Debug Table 0x15.0x13 = 0x2c5,0x10
02c6 0c05       |    |		Execute_Immediate	Greater_Equal,0x5
02c7 7008       |p   |		Jump_Nonzero	0x2d0
02c8 e403       |    |		Load	0x2,0x3								; Debug Table 0x15.0x14 = 0x2c8,0x11
02c9 00eb       |    |		Load_Encached	Diana_Cache
02ca 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
02cb a403       |    |		Store_Unchecked	0x2,0x3
02cc e403       |    |		Load	0x2,0x3								; Debug Table 0x15.0x15 = 0x2cc,0x9
02cd 00eb       |    |		Load_Encached	Diana_Cache
02ce 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02cf 6fd8       |o   |		Jump_Zero	0x2a8
02d0 e405       |    |		Load	0x2,0x5								; Debug Table 0x15.0x16 = 0x2d0,0x12
02d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d2			TRAP_0278:
02d2 0007       |    |		Action	Break_Optional
02d3 e21c       |    |		Load	0x1,0x1c							; Debug Table 0x15.0x17 = 0x2d3,0x13
02d4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d5 0000 0000  |    |		.XXX[0x3]
02d7 0000       |    |
02d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffff01}
02dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036f934}
02e0 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
02e4 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffff00}
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f2       |    |		.CONST	0x02f2								; Address of begin
02e9 0310       |    |		.CONST	0x0310								; Address of exception handler
02ea 0004       |    |		.CONST	0x0004								; Number of locals
02eb			INIT_02e8:
02eb e001       |    |		Load	0x0,0x1								; Debug Table 0x16 = .DEBUG	0x02eb,0x05a2,0x0002,0x0000,0x0036,0xf934,0x0000,0x033d
													; Debug Table 0x16.0x0 = 0x2eb,0xffff
02ec 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
02ed e001       |    |		Load	0x0,0x1								; Debug Table 0x16.0x1 = 0x2ed,0xfffe
02ee 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
02ef e001       |    |		Load	0x0,0x1								; Debug Table 0x16.0x2 = 0x2ef,0xfffd
02f0 1b5a       | Z  |		Execute	Package,Field_Read,Field_Number 0x5a
02f1 0322       | "  |		Declare_Variable	Record
02f2			BODY_02e8:
02f2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x16.0x3 = 0x2f2,0x1
02f3 8225       | %  |		Call	0x1,0x25
02f4 a402       |    |		Store_Unchecked	0x2,0x2
02f5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x16.0x4 = 0x2f5,0x2
02f6 8226       | &  |		Call	0x1,0x26
02f7 a403       |    |		Store_Unchecked	0x2,0x3
02f8 e403       |    |		Load	0x2,0x3								; Debug Table 0x16.0x5 = 0x2f8,0x3
02f9 4800       |H   |		Short_Literal	0x0
02fa e402       |    |		Load	0x2,0x2
02fb e001       |    |		Load	0x0,0x1
02fc 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
02fd e001       |    |		Load	0x0,0x1
02fe 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
02ff e404       |    |		Load	0x2,0x4
0300 017d       | }  |		Execute	Record,Structure_Write
0301 e404       |    |		Load	0x2,0x4								; Debug Table 0x16.0x6 = 0x301,0x4
0302 e001       |    |		Load	0x0,0x1
0303 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0304 0b06       |    |		Execute_Immediate	Case_Compare,0x6
0305 7008       |p   |		Jump_Nonzero	0x30e
0306 0b16       |    |		Execute_Immediate	Case_Compare,0x16
0307 7006       |p   |		Jump_Nonzero	0x30e
0308 0b26       | &  |		Execute_Immediate	Case_Compare,0x26
0309 7004       |p   |		Jump_Nonzero	0x30e
030a 0b36       | 6  |		Execute_Immediate	Case_Compare,0x36
030b 7002       |p   |		Jump_Nonzero	0x30e
030c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x7 = 0x30c,0x6
030d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x8 = 0x30e,0x5
030f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0310			TRAP_02e8:
0310 0007       |    |		Action	Break_Optional
0311 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x9 = 0x311,0x7
0312 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0313 0000 0000  |    |		.BLANK	0000[0x5]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 032b       | +  |		.CONST	0x032b								; Address of begin
0319 0381       |    |		.CONST	0x0381								; Address of exception handler
031a 0007       |    |		.CONST	0x0007								; Number of locals
031b			INIT_0318:
031b e007       |    |		Load	0x0,0x7								; Debug Table 0x17 = .DEBUG	0x031b,0x05b8,0x0001,0x0000,0x0036,0xf934,0x0000,0x03e0
													; Debug Table 0x17.0x0 = 0x31b,0xffff
031c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
031d 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
031e 02c7       |    |		Declare_Variable	Any
031f e402       |    |		Load	0x2,0x2
0320 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0321 e007       |    |		Load	0x0,0x7								; Debug Table 0x17.0x1 = 0x321,0xfffe
0322 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0323 e21b       |    |		Load	0x1,0x1b							; Debug Table 0x17.0x2 = 0x323,0xfffd
0324 0322       | "  |		Declare_Variable	Record
0325 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x17.0x3 = 0x325,0xfffc
0326 e007       |    |		Load	0x0,0x7								; Debug Table 0x17.0x4 = 0x326,0xfffb
0327 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0328 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0329 e007       |    |		Load	0x0,0x7								; Debug Table 0x17.0x5 = 0x329,0xfffa
032a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
032b			BODY_0318:
032b e007       |    |		Load	0x0,0x7								; Debug Table 0x17.0x6 = 0x32b,0x1
032c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
032d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
032e e402       |    |		Load	0x2,0x2
032f 6058       |`X  |		Indirect_Literal	Discrete,0x388,{0x00000000, 0x00004000}
0330 e00a       |    |		Load	0x0,0xa
0331 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0332 e00b       |    |		Load	0x0,0xb
0333 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0334 e00c       |    |		Load	0x0,0xc
0335 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0336 4800       |H   |		Short_Literal	0x0
0337 4800       |H   |		Short_Literal	0x0
0338 e007       |    |		Load	0x0,0x7
0339 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
033a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
033b e5ff       |    |		Load	0x2,-0x1
033c e007       |    |		Load	0x0,0x7
033d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
033e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
033f c402       |    |		Store	0x2,0x2
0340 c406       |    |		Store	0x2,0x6
0341 e406       |    |		Load	0x2,0x6								; Debug Table 0x17.0x7 = 0x341,0x2
0342 6833       |h3  |		Jump_Zero	0x376
0343 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x17.0x8 = 0x343,0x3
0344 e406       |    |		Load	0x2,0x6
0345 e007       |    |		Load	0x0,0x7
0346 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0347 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0348 8229       | )  |		Call	0x1,0x29
0349 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x17.0x9 = 0x349,0x4
034a e007       |    |		Load	0x0,0x7								; Debug Table 0x17.0xa = 0x34a,0x6
034b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
034c e007       |    |		Load	0x0,0x7
034d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
034e 6039       |`9  |		Indirect_Literal	Discrete,0x388,{0x00000000, 0x00004000}
034f e00a       |    |		Load	0x0,0xa
0350 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0351 e402       |    |		Load	0x2,0x2
0352 e007       |    |		Load	0x0,0x7
0353 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0354 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0355 c403       |    |		Store	0x2,0x3
0356 c407       |    |		Store	0x2,0x7
0357 e407       |    |		Load	0x2,0x7								; Debug Table 0x17.0xb = 0x357,0x7
0358 7018       |p   |		Jump_Nonzero	0x371
0359 e403       |    |		Load	0x2,0x3
035a e009       |    |		Load	0x0,0x9
035b 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
035c 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
035d 6813       |h   |		Jump_Zero	0x371
035e e403       |    |		Load	0x2,0x3								; Debug Table 0x17.0xc = 0x35e,0x8
035f 822b       | +  |		Call	0x1,0x2b
0360 e404       |    |		Load	0x2,0x4
0361 017d       | }  |		Execute	Record,Structure_Write
0362 e221       | !  |		Load	0x1,0x21							; Debug Table 0x17.0xd = 0x362,0x9
0363 4800       |H   |		Short_Literal	0x0
0364 e223       | #  |		Load	0x1,0x23
0365 e404       |    |		Load	0x2,0x4
0366 e21f       |    |		Load	0x1,0x1f
0367 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0368 c221       | !  |		Store	0x1,0x21
0369 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0xe = 0x369,0xa
036a e223       | #  |		Load	0x1,0x23
036b e222       | "  |		Load	0x1,0x22
036c 01d6       |    |		Execute	Vector,Field_Write
036d e223       | #  |		Load	0x1,0x23							; Debug Table 0x17.0xf = 0x36d,0xb
036e 0a01       |    |		Execute_Immediate	Plus,0x1
036f c223       | #  |		Store	0x1,0x23
0370 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x17.0x10 = 0x370,0xc
0371 e402       |    |		Load	0x2,0x2								; Debug Table 0x17.0x11 = 0x371,0xd
0372 e007       |    |		Load	0x0,0x7
0373 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0374 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0375 c402       |    |		Store	0x2,0x2
0376 e402       |    |		Load	0x2,0x2								; Debug Table 0x17.0x12 = 0x376,0x5
0377 e007       |    |		Load	0x0,0x7
0378 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0379 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
037a 6fcf       |o   |		Jump_Zero	0x34a
037b 0092 0390  |    |		Action	Push_String_Extended,0x390					; "Unable to register "
													; Debug Table 0x17.0x13 = 0x37b,0xe
037d e5ff       |    |		Load	0x2,-0x1
037e 01cc       |    |		Execute	Vector,Catenate
037f 8229       | )  |		Call	0x1,0x29
0380 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0381			TRAP_0318:
0381 0007       |    |		Action	Break_Optional
0382 0092 0390  |    |		Action	Push_String_Extended,0x390					; "Unable to register "
													; Debug Table 0x17.0x14 = 0x382,0xf
0384 e5ff       |    |		Load	0x2,-0x1
0385 01cc       |    |		Execute	Vector,Catenate
0386 8229       | )  |		Call	0x1,0x29
0387 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0388 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
038c ; --------------------------------------------------------------------------------------
038c ; STRING TABLE
038c ; --------------------------------------------------------------------------------------
038c 000c       |    |		.STRTAB	0x000c->0x0392							; "Problem registering type"
038d 0022       | "  |		.STRTAB	0x0022->0x039e							; "Dtia"
038e 0024       | $  |		.STRTAB	0x0024->0x03a0							; "Gateway"
038f 0029       | )  |		.STRTAB	0x0029->0x03a3							; "Debugger Elaboration"
0390 003b       | ;  |		.STRTAB	0x003b->0x03ad							; "Unable to register "
0391 004c       | L  |		.STREND 0x004c->0x03b7
0392 5072 6f62  |Prob|		.STRTAB_STRINGS
03b7 0000       |    |		.XXX[0x1]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; Debug Table
03b8 ; --------------------------------------------------------------------------------------
03b8 0003 0018  |    |		.CONST	0x0003,0x0018
03ba 000b 047a  |   z|		.DEBUG	0x000b,0x047a,0x8000,0x0000,0x0036,0xf7e4,0x0000,0x0009
03c2 002e 049a  | .  |		.DEBUG	0x002e,0x049a,0x8000,0x0000,0x0036,0xf934,0x0000,0x0019
03ca 00d3 04e6  |    |		.DEBUG	0x00d3,0x04e6,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x000e
03d2 00db 04ea  |    |		.DEBUG	0x00db,0x04ea,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x0013
03da 00f3 04f0  |    |		.DEBUG	0x00f3,0x04f0,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x0020
03e2 0103 04f6  |    |		.DEBUG	0x0103,0x04f6,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x002d
03ea 0113 04fa  |    |		.DEBUG	0x0113,0x04fa,0x2801,0x0002,0x0036,0xf7e4,0x0000,0x0036
03f2 0133 0506  | 3  |		.DEBUG	0x0133,0x0506,0x0001,0x0000,0x0036,0xf7e4,0x0000,0x006c
03fa 016b 051e  | k  |		.DEBUG	0x016b,0x051e,0x0001,0x0000,0x0036,0xf7e4,0x0000,0x007e
0402 0193 0530  |   0|		.DEBUG	0x0193,0x0530,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x008e
040a 01ab 053a  |   :|		.DEBUG	0x01ab,0x053a,0x0002,0x0000,0x0036,0xf7e4,0x0000,0x009b
0412 01b3 053e  |   >|		.DEBUG	0x01b3,0x053e,0x0005,0x0000,0x0036,0xf7e4,0x0000,0x00ae
041a 01cb 0540  |   @|		.DEBUG	0x01cb,0x0540,0x0005,0x0000,0x0036,0xf934,0x0000,0x0076
0422 01e3 0542  |   B|		.DEBUG	0x01e3,0x0542,0x0002,0x0000,0x0036,0xf934,0x0000,0x008b
042a 01eb 0546  |   F|		.DEBUG	0x01eb,0x0546,0x0005,0x0000,0x0036,0xf934,0x0000,0x009d
0432 0203 0548  |   H|		.DEBUG	0x0203,0x0548,0x0002,0x0000,0x0036,0xf934,0x0000,0x0120
043a 0213 054c  |   L|		.DEBUG	0x0213,0x054c,0x0002,0x0000,0x0036,0xf934,0x0000,0x0145
0442 0223 0550  | # P|		.DEBUG	0x0223,0x0550,0x0002,0x0000,0x0036,0xf934,0x0000,0x016a
044a 022b 0554  | + T|		.DEBUG	0x022b,0x0554,0x0002,0x0000,0x0036,0xf934,0x0000,0x01b7
0452 0243 0558  | C X|		.DEBUG	0x0243,0x0558,0x0001,0x0000,0x0036,0xf934,0x0000,0x01ed
045a 0253 055e  | S ^|		.DEBUG	0x0253,0x055e,0x0002,0x0000,0x0036,0xf934,0x0000,0x020b
0462 027b 0570  | { p|		.DEBUG	0x027b,0x0570,0x0002,0x0000,0x0036,0xf934,0x0000,0x0266
046a 02eb 05a2  |    |		.DEBUG	0x02eb,0x05a2,0x0002,0x0000,0x0036,0xf934,0x0000,0x033d
0472 031b 05b8  |    |		.DEBUG	0x031b,0x05b8,0x0001,0x0000,0x0036,0xf934,0x0000,0x03e0
047a ; --------------------------------------------------------------------------------------
047a ; Debug3 Subtable 0x0
047a ; --------------------------------------------------------------------------------------
047a 000f 0000  |    |		.DBG3TAB	0x000f,0x0000
047c 000b ffff  |    |		.CONST	0x000b,0xffff
047e 000d fffe  |    |		.CONST	0x000d,0xfffe
0480 000f fffd  |    |		.CONST	0x000f,0xfffd
0482 0011 fffc  |    |		.CONST	0x0011,0xfffc
0484 0013 fffb  |    |		.CONST	0x0013,0xfffb
0486 0015 fffa  |    |		.CONST	0x0015,0xfffa
0488 0017 fff9  |    |		.CONST	0x0017,0xfff9
048a 001b fff8  |    |		.CONST	0x001b,0xfff8
048c 001d fff7  |    |		.CONST	0x001d,0xfff7
048e 001f fff6  |    |		.CONST	0x001f,0xfff6
0490 0021 fff5  | !  |		.CONST	0x0021,0xfff5
0492 0023 fff4  | #  |		.CONST	0x0023,0xfff4
0494 0024 fff3  | $  |		.CONST	0x0024,0xfff3
0496 0025 fff2  | %  |		.CONST	0x0025,0xfff2
0498 0026 fff1  | &  |		.CONST	0x0026,0xfff1
049a ; --------------------------------------------------------------------------------------
049a ; Debug3 Subtable 0x1
049a ; --------------------------------------------------------------------------------------
049a 0024 0001  | $  |		.DBG3TAB	0x0024,0x0001
049c 002e ffff  | .  |		.CONST	0x002e,0xffff
049e 002f fffe  | /  |		.CONST	0x002f,0xfffe
04a0 0030 fffd  | 0  |		.CONST	0x0030,0xfffd
04a2 003d fffc  | =  |		.CONST	0x003d,0xfffc
04a4 0043 fffb  | C  |		.CONST	0x0043,0xfffb
04a6 0044 fffa  | D  |		.CONST	0x0044,0xfffa
04a8 004a fff9  | J  |		.CONST	0x004a,0xfff9
04aa 0050 fff8  | P  |		.CONST	0x0050,0xfff8
04ac 006e fff7  | n  |		.CONST	0x006e,0xfff7
04ae 0075 fff6  | u  |		.CONST	0x0075,0xfff6
04b0 0077 fff5  | w  |		.CONST	0x0077,0xfff5
04b2 0081 fff4  |    |		.CONST	0x0081,0xfff4
04b4 0088 fff3  |    |		.CONST	0x0088,0xfff3
04b6 008a fff2  |    |		.CONST	0x008a,0xfff2
04b8 008e fff1  |    |		.CONST	0x008e,0xfff1
04ba 0091 fff0  |    |		.CONST	0x0091,0xfff0
04bc 0092 ffef  |    |		.CONST	0x0092,0xffef
04be 009b ffee  |    |		.CONST	0x009b,0xffee
04c0 009d ffed  |    |		.CONST	0x009d,0xffed
04c2 009f ffec  |    |		.CONST	0x009f,0xffec
04c4 00a1 ffeb  |    |		.CONST	0x00a1,0xffeb
04c6 00a3 ffea  |    |		.CONST	0x00a3,0xffea
04c8 00a5 ffe9  |    |		.CONST	0x00a5,0xffe9
04ca 00a7 ffe8  |    |		.CONST	0x00a7,0xffe8
04cc 00a9 ffe7  |    |		.CONST	0x00a9,0xffe7
04ce 00ab ffe6  |    |		.CONST	0x00ab,0xffe6
04d0 00ad ffe5  |    |		.CONST	0x00ad,0xffe5
04d2 00af ffe4  |    |		.CONST	0x00af,0xffe4
04d4 00b1 ffe3  |    |		.CONST	0x00b1,0xffe3
04d6 00b3 ffe2  |    |		.CONST	0x00b3,0xffe2
04d8 00b5 ffe1  |    |		.CONST	0x00b5,0xffe1
04da 00b7 ffe0  |    |		.CONST	0x00b7,0xffe0
04dc 00b9 ffdf  |    |		.CONST	0x00b9,0xffdf
04de 00bb ffde  |    |		.CONST	0x00bb,0xffde
04e0 00bd ffdd  |    |		.CONST	0x00bd,0xffdd
04e2 00bf ffdc  |    |		.CONST	0x00bf,0xffdc
04e4 00c1 0001  |    |		.CONST	0x00c1,0x0001
04e6 ; --------------------------------------------------------------------------------------
04e6 ; Debug3 Subtable 0x2
04e6 ; --------------------------------------------------------------------------------------
04e6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
04e8 00d3 0001  |    |		.CONST	0x00d3,0x0001
04ea ; --------------------------------------------------------------------------------------
04ea ; Debug3 Subtable 0x3
04ea ; --------------------------------------------------------------------------------------
04ea 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
04ec 00db 0001  |    |		.CONST	0x00db,0x0001
04ee 00e0 0002  |    |		.CONST	0x00e0,0x0002
04f0 ; --------------------------------------------------------------------------------------
04f0 ; Debug3 Subtable 0x4
04f0 ; --------------------------------------------------------------------------------------
04f0 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
04f2 00f3 0001  |    |		.CONST	0x00f3,0x0001
04f4 00f8 0002  |    |		.CONST	0x00f8,0x0002
04f6 ; --------------------------------------------------------------------------------------
04f6 ; Debug3 Subtable 0x5
04f6 ; --------------------------------------------------------------------------------------
04f6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
04f8 0103 0001  |    |		.CONST	0x0103,0x0001
04fa ; --------------------------------------------------------------------------------------
04fa ; Debug3 Subtable 0x6
04fa ; --------------------------------------------------------------------------------------
04fa 0004 0001  |    |		.DBG3TAB	0x0004,0x0001
04fc 0113 ffff  |    |		.CONST	0x0113,0xffff
04fe 0114 fffe  |    |		.CONST	0x0114,0xfffe
0500 011c fffd  |    |		.CONST	0x011c,0xfffd
0502 0126 fffc  | &  |		.CONST	0x0126,0xfffc
0504 012a 0001  | *  |		.CONST	0x012a,0x0001
0506 ; --------------------------------------------------------------------------------------
0506 ; Debug3 Subtable 0x7
0506 ; --------------------------------------------------------------------------------------
0506 0003 0008  |    |		.DBG3TAB	0x0003,0x0008
0508 0133 ffff  | 3  |		.CONST	0x0133,0xffff
050a 0134 fffe  | 4  |		.CONST	0x0134,0xfffe
050c 0136 fffd  | 6  |		.CONST	0x0136,0xfffd
050e 0139 0001  | 9  |		.CONST	0x0139,0x0001
0510 013f 0002  | ?  |		.CONST	0x013f,0x0002
0512 0148 0004  | H  |		.CONST	0x0148,0x0004
0514 014e 0005  | N  |		.CONST	0x014e,0x0005
0516 0152 0006  | R  |		.CONST	0x0152,0x0006
0518 015a 0007  | Z  |		.CONST	0x015a,0x0007
051a 015e 0008  | ^  |		.CONST	0x015e,0x0008
051c 0160 0009  | `  |		.CONST	0x0160,0x0009
051e ; --------------------------------------------------------------------------------------
051e ; Debug3 Subtable 0x8
051e ; --------------------------------------------------------------------------------------
051e 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
0520 016b 0001  | k  |		.CONST	0x016b,0x0001
0522 0171 0002  | q  |		.CONST	0x0171,0x0002
0524 0173 0003  | s  |		.CONST	0x0173,0x0003
0526 0178 0004  | x  |		.CONST	0x0178,0x0004
0528 017e 0005  | ~  |		.CONST	0x017e,0x0005
052a 0180 0006  |    |		.CONST	0x0180,0x0006
052c 0185 0007  |    |		.CONST	0x0185,0x0007
052e 0187 0008  |    |		.CONST	0x0187,0x0008
0530 ; --------------------------------------------------------------------------------------
0530 ; Debug3 Subtable 0x9
0530 ; --------------------------------------------------------------------------------------
0530 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0532 0193 ffff  |    |		.CONST	0x0193,0xffff
0534 0199 0001  |    |		.CONST	0x0199,0x0001
0536 01a2 0003  |    |		.CONST	0x01a2,0x0003
0538 01a4 0002  |    |		.CONST	0x01a4,0x0002
053a ; --------------------------------------------------------------------------------------
053a ; Debug3 Subtable 0xa
053a ; --------------------------------------------------------------------------------------
053a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
053c 01ab 0001  |    |		.CONST	0x01ab,0x0001
053e ; --------------------------------------------------------------------------------------
053e ; Debug3 Subtable 0xb
053e ; --------------------------------------------------------------------------------------
053e 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0540 ; --------------------------------------------------------------------------------------
0540 ; Debug3 Subtable 0xc
0540 ; --------------------------------------------------------------------------------------
0540 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0542 ; --------------------------------------------------------------------------------------
0542 ; Debug3 Subtable 0xd
0542 ; --------------------------------------------------------------------------------------
0542 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0544 01e3 0001  |    |		.CONST	0x01e3,0x0001
0546 ; --------------------------------------------------------------------------------------
0546 ; Debug3 Subtable 0xe
0546 ; --------------------------------------------------------------------------------------
0546 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0548 ; --------------------------------------------------------------------------------------
0548 ; Debug3 Subtable 0xf
0548 ; --------------------------------------------------------------------------------------
0548 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
054a 0203 0001  |    |		.CONST	0x0203,0x0001
054c ; --------------------------------------------------------------------------------------
054c ; Debug3 Subtable 0x10
054c ; --------------------------------------------------------------------------------------
054c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
054e 0213 0001  |    |		.CONST	0x0213,0x0001
0550 ; --------------------------------------------------------------------------------------
0550 ; Debug3 Subtable 0x11
0550 ; --------------------------------------------------------------------------------------
0550 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0552 0223 0001  | #  |		.CONST	0x0223,0x0001
0554 ; --------------------------------------------------------------------------------------
0554 ; Debug3 Subtable 0x12
0554 ; --------------------------------------------------------------------------------------
0554 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0556 022b 0001  | +  |		.CONST	0x022b,0x0001
0558 ; --------------------------------------------------------------------------------------
0558 ; Debug3 Subtable 0x13
0558 ; --------------------------------------------------------------------------------------
0558 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
055a 0243 0001  | C  |		.CONST	0x0243,0x0001
055c 0246 0002  | F  |		.CONST	0x0246,0x0002
055e ; --------------------------------------------------------------------------------------
055e ; Debug3 Subtable 0x14
055e ; --------------------------------------------------------------------------------------
055e 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
0560 0253 ffff  | S  |		.CONST	0x0253,0xffff
0562 0254 fffe  | T  |		.CONST	0x0254,0xfffe
0564 0256 0001  | V  |		.CONST	0x0256,0x0001
0566 0261 0002  | a  |		.CONST	0x0261,0x0002
0568 0265 0003  | e  |		.CONST	0x0265,0x0003
056a 026a 0004  | j  |		.CONST	0x026a,0x0004
056c 0270 0005  | p  |		.CONST	0x0270,0x0005
056e 0274 0006  | t  |		.CONST	0x0274,0x0006
0570 ; --------------------------------------------------------------------------------------
0570 ; Debug3 Subtable 0x15
0570 ; --------------------------------------------------------------------------------------
0570 0005 0013  |    |		.DBG3TAB	0x0005,0x0013
0572 027b ffff  | {  |		.CONST	0x027b,0xffff
0574 027c fffe  | |  |		.CONST	0x027c,0xfffe
0576 027d fffd  | }  |		.CONST	0x027d,0xfffd
0578 027e fffc  | ~  |		.CONST	0x027e,0xfffc
057a 0283 fffb  |    |		.CONST	0x0283,0xfffb
057c 0285 0001  |    |		.CONST	0x0285,0x0001
057e 0288 0002  |    |		.CONST	0x0288,0x0002
0580 028c 0003  |    |		.CONST	0x028c,0x0003
0582 028e 0004  |    |		.CONST	0x028e,0x0004
0584 0293 0005  |    |		.CONST	0x0293,0x0005
0586 0298 0006  |    |		.CONST	0x0298,0x0006
0588 02a0 0007  |    |		.CONST	0x02a0,0x0007
058a 02a3 0008  |    |		.CONST	0x02a3,0x0008
058c 02a8 000a  |    |		.CONST	0x02a8,0x000a
058e 02ad 000b  |    |		.CONST	0x02ad,0x000b
0590 02b1 000c  |    |		.CONST	0x02b1,0x000c
0592 02b5 000d  |    |		.CONST	0x02b5,0x000d
0594 02ba 000e  |    |		.CONST	0x02ba,0x000e
0596 02c2 000f  |    |		.CONST	0x02c2,0x000f
0598 02c5 0010  |    |		.CONST	0x02c5,0x0010
059a 02c8 0011  |    |		.CONST	0x02c8,0x0011
059c 02cc 0009  |    |		.CONST	0x02cc,0x0009
059e 02d0 0012  |    |		.CONST	0x02d0,0x0012
05a0 02d3 0013  |    |		.CONST	0x02d3,0x0013
05a2 ; --------------------------------------------------------------------------------------
05a2 ; Debug3 Subtable 0x16
05a2 ; --------------------------------------------------------------------------------------
05a2 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
05a4 02eb ffff  |    |		.CONST	0x02eb,0xffff
05a6 02ed fffe  |    |		.CONST	0x02ed,0xfffe
05a8 02ef fffd  |    |		.CONST	0x02ef,0xfffd
05aa 02f2 0001  |    |		.CONST	0x02f2,0x0001
05ac 02f5 0002  |    |		.CONST	0x02f5,0x0002
05ae 02f8 0003  |    |		.CONST	0x02f8,0x0003
05b0 0301 0004  |    |		.CONST	0x0301,0x0004
05b2 030c 0006  |    |		.CONST	0x030c,0x0006
05b4 030e 0005  |    |		.CONST	0x030e,0x0005
05b6 0311 0007  |    |		.CONST	0x0311,0x0007
05b8 ; --------------------------------------------------------------------------------------
05b8 ; Debug3 Subtable 0x17
05b8 ; --------------------------------------------------------------------------------------
05b8 0006 000f  |    |		.DBG3TAB	0x0006,0x000f
05ba 031b ffff  |    |		.CONST	0x031b,0xffff
05bc 0321 fffe  | !  |		.CONST	0x0321,0xfffe
05be 0323 fffd  | #  |		.CONST	0x0323,0xfffd
05c0 0325 fffc  | %  |		.CONST	0x0325,0xfffc
05c2 0326 fffb  | &  |		.CONST	0x0326,0xfffb
05c4 0329 fffa  | )  |		.CONST	0x0329,0xfffa
05c6 032b 0001  | +  |		.CONST	0x032b,0x0001
05c8 0341 0002  | A  |		.CONST	0x0341,0x0002
05ca 0343 0003  | C  |		.CONST	0x0343,0x0003
05cc 0349 0004  | I  |		.CONST	0x0349,0x0004
05ce 034a 0006  | J  |		.CONST	0x034a,0x0006
05d0 0357 0007  | W  |		.CONST	0x0357,0x0007
05d2 035e 0008  | ^  |		.CONST	0x035e,0x0008
05d4 0362 0009  | b  |		.CONST	0x0362,0x0009
05d6 0369 000a  | i  |		.CONST	0x0369,0x000a
05d8 036d 000b  | m  |		.CONST	0x036d,0x000b
05da 0370 000c  | p  |		.CONST	0x0370,0x000c
05dc 0371 000d  | q  |		.CONST	0x0371,0x000d
05de 0376 0005  | v  |		.CONST	0x0376,0x0005
05e0 037b 000e  | {  |		.CONST	0x037b,0x000e
05e2 0382 000f  |    |		.CONST	0x0382,0x000f
05e4 0000 0000  |    |		.BLANK	0000[0x1c]