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

⟦ef7cf9da0⟧

    Length: 4096 (0x1000)
    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 0490       |    |		.CONST	0x0490								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0041       | A  |		.CONST	0x0041								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0016       |    |		.CONST	0x0016								; Number of locals
000b			INIT_0008:
000b 62d4       |b   |		Indirect_Literal	Discrete,0x2e0,{0x00000000, 0x005723b5}		; Debug Table 0x0 = .DEBUG	0x000b,0x0532,0x0000,0x0000,0x0057,0x23b5,0x0000,0x1073
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 62cf       |b   |		Indirect_Literal	Discrete,0x2dc,{0x00000000, 0x00001074}
000d e001       |    |		Load	0x0,0x1
000e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
000f e001       |    |		Load	0x0,0x1
0010 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0011 00e5       |    |		Load_Encached	Long_Integer_Cache
0012 e001       |    |		Load	0x0,0x1
0013 1918       |    |		Execute	Package,Field_Reference,Field_Number 0x18
0014 e002       |    |		Load	0x0,0x2
0015 0386       |    |		Declare_Variable	Package,Visible
0016 00d8       |    |		Load_Top	At_Offset_0
0017 020f       |    |		Execute	Module,Activate
0018 62c7       |b   |		Indirect_Literal	Discrete,0x2e0,{0x00000000, 0x005723b5}		; Debug Table 0x0.0x1 = 0x18,0xfffe
0019 62be       |b   |		Indirect_Literal	Discrete,0x2d8,{0x00000000, 0x0000108b}
001a e003       |    |		Load	0x0,0x3
001b 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
001c e003       |    |		Load	0x0,0x3
001d 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
001e e003       |    |		Load	0x0,0x3
001f 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0020 00e0       |    |		Load_Encached	Standard_Cache
0021 192e       | .  |		Execute	Package,Field_Reference,Field_Number 0x2e
0022 e002       |    |		Load	0x0,0x2
0023 0386       |    |		Declare_Variable	Package,Visible
0024 00d8       |    |		Load_Top	At_Offset_0
0025 020f       |    |		Execute	Module,Activate
0026 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x26,0xfffd
0028 029a 008b  |    |		Declare_Subprogram	INIT_0088,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x28,0xfffc
002a 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x2a,0xfffb
002c 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x2c,0xfffa
002e 00bf       |    |		Action	Accept_Activation
002f 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x002f,0x0540,0x0000,0x0000,0x0057,0x2785,0x0000,0x0006
													; Debug Table 0x1.0x0 = 0x2f,0xffff
0030 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x30,0xfffe
0031 029d 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call			; Debug Table 0x1.0x2 = 0x31,0xfffd
0033 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call			; Debug Table 0x1.0x3 = 0x33,0xfffc
0035 029d 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call			; Debug Table 0x1.0x4 = 0x35,0xfffb
0037 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x5 = 0x37,0xfffa
0038 00c7       |    |		Action	Elaborate_Subprogram
0039 029d 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call			; Debug Table 0x1.0x6 = 0x39,0xfff9
003b 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x7 = 0x3b,0xfff8
003c 00c7       |    |		Action	Elaborate_Subprogram
003d 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x8 = 0x3d,0xfff7
003e 00c7       |    |		Action	Elaborate_Subprogram
003f 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x9 = 0x3f,0xfff6
0040 00c7       |    |		Action	Elaborate_Subprogram
0041			BODY_0008:
0041 00bc       |    |		Action	Signal_Activated
0042 00bb       |    |		Action	Signal_Completion
0043 0000 0000  |    |		.BLANK	0000[0x5]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 005f       | _  |		.CONST	0x005f								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 000a       |    |		.CONST	0x000a								; Number of locals
004b			INIT_0048:
004b 029f 021b  |    |		Declare_Subprogram	INIT_0218,For_Call				; Debug Table 0x2 = .DEBUG	0x004b,0x0556,0x2801,0x0002,0x0057,0x23b5,0x0000,0x10a4
													; Debug Table 0x2.0x0 = 0x4b,0xffff
004d 029f 0263  |   c|		Declare_Subprogram	INIT_0260,For_Call				; Debug Table 0x2.0x1 = 0x4d,0xfffe
004f 029f 029b  |    |		Declare_Subprogram	INIT_0298,For_Call				; Debug Table 0x2.0x2 = 0x4f,0xfffd
0051 029f 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Call				; Debug Table 0x2.0x3 = 0x51,0xfffc
0053 e004       |    |		Load	0x0,0x4								; Debug Table 0x2.0x4 = 0x53,0xfffb
0054 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
0055 191f       |    |		Execute	Package,Field_Reference,Field_Number 0x1f
0056 00c6       |    |		Action	Check_Subprogram_Elaborated
0057 4805       |H   |		Short_Literal	0x5
0058 4802       |H   |		Short_Literal	0x2
0059 0099       |    |		Action	Reference_Dynamic
005a 6279       |by  |		Indirect_Literal	Discrete,0x2d4,{0x00000000, 0x00572785}
005b 4a80       |J   |		Short_Literal	0x280
005c 4809       |H   |		Short_Literal	0x9
005d 029f 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Call
005f			BODY_0048:
005f 840a       |    |		Call	0x2,0xa								; Debug Table 0x2.0x5 = 0x5f,0x1
0060 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x6 = 0x60,0x2
0061 4801       |H   |		Short_Literal	0x1
0062 4801       |H   |		Short_Literal	0x1
0063 4801       |H   |		Short_Literal	0x1
0064 e5fa       |    |		Load	0x2,-0x6
0065 4806       |H   |		Short_Literal	0x6
0066 4802       |H   |		Short_Literal	0x2
0067 0099       |    |		Action	Reference_Dynamic
0068 4807       |H   |		Short_Literal	0x7
0069 4802       |H   |		Short_Literal	0x2
006a 0099       |    |		Action	Reference_Dynamic
006b e004       |    |		Load	0x0,0x4
006c 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
006d 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
006e e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x2.0x7 = 0x6e,0x3
006f e5fb       |    |		Load	0x2,-0x5
0070 e5fc       |    |		Load	0x2,-0x4
0071 e5fd       |    |		Load	0x2,-0x3
0072 e5fa       |    |		Load	0x2,-0x6
0073 0217       |    |		Execute	Heap_Access,All_Reference
0074 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0075 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0076 e005       |    |		Load	0x0,0x5
0077 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0078 e006       |    |		Load	0x0,0x6
0079 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
007a 00d8       |    |		Load_Top	At_Offset_0
007b e006       |    |		Load	0x0,0x6
007c 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
007d 7003       |p   |		Jump_Nonzero	0x81
007e e003       |    |		Load	0x0,0x3
007f 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0080 0257       | W  |		Execute	Discrete,Raise
0081 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0082 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x8 = 0x82,0x4
0083 a5f6       |    |		Store_Unchecked	0x2,-0xa
0084 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
0085 0000 0000  |    |		.XXX[0x3]
0087 0000       |    |
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008d       |    |		.CONST	0x008d								; Address of begin
0089 0004       |    |		.CONST	0x0004								; Address of exception handler
008a 0002       |    |		.CONST	0x0002								; Number of locals
008b			INIT_0088:
008b 029f 034b  |   K|		Declare_Subprogram	INIT_0348,For_Call				; Debug Table 0x3 = .DEBUG	0x008b,0x056a,0x2801,0x0002,0x0057,0x23b5,0x0000,0x10ed
008d			BODY_0088:
008d 8402       |    |		Call	0x2,0x2								; Debug Table 0x3.0x0 = 0x8d,0x1
008e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x1 = 0x8e,0x2
008f a5f9       |    |		Store_Unchecked	0x2,-0x7
0090 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0091 0000 0000  |    |		.BLANK	0000[0x7]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00cd       |    |		.CONST	0x00cd								; Address of begin
0099 0188       |    |		.CONST	0x0188								; Address of exception handler
009a 000f       |    |		.CONST	0x000f								; Number of locals
009b			INIT_0098:
009b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x009b,0x0570,0x0001,0x0000,0x0057,0x23b5,0x0000,0x1122
													; Debug Table 0x4.0x0 = 0x9b,0xffff
