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

⟦fc3fb74d8⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 02a8       |    |		.CONST	0x02a8								; 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 0035       | 5  |		.CONST	0x0035								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001a       |    |		.CONST	0x001a								; Number of locals
000b			INIT_0008:
000b 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0312,0x8000,0x0000,0x0057,0x3a95,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 00bf       |    |		Action	Accept_Activation
000e 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x000e,0x0316,0x8000,0x0000,0x0058,0xc415,0x0000,0x0015
													; Debug Table 0x1.0x0 = 0xe,0xffff
000f 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0xf,0xfffe
0010 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x10,0xfffd
0011 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1.0x3 = 0x11,0xfffc
0012 0266       | f  |		Execute	Discrete,Bounds
0013 00e1       |    |		Load_Encached	Boolean_Cache
0014 02a0       |    |		Declare_Subprogram	Null_Subprogram
0015 4801       |H   |		Short_Literal	0x1
0016 0350       | P  |		Declare_Type	Array,Defined,Bounds_With_Object
0017 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x4 = 0x17,0xfffb
0018 483f       |H?  |		Short_Literal	0x3f
0019 00da       |    |		Load_Top	At_Offset_2
001a 035b       | [  |		Declare_Type	Array,Constrained
001b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x5 = 0x1b,0xfffa
001c 481f       |H   |		Short_Literal	0x1f
001d 00db       |    |		Load_Top	At_Offset_3
001e 035b       | [  |		Declare_Type	Array,Constrained
001f 029d 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call			; Debug Table 0x1.0x6 = 0x1f,0xfff9
0021 029d 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call			; Debug Table 0x1.0x7 = 0x21,0xfff8
0023 029d 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call			; Debug Table 0x1.0x8 = 0x23,0xfff7
0025 029d 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call			; Debug Table 0x1.0x9 = 0x25,0xfff6
0027 029d 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call			; Debug Table 0x1.0xa = 0x27,0xfff5
0029 029d 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call			; Debug Table 0x1.0xb = 0x29,0xfff4
002b 029d 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call			; Debug Table 0x1.0xc = 0x2b,0xfff3
002d 029d 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call			; Debug Table 0x1.0xd = 0x2d,0xfff2
002f 029d 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call			; Debug Table 0x1.0xe = 0x2f,0xfff1
0031 029d 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call			; Debug Table 0x1.0xf = 0x31,0xfff0
0033 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x10 = 0x33,0xffef
0034 00c7       |    |		Action	Elaborate_Subprogram
0035			BODY_0008:
0035 00bc       |    |		Action	Signal_Activated
0036 00bb       |    |		Action	Signal_Completion
0037 0000       |    |		.XXX[0x1]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0054       | T  |		.CONST	0x0054								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0006       |    |		.CONST	0x0006								; Number of locals
003b			INIT_0038:
003b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2 = .DEBUG	0x003b,0x033a,0x0001,0x0000,0x0057,0x3a95,0x0000,0x0006
													; Debug Table 0x2.0x0 = 0x3b,0xffff
003c 00db       |    |		Load_Top	At_Offset_3
003d 00eb       |    |		Load_Encached	Diana_Cache
003e 18fc       |    |		Execute	Package,Field_Execute,Field_Number 0xfc
003f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0040 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x1 = 0x40,0xfffe
0041 00d9       |    |		Load_Top	At_Offset_1
0042 e001       |    |		Load	0x0,0x1
0043 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0044 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0045 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x2 = 0x45,0xfffd
0046 00d9       |    |		Load_Top	At_Offset_1
0047 00eb       |    |		Load_Encached	Diana_Cache
0048 18b9       |    |		Execute	Package,Field_Execute,Field_Number 0xb9
0049 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
004a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x3 = 0x4a,0xfffc
004b 00d9       |    |		Load_Top	At_Offset_1
004c e001       |    |		Load	0x0,0x1
004d 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
004e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
004f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x4 = 0x4f,0xfffb
0050 00eb       |    |		Load_Encached	Diana_Cache
0051 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0052 00eb       |    |		Load_Encached	Diana_Cache
0053 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0054			BODY_0038:
0054 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x5 = 0x54,0x1
0055 01db       |    |		Execute	Vector,Length
0056 7001       |p   |		Jump_Nonzero	0x58
0057 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2.0x6 = 0x57,0x2
0058 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x7 = 0x58,0x3
0059 e002       |    |		Load	0x0,0x2
005a 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
005b 4907       |I   |		Short_Literal	0x107
005c 00eb       |    |		Load_Encached	Diana_Cache
005d 0096       |    |		Execute	Package,Entry
005e 021f       |    |		Execute	Heap_Access,Equal
005f 6803       |h   |		Jump_Zero	0x63
0060 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x8 = 0x60,0x4
0061 821a       |    |		Call	0x1,0x1a
0062 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0063 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x9 = 0x63,0x5
0064 e5ff       |    |		Load	0x2,-0x1
0065 8218       |    |		Call	0x1,0x18
0066 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0067 0000       |    |		.XXX[0x1]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0073       | s  |		.CONST	0x0073								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0004       |    |		.CONST	0x0004								; Number of locals
006b			INIT_0068:
006b e003       |    |		Load	0x0,0x3								; Debug Table 0x3 = .DEBUG	0x006b,0x0350,0x0002,0x0000,0x0058,0xc415,0x0000,0x003d
													; Debug Table 0x3.0x0 = 0x6b,0xffff
006c 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
006d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
006e e003       |    |		Load	0x0,0x3								; Debug Table 0x3.0x1 = 0x6e,0xfffe
006f 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0070 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0071 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x3.0x2 = 0x71,0xfffd
0072 061f       |    |		Execute_Immediate	Set_Value_Unchecked,0x1f
0073			BODY_0068:
0073 00cf       |    |		Action	Mark_Auxiliary
0074 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x3 = 0x74,0x1
0075 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x4 = 0x75,0x2
0076 e5ff       |    |		Load	0x2,-0x1
0077 01d7       |    |		Execute	Vector,Field_Read
0078 6804       |h   |		Jump_Zero	0x7d
0079 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x5 = 0x79,0x3
007a 00db       |    |		Load_Top	At_Offset_3
007b 0273       | s  |		Execute	Discrete,Plus
007c c402       |    |		Store	0x2,0x2
007d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x6 = 0x7d,0x4
007e 7002       |p   |		Jump_Nonzero	0x81
007f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x7 = 0x7f,0x5
0080 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0081 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x8 = 0x81,0x6
0082 0aff       |    |		Execute_Immediate	Plus,-0x1
0083 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0084 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x9 = 0x84,0x7
0085 0901       |    |		Execute_Immediate	Binary_Scale,0x1
0086 005b       | [  |		Store_Top	Discrete,At_Offset_3
0087 00c9       |    |		Action	Pop_Auxiliary_Loop
0088 7fec       |    |		Jump	0x75
0089 0000 0000  |    |		.BLANK	0000[0x7]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 e003       |    |		Load	0x0,0x3								; Debug Table 0x4 = .DEBUG	0x0093,0x0366,0x0002,0x0000,0x0058,0xc415,0x0000,0x0092
													; Debug Table 0x4.0x0 = 0x93,0x1
0094 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0095 0322       | "  |		Declare_Variable	Record
0096 4800       |H   |		Short_Literal	0x0
0097 481f       |H   |		Short_Literal	0x1f
0098 e5ff       |    |		Load	0x2,-0x1
0099 01cf       |    |		Execute	Vector,Slice_Read
009a e210       |    |		Load	0x1,0x10
009b 01c3       |    |		Execute	Vector,Check_In_Type
009c 8211       |    |		Call	0x1,0x11
009d 00d9       |    |		Load_Top	At_Offset_1
009e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
009f 4820       |H   |		Short_Literal	0x20
00a0 483f       |H?  |		Short_Literal	0x3f
00a1 e5ff       |    |		Load	0x2,-0x1
00a2 01cf       |    |		Execute	Vector,Slice_Read
00a3 e210       |    |		Load	0x1,0x10
00a4 01c7       |    |		Execute	Vector,Convert
00a5 8211       |    |		Call	0x1,0x11
00a6 00d9       |    |		Load_Top	At_Offset_1
00a7 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a9 0000 0000  |    |		.BLANK	0000[0x7]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00ca       |    |		.CONST	0x00ca								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0003       |    |		.CONST	0x0003								; Number of locals
00b3			INIT_00b0:
00b3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00b3,0x036a,0x0002,0x0000,0x0058,0xc415,0x0000,0x00bc
													; Debug Table 0x5.0x0 = 0xb3,0xffff
00b4 00e3       |    |		Load_Encached	Natural_Cache
00b5 03f1       |    |		Declare_Variable	Discrete,With_Value
00b6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x1 = 0xb6,0xfffe
00b7 e5fe       |    |		Load	0x2,-0x2
00b8 e20e       |    |		Load	0x1,0xe
00b9 0334       | 4  |		Declare_Variable	Array,With_Constraint
00ba 4801       |H   |		Short_Literal	0x1
00bb e5fe       |    |		Load	0x2,-0x2
00bc e20e       |    |		Load	0x1,0xe
00bd 0334       | 4  |		Declare_Variable	Array,With_Constraint
00be 00d8       |    |		Load_Top	At_Offset_0
00bf 01dc       |    |		Execute	Vector,Last
00c0 4801       |H   |		Short_Literal	0x1
00c1 0263       | c  |		Execute	Discrete,Above_Bound
00c2 7005       |p   |		Jump_Nonzero	0xc8
00c3 4800       |H   |		Short_Literal	0x0
00c4 00d9       |    |		Load_Top	At_Offset_1
00c5 e404       |    |		Load	0x2,0x4
00c6 01d6       |    |		Execute	Vector,Field_Write
00c7 3ffb       |?   |		Loop_Increasing	0xc3
00c8 00d9       |    |		Load_Top	At_Offset_1
00c9 01d4       |    |		Execute	Vector,Structure_Write
00ca			BODY_00b0:
00ca 00cf       |    |		Action	Mark_Auxiliary
00cb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x2 = 0xcb,0x1
00cc 01da       |    |		Execute	Vector,Bounds
00cd 0264       | d  |		Execute	Discrete,Below_Bound
00ce 7015       |p   |		Jump_Nonzero	0xe4
00cf e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x3 = 0xcf,0x2
00d0 4801       |H   |		Short_Literal	0x1
00d1 0279       | y  |		Execute	Discrete,And
00d2 00d8       |    |		Load_Top	At_Offset_0
00d3 00e1       |    |		Load_Encached	Boolean_Cache
00d4 0260       | `  |		Execute	Discrete,In_Type
00d5 7002       |p   |		Jump_Nonzero	0xd8
00d6 48e0       |H   |		Short_Literal	0xe0
00d7 0257       | W  |		Execute	Discrete,Raise
00d8 00d9       |    |		Load_Top	At_Offset_1
00d9 e403       |    |		Load	0x2,0x3
00da 01d6       |    |		Execute	Vector,Field_Write
00db e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x4 = 0xdb,0x3
00dc 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
00dd c402       |    |		Store	0x2,0x2
00de e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x5 = 0xde,0x4
00df 7002       |p   |		Jump_Nonzero	0xe2
00e0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x6 = 0xe0,0x5
00e1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00e2 00c8       |    |		Action	Pop_Auxiliary_Range
00e3 37eb       |7   |		Loop_Decreasing	0xcf
00e4 00ce       |    |		Action	Pop_Auxiliary
00e5 4831       |H1  |		Short_Literal	0x31
00e6 0257       | W  |		Execute	Discrete,Raise
00e7 0000       |    |		.XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00f1       |    |		.CONST	0x00f1								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0004       |    |		.CONST	0x0004								; Number of locals
00eb			INIT_00e8:
00eb 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x6 = .DEBUG	0x00eb,0x037a,0x0002,0x0000,0x0058,0xc415,0x0000,0x0109
													; Debug Table 0x6.0x0 = 0xeb,0xffff
00ec 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x6.0x1 = 0xec,0xfffe
00ed 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache					; Debug Table 0x6.0x2 = 0xed,0xfffd
00ee 02c7       |    |		Declare_Variable	Any
00ef 00d8       |    |		Load_Top	At_Offset_0
00f0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f1			BODY_00e8:
00f1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x3 = 0xf1,0x1
00f2 00eb       |    |		Load_Encached	Diana_Cache
00f3 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
00f4 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
00f5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x4 = 0xf5,0x2
00f6 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
00f7 00cf       |    |		Action	Mark_Auxiliary
00f8 7854       |xT  |		Jump	0x14d
00f9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x5 = 0xf9,0x4
00fa 0007       |    |		Action	Break_Optional
00fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x6 = 0xfb,0x401
00fc 7002       |p   |		Jump_Nonzero	0xff
00fd 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x7 = 0xfd,0x402
00fe 782c       |x,  |		Jump	0x12b
00ff 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x8 = 0xff,0x403
0100 0217       |    |		Execute	Heap_Access,All_Reference
0101 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0102 6804       |h   |		Jump_Zero	0x107
0103 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x9 = 0x103,0x404
0104 0217       |    |		Execute	Heap_Access,All_Reference
0105 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0106 7824       |x$  |		Jump	0x12b
0107 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xa = 0x107,0x405
0108 0007       |    |		Action	Break_Optional
0109 e407       |    |		Load	0x2,0x7								; Debug Table 0x6.0xb = 0x109,0x801
010a 0007       |    |		Action	Break_Optional
010b 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x6.0xc = 0x10b,0x802
010c 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0xd = 0x10c,0x803
010d 00d0       |    |		Action	Swap_Control							; Debug Table 0x6.0xe = 0x10d,0x804
010e 00d1       |    |		Pop_Control	Pop_Count_1
010f 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x6.0xf = 0x10f,0x405
0110 00eb       |    |		Load_Encached	Diana_Cache
0111 0098       |    |		Execute	Package,Field_Read_Dynamic
0112 012c       | ,  |		Execute	Any,Size
0113 e004       |    |		Load	0x0,0x4
0114 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0115 025b       | [  |		Execute	Discrete,Check_In_Type
0116 0273       | s  |		Execute	Discrete,Plus
0117 00d9       |    |		Load_Top	At_Offset_1
0118 0007       |    |		Action	Break_Optional
0119 e408       |    |		Load	0x2,0x8								; Debug Table 0x6.0x10 = 0x119,0xc01
011a 0007       |    |		Action	Break_Optional
011b 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x6.0x11 = 0x11b,0xc02
011c 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x12 = 0x11c,0xc03
011d 00d0       |    |		Action	Swap_Control							; Debug Table 0x6.0x13 = 0x11d,0xc04
011e 00d1       |    |		Pop_Control	Pop_Count_1
011f 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x6.0x14 = 0x11f,0x804
0120 00eb       |    |		Load_Encached	Diana_Cache
0121 0098       |    |		Execute	Package,Field_Read_Dynamic
0122 49c9       |I   |		Short_Literal	0x1c9
0123 00eb       |    |		Load_Encached	Diana_Cache
0124 0098       |    |		Execute	Package,Field_Read_Dynamic
0125 49ca       |I   |		Short_Literal	0x1ca
0126 00eb       |    |		Load_Encached	Diana_Cache
0127 0095       |    |		Execute	Package,Field_Reference_Dynamic
0128 e005       |    |		Load	0x0,0x5
0129 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
012a 7800       |x   |		Jump	0x12b
012b 00d0       |    |		Action	Swap_Control
012c 00d1       |    |		Pop_Control	Pop_Count_1
012d 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x6.0x15 = 0x12d,0x4
012e 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
012f c404       |    |		Store	0x2,0x4
0130 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x16 = 0x130,0x5
0131 00da       |    |		Load_Top	At_Offset_2
0132 00eb       |    |		Load_Encached	Diana_Cache
0133 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0134 0f27       | '  |		Execute_Immediate	Equal,0x27
0135 6809       |h   |		Jump_Zero	0x13f
0136 4802       |H   |		Short_Literal	0x2
0137 00da       |    |		Load_Top	At_Offset_2
0138 00eb       |    |		Load_Encached	Diana_Cache
0139 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
013a e5ff       |    |		Load	0x2,-0x1
013b 027f       |    |		Execute	Discrete,Equal
013c 6802       |h   |		Jump_Zero	0x13f
013d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x17 = 0x13d,0x6
013e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
013f 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x18 = 0x13f,0x7
0140 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x19 = 0x140,0x1001
0141 7002       |p   |		Jump_Nonzero	0x144
0142 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x6.0x1a = 0x142,0x1002
0143 7803       |x   |		Jump	0x147
0144 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1b = 0x144,0x1003
0145 0217       |    |		Execute	Heap_Access,All_Reference
0146 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0147 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0x6.0x1c = 0x147,0x7
0148 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1d = 0x148,0x8
0149 0a01       |    |		Execute_Immediate	Plus,0x1
014a 0248       | H  |		Execute	Discrete,Check_In_Integer
014b a402       |    |		Store_Unchecked	0x2,0x2
014c 00c9       |    |		Action	Pop_Auxiliary_Loop
014d 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x1e = 0x14d,0x3
014e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1f = 0x14e,0x1401
014f 021d       |    |		Execute	Heap_Access,Is_Null
0150 6fa8       |o   |		Jump_Zero	0xf9							; Debug Table 0x6.0x20 = 0x150,0x3
0151 00ce       |    |		Action	Pop_Auxiliary
0152 0092 0275  |   u|		Action	Push_String_Extended,0x275					; "Literals.Translate_Char failed"
													; Debug Table 0x6.0x21 = 0x152,0x9
0154 e006       |    |		Load	0x0,0x6
0155 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0156 4831       |H1  |		Short_Literal	0x31
0157 0257       | W  |		Execute	Discrete,Raise
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015f       | _  |		.CONST	0x015f								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0002       |    |		.CONST	0x0002								; Number of locals
015b			INIT_0158:
015b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x015b,0x03c0,0x0001,0x0000,0x0058,0xc415,0x0000,0x0187
													; Debug Table 0x7.0x0 = 0x15b,0xffff
015c 01dd       |    |		Execute	Vector,First
015d 00e3       |    |		Load_Encached	Natural_Cache
015e 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
015f			BODY_0158:
015f 00cf       |    |		Action	Mark_Auxiliary
0160 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x1 = 0x160,0x1
0161 4801       |H   |		Short_Literal	0x1
0162 0263       | c  |		Execute	Discrete,Above_Bound
0163 7010       |p   |		Jump_Nonzero	0x174
0164 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x2 = 0x164,0x2
0165 e402       |    |		Load	0x2,0x2
0166 0a3f       | ?  |		Execute_Immediate	Plus,0x3f
0167 0248       | H  |		Execute	Discrete,Check_In_Integer
0168 e5ff       |    |		Load	0x2,-0x1
0169 01cf       |    |		Execute	Vector,Slice_Read
016a e20f       |    |		Load	0x1,0xf
016b 01c7       |    |		Execute	Vector,Convert
016c 8212       |    |		Call	0x1,0x12
016d e007       |    |		Load	0x0,0x7
016e 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
016f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x3 = 0x16f,0x3
0170 0a40       | @  |		Execute_Immediate	Plus,0x40
0171 c402       |    |		Store	0x2,0x2
0172 00c8       |    |		Action	Pop_Auxiliary_Range
0173 3ff0       |?   |		Loop_Increasing	0x164
0174 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0175 0000 0000  |    |		.XXX[0x3]
0177 0000       |    |
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 0186       |    |		.CONST	0x0186								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0002       |    |		.CONST	0x0002								; Number of locals
017b			INIT_0178:
017b 4840       |H@  |		Short_Literal	0x40							; Debug Table 0x8 = .DEBUG	0x017b,0x03ca,0x0002,0x0000,0x0058,0xc415,0x0000,0x01c1
													; Debug Table 0x8.0x0 = 0x17b,0xffff
017c 00db       |    |		Load_Top	At_Offset_3
017d 01db       |    |		Execute	Vector,Length
017e 483f       |H?  |		Short_Literal	0x3f
017f 0279       | y  |		Execute	Discrete,And
0180 0272       | r  |		Execute	Discrete,Minus
0181 0248       | H  |		Execute	Discrete,Check_In_Integer
0182 483f       |H?  |		Short_Literal	0x3f
0183 0279       | y  |		Execute	Discrete,And
0184 00e3       |    |		Load_Encached	Natural_Cache
0185 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0186			BODY_0178:
0186 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x1 = 0x186,0x1
0187 4801       |H   |		Short_Literal	0x1
0188 00da       |    |		Load_Top	At_Offset_2
0189 e20e       |    |		Load	0x1,0xe
018a 0334       | 4  |		Declare_Variable	Array,With_Constraint
018b 00d8       |    |		Load_Top	At_Offset_0
018c 01dc       |    |		Execute	Vector,Last
018d 4801       |H   |		Short_Literal	0x1
018e 0263       | c  |		Execute	Discrete,Above_Bound
018f 7005       |p   |		Jump_Nonzero	0x195
0190 4800       |H   |		Short_Literal	0x0
0191 00d9       |    |		Load_Top	At_Offset_1
0192 e404       |    |		Load	0x2,0x4
0193 01d6       |    |		Execute	Vector,Field_Write
0194 3ffb       |?   |		Loop_Increasing	0x190
0195 01cc       |    |		Execute	Vector,Catenate
0196 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0197 0000       |    |		.XXX[0x1]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019d       |    |		.CONST	0x019d								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0003       |    |		.CONST	0x0003								; Number of locals
019b			INIT_0198:
019b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x9 = .DEBUG	0x019b,0x03d0,0x0002,0x0000,0x0058,0xc415,0x0000,0x01f0
													; Debug Table 0x9.0x0 = 0x19b,0xffff
019c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x1 = 0x19c,0xfffe
019d			BODY_0198:
019d 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x9.0x2 = 0x19d,0x1
019e 00e1       |    |		Load_Encached	Boolean_Cache
019f e5ff       |    |		Load	0x2,-0x1
01a0 e008       |    |		Load	0x0,0x8
01a1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01a2 005a       | Z  |		Store_Top	Discrete,At_Offset_2
01a3 005a       | Z  |		Store_Top	Discrete,At_Offset_2
01a4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3 = 0x1a4,0x2
01a5 6802       |h   |		Jump_Zero	0x1a8
01a6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x4 = 0x1a6,0x3
01a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a8 0092 0276  |   v|		Action	Push_String_Extended,0x276					; "Unimplemented: Element type of string literal has non-static size"
													; Debug Table 0x9.0x5 = 0x1a8,0x4
01aa e006       |    |		Load	0x0,0x6
01ab 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01ac 4831       |H1  |		Short_Literal	0x31
01ad 0257       | W  |		Execute	Discrete,Raise
01ae 0000 0000  |    |		.XXX[0x2]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01d0       |    |		.CONST	0x01d0								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 000a       |    |		.CONST	0x000a								; Number of locals
01b3			INIT_01b0:
01b3 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache					; Debug Table 0xa = .DEBUG	0x01b3,0x03de,0x0001,0x0000,0x0058,0xc415,0x0000,0x0221
													; Debug Table 0xa.0x0 = 0x1b3,0xffff
01b4 02c7       |    |		Declare_Variable	Any
01b5 00db       |    |		Load_Top	At_Offset_3
01b6 00eb       |    |		Load_Encached	Diana_Cache
01b7 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
01b8 c402       |    |		Store	0x2,0x2
01b9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x1 = 0x1b9,0xfffe
01ba 00eb       |    |		Load_Encached	Diana_Cache
01bb 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
01bc 00e3       |    |		Load_Encached	Natural_Cache
01bd 03f1       |    |		Declare_Variable	Discrete,With_Value
01be 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xa.0x2 = 0x1be,0xfffd
01bf 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0xa.0x3 = 0x1bf,0xfffc
01c0 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xa.0x4 = 0x1c0,0xfffb
01c1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x5 = 0x1c1,0xfffa
01c2 8217       |    |		Call	0x1,0x17
01c3 00e3       |    |		Load_Encached	Natural_Cache
01c4 03f1       |    |		Declare_Variable	Discrete,With_Value
01c5 e403       |    |		Load	0x2,0x3								; Debug Table 0xa.0x6 = 0x1c5,0xfff9
01c6 00d9       |    |		Load_Top	At_Offset_1
01c7 0271       | q  |		Execute	Discrete,Times
01c8 00e3       |    |		Load_Encached	Natural_Cache
01c9 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01ca 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x7 = 0x1ca,0xfff8
01cb 00d9       |    |		Load_Top	At_Offset_1
01cc e20e       |    |		Load	0x1,0xe
01cd 0334       | 4  |		Declare_Variable	Array,With_Constraint
01ce 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xa.0x8 = 0x1ce,0xfff7
01cf 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
01d0			BODY_01b0:
01d0 00cf       |    |		Action	Mark_Auxiliary
01d1 e403       |    |		Load	0x2,0x3								; Debug Table 0xa.0x9 = 0x1d1,0x1
01d2 4801       |H   |		Short_Literal	0x1
01d3 0263       | c  |		Execute	Discrete,Above_Bound
01d4 701a       |p   |		Jump_Nonzero	0x1ef
01d5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0xa = 0x1d5,0x2
01d6 e402       |    |		Load	0x2,0x2
01d7 00eb       |    |		Load_Encached	Diana_Cache
01d8 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
01d9 a405       |    |		Store_Unchecked	0x2,0x5
01da e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0xb = 0x1da,0x3
01db e405       |    |		Load	0x2,0x5
01dc 8214       |    |		Call	0x1,0x14
01dd c406       |    |		Store	0x2,0x6
01de e407       |    |		Load	0x2,0x7								; Debug Table 0xa.0xc = 0x1de,0x4
01df e406       |    |		Load	0x2,0x6
01e0 8213       |    |		Call	0x1,0x13
01e1 e40a       |    |		Load	0x2,0xa
01e2 e40a       |    |		Load	0x2,0xa
01e3 e407       |    |		Load	0x2,0x7
01e4 0273       | s  |		Execute	Discrete,Plus
01e5 0aff       |    |		Execute_Immediate	Plus,-0x1
01e6 0248       | H  |		Execute	Discrete,Check_In_Integer
01e7 e409       |    |		Load	0x2,0x9
01e8 01ce       |    |		Execute	Vector,Slice_Write
01e9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0xd = 0x1e9,0x5
01ea e407       |    |		Load	0x2,0x7
01eb 0273       | s  |		Execute	Discrete,Plus
01ec c40a       |    |		Store	0x2,0xa
01ed 00c8       |    |		Action	Pop_Auxiliary_Range
01ee 3fe6       |?   |		Loop_Increasing	0x1d5
01ef 00ce       |    |		Action	Pop_Auxiliary
01f0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0xe = 0x1f0,0x6
01f1 09fa       |    |		Execute_Immediate	Binary_Scale,-0x6
01f2 c404       |    |		Store	0x2,0x4
01f3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0xf = 0x1f3,0x7
01f4 483f       |H?  |		Short_Literal	0x3f
01f5 0279       | y  |		Execute	Discrete,And
01f6 6803       |h   |		Jump_Zero	0x1fa
01f7 e404       |    |		Load	0x2,0x4								; Debug Table 0xa.0x10 = 0x1f7,0x8
01f8 0a01       |    |		Execute_Immediate	Plus,0x1
01f9 c404       |    |		Store	0x2,0x4
01fa e404       |    |		Load	0x2,0x4								; Debug Table 0xa.0x11 = 0x1fa,0x9
01fb e009       |    |		Load	0x0,0x9
01fc 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01fd 025b       | [  |		Execute	Discrete,Check_In_Type
01fe e007       |    |		Load	0x0,0x7
01ff 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0200 e404       |    |		Load	0x2,0x4								; Debug Table 0xa.0x12 = 0x200,0xa
0201 00da       |    |		Load_Top	At_Offset_2
0202 8216       |    |		Call	0x1,0x16
0203 8215       |    |		Call	0x1,0x15
0204 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0205 0000 0000  |    |		.XXX[0x3]
0207 0000       |    |
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x020b,0x0406,0x0001,0x0000,0x0058,0xc415,0x0000,0x02db
													; Debug Table 0xb.0x0 = 0x20b,0x1
020c e5fd       |    |		Load	0x2,-0x3
020d e5fe       |    |		Load	0x2,-0x2
020e 01d6       |    |		Execute	Vector,Field_Write
020f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0x1 = 0x20f,0x2
0210 0a01       |    |		Execute_Immediate	Plus,0x1
0211 0248       | H  |		Execute	Discrete,Check_In_Integer
0212 a5fd       |    |		Store_Unchecked	0x2,-0x3
0213 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0214 0000 0000  |    |		.BLANK	0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 022f       | /  |		.CONST	0x022f								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0008       |    |		.CONST	0x0008								; Number of locals
021b			INIT_0218:
021b 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache					; Debug Table 0xc = .DEBUG	0x021b,0x040c,0x0001,0x0000,0x0058,0xc415,0x0000,0x02fe
													; Debug Table 0xc.0x0 = 0x21b,0xffff
021c 02c7       |    |		Declare_Variable	Any
021d 00db       |    |		Load_Top	At_Offset_3
021e 00eb       |    |		Load_Encached	Diana_Cache
021f 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0220 c402       |    |		Store	0x2,0x2
0221 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x1 = 0x221,0xfffe
0222 00eb       |    |		Load_Encached	Diana_Cache
0223 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0224 00e2       |    |		Load_Encached	Integer_Cache
0225 03f1       |    |		Declare_Variable	Discrete,With_Value
0226 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0xc.0x2 = 0x226,0xfffd
0227 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0xc.0x3 = 0x227,0xfffc
0228 e009       |    |		Load	0x0,0x9								; Debug Table 0xc.0x4 = 0x228,0xfffb
0229 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
022a 0337       | 7  |		Declare_Variable	Array
022b 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0xc.0x5 = 0x22b,0xfffa
022c 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
022d 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0xc.0x6 = 0x22d,0xfff9
022e 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
022f			BODY_0218:
022f e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x7 = 0x22f,0x1
0230 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
0231 a404       |    |		Store_Unchecked	0x2,0x4
0232 e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x8 = 0x232,0x2
0233 4807       |H   |		Short_Literal	0x7
0234 0279       | y  |		Execute	Discrete,And
0235 6804       |h   |		Jump_Zero	0x23a
0236 e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0x9 = 0x236,0x3
0237 0a01       |    |		Execute_Immediate	Plus,0x1
0238 0248       | H  |		Execute	Discrete,Check_In_Integer
0239 a404       |    |		Store_Unchecked	0x2,0x4
023a e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0xa = 0x23a,0x4
023b e009       |    |		Load	0x0,0x9
023c 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
023d 025b       | [  |		Execute	Discrete,Check_In_Type
023e e007       |    |		Load	0x0,0x7
023f 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0240 00cf       |    |		Action	Mark_Auxiliary
0241 e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0xb = 0x241,0x5
0242 4801       |H   |		Short_Literal	0x1
0243 0263       | c  |		Execute	Discrete,Above_Bound
0244 702f       |p/  |		Jump_Nonzero	0x274
0245 00cf       |    |		Action	Mark_Auxiliary
0246 e408       |    |		Load	0x2,0x8								; Debug Table 0xc.0xc = 0x246,0x6
0247 0a08       |    |		Execute_Immediate	Plus,0x8
0248 0aff       |    |		Execute_Immediate	Plus,-0x1
0249 0248       | H  |		Execute	Discrete,Check_In_Integer
024a e408       |    |		Load	0x2,0x8
024b 0263       | c  |		Execute	Discrete,Above_Bound
024c 701a       |p   |		Jump_Nonzero	0x267
024d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xd = 0x24d,0x7
024e e403       |    |		Load	0x2,0x3
024f 027a       | z  |		Execute	Discrete,Less_Equal
0250 680e       |h   |		Jump_Zero	0x25f
0251 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xe = 0x251,0x8
0252 00e3       |    |		Load_Encached	Natural_Cache
0253 025b       | [  |		Execute	Discrete,Check_In_Type
0254 e402       |    |		Load	0x2,0x2
0255 00eb       |    |		Load_Encached	Diana_Cache
0256 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0257 a405       |    |		Store_Unchecked	0x2,0x5
0258 e407       |    |		Load	0x2,0x7								; Debug Table 0xc.0xf = 0x258,0x9
0259 e406       |    |		Load	0x2,0x6
025a e405       |    |		Load	0x2,0x5
025b 8219       |    |		Call	0x1,0x19
025c 00d1       |    |		Pop_Control	Pop_Count_1
025d c407       |    |		Store	0x2,0x7
025e 7806       |x   |		Jump	0x265
025f e407       |    |		Load	0x2,0x7								; Debug Table 0xc.0x10 = 0x25f,0xa
0260 e406       |    |		Load	0x2,0x6
0261 4820       |H   |		Short_Literal	0x20
0262 8219       |    |		Call	0x1,0x19
0263 00d1       |    |		Pop_Control	Pop_Count_1
0264 c407       |    |		Store	0x2,0x7
0265 00c8       |    |		Action	Pop_Auxiliary_Range
0266 3fe6       |?   |		Loop_Increasing	0x24d
0267 00ce       |    |		Action	Pop_Auxiliary
0268 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x11 = 0x268,0xb
0269 a407       |    |		Store_Unchecked	0x2,0x7
026a 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x12 = 0x26a,0xc
026b e406       |    |		Load	0x2,0x6
026c e007       |    |		Load	0x0,0x7
026d 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
026e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x13 = 0x26e,0xd
026f 0a08       |    |		Execute_Immediate	Plus,0x8
0270 0248       | H  |		Execute	Discrete,Check_In_Integer
0271 a408       |    |		Store_Unchecked	0x2,0x8
0272 00c8       |    |		Action	Pop_Auxiliary_Range
0273 3fd1       |?   |		Loop_Increasing	0x245
0274 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0275 ; --------------------------------------------------------------------------------------
0275 ; STRING TABLE
0275 ; --------------------------------------------------------------------------------------
0275 0006       |    |		.STRTAB	0x0006->0x0278							; "Literals.Translate_Char failed"
0276 0022       | "  |		.STRTAB	0x0022->0x0287							; "Unimplemented: Element type of string literal has non-static size"
0277 0061       | a  |		.STREND 0x0061->0x02a7
0278 4c69 7465  |Lite|		.STRTAB_STRINGS
02a8 ; --------------------------------------------------------------------------------------
02a8 ; Debug Table
02a8 ; --------------------------------------------------------------------------------------
02a8 0003 000d  |    |		.CONST	0x0003,0x000d
02aa 000b 0312  |    |		.DEBUG	0x000b,0x0312,0x8000,0x0000,0x0057,0x3a95,0x0000,0x0005
02b2 000e 0316  |    |		.DEBUG	0x000e,0x0316,0x8000,0x0000,0x0058,0xc415,0x0000,0x0015
02ba 003b 033a  | ; :|		.DEBUG	0x003b,0x033a,0x0001,0x0000,0x0057,0x3a95,0x0000,0x0006
02c2 006b 0350  | k P|		.DEBUG	0x006b,0x0350,0x0002,0x0000,0x0058,0xc415,0x0000,0x003d
02ca 0093 0366  |   f|		.DEBUG	0x0093,0x0366,0x0002,0x0000,0x0058,0xc415,0x0000,0x0092
02d2 00b3 036a  |   j|		.DEBUG	0x00b3,0x036a,0x0002,0x0000,0x0058,0xc415,0x0000,0x00bc
02da 00eb 037a  |   z|		.DEBUG	0x00eb,0x037a,0x0002,0x0000,0x0058,0xc415,0x0000,0x0109
02e2 015b 03c0  | [  |		.DEBUG	0x015b,0x03c0,0x0001,0x0000,0x0058,0xc415,0x0000,0x0187
02ea 017b 03ca  | {  |		.DEBUG	0x017b,0x03ca,0x0002,0x0000,0x0058,0xc415,0x0000,0x01c1
02f2 019b 03d0  |    |		.DEBUG	0x019b,0x03d0,0x0002,0x0000,0x0058,0xc415,0x0000,0x01f0
02fa 01b3 03de  |    |		.DEBUG	0x01b3,0x03de,0x0001,0x0000,0x0058,0xc415,0x0000,0x0221
0302 020b 0406  |    |		.DEBUG	0x020b,0x0406,0x0001,0x0000,0x0058,0xc415,0x0000,0x02db
030a 021b 040c  |    |		.DEBUG	0x021b,0x040c,0x0001,0x0000,0x0058,0xc415,0x0000,0x02fe
0312 ; --------------------------------------------------------------------------------------
0312 ; Debug3 Subtable 0x0
0312 ; --------------------------------------------------------------------------------------
0312 0001 0000  |    |		.DBG3TAB	0x0001,0x0000
0314 000b ffff  |    |		.CONST	0x000b,0xffff
0316 ; --------------------------------------------------------------------------------------
0316 ; Debug3 Subtable 0x1
0316 ; --------------------------------------------------------------------------------------
0316 0011 0000  |    |		.DBG3TAB	0x0011,0x0000
0318 000e ffff  |    |		.CONST	0x000e,0xffff
031a 000f fffe  |    |		.CONST	0x000f,0xfffe
031c 0010 fffd  |    |		.CONST	0x0010,0xfffd
031e 0011 fffc  |    |		.CONST	0x0011,0xfffc
0320 0017 fffb  |    |		.CONST	0x0017,0xfffb
0322 001b fffa  |    |		.CONST	0x001b,0xfffa
0324 001f fff9  |    |		.CONST	0x001f,0xfff9
0326 0021 fff8  | !  |		.CONST	0x0021,0xfff8
0328 0023 fff7  | #  |		.CONST	0x0023,0xfff7
032a 0025 fff6  | %  |		.CONST	0x0025,0xfff6
032c 0027 fff5  | '  |		.CONST	0x0027,0xfff5
032e 0029 fff4  | )  |		.CONST	0x0029,0xfff4
0330 002b fff3  | +  |		.CONST	0x002b,0xfff3
0332 002d fff2  | -  |		.CONST	0x002d,0xfff2
0334 002f fff1  | /  |		.CONST	0x002f,0xfff1
0336 0031 fff0  | 1  |		.CONST	0x0031,0xfff0
0338 0033 ffef  | 3  |		.CONST	0x0033,0xffef
033a ; --------------------------------------------------------------------------------------
033a ; Debug3 Subtable 0x2
033a ; --------------------------------------------------------------------------------------
033a 0005 0005  |    |		.DBG3TAB	0x0005,0x0005
033c 003b ffff  | ;  |		.CONST	0x003b,0xffff
033e 0040 fffe  | @  |		.CONST	0x0040,0xfffe
0340 0045 fffd  | E  |		.CONST	0x0045,0xfffd
0342 004a fffc  | J  |		.CONST	0x004a,0xfffc
0344 004f fffb  | O  |		.CONST	0x004f,0xfffb
0346 0054 0001  | T  |		.CONST	0x0054,0x0001
0348 0057 0002  | W  |		.CONST	0x0057,0x0002
034a 0058 0003  | X  |		.CONST	0x0058,0x0003
034c 0060 0004  | `  |		.CONST	0x0060,0x0004
034e 0063 0005  | c  |		.CONST	0x0063,0x0005
0350 ; --------------------------------------------------------------------------------------
0350 ; Debug3 Subtable 0x3
0350 ; --------------------------------------------------------------------------------------
0350 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
0352 006b ffff  | k  |		.CONST	0x006b,0xffff
0354 006e fffe  | n  |		.CONST	0x006e,0xfffe
0356 0071 fffd  | q  |		.CONST	0x0071,0xfffd
0358 0074 0001  | t  |		.CONST	0x0074,0x0001
035a 0075 0002  | u  |		.CONST	0x0075,0x0002
035c 0079 0003  | y  |		.CONST	0x0079,0x0003
035e 007d 0004  | }  |		.CONST	0x007d,0x0004
0360 007f 0005  |    |		.CONST	0x007f,0x0005
0362 0081 0006  |    |		.CONST	0x0081,0x0006
0364 0084 0007  |    |		.CONST	0x0084,0x0007
0366 ; --------------------------------------------------------------------------------------
0366 ; Debug3 Subtable 0x4
0366 ; --------------------------------------------------------------------------------------
0366 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0368 0093 0001  |    |		.CONST	0x0093,0x0001
036a ; --------------------------------------------------------------------------------------
036a ; Debug3 Subtable 0x5
036a ; --------------------------------------------------------------------------------------
036a 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
036c 00b3 ffff  |    |		.CONST	0x00b3,0xffff
036e 00b6 fffe  |    |		.CONST	0x00b6,0xfffe
0370 00cb 0001  |    |		.CONST	0x00cb,0x0001
0372 00cf 0002  |    |		.CONST	0x00cf,0x0002
0374 00db 0003  |    |		.CONST	0x00db,0x0003
0376 00de 0004  |    |		.CONST	0x00de,0x0004
0378 00e0 0005  |    |		.CONST	0x00e0,0x0005
037a ; --------------------------------------------------------------------------------------
037a ; Debug3 Subtable 0x6
037a ; --------------------------------------------------------------------------------------
037a 0003 001f  |    |		.DBG3TAB	0x0003,0x001f
037c 00eb ffff  |    |		.CONST	0x00eb,0xffff
037e 00ec fffe  |    |		.CONST	0x00ec,0xfffe
0380 00ed fffd  |    |		.CONST	0x00ed,0xfffd
0382 00f1 0001  |    |		.CONST	0x00f1,0x0001
0384 00f5 0002  |    |		.CONST	0x00f5,0x0002
0386 00f9 0004  |    |		.CONST	0x00f9,0x0004
0388 00fb 0401  |    |		.CONST	0x00fb,0x0401
038a 00fd 0402  |    |		.CONST	0x00fd,0x0402
038c 00ff 0403  |    |		.CONST	0x00ff,0x0403
038e 0103 0404  |    |		.CONST	0x0103,0x0404
0390 0107 0405  |    |		.CONST	0x0107,0x0405
0392 0109 0801  |    |		.CONST	0x0109,0x0801
0394 010b 0802  |    |		.CONST	0x010b,0x0802
0396 010c 0803  |    |		.CONST	0x010c,0x0803
0398 010d 0804  |    |		.CONST	0x010d,0x0804
039a 010f 0405  |    |		.CONST	0x010f,0x0405
039c 0119 0c01  |    |		.CONST	0x0119,0x0c01
039e 011b 0c02  |    |		.CONST	0x011b,0x0c02
03a0 011c 0c03  |    |		.CONST	0x011c,0x0c03
03a2 011d 0c04  |    |		.CONST	0x011d,0x0c04
03a4 011f 0804  |    |		.CONST	0x011f,0x0804
03a6 012d 0004  | -  |		.CONST	0x012d,0x0004
03a8 0130 0005  | 0  |		.CONST	0x0130,0x0005
03aa 013d 0006  | =  |		.CONST	0x013d,0x0006
03ac 013f 0007  | ?  |		.CONST	0x013f,0x0007
03ae 0140 1001  | @  |		.CONST	0x0140,0x1001
03b0 0142 1002  | B  |		.CONST	0x0142,0x1002
03b2 0144 1003  | D  |		.CONST	0x0144,0x1003
03b4 0147 0007  | G  |		.CONST	0x0147,0x0007
03b6 0148 0008  | H  |		.CONST	0x0148,0x0008
03b8 014d 0003  | M  |		.CONST	0x014d,0x0003
03ba 014e 1401  | N  |		.CONST	0x014e,0x1401
03bc 0150 0003  | P  |		.CONST	0x0150,0x0003
03be 0152 0009  | R  |		.CONST	0x0152,0x0009
03c0 ; --------------------------------------------------------------------------------------
03c0 ; Debug3 Subtable 0x7
03c0 ; --------------------------------------------------------------------------------------
03c0 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
03c2 015b ffff  | [  |		.CONST	0x015b,0xffff
03c4 0160 0001  | `  |		.CONST	0x0160,0x0001
03c6 0164 0002  | d  |		.CONST	0x0164,0x0002
03c8 016f 0003  | o  |		.CONST	0x016f,0x0003
03ca ; --------------------------------------------------------------------------------------
03ca ; Debug3 Subtable 0x8
03ca ; --------------------------------------------------------------------------------------
03ca 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
03cc 017b ffff  | {  |		.CONST	0x017b,0xffff
03ce 0186 0001  |    |		.CONST	0x0186,0x0001
03d0 ; --------------------------------------------------------------------------------------
03d0 ; Debug3 Subtable 0x9
03d0 ; --------------------------------------------------------------------------------------
03d0 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
03d2 019b ffff  |    |		.CONST	0x019b,0xffff
03d4 019c fffe  |    |		.CONST	0x019c,0xfffe
03d6 019d 0001  |    |		.CONST	0x019d,0x0001
03d8 01a4 0002  |    |		.CONST	0x01a4,0x0002
03da 01a6 0003  |    |		.CONST	0x01a6,0x0003
03dc 01a8 0004  |    |		.CONST	0x01a8,0x0004
03de ; --------------------------------------------------------------------------------------
03de ; Debug3 Subtable 0xa
03de ; --------------------------------------------------------------------------------------
03de 0009 000a  |    |		.DBG3TAB	0x0009,0x000a
03e0 01b3 ffff  |    |		.CONST	0x01b3,0xffff
03e2 01b9 fffe  |    |		.CONST	0x01b9,0xfffe
03e4 01be fffd  |    |		.CONST	0x01be,0xfffd
03e6 01bf fffc  |    |		.CONST	0x01bf,0xfffc
03e8 01c0 fffb  |    |		.CONST	0x01c0,0xfffb
03ea 01c1 fffa  |    |		.CONST	0x01c1,0xfffa
03ec 01c5 fff9  |    |		.CONST	0x01c5,0xfff9
03ee 01ca fff8  |    |		.CONST	0x01ca,0xfff8
03f0 01ce fff7  |    |		.CONST	0x01ce,0xfff7
03f2 01d1 0001  |    |		.CONST	0x01d1,0x0001
03f4 01d5 0002  |    |		.CONST	0x01d5,0x0002
03f6 01da 0003  |    |		.CONST	0x01da,0x0003
03f8 01de 0004  |    |		.CONST	0x01de,0x0004
03fa 01e9 0005  |    |		.CONST	0x01e9,0x0005
03fc 01f0 0006  |    |		.CONST	0x01f0,0x0006
03fe 01f3 0007  |    |		.CONST	0x01f3,0x0007
0400 01f7 0008  |    |		.CONST	0x01f7,0x0008
0402 01fa 0009  |    |		.CONST	0x01fa,0x0009
0404 0200 000a  |    |		.CONST	0x0200,0x000a
0406 ; --------------------------------------------------------------------------------------
0406 ; Debug3 Subtable 0xb
0406 ; --------------------------------------------------------------------------------------
0406 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0408 020b 0001  |    |		.CONST	0x020b,0x0001
040a 020f 0002  |    |		.CONST	0x020f,0x0002
040c ; --------------------------------------------------------------------------------------
040c ; Debug3 Subtable 0xc
040c ; --------------------------------------------------------------------------------------
040c 0007 000d  |    |		.DBG3TAB	0x0007,0x000d
040e 021b ffff  |    |		.CONST	0x021b,0xffff
0410 0221 fffe  | !  |		.CONST	0x0221,0xfffe
0412 0226 fffd  | &  |		.CONST	0x0226,0xfffd
0414 0227 fffc  | '  |		.CONST	0x0227,0xfffc
0416 0228 fffb  | (  |		.CONST	0x0228,0xfffb
0418 022b fffa  | +  |		.CONST	0x022b,0xfffa
041a 022d fff9  | -  |		.CONST	0x022d,0xfff9
041c 022f 0001  | /  |		.CONST	0x022f,0x0001
041e 0232 0002  | 2  |		.CONST	0x0232,0x0002
0420 0236 0003  | 6  |		.CONST	0x0236,0x0003
0422 023a 0004  | :  |		.CONST	0x023a,0x0004
0424 0241 0005  | A  |		.CONST	0x0241,0x0005
0426 0246 0006  | F  |		.CONST	0x0246,0x0006
0428 024d 0007  | M  |		.CONST	0x024d,0x0007
042a 0251 0008  | Q  |		.CONST	0x0251,0x0008
042c 0258 0009  | X  |		.CONST	0x0258,0x0009
042e 025f 000a  | _  |		.CONST	0x025f,0x000a
0430 0268 000b  | h  |		.CONST	0x0268,0x000b
0432 026a 000c  | j  |		.CONST	0x026a,0x000c
0434 026e 000d  | n  |		.CONST	0x026e,0x000d
0436 0000 0000  |    |		.BLANK	0000[0x1ca]