009c e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x1 = 0x9c,0xfffe
009d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
009e e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x2 = 0x9e,0xfffd
009f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
00a0 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
00a1 02c7       |    |		Declare_Variable	Any
00a2 00d8       |    |		Load_Top	At_Offset_0
00a3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a4 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x3 = 0xa4,0xfffc
00a5 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00a6 02ff       |    |		Declare_Variable	Variant_Record
00a7 00d8       |    |		Load_Top	At_Offset_0
00a8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a9 e20d       |    |		Load	0x1,0xd								; Debug Table 0x4.0x4 = 0xa9,0xfffb
00aa 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
00ab e007       |    |		Load	0x0,0x7								; Debug Table 0x4.0x5 = 0xab,0xfffa
00ac 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ad e004       |    |		Load	0x0,0x4								; Debug Table 0x4.0x6 = 0xad,0xfff9
00ae 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
00af e004       |    |		Load	0x0,0x4								; Debug Table 0x4.0x7 = 0xaf,0xfff8
00b0 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00b1 e004       |    |		Load	0x0,0x4								; Debug Table 0x4.0x8 = 0xb1,0xfff7
00b2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00b3 e004       |    |		Load	0x0,0x4								; Debug Table 0x4.0x9 = 0xb3,0xfff6
00b4 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00b5 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00b6 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0xa = 0xb6,0xfff5
00b7 01dd       |    |		Execute	Vector,First
00b8 e5fe       |    |		Load	0x2,-0x2
00b9 01dd       |    |		Execute	Vector,First
00ba 0a03       |    |		Execute_Immediate	Plus,0x3
00bb 0248       | H  |		Execute	Discrete,Check_In_Integer
00bc e5fe       |    |		Load	0x2,-0x2
00bd 01cf       |    |		Execute	Vector,Slice_Read
00be 8213       |    |		Call	0x1,0x13
00bf 00e2       |    |		Load_Encached	Integer_Cache
00c0 03f1       |    |		Declare_Variable	Discrete,With_Value
00c1 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x4.0xb = 0xc1,0xfff4
00c2 e008       |    |		Load	0x0,0x8
00c3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00c4 e009       |    |		Load	0x0,0x9
00c5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00c6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00c7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0xc = 0xc7,0xfff3
00c8 e001       |    |		Load	0x0,0x1
00c9 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ca 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
00cb 029f 035b  |   [|		Declare_Subprogram	INIT_0358,For_Call
00cd			BODY_0098:
00cd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0xd = 0xcd,0x1
00ce 4800       |H   |		Short_Literal	0x0
00cf 4801       |H   |		Short_Literal	0x1
00d0 e00a       |    |		Load	0x0,0xa
00d1 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00d2 e5fb       |    |		Load	0x2,-0x5
00d3 e40d       |    |		Load	0x2,0xd
00d4 e004       |    |		Load	0x0,0x4
00d5 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00d6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00d7 a40b       |    |		Store_Unchecked	0x2,0xb
00d8 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0xe = 0xd8,0x2
00d9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00da e404       |    |		Load	0x2,0x4
00db 0120       |    |		Execute	Any,Is_Value
00dc 6804       |h   |		Jump_Zero	0xe1
00dd e001       |    |		Load	0x0,0x1
00de 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
00df 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
00e0 7801       |x   |		Jump	0xe2
00e1 e404       |    |		Load	0x2,0x4
00e2 e001       |    |		Load	0x0,0x1
00e3 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
00e4 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00e5 61ea       |a   |		Indirect_Literal	Discrete,0x2d0,{0x00000000, 0x00004000}
00e6 4801       |H   |		Short_Literal	0x1
00e7 4800       |H   |		Short_Literal	0x0
00e8 4800       |H   |		Short_Literal	0x0
00e9 e5fb       |    |		Load	0x2,-0x5
00ea 4800       |H   |		Short_Literal	0x0
00eb e5ff       |    |		Load	0x2,-0x1
00ec e001       |    |		Load	0x0,0x1
00ed 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
00ee 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00ef e001       |    |		Load	0x0,0x1
00f0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
00f1 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
00f2 c402       |    |		Store	0x2,0x2
00f3 c404       |    |		Store	0x2,0x4
00f4 c403       |    |		Store	0x2,0x3
00f5 e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0xf = 0xf5,0x3
00f6 681d       |h   |		Jump_Zero	0x114
00f7 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x10 = 0xf7,0x4
00f8 a5fa       |    |		Store_Unchecked	0x2,-0x6
00f9 4802       |H   |		Short_Literal	0x2							; Debug Table 0x4.0x11 = 0xf9,0x5
00fa 0092 0400  |    |		Action	Push_String_Extended,0x400					; "Can't open "
00fc 00db       |    |		Load_Top	At_Offset_3
00fd 01cc       |    |		Execute	Vector,Catenate
00fe 0092 0401  |    |		Action	Push_String_Extended,0x401					; " ("
0100 01cc       |    |		Execute	Vector,Catenate
0101 e403       |    |		Load	0x2,0x3
0102 e001       |    |		Load	0x0,0x1
0103 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0104 025e       | ^  |		Execute	Discrete,Convert
0105 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0106 01cc       |    |		Execute	Vector,Catenate
0107 0092 0402  |    |		Action	Push_String_Extended,0x402					; ")"
0109 01cc       |    |		Execute	Vector,Catenate
010a e40b       |    |		Load	0x2,0xb
010b e004       |    |		Load	0x0,0x4
010c 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
010d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
010e e40b       |    |		Load	0x2,0xb								; Debug Table 0x4.0x12 = 0x10e,0x6
010f e004       |    |		Load	0x0,0x4
0110 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0111 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0112 c5f9       |    |		Store	0x2,-0x7
0113 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0x4.0x13 = 0x113,0x7
0114 e004       |    |		Load	0x0,0x4								; Debug Table 0x4.0x14 = 0x114,0x8
0115 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0116 4800       |H   |		Short_Literal	0x0
0117 4802       |H   |		Short_Literal	0x2
0118 e402       |    |		Load	0x2,0x2
0119 e40b       |    |		Load	0x2,0xb
011a e004       |    |		Load	0x0,0x4
011b 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
011c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
011d c40a       |    |		Store	0x2,0xa
011e e40b       |    |		Load	0x2,0xb								; Debug Table 0x4.0x15 = 0x11e,0x9
011f e004       |    |		Load	0x0,0x4
0120 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0121 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0122 7008       |p   |		Jump_Nonzero	0x12b
0123 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x16 = 0x123,0xa
0124 a5fa       |    |		Store_Unchecked	0x2,-0x6
0125 e40b       |    |		Load	0x2,0xb								; Debug Table 0x4.0x17 = 0x125,0xb
0126 e004       |    |		Load	0x0,0x4
0127 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0128 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0129 c5f9       |    |		Store	0x2,-0x7
012a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0x4.0x18 = 0x12a,0xc
012b e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x19 = 0x12b,0xd
012c e40b       |    |		Load	0x2,0xb
012d e00b       |    |		Load	0x0,0xb
012e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
012f e40a       |    |		Load	0x2,0xa
0130 e004       |    |		Load	0x0,0x4
0131 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
0132 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0133 a409       |    |		Store_Unchecked	0x2,0x9
0134 e409       |    |		Load	0x2,0x9								; Debug Table 0x4.0x1a = 0x134,0xe
0135 e004       |    |		Load	0x0,0x4
0136 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0137 021f       |    |		Execute	Heap_Access,Equal
0138 6814       |h   |		Jump_Zero	0x14d
0139 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x1b = 0x139,0xf
013a a5fa       |    |		Store_Unchecked	0x2,-0x6
013b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x4.0x1c = 0x13b,0x10
013c 0092 0403  |    |		Action	Push_String_Extended,0x403					; "Can't get a program_library.unit for "
013e e5ff       |    |		Load	0x2,-0x1
013f e001       |    |		Load	0x0,0x1
0140 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0141 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0142 01cc       |    |		Execute	Vector,Catenate
0143 e40b       |    |		Load	0x2,0xb
0144 e004       |    |		Load	0x0,0x4
0145 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0146 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0147 e40b       |    |		Load	0x2,0xb								; Debug Table 0x4.0x1d = 0x147,0x11
0148 e004       |    |		Load	0x0,0x4
0149 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
014a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
014b c5f9       |    |		Store	0x2,-0x7
014c 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0x4.0x1e = 0x14c,0x12
014d 840f       |    |		Call	0x2,0xf								; Debug Table 0x4.0x1f = 0x14d,0x13
014e e40b       |    |		Load	0x2,0xb								; Debug Table 0x4.0x20 = 0x14e,0x14
014f e004       |    |		Load	0x0,0x4
0150 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0151 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0152 7008       |p   |		Jump_Nonzero	0x15b
0153 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x21 = 0x153,0x15
0154 a5fa       |    |		Store_Unchecked	0x2,-0x6
0155 e40b       |    |		Load	0x2,0xb								; Debug Table 0x4.0x22 = 0x155,0x16
0156 e004       |    |		Load	0x0,0x4
0157 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0158 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0159 c5f9       |    |		Store	0x2,-0x7
015a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0x4.0x23 = 0x15a,0x17
015b e20d       |    |		Load	0x1,0xd								; Debug Table 0x4.0x24 = 0x15b,0x18
015c 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
015d 00db       |    |		Load_Top	At_Offset_3
015e e5fd       |    |		Load	0x2,-0x3
015f e20d       |    |		Load	0x1,0xd
0160 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0161 c406       |    |		Store	0x2,0x6
0162 00cf       |    |		Action	Mark_Auxiliary
0163 7810       |x   |		Jump	0x174
0164 e406       |    |		Load	0x2,0x6								; Debug Table 0x4.0x25 = 0x164,0x1a
0165 e20d       |    |		Load	0x1,0xd
0166 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0167 e405       |    |		Load	0x2,0x5
0168 016d       | m  |		Execute	Variant_Record,Structure_Write
0169 e408       |    |		Load	0x2,0x8								; Debug Table 0x4.0x26 = 0x169,0x1b
016a e405       |    |		Load	0x2,0x5
016b e40a       |    |		Load	0x2,0xa
016c e004       |    |		Load	0x0,0x4
016d 1856       | V  |		Execute	Package,Field_Execute,Field_Number 0x56
016e a408       |    |		Store_Unchecked	0x2,0x8
016f e406       |    |		Load	0x2,0x6								; Debug Table 0x4.0x27 = 0x16f,0x1c
0170 e20d       |    |		Load	0x1,0xd
0171 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0172 c406       |    |		Store	0x2,0x6
0173 00c9       |    |		Action	Pop_Auxiliary_Loop
0174 e406       |    |		Load	0x2,0x6								; Debug Table 0x4.0x28 = 0x174,0x19
0175 e20d       |    |		Load	0x1,0xd
0176 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0177 6fec       |o   |		Jump_Zero	0x164
0178 00ce       |    |		Action	Pop_Auxiliary
0179 e408       |    |		Load	0x2,0x8								; Debug Table 0x4.0x29 = 0x179,0x1d
017a e409       |    |		Load	0x2,0x9
017b 0217       |    |		Execute	Heap_Access,All_Reference
017c 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
017d 4804       |H   |		Short_Literal	0x4							; Debug Table 0x4.0x2a = 0x17d,0x1e
017e e409       |    |		Load	0x2,0x9
017f 0217       |    |		Execute	Heap_Access,All_Reference
0180 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0181 e40b       |    |		Load	0x2,0xb								; Debug Table 0x4.0x2b = 0x181,0x1f
0182 e004       |    |		Load	0x0,0x4
0183 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
0184 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0185 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x2c = 0x185,0x20
0186 a5fa       |    |		Store_Unchecked	0x2,-0x6
0187 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0188			TRAP_0098:
0188 0007       |    |		Action	Break_Optional
0189 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x2d = 0x189,0x21
018a a5fa       |    |		Store_Unchecked	0x2,-0x6
018b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x4.0x2e = 0x18b,0x22
018c 0092 0404  |    |		Action	Push_String_Extended,0x404					; "Unhandled exception in restore_load_proc: "
018e e00c       |    |		Load	0x0,0xc
018f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0190 01cc       |    |		Execute	Vector,Catenate
0191 e40b       |    |		Load	0x2,0xb
0192 e004       |    |		Load	0x0,0x4
0193 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0194 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0195 e40b       |    |		Load	0x2,0xb								; Debug Table 0x4.0x2f = 0x195,0x23
0196 e004       |    |		Load	0x0,0x4
0197 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0198 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0199 c5f9       |    |		Store	0x2,-0x7
019a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
019b 0000 0000  |    |		.BLANK	0000[0x5]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 6128       |a(  |		Indirect_Literal	Discrete,0x2cc,{0x00000000, 0x5723d501}		; Debug Table 0x5 = .DEBUG	0x01a3,0x05d2,0x2801,0x0002,0x0057,0x23b5,0x0000,0x1151
													; Debug Table 0x5.0x0 = 0x1a3,0x1
01a4 0257       | W  |		Execute	Discrete,Raise
01a5 0000 0000  |    |		.XXX[0x3]
01a7 0000       |    |
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b1       |    |		.CONST	0x01b1								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0003       |    |		.CONST	0x0003								; Number of locals
01ab			INIT_01a8:
01ab 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x6 = .DEBUG	0x01ab,0x05d6,0x0002,0x0000,0x0057,0x2785,0x0000,0x001f
													; Debug Table 0x6.0x0 = 0x1ab,0xffff
01ac 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01ad 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1 = 0x1ad,0xfffe
01ae 01dd       |    |		Execute	Vector,First
01af 00e2       |    |		Load_Encached	Integer_Cache
01b0 03f1       |    |		Declare_Variable	Discrete,With_Value
01b1			BODY_01a8:
01b1 00cf       |    |		Action	Mark_Auxiliary
01b2 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x2 = 0x1b2,0x1
01b3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x3 = 0x1b3,0x2
01b4 00da       |    |		Load_Top	At_Offset_2
01b5 e5ff       |    |		Load	0x2,-0x1
01b6 01d7       |    |		Execute	Vector,Field_Read
01b7 0273       | s  |		Execute	Discrete,Plus
01b8 0248       | H  |		Execute	Discrete,Check_In_Integer
01b9 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
01ba 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x4 = 0x1ba,0x3
01bb 0a01       |    |		Execute_Immediate	Plus,0x1
01bc 0248       | H  |		Execute	Discrete,Check_In_Integer
01bd 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
01be 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x5 = 0x1be,0x4
01bf e5ff       |    |		Load	0x2,-0x1
01c0 01dc       |    |		Execute	Vector,Last
01c1 027d       | }  |		Execute	Discrete,Greater
01c2 7006       |p   |		Jump_Nonzero	0x1c9
01c3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x6 = 0x1c3,0x5
01c4 0908       |    |		Execute_Immediate	Binary_Scale,0x8
01c5 0248       | H  |		Execute	Discrete,Check_In_Integer
01c6 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
01c7 00c9       |    |		Action	Pop_Auxiliary_Loop
01c8 7fea       |    |		Jump	0x1b3
01c9 00ce       |    |		Action	Pop_Auxiliary
01ca 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x7 = 0x1ca,0x6
01cb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01cc 0000 0000  |    |		.BLANK	0000[0x4]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01db       |    |		.CONST	0x01db								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0003       |    |		.CONST	0x0003								; Number of locals
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x01d3,0x05e8,0x0002,0x0000,0x0057,0x2785,0x0000,0x0067
													; Debug Table 0x7.0x0 = 0x1d3,0xffff
01d4 00e2       |    |		Load_Encached	Integer_Cache
01d5 03f1       |    |		Declare_Variable	Discrete,With_Value
01d6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x1 = 0x1d6,0xfffe
01d7 e5fe       |    |		Load	0x2,-0x2
01d8 e003       |    |		Load	0x0,0x3
01d9 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01da 0334       | 4  |		Declare_Variable	Array,With_Constraint
01db			BODY_01d0:
01db 00cf       |    |		Action	Mark_Auxiliary
01dc 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x2 = 0x1dc,0x1
01dd 01da       |    |		Execute	Vector,Bounds
01de 0264       | d  |		Execute	Discrete,Below_Bound
01df 700e       |p   |		Jump_Nonzero	0x1ee
01e0 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x3 = 0x1e0,0x2
01e1 48ff       |H   |		Short_Literal	0xff
01e2 0279       | y  |		Execute	Discrete,And
01e3 e003       |    |		Load	0x0,0x3
01e4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01e5 025b       | [  |		Execute	Discrete,Check_In_Type
01e6 00d9       |    |		Load_Top	At_Offset_1
01e7 e403       |    |		Load	0x2,0x3
01e8 01d6       |    |		Execute	Vector,Field_Write
01e9 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x4 = 0x1e9,0x3
01ea 09f8       |    |		Execute_Immediate	Binary_Scale,-0x8
01eb a402       |    |		Store_Unchecked	0x2,0x2
01ec 00c8       |    |		Action	Pop_Auxiliary_Range
01ed 37f2       |7   |		Loop_Decreasing	0x1e0
01ee 00ce       |    |		Action	Pop_Auxiliary
01ef 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x5 = 0x1ef,0x4
01f0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01f1 0000 0000  |    |		.BLANK	0000[0x7]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x8 = .DEBUG	0x01fb,0x05f6,0x0001,0x0000,0x0057,0x2785,0x0000,0x00b3
													; Debug Table 0x8.0x0 = 0x1fb,0x1
01fc 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01fd 00eb       |    |		Load_Encached	Diana_Cache
01fe 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01ff e5fe       |    |		Load	0x2,-0x2
0200 00eb       |    |		Load_Encached	Diana_Cache
0201 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0202 e5ff       |    |		Load	0x2,-0x1
0203 00eb       |    |		Load_Encached	Diana_Cache
0204 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0205 4802       |H   |		Short_Literal	0x2
0206 e5fd       |    |		Load	0x2,-0x3
0207 e00a       |    |		Load	0x0,0xa
0208 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0209 c5fd       |    |		Store	0x2,-0x3
020a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
020b 0000 0000  |    |		.BLANK	0000[0x5]
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 4802       |H   |		Short_Literal	0x2							; Debug Table 0x9 = .DEBUG	0x0213,0x05fa,0x0002,0x0000,0x0057,0x2785,0x0000,0x0369
													; Debug Table 0x9.0x0 = 0x213,0x1
0214 4801       |H   |		Short_Literal	0x1
0215 8214       |    |		Call	0x1,0x14
0216 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0217 0000       |    |		.XXX[0x1]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 022a       | *  |		.CONST	0x022a								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0005       |    |		.CONST	0x0005								; Number of locals
021b			INIT_0218:
021b e004       |    |		Load	0x0,0x4								; Debug Table 0xa = .DEBUG	0x021b,0x05fe,0x0801,0x0002,0x0057,0x2785,0x0000,0x0127
													; Debug Table 0xa.0x0 = 0x21b,0xffff
021c 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
021d 00db       |    |		Load_Top	At_Offset_3
021e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
021f e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x1 = 0x21f,0xfffe
0220 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0221 02ff       |    |		Declare_Variable	Variant_Record
0222 00d8       |    |		Load_Top	At_Offset_0
0223 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0224 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x2 = 0x224,0xfffd
0225 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0226 02ff       |    |		Declare_Variable	Variant_Record
0227 00d8       |    |		Load_Top	At_Offset_0
0228 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0229 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xa.0x3 = 0x229,0xfffc
022a			BODY_0218:
022a 00cf       |    |		Action	Mark_Auxiliary
022b 7829       |x)  |		Jump	0x255
022c e602       |    |		Load	0x3,0x2								; Debug Table 0xa.0x4 = 0x22c,0x2
022d e004       |    |		Load	0x0,0x4
022e 1854       | T  |		Execute	Package,Field_Execute,Field_Number 0x54
022f 00db       |    |		Load_Top	At_Offset_3
0230 016d       | m  |		Execute	Variant_Record,Structure_Write
0231 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x5 = 0x231,0x3
0232 e001       |    |		Load	0x0,0x1
0233 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0234 701b       |p   |		Jump_Nonzero	0x250
0235 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xa.0x6 = 0x235,0x4
0236 e603       |    |		Load	0x3,0x3
0237 e604       |    |		Load	0x3,0x4
0238 e5fc       |    |		Load	0x2,-0x4
0239 e20d       |    |		Load	0x1,0xd
023a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
023b 00d1       |    |		Pop_Control	Pop_Count_1
023c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
023d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x7 = 0x23d,0x5
023e 700d       |p   |		Jump_Nonzero	0x24c
023f 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x8 = 0x23f,0x6
0240 a5f6       |    |		Store_Unchecked	0x2,-0xa
0241 e5f5       |    |		Load	0x2,-0xb							; Debug Table 0xa.0x9 = 0x241,0x7
0242 e5f8       |    |		Load	0x2,-0x8
0243 0092 0405  |    |		Action	Push_String_Extended,0x405					; "Can't find corresponding code segment for "
0245 e604       |    |		Load	0x3,0x4
0246 e00d       |    |		Load	0x0,0xd
0247 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0248 01cc       |    |		Execute	Vector,Catenate
0249 8215       |    |		Call	0x1,0x15
024a c5f5       |    |		Store	0x2,-0xb
024b 7804       |x   |		Jump	0x250
024c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0xa = 0x24c,0x8
024d e602       |    |		Load	0x3,0x2
024e 0217       |    |		Execute	Heap_Access,All_Reference
024f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0250 e602       |    |		Load	0x3,0x2								; Debug Table 0xa.0xb = 0x250,0x9
0251 e004       |    |		Load	0x0,0x4
0252 1855       | U  |		Execute	Package,Field_Execute,Field_Number 0x55
0253 a602       |    |		Store_Unchecked	0x3,0x2
0254 00c9       |    |		Action	Pop_Auxiliary_Loop
0255 e602       |    |		Load	0x3,0x2								; Debug Table 0xa.0xc = 0x255,0x1
0256 e004       |    |		Load	0x0,0x4
0257 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
0258 021f       |    |		Execute	Heap_Access,Equal
0259 6fd2       |o   |		Jump_Zero	0x22c
025a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
025b 0000 0000  |    |		.BLANK	0000[0x5]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 026b       | k  |		.CONST	0x026b								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0003       |    |		.CONST	0x0003								; Number of locals
0263			INIT_0260:
0263 e001       |    |		Load	0x0,0x1								; Debug Table 0xb = .DEBUG	0x0263,0x061a,0x0801,0x0002,0x0057,0x2785,0x0000,0x0197
													; Debug Table 0xb.0x0 = 0x263,0xffff
0264 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0265 02c7       |    |		Declare_Variable	Any
0266 00d8       |    |		Load_Top	At_Offset_0
0267 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0268 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x1 = 0x268,0xfffe
0269 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
026a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
026b			BODY_0260:
026b e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x2 = 0x26b,0x1
026c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
026d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
026e 00da       |    |		Load_Top	At_Offset_2
026f 0120       |    |		Execute	Any,Is_Value
0270 6803       |h   |		Jump_Zero	0x274
0271 e001       |    |		Load	0x0,0x1
0272 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0273 7801       |x   |		Jump	0x275
0274 00da       |    |		Load_Top	At_Offset_2
0275 605a       |`Z  |		Indirect_Literal	Discrete,0x2d0,{0x00000000, 0x00004000}
0276 e00e       |    |		Load	0x0,0xe
0277 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0278 e008       |    |		Load	0x0,0x8
0279 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
027a e001       |    |		Load	0x0,0x1
027b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
027c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
027d e7fe       |    |		Load	0x3,-0x2
027e 0092 0406  |    |		Action	Push_String_Extended,0x406					; "$$"
0280 01cc       |    |		Execute	Vector,Catenate
0281 e001       |    |		Load	0x0,0x1
0282 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0283 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0284 c602       |    |		Store	0x3,0x2
0285 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0286 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x3 = 0x286,0x2
0287 6806       |h   |		Jump_Zero	0x28e
0288 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x4 = 0x288,0x3
0289 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
028a e7ff       |    |		Load	0x3,-0x1
028b 0217       |    |		Execute	Heap_Access,All_Reference
028c 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
028d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
028e 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x5 = 0x28e,0x4
028f 00da       |    |		Load_Top	At_Offset_2
0290 e5fd       |    |		Load	0x2,-0x3
0291 e004       |    |		Load	0x0,0x4
0292 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
0293 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0294 e7ff       |    |		Load	0x3,-0x1
0295 0217       |    |		Execute	Heap_Access,All_Reference
0296 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0297 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a4       |    |		.CONST	0x02a4								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0003       |    |		.CONST	0x0003								; Number of locals
029b			INIT_0298:
029b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x029b,0x0628,0x0801,0x0002,0x0057,0x2785,0x0000,0x01ec
													; Debug Table 0xc.0x0 = 0x29b,0xffff
029c 0217       |    |		Execute	Heap_Access,All_Reference
029d 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
029e 0217       |    |		Execute	Heap_Access,All_Reference
029f 0335       | 5  |		Declare_Variable	Array,Duplicate
02a0 00d0       |    |		Action	Swap_Control
02a1 00d1       |    |		Pop_Control	Pop_Count_1
02a2 029f 038b  |    |		Declare_Subprogram	INIT_0388,For_Call
02a4			BODY_0298:
02a4 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0xc.0x1 = 0x2a4,0x1
02a5 6802       |h   |		Jump_Zero	0x2a8
02a6 8603       |    |		Call	0x3,0x3								; Debug Table 0xc.0x2 = 0x2a6,0x2
02a7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02a8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x3 = 0x2a8,0x3
02a9 e7ff       |    |		Load	0x3,-0x1
02aa 8403       |    |		Call	0x2,0x3
02ab 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ac 0000 0000  |    |		.BLANK	0000[0x4]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3       |    |		.CONST	0x02b3								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0001       |    |		.CONST	0x0001								; Number of locals
02b3			BODY_02b0:
02b3			INIT_02b0:
02b3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x02b3,0x0632,0x0801,0x0002,0x0057,0x2785,0x0000,0x024b
													; Debug Table 0xd.0x0 = 0x2b3,0x1
02b4 0217       |    |		Execute	Heap_Access,All_Reference
02b5 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
02b6 6803       |h   |		Jump_Zero	0x2ba
02b7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x1 = 0x2b7,0x2
02b8 8404       |    |		Call	0x2,0x4
02b9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ba 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x2 = 0x2ba,0x3
02bb e004       |    |		Load	0x0,0x4
02bc 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
02bd 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
02be 8402       |    |		Call	0x2,0x2
02bf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x3 = 0x2bf,0x4
02c0 e004       |    |		Load	0x0,0x4
02c1 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
02c2 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
02c3 8402       |    |		Call	0x2,0x2
02c4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x4 = 0x2c4,0x5
02c5 e004       |    |		Load	0x0,0x4
02c6 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
02c7 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
02c8 8402       |    |		Call	0x2,0x2
02c9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ca 0000 0000  |    |		.XXX[0x2]
02cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x5723d501}
02d0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
02d4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00572785}
02d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000108b}
02dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001074}
02e0 0000 0000  |    |		.LITERAL	{0x00000000, 0x005723b5}
02e4 0000 0000  |    |		.BLANK	0000[0x4]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f3       |    |		.CONST	0x02f3								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0005       |    |		.CONST	0x0005								; Number of locals
02eb			INIT_02e8:
02eb e00f       |    |		Load	0x0,0xf								; Debug Table 0xe = .DEBUG	0x02eb,0x063e,0x0804,0x0002,0x0057,0x2785,0x0000,0x033c
													; Debug Table 0xe.0x0 = 0x2eb,0xffff
02ec 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02ed e004       |    |		Load	0x0,0x4								; Debug Table 0xe.0x1 = 0x2ed,0xfffe
02ee 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
02ef 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02f0 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xe.0x2 = 0x2f0,0xfffd
02f1 029f 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Call
02f3			BODY_02e8:
02f3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xe.0x3 = 0x2f3,0x1
02f4 e004       |    |		Load	0x0,0x4
02f5 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
02f6 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02f7 e5fa       |    |		Load	0x2,-0x6
02f8 e5fd       |    |		Load	0x2,-0x3
02f9 e004       |    |		Load	0x0,0x4
02fa 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
02fb 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
02fc c603       |    |		Store	0x3,0x3
02fd 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02fe 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x4 = 0x2fe,0x2
02ff 700a       |p   |		Jump_Nonzero	0x30a
0300 e5f5       |    |		Load	0x2,-0xb							; Debug Table 0xe.0x5 = 0x300,0x3
0301 e5f8       |    |		Load	0x2,-0x8
0302 0092 0407  |    |		Action	Push_String_Extended,0x407					; "Can't find the object of the code view being restored"
0304 8215       |    |		Call	0x1,0x15
0305 c5f5       |    |		Store	0x2,-0xb
0306 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x6 = 0x306,0x4
0307 a5f6       |    |		Store_Unchecked	0x2,-0xa
0308 00cc       |    |		Action	Pop_Block							; Debug Table 0xe.0x7 = 0x308,0x5
0309 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
030a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x8 = 0x30a,0x6
030b 0217       |    |		Execute	Heap_Access,All_Reference
030c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
030d e5fa       |    |		Load	0x2,-0x6
030e 0217       |    |		Execute	Heap_Access,All_Reference
030f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0310 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0xe.0x9 = 0x310,0x7
0311 0217       |    |		Execute	Heap_Access,All_Reference
0312 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0313 e5fd       |    |		Load	0x2,-0x3
0314 e004       |    |		Load	0x0,0x4
0315 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
0316 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0317 a602       |    |		Store_Unchecked	0x3,0x2
0318 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0xa = 0x318,0x8
0319 e5fa       |    |		Load	0x2,-0x6
031a 0217       |    |		Execute	Heap_Access,All_Reference
031b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
031c 027e       | ~  |		Execute	Discrete,Not_Equal
031d 6821       |h!  |		Jump_Zero	0x33f
031e e5f5       |    |		Load	0x2,-0xb							; Debug Table 0xe.0xb = 0x31e,0x9
031f e5f8       |    |		Load	0x2,-0x8
0320 0092 0408  |    |		Action	Push_String_Extended,0x408					; "Subsystem id"
0322 e602       |    |		Load	0x3,0x2
0323 00e0       |    |		Load_Encached	Standard_Cache
0324 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0325 01cc       |    |		Execute	Vector,Catenate
0326 0092 0409  |    |		Action	Push_String_Extended,0x409					; " of "
0328 01cc       |    |		Execute	Vector,Catenate
0329 e5fa       |    |		Load	0x2,-0x6
032a 0217       |    |		Execute	Heap_Access,All_Reference
032b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
032c e001       |    |		Load	0x0,0x1
032d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
032e 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
032f 01cc       |    |		Execute	Vector,Catenate
0330 0092 040a  |    |		Action	Push_String_Extended,0x40a					; " does not match the id of the view being restored -"
0332 01cc       |    |		Execute	Vector,Catenate
0333 e5fa       |    |		Load	0x2,-0x6
0334 0217       |    |		Execute	Heap_Access,All_Reference
0335 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0336 00e0       |    |		Load_Encached	Standard_Cache
0337 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0338 01cc       |    |		Execute	Vector,Catenate
0339 8215       |    |		Call	0x1,0x15
033a c5f5       |    |		Store	0x2,-0xb
033b 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0xc = 0x33b,0xa
033c a5f6       |    |		Store_Unchecked	0x2,-0xa
033d 00cc       |    |		Action	Pop_Block							; Debug Table 0xe.0xd = 0x33d,0xb
033e 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
033f 8605       |    |		Call	0x3,0x5								; Debug Table 0xe.0xe = 0x33f,0xc
0340 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0341 0000 0000  |    |		.BLANK	0000[0x7]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034f       | O  |		.CONST	0x034f								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0003       |    |		.CONST	0x0003								; Number of locals
034b			INIT_0348:
034b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xf = .DEBUG	0x034b,0x065e,0x0804,0x0002,0x0057,0x2785,0x0000,0x03e7
													; Debug Table 0xf.0x0 = 0x34b,0xffff
034c 8216       |    |		Call	0x1,0x16
034d 029f 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Call
034f			BODY_0348:
034f 8603       |    |		Call	0x3,0x3								; Debug Table 0xf.0x1 = 0x34f,0x1
0350 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0351 0000 0000  |    |		.BLANK	0000[0x7]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035b       | [  |		.CONST	0x035b								; Address of begin
0359 037b       | {  |		.CONST	0x037b								; Address of exception handler
035a 0001       |    |		.CONST	0x0001								; Number of locals
035b			BODY_0358:
035b			INIT_0358:
035b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x10 = .DEBUG	0x035b,0x0664,0x0004,0x0000,0x0057,0x2785,0x0000,0x0576
													; Debug Table 0x10.0x0 = 0x35b,0x1
035c 01dd       |    |		Execute	Vector,First
035d 0a04       |    |		Execute_Immediate	Plus,0x4
035e e40c       |    |		Load	0x2,0xc
035f 0273       | s  |		Execute	Discrete,Plus
0360 0248       | H  |		Execute	Discrete,Check_In_Integer
0361 e5fe       |    |		Load	0x2,-0x2
0362 01dc       |    |		Execute	Vector,Last
0363 e5fe       |    |		Load	0x2,-0x2
0364 01cf       |    |		Execute	Vector,Slice_Read
0365 e409       |    |		Load	0x2,0x9
0366 e40a       |    |		Load	0x2,0xa
0367 e5fc       |    |		Load	0x2,-0x4
0368 e5fd       |    |		Load	0x2,-0x3
0369 e40b       |    |		Load	0x2,0xb
036a e40a       |    |		Load	0x2,0xa
036b 0217       |    |		Execute	Heap_Access,All_Reference
036c 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
036d 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
036e e005       |    |		Load	0x0,0x5
036f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0370 e006       |    |		Load	0x0,0x6
0371 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0372 00d8       |    |		Load_Top	At_Offset_0
0373 e006       |    |		Load	0x0,0x6
0374 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0375 7003       |p   |		Jump_Nonzero	0x379
0376 e003       |    |		Load	0x0,0x3
0377 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0378 0257       | W  |		Execute	Discrete,Raise
0379 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
037a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
037b			TRAP_0358:
037b e003       |    |		Load	0x0,0x3
037c 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
037d 010f       |    |		Execute	Exception,Equal
037e 7004       |p   |		Jump_Nonzero	0x383
037f e005       |    |		Load	0x0,0x5
0380 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0381 010f       |    |		Execute	Exception,Equal
0382 6804       |h   |		Jump_Zero	0x387
0383 e40a       |    |		Load	0x2,0xa								; Debug Table 0x10.0x1 = 0x383,0x2
0384 e40b       |    |		Load	0x2,0xb
0385 8010       |    |		Call	0x0,0x10
0386 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0387 0100       |    |		Execute	Exception,Raise
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038d       |    |		.CONST	0x038d								; Address of begin
0389 0004       |    |		.CONST	0x0004								; Address of exception handler
038a 0002       |    |		.CONST	0x0002								; Number of locals
038b			INIT_0388:
038b e602       |    |		Load	0x3,0x2								; Debug Table 0x11 = .DEBUG	0x038b,0x066a,0x0804,0x0002,0x0057,0x2785,0x0000,0x023c
													; Debug Table 0x11.0x0 = 0x38b,0xffff
038c 85fe       |    |		Call	0x2,-0x2
038d			BODY_0388:
038d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x1 = 0x38d,0x1
038e e602       |    |		Load	0x3,0x2
038f 01de       |    |		Execute	Vector,Not_Equal
0390 6822       |h"  |		Jump_Zero	0x3b3
0391 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x11.0x2 = 0x391,0x2
0392 0219       |    |		Execute	Heap_Access,All_Read
0393 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0394 00d8       |    |		Load_Top	At_Offset_0
0395 e602       |    |		Load	0x3,0x2
0396 e5fa       |    |		Load	0x2,-0x6
0397 8011       |    |		Call	0x0,0x11
0398 00d2       |    |		Pop_Control	Pop_Count_2
0399 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x11.0x3 = 0x399,0x3
039a 0219       |    |		Execute	Heap_Access,All_Read
039b 00d8       |    |		Load_Top	At_Offset_0
039c 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
039d e5fa       |    |		Load	0x2,-0x6
039e 8012       |    |		Call	0x0,0x12
039f 00d9       |    |		Load_Top	At_Offset_1
03a0 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
03a1 00d1       |    |		Pop_Control	Pop_Count_1
03a2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x4 = 0x3a2,0x4
03a3 e5fa       |    |		Load	0x2,-0x6
03a4 8013       |    |		Call	0x0,0x13
03a5 e7ff       |    |		Load	0x3,-0x1
03a6 0217       |    |		Execute	Heap_Access,All_Reference
03a7 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
03a8 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x11.0x5 = 0x3a8,0x5
03a9 0219       |    |		Execute	Heap_Access,All_Read
03aa 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
03ab 00d8       |    |		Load_Top	At_Offset_0
03ac e5fd       |    |		Load	0x2,-0x3
03ad e7ff       |    |		Load	0x3,-0x1
03ae e7ff       |    |		Load	0x3,-0x1
03af 0217       |    |		Execute	Heap_Access,All_Reference
03b0 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
03b1 8014       |    |		Call	0x0,0x14
03b2 00d2       |    |		Pop_Control	Pop_Count_2
03b3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x6 = 0x3b3,0x6
03b4 e7ff       |    |		Load	0x3,-0x1
03b5 8403       |    |		Call	0x2,0x3
03b6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b7 0000       |    |		.XXX[0x1]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03c5       |    |		.CONST	0x03c5								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0002       |    |		.CONST	0x0002								; Number of locals
03bb			INIT_03b8:
03bb e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x12 = .DEBUG	0x03bb,0x067a,0x0804,0x0002,0x0057,0x2785,0x0000,0x0339
													; Debug Table 0x12.0x0 = 0x3bb,0xffff
03bc 0217       |    |		Execute	Heap_Access,All_Reference
03bd 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03be e5fd       |    |		Load	0x2,-0x3
03bf e004       |    |		Load	0x0,0x4
03c0 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
03c1 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
03c2 e001       |    |		Load	0x0,0x1
03c3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03c4 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
03c5			BODY_03b8:
03c5 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x12.0x1 = 0x3c5,0x1
03c6 0217       |    |		Execute	Heap_Access,All_Reference
03c7 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
03c8 0217       |    |		Execute	Heap_Access,All_Reference
03c9 00d9       |    |		Load_Top	At_Offset_1
03ca 01de       |    |		Execute	Vector,Not_Equal
03cb 680f       |h   |		Jump_Zero	0x3db
03cc e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x12.0x2 = 0x3cc,0x2
03cd 0219       |    |		Execute	Heap_Access,All_Read
03ce 00d8       |    |		Load_Top	At_Offset_0
03cf 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
03d0 e5fa       |    |		Load	0x2,-0x6
03d1 8012       |    |		Call	0x0,0x12
03d2 00d9       |    |		Load_Top	At_Offset_1
03d3 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
03d4 00d1       |    |		Pop_Control	Pop_Count_1
03d5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x3 = 0x3d5,0x3
03d6 e5fa       |    |		Load	0x2,-0x6
03d7 8013       |    |		Call	0x0,0x13
03d8 e5fa       |    |		Load	0x2,-0x6
03d9 0217       |    |		Execute	Heap_Access,All_Reference
03da 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
03db 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03dc 0000 0000  |    |		.BLANK	0000[0x4]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03f6       |    |		.CONST	0x03f6								; Address of begin
03e1 0004       |    |		.CONST	0x0004								; Address of exception handler
03e2 0002       |    |		.CONST	0x0002								; Number of locals
03e3			INIT_03e0:
03e3 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x13 = .DEBUG	0x03e3,0x0684,0x0804,0x0002,0x0057,0x2785,0x0000,0x03e4
													; Debug Table 0x13.0x0 = 0x3e3,0xffff
03e4 e5fc       |    |		Load	0x2,-0x4
03e5 e5fd       |    |		Load	0x2,-0x3
03e6 e5fc       |    |		Load	0x2,-0x4
03e7 0217       |    |		Execute	Heap_Access,All_Reference
03e8 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03e9 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
03ea e005       |    |		Load	0x0,0x5
03eb 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03ec e006       |    |		Load	0x0,0x6
03ed 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
03ee 00d8       |    |		Load_Top	At_Offset_0
03ef e006       |    |		Load	0x0,0x6
03f0 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
03f1 7003       |p   |		Jump_Nonzero	0x3f5
03f2 e003       |    |		Load	0x0,0x3
03f3 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
03f4 0257       | W  |		Execute	Discrete,Raise
03f5 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
03f6			BODY_03e0:
03f6 4804       |H   |		Short_Literal	0x4							; Debug Table 0x13.0x1 = 0x3f6,0x1
03f7 e602       |    |		Load	0x3,0x2
03f8 01db       |    |		Execute	Vector,Length
03f9 8214       |    |		Call	0x1,0x14
03fa e602       |    |		Load	0x3,0x2
03fb 01cc       |    |		Execute	Vector,Catenate
03fc 00d9       |    |		Load_Top	At_Offset_1
03fd 01cc       |    |		Execute	Vector,Catenate
03fe 85fe       |    |		Call	0x2,-0x2
03ff 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0400 ; --------------------------------------------------------------------------------------
0400 ; STRING TABLE
0400 ; --------------------------------------------------------------------------------------
0400 0018       |    |		.STRTAB	0x0018->0x040c							; "Can't open "
0401 0021       | !  |		.STRTAB	0x0021->0x0411							; " ("
0402 0021       | !  |		.STRTAB	0x0021->0x0412							; ")"
0403 0020       |    |		.STRTAB	0x0020->0x0413							; "Can't get a program_library.unit for "
0404 0043       | C  |		.STRTAB	0x0043->0x0425							; "Unhandled exception in restore_load_proc: "
0405 006b       | k  |		.STRTAB	0x006b->0x043a							; "Can't find corresponding code segment for "
0406 0093       |    |		.STRTAB	0x0093->0x044f							; "$$"
0407 0093       |    |		.STRTAB	0x0093->0x0450							; "Can't find the object of the code view being restored"
0408 00c6       |    |		.STRTAB	0x00c6->0x046b							; "Subsystem id"
0409 00d0       |    |		.STRTAB	0x00d0->0x0471							; " of "
040a 00d2       |    |		.STRTAB	0x00d2->0x0473							; " does not match the id of the view being restored -"
040b 0103       |    |		.STREND 0x0103->0x048c
040c 4361 6e27  |Can'|		.STRTAB_STRINGS
048d 0000 0000  |    |		.XXX[0x3]
048f 0000       |    |
0490 ; --------------------------------------------------------------------------------------
0490 ; Debug Table
0490 ; --------------------------------------------------------------------------------------
0490 0003 0014  |    |		.CONST	0x0003,0x0014
0492 000b 0532  |   2|		.DEBUG	0x000b,0x0532,0x0000,0x0000,0x0057,0x23b5,0x0000,0x1073
049a 002f 0540  | / @|		.DEBUG	0x002f,0x0540,0x0000,0x0000,0x0057,0x2785,0x0000,0x0006
04a2 004b 0556  | K V|		.DEBUG	0x004b,0x0556,0x2801,0x0002,0x0057,0x23b5,0x0000,0x10a4
04aa 008b 056a  |   j|		.DEBUG	0x008b,0x056a,0x2801,0x0002,0x0057,0x23b5,0x0000,0x10ed
04b2 009b 0570  |   p|		.DEBUG	0x009b,0x0570,0x0001,0x0000,0x0057,0x23b5,0x0000,0x1122
04ba 01a3 05d2  |    |		.DEBUG	0x01a3,0x05d2,0x2801,0x0002,0x0057,0x23b5,0x0000,0x1151
04c2 01ab 05d6  |    |		.DEBUG	0x01ab,0x05d6,0x0002,0x0000,0x0057,0x2785,0x0000,0x001f
04ca 01d3 05e8  |    |		.DEBUG	0x01d3,0x05e8,0x0002,0x0000,0x0057,0x2785,0x0000,0x0067
04d2 01fb 05f6  |    |		.DEBUG	0x01fb,0x05f6,0x0001,0x0000,0x0057,0x2785,0x0000,0x00b3
04da 0213 05fa  |    |		.DEBUG	0x0213,0x05fa,0x0002,0x0000,0x0057,0x2785,0x0000,0x0369
04e2 021b 05fe  |    |		.DEBUG	0x021b,0x05fe,0x0801,0x0002,0x0057,0x2785,0x0000,0x0127
04ea 0263 061a  | c  |		.DEBUG	0x0263,0x061a,0x0801,0x0002,0x0057,0x2785,0x0000,0x0197
04f2 029b 0628  |   (|		.DEBUG	0x029b,0x0628,0x0801,0x0002,0x0057,0x2785,0x0000,0x01ec
04fa 02b3 0632  |   2|		.DEBUG	0x02b3,0x0632,0x0801,0x0002,0x0057,0x2785,0x0000,0x024b
0502 02eb 063e  |   >|		.DEBUG	0x02eb,0x063e,0x0804,0x0002,0x0057,0x2785,0x0000,0x033c
050a 034b 065e  | K ^|		.DEBUG	0x034b,0x065e,0x0804,0x0002,0x0057,0x2785,0x0000,0x03e7
0512 035b 0664  | [ d|		.DEBUG	0x035b,0x0664,0x0004,0x0000,0x0057,0x2785,0x0000,0x0576
051a 038b 066a  |   j|		.DEBUG	0x038b,0x066a,0x0804,0x0002,0x0057,0x2785,0x0000,0x023c
0522 03bb 067a  |   z|		.DEBUG	0x03bb,0x067a,0x0804,0x0002,0x0057,0x2785,0x0000,0x0339
052a 03e3 0684  |    |		.DEBUG	0x03e3,0x0684,0x0804,0x0002,0x0057,0x2785,0x0000,0x03e4
0532 ; --------------------------------------------------------------------------------------
0532 ; Debug3 Subtable 0x0
0532 ; --------------------------------------------------------------------------------------
0532 0006 0000  |    |		.DBG3TAB	0x0006,0x0000
0534 000b ffff  |    |		.CONST	0x000b,0xffff
0536 0018 fffe  |    |		.CONST	0x0018,0xfffe
0538 0026 fffd  | &  |		.CONST	0x0026,0xfffd
053a 0028 fffc  | (  |		.CONST	0x0028,0xfffc
053c 002a fffb  | *  |		.CONST	0x002a,0xfffb
053e 002c fffa  | ,  |		.CONST	0x002c,0xfffa
0540 ; --------------------------------------------------------------------------------------
0540 ; Debug3 Subtable 0x1
0540 ; --------------------------------------------------------------------------------------
0540 000a 0000  |    |		.DBG3TAB	0x000a,0x0000
0542 002f ffff  | /  |		.CONST	0x002f,0xffff
0544 0030 fffe  | 0  |		.CONST	0x0030,0xfffe
0546 0031 fffd  | 1  |		.CONST	0x0031,0xfffd
0548 0033 fffc  | 3  |		.CONST	0x0033,0xfffc
054a 0035 fffb  | 5  |		.CONST	0x0035,0xfffb
054c 0037 fffa  | 7  |		.CONST	0x0037,0xfffa
054e 0039 fff9  | 9  |		.CONST	0x0039,0xfff9
0550 003b fff8  | ;  |		.CONST	0x003b,0xfff8
0552 003d fff7  | =  |		.CONST	0x003d,0xfff7
0554 003f fff6  | ?  |		.CONST	0x003f,0xfff6
0556 ; --------------------------------------------------------------------------------------
0556 ; Debug3 Subtable 0x2
0556 ; --------------------------------------------------------------------------------------
0556 0005 0004  |    |		.DBG3TAB	0x0005,0x0004
0558 004b ffff  | K  |		.CONST	0x004b,0xffff
055a 004d fffe  | M  |		.CONST	0x004d,0xfffe
055c 004f fffd  | O  |		.CONST	0x004f,0xfffd
055e 0051 fffc  | Q  |		.CONST	0x0051,0xfffc
0560 0053 fffb  | S  |		.CONST	0x0053,0xfffb
0562 005f 0001  | _  |		.CONST	0x005f,0x0001
0564 0060 0002  | `  |		.CONST	0x0060,0x0002
0566 006e 0003  | n  |		.CONST	0x006e,0x0003
0568 0082 0004  |    |		.CONST	0x0082,0x0004
056a ; --------------------------------------------------------------------------------------
056a ; Debug3 Subtable 0x3
056a ; --------------------------------------------------------------------------------------
056a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
056c 008d 0001  |    |		.CONST	0x008d,0x0001
056e 008e 0002  |    |		.CONST	0x008e,0x0002
0570 ; --------------------------------------------------------------------------------------
0570 ; Debug3 Subtable 0x4
0570 ; --------------------------------------------------------------------------------------
0570 000d 0023  |   #|		.DBG3TAB	0x000d,0x0023
0572 009b ffff  |    |		.CONST	0x009b,0xffff
0574 009c fffe  |    |		.CONST	0x009c,0xfffe
0576 009e fffd  |    |		.CONST	0x009e,0xfffd
0578 00a4 fffc  |    |		.CONST	0x00a4,0xfffc
057a 00a9 fffb  |    |		.CONST	0x00a9,0xfffb
057c 00ab fffa  |    |		.CONST	0x00ab,0xfffa
057e 00ad fff9  |    |		.CONST	0x00ad,0xfff9
0580 00af fff8  |    |		.CONST	0x00af,0xfff8
0582 00b1 fff7  |    |		.CONST	0x00b1,0xfff7
0584 00b3 fff6  |    |		.CONST	0x00b3,0xfff6
0586 00b6 fff5  |    |		.CONST	0x00b6,0xfff5
0588 00c1 fff4  |    |		.CONST	0x00c1,0xfff4
058a 00c7 fff3  |    |		.CONST	0x00c7,0xfff3
058c 00cd 0001  |    |		.CONST	0x00cd,0x0001
058e 00d8 0002  |    |		.CONST	0x00d8,0x0002
0590 00f5 0003  |    |		.CONST	0x00f5,0x0003
0592 00f7 0004  |    |		.CONST	0x00f7,0x0004
0594 00f9 0005  |    |		.CONST	0x00f9,0x0005
0596 010e 0006  |    |		.CONST	0x010e,0x0006
0598 0113 0007  |    |		.CONST	0x0113,0x0007
059a 0114 0008  |    |		.CONST	0x0114,0x0008
059c 011e 0009  |    |		.CONST	0x011e,0x0009
059e 0123 000a  | #  |		.CONST	0x0123,0x000a
05a0 0125 000b  | %  |		.CONST	0x0125,0x000b
05a2 012a 000c  | *  |		.CONST	0x012a,0x000c
05a4 012b 000d  | +  |		.CONST	0x012b,0x000d
05a6 0134 000e  | 4  |		.CONST	0x0134,0x000e
05a8 0139 000f  | 9  |		.CONST	0x0139,0x000f
05aa 013b 0010  | ;  |		.CONST	0x013b,0x0010
05ac 0147 0011  | G  |		.CONST	0x0147,0x0011
05ae 014c 0012  | L  |		.CONST	0x014c,0x0012
05b0 014d 0013  | M  |		.CONST	0x014d,0x0013
05b2 014e 0014  | N  |		.CONST	0x014e,0x0014
05b4 0153 0015  | S  |		.CONST	0x0153,0x0015
05b6 0155 0016  | U  |		.CONST	0x0155,0x0016
05b8 015a 0017  | Z  |		.CONST	0x015a,0x0017
05ba 015b 0018  | [  |		.CONST	0x015b,0x0018
05bc 0164 001a  | d  |		.CONST	0x0164,0x001a
05be 0169 001b  | i  |		.CONST	0x0169,0x001b
05c0 016f 001c  | o  |		.CONST	0x016f,0x001c
05c2 0174 0019  | t  |		.CONST	0x0174,0x0019
05c4 0179 001d  | y  |		.CONST	0x0179,0x001d
05c6 017d 001e  | }  |		.CONST	0x017d,0x001e
05c8 0181 001f  |    |		.CONST	0x0181,0x001f
05ca 0185 0020  |    |		.CONST	0x0185,0x0020
05cc 0189 0021  |   !|		.CONST	0x0189,0x0021
05ce 018b 0022  |   "|		.CONST	0x018b,0x0022
05d0 0195 0023  |   #|		.CONST	0x0195,0x0023
05d2 ; --------------------------------------------------------------------------------------
05d2 ; Debug3 Subtable 0x5
05d2 ; --------------------------------------------------------------------------------------
05d2 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
05d4 01a3 0001  |    |		.CONST	0x01a3,0x0001
05d6 ; --------------------------------------------------------------------------------------
05d6 ; Debug3 Subtable 0x6
05d6 ; --------------------------------------------------------------------------------------
05d6 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
05d8 01ab ffff  |    |		.CONST	0x01ab,0xffff
05da 01ad fffe  |    |		.CONST	0x01ad,0xfffe
05dc 01b2 0001  |    |		.CONST	0x01b2,0x0001
05de 01b3 0002  |    |		.CONST	0x01b3,0x0002
05e0 01ba 0003  |    |		.CONST	0x01ba,0x0003
05e2 01be 0004  |    |		.CONST	0x01be,0x0004
05e4 01c3 0005  |    |		.CONST	0x01c3,0x0005
05e6 01ca 0006  |    |		.CONST	0x01ca,0x0006
05e8 ; --------------------------------------------------------------------------------------
05e8 ; Debug3 Subtable 0x7
05e8 ; --------------------------------------------------------------------------------------
05e8 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
05ea 01d3 ffff  |    |		.CONST	0x01d3,0xffff
05ec 01d6 fffe  |    |		.CONST	0x01d6,0xfffe
05ee 01dc 0001  |    |		.CONST	0x01dc,0x0001
05f0 01e0 0002  |    |		.CONST	0x01e0,0x0002
05f2 01e9 0003  |    |		.CONST	0x01e9,0x0003
05f4 01ef 0004  |    |		.CONST	0x01ef,0x0004
05f6 ; --------------------------------------------------------------------------------------
05f6 ; Debug3 Subtable 0x8
05f6 ; --------------------------------------------------------------------------------------
05f6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
05f8 01fb 0001  |    |		.CONST	0x01fb,0x0001
05fa ; --------------------------------------------------------------------------------------
05fa ; Debug3 Subtable 0x9
05fa ; --------------------------------------------------------------------------------------
05fa 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
05fc 0213 0001  |    |		.CONST	0x0213,0x0001
05fe ; --------------------------------------------------------------------------------------
05fe ; Debug3 Subtable 0xa
05fe ; --------------------------------------------------------------------------------------
05fe 0004 0009  |    |		.DBG3TAB	0x0004,0x0009
0600 021b ffff  |    |		.CONST	0x021b,0xffff
0602 021f fffe  |    |		.CONST	0x021f,0xfffe
0604 0224 fffd  | $  |		.CONST	0x0224,0xfffd
0606 0229 fffc  | )  |		.CONST	0x0229,0xfffc
0608 022c 0002  | ,  |		.CONST	0x022c,0x0002
060a 0231 0003  | 1  |		.CONST	0x0231,0x0003
060c 0235 0004  | 5  |		.CONST	0x0235,0x0004
060e 023d 0005  | =  |		.CONST	0x023d,0x0005
0610 023f 0006  | ?  |		.CONST	0x023f,0x0006
0612 0241 0007  | A  |		.CONST	0x0241,0x0007
0614 024c 0008  | L  |		.CONST	0x024c,0x0008
0616 0250 0009  | P  |		.CONST	0x0250,0x0009
0618 0255 0001  | U  |		.CONST	0x0255,0x0001
061a ; --------------------------------------------------------------------------------------
061a ; Debug3 Subtable 0xb
061a ; --------------------------------------------------------------------------------------
061a 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
061c 0263 ffff  | c  |		.CONST	0x0263,0xffff
061e 0268 fffe  | h  |		.CONST	0x0268,0xfffe
0620 026b 0001  | k  |		.CONST	0x026b,0x0001
0622 0286 0002  |    |		.CONST	0x0286,0x0002
0624 0288 0003  |    |		.CONST	0x0288,0x0003
0626 028e 0004  |    |		.CONST	0x028e,0x0004
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0xc
0628 ; --------------------------------------------------------------------------------------
0628 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
062a 029b ffff  |    |		.CONST	0x029b,0xffff
062c 02a4 0001  |    |		.CONST	0x02a4,0x0001
062e 02a6 0002  |    |		.CONST	0x02a6,0x0002
0630 02a8 0003  |    |		.CONST	0x02a8,0x0003
0632 ; --------------------------------------------------------------------------------------
0632 ; Debug3 Subtable 0xd
0632 ; --------------------------------------------------------------------------------------
0632 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
0634 02b3 0001  |    |		.CONST	0x02b3,0x0001
0636 02b7 0002  |    |		.CONST	0x02b7,0x0002
0638 02ba 0003  |    |		.CONST	0x02ba,0x0003
063a 02bf 0004  |    |		.CONST	0x02bf,0x0004
063c 02c4 0005  |    |		.CONST	0x02c4,0x0005
063e ; --------------------------------------------------------------------------------------
063e ; Debug3 Subtable 0xe
063e ; --------------------------------------------------------------------------------------
063e 0003 000c  |    |		.DBG3TAB	0x0003,0x000c
0640 02eb ffff  |    |		.CONST	0x02eb,0xffff
0642 02ed fffe  |    |		.CONST	0x02ed,0xfffe
0644 02f0 fffd  |    |		.CONST	0x02f0,0xfffd
0646 02f3 0001  |    |		.CONST	0x02f3,0x0001
0648 02fe 0002  |    |		.CONST	0x02fe,0x0002
064a 0300 0003  |    |		.CONST	0x0300,0x0003
064c 0306 0004  |    |		.CONST	0x0306,0x0004
064e 0308 0005  |    |		.CONST	0x0308,0x0005
0650 030a 0006  |    |		.CONST	0x030a,0x0006
0652 0310 0007  |    |		.CONST	0x0310,0x0007
0654 0318 0008  |    |		.CONST	0x0318,0x0008
0656 031e 0009  |    |		.CONST	0x031e,0x0009
0658 033b 000a  | ;  |		.CONST	0x033b,0x000a
065a 033d 000b  | =  |		.CONST	0x033d,0x000b
065c 033f 000c  | ?  |		.CONST	0x033f,0x000c
065e ; --------------------------------------------------------------------------------------
065e ; Debug3 Subtable 0xf
065e ; --------------------------------------------------------------------------------------
065e 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0660 034b ffff  | K  |		.CONST	0x034b,0xffff
0662 034f 0001  | O  |		.CONST	0x034f,0x0001
0664 ; --------------------------------------------------------------------------------------
0664 ; Debug3 Subtable 0x10
0664 ; --------------------------------------------------------------------------------------
0664 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0666 035b 0001  | [  |		.CONST	0x035b,0x0001
0668 0383 0002  |    |		.CONST	0x0383,0x0002
066a ; --------------------------------------------------------------------------------------
066a ; Debug3 Subtable 0x11
066a ; --------------------------------------------------------------------------------------
066a 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
066c 038b ffff  |    |		.CONST	0x038b,0xffff
066e 038d 0001  |    |		.CONST	0x038d,0x0001
0670 0391 0002  |    |		.CONST	0x0391,0x0002
0672 0399 0003  |    |		.CONST	0x0399,0x0003
0674 03a2 0004  |    |		.CONST	0x03a2,0x0004
0676 03a8 0005  |    |		.CONST	0x03a8,0x0005
0678 03b3 0006  |    |		.CONST	0x03b3,0x0006
067a ; --------------------------------------------------------------------------------------
067a ; Debug3 Subtable 0x12
067a ; --------------------------------------------------------------------------------------
067a 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
067c 03bb ffff  |    |		.CONST	0x03bb,0xffff
067e 03c5 0001  |    |		.CONST	0x03c5,0x0001
0680 03cc 0002  |    |		.CONST	0x03cc,0x0002
0682 03d5 0003  |    |		.CONST	0x03d5,0x0003
0684 ; --------------------------------------------------------------------------------------
0684 ; Debug3 Subtable 0x13
0684 ; --------------------------------------------------------------------------------------
0684 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0686 03e3 ffff  |    |		.CONST	0x03e3,0xffff
0688 03f6 0001  |    |		.CONST	0x03f6,0x0001
068a 0000 0000  |    |		.BLANK	0000[0x176]