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

⟦d811e5ee4⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5

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 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0768       | h  |		.CONST	0x0768								; 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 8004       |    |		.CONST	0x8004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00ae       |    |		.CONST	0x00ae								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002f       | /  |		.CONST	0x002f								; Number of locals
000b			INIT_0008:
000b 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated
000d 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated
000f 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated
0011 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 00c4       |    |		Action	Make_Default
001b 00c4       |    |		Action	Make_Default
001c 00c4       |    |		Action	Make_Default
001d 00c4       |    |		Action	Make_Default
001e 00c4       |    |		Action	Make_Default
001f 00c4       |    |		Action	Make_Default
0020 00c4       |    |		Action	Make_Default
0021 00c4       |    |		Action	Make_Default
0022 00c4       |    |		Action	Make_Default
0023 00c4       |    |		Action	Make_Default
0024 00c4       |    |		Action	Make_Default
0025 00c4       |    |		Action	Make_Default
0026 00c4       |    |		Action	Make_Default
0027 00c4       |    |		Action	Make_Default
0028 00c4       |    |		Action	Make_Default
0029 00c4       |    |		Action	Make_Default
002a 00c4       |    |		Action	Make_Default
002b 00c4       |    |		Action	Make_Default
002c 00c4       |    |		Action	Make_Default
002d 00c4       |    |		Action	Make_Default
002e 00c4       |    |		Action	Make_Default
002f 00c4       |    |		Action	Make_Default
0030 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated
0032 c223       | #  |		Store	0x1,0x23
0033 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated
0035 c22d       | -  |		Store	0x1,0x2d
0036 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated
0038 c227       | '  |		Store	0x1,0x27
0039 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
003b c226       | &  |		Store	0x1,0x26
003c 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated
003e c211       |    |		Store	0x1,0x11
003f 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
0041 c212       |    |		Store	0x1,0x12
0042 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
0044 c213       |    |		Store	0x1,0x13
0045 4800       |H   |		Short_Literal	0x0
0046 480f       |H   |		Short_Literal	0xf
0047 029f 022b  |   +|		Declare_Subprogram	INIT_0228,For_Call
0049 03fe       |    |		Declare_Type	Discrete,Defined,Visible
004a c214       |    |		Store	0x1,0x14
004b 4800       |H   |		Short_Literal	0x0
004c 4858       |HX  |		Short_Literal	0x58
004d 029f 0253  |   S|		Declare_Subprogram	INIT_0250,For_Call
004f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0050 c215       |    |		Store	0x1,0x15
0051 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated
0053 c216       |    |		Store	0x1,0x16
0054 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
0056 c217       |    |		Store	0x1,0x17
0057 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated
0059 c218       |    |		Store	0x1,0x18
005a 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
005c c219       |    |		Store	0x1,0x19
005d 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated
005f c21a       |    |		Store	0x1,0x1a
0060 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated
0062 c228       | (  |		Store	0x1,0x28
0063 4800       |H   |		Short_Literal	0x0
0064 4810       |H   |		Short_Literal	0x10
0065 029f 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Call
0067 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0068 c22c       | ,  |		Store	0x1,0x2c
0069 029a 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call,Visible,Unelaborated
006b c21c       |    |		Store	0x1,0x1c
006c 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated
006e c21d       |    |		Store	0x1,0x1d
006f 029a 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call,Visible,Unelaborated
0071 c21e       |    |		Store	0x1,0x1e
0072 029a 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call,Visible,Unelaborated
0074 c224       | $  |		Store	0x1,0x24
0075 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated
0077 c225       | %  |		Store	0x1,0x25
0078 029a 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call,Visible,Unelaborated
007a c229       | )  |		Store	0x1,0x29
007b 00bf       |    |		Action	Accept_Activation
007c 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
007d 00c7       |    |		Action	Elaborate_Subprogram
007e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 029d 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call
0082 029d 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call
0084 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0085 00c7       |    |		Action	Elaborate_Subprogram
0086 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
0087 00c7       |    |		Action	Elaborate_Subprogram
0088 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0089 00c7       |    |		Action	Elaborate_Subprogram
008a 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
008d 00c7       |    |		Action	Elaborate_Subprogram
008e 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0091 00c7       |    |		Action	Elaborate_Subprogram
0092 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0093 00c7       |    |		Action	Elaborate_Subprogram
0094 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0095 00c7       |    |		Action	Elaborate_Subprogram
0096 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0097 00c7       |    |		Action	Elaborate_Subprogram
0098 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0099 00c7       |    |		Action	Elaborate_Subprogram
009a 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
009b 00c7       |    |		Action	Elaborate_Subprogram
009c 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
009d 00c7       |    |		Action	Elaborate_Subprogram
009e 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
009f 00c7       |    |		Action	Elaborate_Subprogram
00a0 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00a1 00c7       |    |		Action	Elaborate_Subprogram
00a2 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
00a3 00c7       |    |		Action	Elaborate_Subprogram
00a4 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
00a5 00c7       |    |		Action	Elaborate_Subprogram
00a6 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
00a7 00c7       |    |		Action	Elaborate_Subprogram
00a8 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
00a9 00c7       |    |		Action	Elaborate_Subprogram
00aa 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
00ab 00c7       |    |		Action	Elaborate_Subprogram
00ac 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
00ad 00c7       |    |		Action	Elaborate_Subprogram
00ae			BODY_0008:
00ae 00bc       |    |		Action	Signal_Activated
00af 00bb       |    |		Action	Signal_Completion
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 e001       |    |		Load	0x0,0x1
00b4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00b5 e001       |    |		Load	0x0,0x1
00b6 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00b7 00ca       |    |		Action	Exit_Nullary_Function
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 0092 0466  |   f|		Action	Push_String_Extended,0x466					; "!Users."
00bd e001       |    |		Load	0x0,0x1
00be 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00bf e001       |    |		Load	0x0,0x1
00c0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00c1 01cc       |    |		Execute	Vector,Catenate
00c2 00ca       |    |		Action	Exit_Nullary_Function
00c3 0000 0000  |    |		.BLANK	0000[0x5]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2
00cc 8210       |    |		Call	0x1,0x10
00cd e002       |    |		Load	0x0,0x2
00ce 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00cf 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
00d0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d1 0000 0000  |    |		.BLANK	0000[0x7]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e3       |    |		.CONST	0x00e3								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0003       |    |		.CONST	0x0003								; Number of locals
00db			INIT_00d8:
00db e002       |    |		Load	0x0,0x2
00dc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00dd 02c7       |    |		Declare_Variable	Any
00de 00d8       |    |		Load_Top	At_Offset_0
00df 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e0 e002       |    |		Load	0x0,0x2
00e1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00e2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00e3			BODY_00d8:
00e3 e002       |    |		Load	0x0,0x2
00e4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00e5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00e6 00da       |    |		Load_Top	At_Offset_2
00e7 0120       |    |		Execute	Any,Is_Value
00e8 6803       |h   |		Jump_Zero	0xec
00e9 e002       |    |		Load	0x0,0x2
00ea 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00eb 7801       |x   |		Jump	0xed
00ec 00da       |    |		Load_Top	At_Offset_2
00ed 6016       |`   |		Indirect_Literal	Discrete,0x104,{0x00000000, 0x00004000}
00ee e003       |    |		Load	0x0,0x3
00ef 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00f0 e004       |    |		Load	0x0,0x4
00f1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00f2 e002       |    |		Load	0x0,0x2
00f3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00f4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00f5 e5ff       |    |		Load	0x2,-0x1
00f6 e002       |    |		Load	0x0,0x2
00f7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00f8 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
00f9 c402       |    |		Store	0x2,0x2
00fa 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00fb 4800       |H   |		Short_Literal	0x0
00fc 00d9       |    |		Load_Top	At_Offset_1
00fd 822f       | /  |		Call	0x1,0x2f
00fe 6802       |h   |		Jump_Zero	0x101
00ff 00d9       |    |		Load_Top	At_Offset_1
0100 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0101 e002       |    |		Load	0x0,0x2
0102 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0103 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0104 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010d       |    |		.CONST	0x010d								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0002       |    |		.CONST	0x0002								; Number of locals
010b			INIT_0108:
010b 029f 03db  |    |		Declare_Subprogram	INIT_03d8,For_Call
010d			BODY_0108:
010d 821c       |    |		Call	0x1,0x1c
010e 4610       |F   |		Jump_Case	0x11
010f 7810       |x   |		Jump	0x120								; case 0x0
0110 7816       |x   |		Jump	0x127								; case 0x1
0111 7815       |x   |		Jump	0x127								; case 0x2
0112 780d       |x   |		Jump	0x120								; case 0x3
0113 780c       |x   |		Jump	0x120								; case 0x4
0114 7817       |x   |		Jump	0x12c								; case 0x5
0115 781b       |x   |		Jump	0x131								; case 0x6
0116 7810       |x   |		Jump	0x127								; case 0x7
0117 780f       |x   |		Jump	0x127								; case 0x8
0118 7807       |x   |		Jump	0x120								; case 0x9
0119 7806       |x   |		Jump	0x120								; case 0xa
011a 7805       |x   |		Jump	0x120								; case 0xb
011b 7804       |x   |		Jump	0x120								; case 0xc
011c 7803       |x   |		Jump	0x120								; case 0xd
011d 7802       |x   |		Jump	0x120								; case 0xe
011e 780d       |x   |		Jump	0x12c								; case 0xf
011f 7800       |x   |		Jump	0x120								; case 0x10
0120 e001       |    |		Load	0x0,0x1
0121 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0122 e001       |    |		Load	0x0,0x1
0123 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0124 e001       |    |		Load	0x0,0x1
0125 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0126 00ca       |    |		Action	Exit_Nullary_Function
0127 0092 0467  |   g|		Action	Push_String_Extended,0x467					; "<image>.$"
0129 820f       |    |		Call	0x1,0xf
012a 8402       |    |		Call	0x2,0x2
012b 00ca       |    |		Action	Exit_Nullary_Function
012c 0092 0468  |   h|		Action	Push_String_Extended,0x468					; "$"
012e 820f       |    |		Call	0x1,0xf
012f 8402       |    |		Call	0x2,0x2
0130 00ca       |    |		Action	Exit_Nullary_Function
0131 0092 0469  |   i|		Action	Push_String_Extended,0x469					; "<cursor>.$"
0133 820f       |    |		Call	0x1,0xf
0134 8402       |    |		Call	0x2,0x2
0135 00ca       |    |		Action	Exit_Nullary_Function
0136 0000 0000  |    |		.XXX[0x2]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0140       | @  |		.CONST	0x0140								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0003       |    |		.CONST	0x0003								; Number of locals
013b			INIT_0138:
013b e002       |    |		Load	0x0,0x2
013c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
013d e002       |    |		Load	0x0,0x2
013e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
013f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0140			BODY_0138:
0140 e002       |    |		Load	0x0,0x2
0141 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0142 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0143 e002       |    |		Load	0x0,0x2
0144 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0145 6016       |`   |		Indirect_Literal	Discrete,0x15c,{0x00000000, 0x00004000}
0146 e003       |    |		Load	0x0,0x3
0147 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0148 e004       |    |		Load	0x0,0x4
0149 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
014a e002       |    |		Load	0x0,0x2
014b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
014c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
014d e5ff       |    |		Load	0x2,-0x1
014e e002       |    |		Load	0x0,0x2
014f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0150 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0151 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0152 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0153 4800       |H   |		Short_Literal	0x0
0154 00d9       |    |		Load_Top	At_Offset_1
0155 822f       | /  |		Call	0x1,0x2f
0156 6802       |h   |		Jump_Zero	0x159
0157 00d9       |    |		Load_Top	At_Offset_1
0158 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0159 00ec       |    |		Load_Encached	Diana_Tree_Cache
015a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
015b 0000       |    |		.XXX[0x1]
015c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 00da       |    |		Load_Top	At_Offset_2
0164 822d       | -  |		Call	0x1,0x2d
0165 e002       |    |		Load	0x0,0x2
0166 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0167 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0168 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0169 0000 0000  |    |		.BLANK	0000[0x7]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0174       | t  |		.CONST	0x0174								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0002       |    |		.CONST	0x0002								; Number of locals
0173			INIT_0170:
0173 00e3       |    |		Load_Encached	Natural_Cache
0174			BODY_0170:
0174 4801       |H   |		Short_Literal	0x1
0175 e5ff       |    |		Load	0x2,-0x1
0176 e5fe       |    |		Load	0x2,-0x2
0177 e005       |    |		Load	0x0,0x5
0178 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0179 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
017a 00d8       |    |		Load_Top	At_Offset_0
017b 7004       |p   |		Jump_Nonzero	0x180
017c 00db       |    |		Load_Top	At_Offset_3
017d 0335       | 5  |		Declare_Variable	Array,Duplicate
017e 00cd       |    |		Action	Spare6_Action
017f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0180 00d8       |    |		Load_Top	At_Offset_0
0181 e5ff       |    |		Load	0x2,-0x1
0182 01dd       |    |		Execute	Vector,First
0183 027f       |    |		Execute	Discrete,Equal
0184 6811       |h   |		Jump_Zero	0x196
0185 00d8       |    |		Load_Top	At_Offset_0
0186 e5fe       |    |		Load	0x2,-0x2
0187 01db       |    |		Execute	Vector,Length
0188 0273       | s  |		Execute	Discrete,Plus
0189 0a01       |    |		Execute_Immediate	Plus,0x1
018a 00d8       |    |		Load_Top	At_Offset_0
018b 00e2       |    |		Load_Encached	Integer_Cache
018c 0260       | `  |		Execute	Discrete,In_Type
018d 7001       |p   |		Jump_Nonzero	0x18f
018e 0801       |    |		Execute_Immediate	Raise,0x1
018f e5ff       |    |		Load	0x2,-0x1
0190 01dc       |    |		Execute	Vector,Last
0191 e5ff       |    |		Load	0x2,-0x1
0192 01cf       |    |		Execute	Vector,Slice_Read
0193 0335       | 5  |		Declare_Variable	Array,Duplicate
0194 00cd       |    |		Action	Spare6_Action
0195 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0196 00db       |    |		Load_Top	At_Offset_3
0197 0335       | 5  |		Declare_Variable	Array,Duplicate
0198 00cd       |    |		Action	Spare6_Action
0199 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
019a 0000 0000  |    |		.BLANK	0000[0x6]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01ab       |    |		.CONST	0x01ab								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0003       |    |		.CONST	0x0003								; Number of locals
01a3			INIT_01a0:
01a3 e002       |    |		Load	0x0,0x2
01a4 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
01a5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01a6 02c7       |    |		Declare_Variable	Any
01a7 00d8       |    |		Load_Top	At_Offset_0
01a8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a9 e002       |    |		Load	0x0,0x2
01aa 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ab			BODY_01a0:
01ab e002       |    |		Load	0x0,0x2
01ac 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ad 00da       |    |		Load_Top	At_Offset_2
01ae 0120       |    |		Execute	Any,Is_Value
01af 6804       |h   |		Jump_Zero	0x1b4
01b0 e002       |    |		Load	0x0,0x2
01b1 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
01b2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01b3 7801       |x   |		Jump	0x1b5
01b4 00da       |    |		Load_Top	At_Offset_2
01b5 6012       |`   |		Indirect_Literal	Discrete,0x1c8,{0x00000000, 0x00004000}
01b6 e003       |    |		Load	0x0,0x3
01b7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01b8 4800       |H   |		Short_Literal	0x0
01b9 e5ff       |    |		Load	0x2,-0x1
01ba e002       |    |		Load	0x0,0x2
01bb 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
01bc 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01bd c402       |    |		Store	0x2,0x2
01be 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01bf 4800       |H   |		Short_Literal	0x0
01c0 00d9       |    |		Load_Top	At_Offset_1
01c1 822e       | .  |		Call	0x1,0x2e
01c2 6802       |h   |		Jump_Zero	0x1c5
01c3 00d9       |    |		Load_Top	At_Offset_1
01c4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01c5 00d9       |    |		Load_Top	At_Offset_1
01c6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01c7 0000       |    |		.XXX[0x1]
01c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
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 e002       |    |		Load	0x0,0x2
01d4 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
01d5 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
01d6 02c7       |    |		Declare_Variable	Any
01d7 00d8       |    |		Load_Top	At_Offset_0
01d8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d9 e002       |    |		Load	0x0,0x2
01da 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01db			BODY_01d0:
01db e002       |    |		Load	0x0,0x2
01dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01dd 00da       |    |		Load_Top	At_Offset_2
01de 0120       |    |		Execute	Any,Is_Value
01df 6804       |h   |		Jump_Zero	0x1e4
01e0 e002       |    |		Load	0x0,0x2
01e1 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
01e2 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
01e3 7801       |x   |		Jump	0x1e5
01e4 00da       |    |		Load_Top	At_Offset_2
01e5 67e2       |g   |		Indirect_Literal	Discrete,0x1c8,{0x00000000, 0x00004000}
01e6 e003       |    |		Load	0x0,0x3
01e7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01e8 4800       |H   |		Short_Literal	0x0
01e9 e5ff       |    |		Load	0x2,-0x1
01ea e002       |    |		Load	0x0,0x2
01eb 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
01ec 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01ed c402       |    |		Store	0x2,0x2
01ee 0059       | Y  |		Store_Top	Discrete,At_Offset_1
01ef 4800       |H   |		Short_Literal	0x0
01f0 00d9       |    |		Load_Top	At_Offset_1
01f1 822e       | .  |		Call	0x1,0x2e
01f2 6802       |h   |		Jump_Zero	0x1f5
01f3 00d9       |    |		Load_Top	At_Offset_1
01f4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f5 00d9       |    |		Load_Top	At_Offset_1
01f6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f7 0000       |    |		.XXX[0x1]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0203       |    |		.CONST	0x0203								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0003       |    |		.CONST	0x0003								; Number of locals
01fb			INIT_01f8:
01fb e002       |    |		Load	0x0,0x2
01fc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01fd 02c7       |    |		Declare_Variable	Any
01fe 00d8       |    |		Load_Top	At_Offset_0
01ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0200 e002       |    |		Load	0x0,0x2
0201 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0202 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0203			BODY_01f8:
0203 e002       |    |		Load	0x0,0x2
0204 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0205 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0206 00da       |    |		Load_Top	At_Offset_2
0207 0120       |    |		Execute	Any,Is_Value
0208 6803       |h   |		Jump_Zero	0x20c
0209 e002       |    |		Load	0x0,0x2
020a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
020b 7801       |x   |		Jump	0x20d
020c 00da       |    |		Load_Top	At_Offset_2
020d 6016       |`   |		Indirect_Literal	Discrete,0x224,{0x00000000, 0x00004000}
020e e003       |    |		Load	0x0,0x3
020f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0210 e004       |    |		Load	0x0,0x4
0211 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0212 e002       |    |		Load	0x0,0x2
0213 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0214 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0215 e5ff       |    |		Load	0x2,-0x1
0216 e002       |    |		Load	0x0,0x2
0217 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0218 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0219 c402       |    |		Store	0x2,0x2
021a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
021b 4800       |H   |		Short_Literal	0x0
021c 00d9       |    |		Load_Top	At_Offset_1
021d 822f       | /  |		Call	0x1,0x2f
021e 6802       |h   |		Jump_Zero	0x221
021f 4801       |H   |		Short_Literal	0x1
0220 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0221 4800       |H   |		Short_Literal	0x0
0222 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0223 0000       |    |		.XXX[0x1]
0224 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b 4607       |F   |		Jump_Case	0x8
022c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
022d 7806       |x   |		Jump	0x234								; case 0x1
022e 7809       |x   |		Jump	0x238								; case 0x2
022f 780d       |x   |		Jump	0x23d								; case 0x3
0230 7810       |x   |		Jump	0x241								; case 0x4
0231 7811       |x   |		Jump	0x243								; case 0x5
0232 7812       |x   |		Jump	0x245								; case 0x6
0233 7815       |x   |		Jump	0x249								; case 0x7
0234 00da       |    |		Load_Top	At_Offset_2
0235 0091 03ec  |    |		Action	Push_String_Extended_Indexed,0x3ec				; "NIL"
0237 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0238 00db       |    |		Load_Top	At_Offset_3
0239 00db       |    |		Load_Top	At_Offset_3
023a 00e0       |    |		Load_Encached	Standard_Cache
023b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
023c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
023d 00da       |    |		Load_Top	At_Offset_2
023e 00e0       |    |		Load_Encached	Standard_Cache
023f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0240 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0241 00db       |    |		Load_Top	At_Offset_3
0242 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0243 00db       |    |		Load_Top	At_Offset_3
0244 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0245 e214       |    |		Load	0x1,0x14
0246 00dc       |    |		Load_Top	At_Offset_4
0247 0267       | g  |		Execute	Discrete,Predecessor
0248 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0249 e214       |    |		Load	0x1,0x14
024a 00dc       |    |		Load_Top	At_Offset_4
024b 0268       | h  |		Execute	Discrete,Successor
024c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
024d 0000 0000  |    |		.XXX[0x3]
024f 0000       |    |
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 4607       |F   |		Jump_Case	0x8
0254 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0255 7806       |x   |		Jump	0x25c								; case 0x1
0256 7809       |x   |		Jump	0x260								; case 0x2
0257 780d       |x   |		Jump	0x265								; case 0x3
0258 7810       |x   |		Jump	0x269								; case 0x4
0259 7811       |x   |		Jump	0x26b								; case 0x5
025a 7812       |x   |		Jump	0x26d								; case 0x6
025b 7815       |x   |		Jump	0x271								; case 0x7
025c 00da       |    |		Load_Top	At_Offset_2
025d 0091 03fc  |    |		Action	Push_String_Extended_Indexed,0x3fc				; "NIL"
025f 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0260 00db       |    |		Load_Top	At_Offset_3
0261 00db       |    |		Load_Top	At_Offset_3
0262 00e0       |    |		Load_Encached	Standard_Cache
0263 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0264 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0265 00da       |    |		Load_Top	At_Offset_2
0266 00e0       |    |		Load_Encached	Standard_Cache
0267 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0268 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0269 00db       |    |		Load_Top	At_Offset_3
026a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
026b 00db       |    |		Load_Top	At_Offset_3
026c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
026d e215       |    |		Load	0x1,0x15
026e 00dc       |    |		Load_Top	At_Offset_4
026f 0267       | g  |		Execute	Discrete,Predecessor
0270 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0271 e215       |    |		Load	0x1,0x15
0272 00dc       |    |		Load_Top	At_Offset_4
0273 0268       | h  |		Execute	Discrete,Successor
0274 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0275 0000 0000  |    |		.XXX[0x3]
0277 0000       |    |
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0288       |    |		.CONST	0x0288								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0003       |    |		.CONST	0x0003								; Number of locals
027b			INIT_0278:
027b e002       |    |		Load	0x0,0x2
027c 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
027d 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
027e 02c7       |    |		Declare_Variable	Any
027f 00db       |    |		Load_Top	At_Offset_3
0280 8212       |    |		Call	0x1,0x12
0281 a402       |    |		Store_Unchecked	0x2,0x2
0282 00d8       |    |		Load_Top	At_Offset_0
0283 e002       |    |		Load	0x0,0x2
0284 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
0285 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0286 e002       |    |		Load	0x0,0x2
0287 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0288			BODY_0278:
0288 00d8       |    |		Load_Top	At_Offset_0
0289 8217       |    |		Call	0x1,0x17
028a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028b 0000 0000  |    |		.BLANK	0000[0x5]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0297       |    |		.CONST	0x0297								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 00da       |    |		Load_Top	At_Offset_2
0294 e214       |    |		Load	0x1,0x14
0295 1c02       |    |		Execute_Immediate	Run_Utility,0x2
0296 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0297			TRAP_0290:
0297 0007       |    |		Action	Break_Optional
0298 4800       |H   |		Short_Literal	0x0
0299 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029a 0000 0000  |    |		.BLANK	0000[0x6]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a5       |    |		.CONST	0x02a5								; Address of begin
02a1 02b4       |    |		.CONST	0x02b4								; Address of exception handler
02a2 0002       |    |		.CONST	0x0002								; Number of locals
02a3			INIT_02a0:
02a3 e002       |    |		Load	0x0,0x2
02a4 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
02a5			BODY_02a0:
02a5 00db       |    |		Load_Top	At_Offset_3
02a6 e215       |    |		Load	0x1,0x15
02a7 011c       |    |		Execute	Any,Convert_Unchecked
02a8 1c01       |    |		Execute_Immediate	Run_Utility,0x1
02a9 e002       |    |		Load	0x0,0x2
02aa 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
02ab 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02ac 00d8       |    |		Load_Top	At_Offset_0
02ad e002       |    |		Load	0x0,0x2
02ae 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
02af e002       |    |		Load	0x0,0x2
02b0 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02b1 e214       |    |		Load	0x1,0x14
02b2 1c02       |    |		Execute_Immediate	Run_Utility,0x2
02b3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b4			TRAP_02a0:
02b4 0007       |    |		Action	Break_Optional
02b5 4800       |H   |		Short_Literal	0x0
02b6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b7 0000       |    |		.XXX[0x1]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c8       |    |		.CONST	0x02c8								; Address of begin
02b9 02cc       |    |		.CONST	0x02cc								; Address of exception handler
02ba 0003       |    |		.CONST	0x0003								; Number of locals
02bb			INIT_02b8:
02bb e002       |    |		Load	0x0,0x2
02bc 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
02bd 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
02be 02c7       |    |		Declare_Variable	Any
02bf 00db       |    |		Load_Top	At_Offset_3
02c0 8212       |    |		Call	0x1,0x12
02c1 a402       |    |		Store_Unchecked	0x2,0x2
02c2 00d8       |    |		Load_Top	At_Offset_0
02c3 e002       |    |		Load	0x0,0x2
02c4 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
02c5 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
02c6 e002       |    |		Load	0x0,0x2
02c7 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
02c8			BODY_02b8:
02c8 00d8       |    |		Load_Top	At_Offset_0
02c9 e215       |    |		Load	0x1,0x15
02ca 1c02       |    |		Execute_Immediate	Run_Utility,0x2
02cb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02cc			TRAP_02b8:
02cc 0007       |    |		Action	Break_Optional
02cd 4800       |H   |		Short_Literal	0x0
02ce 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02cf 0000       |    |		.XXX[0x1]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d5       |    |		.CONST	0x02d5								; Address of begin
02d1 02df       |    |		.CONST	0x02df								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 e002       |    |		Load	0x0,0x2
02d4 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
02d5			BODY_02d0:
02d5 00db       |    |		Load_Top	At_Offset_3
02d6 e002       |    |		Load	0x0,0x2
02d7 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
02d8 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02d9 00d8       |    |		Load_Top	At_Offset_0
02da e002       |    |		Load	0x0,0x2
02db 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
02dc e215       |    |		Load	0x1,0x15
02dd 1c02       |    |		Execute_Immediate	Run_Utility,0x2
02de 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02df			TRAP_02d0:
02df 0007       |    |		Action	Break_Optional
02e0 4800       |H   |		Short_Literal	0x0
02e1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02e2 0000 0000  |    |		.BLANK	0000[0x6]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb       |    |		.CONST	0x02eb								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0001       |    |		.CONST	0x0001								; Number of locals
02eb			BODY_02e8:
02eb			INIT_02e8:
02eb 00da       |    |		Load_Top	At_Offset_2
02ec 0f06       |    |		Execute_Immediate	Equal,0x6
02ed 7008       |p   |		Jump_Nonzero	0x2f6
02ee 00da       |    |		Load_Top	At_Offset_2
02ef 0f42       | B  |		Execute_Immediate	Equal,0x42
02f0 7003       |p   |		Jump_Nonzero	0x2f4
02f1 00da       |    |		Load_Top	At_Offset_2
02f2 0f05       |    |		Execute_Immediate	Equal,0x5
02f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f4 4801       |H   |		Short_Literal	0x1
02f5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f6 4801       |H   |		Short_Literal	0x1
02f7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb 4607       |F   |		Jump_Case	0x8
02fc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
02fd 7806       |x   |		Jump	0x304								; case 0x1
02fe 7809       |x   |		Jump	0x308								; case 0x2
02ff 780d       |x   |		Jump	0x30d								; case 0x3
0300 7810       |x   |		Jump	0x311								; case 0x4
0301 7811       |x   |		Jump	0x313								; case 0x5
0302 7812       |x   |		Jump	0x315								; case 0x6
0303 7815       |x   |		Jump	0x319								; case 0x7
0304 00da       |    |		Load_Top	At_Offset_2
0305 0091 0455  |   U|		Action	Push_String_Extended_Indexed,0x455				; "NIL"
0307 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0308 00db       |    |		Load_Top	At_Offset_3
0309 00db       |    |		Load_Top	At_Offset_3
030a 00e0       |    |		Load_Encached	Standard_Cache
030b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
030c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
030d 00da       |    |		Load_Top	At_Offset_2
030e 00e0       |    |		Load_Encached	Standard_Cache
030f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0310 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0311 00db       |    |		Load_Top	At_Offset_3
0312 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0313 00db       |    |		Load_Top	At_Offset_3
0314 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0315 e22c       | ,  |		Load	0x1,0x2c
0316 00dc       |    |		Load_Top	At_Offset_4
0317 0267       | g  |		Execute	Discrete,Predecessor
0318 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0319 e22c       | ,  |		Load	0x1,0x2c
031a 00dc       |    |		Load_Top	At_Offset_4
031b 0268       | h  |		Execute	Discrete,Successor
031c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
031d 0000 0000  |    |		.XXX[0x3]
031f 0000       |    |
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 032a       | *  |		.CONST	0x032a								; Address of begin
0321 0331       | 1  |		.CONST	0x0331								; Address of exception handler
0322 0002       |    |		.CONST	0x0002								; Number of locals
0323			INIT_0320:
0323 e006       |    |		Load	0x0,0x6
0324 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0325 02c7       |    |		Declare_Variable	Any
0326 e006       |    |		Load	0x0,0x6
0327 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0328 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0329 a402       |    |		Store_Unchecked	0x2,0x2
032a			BODY_0320:
032a 00d8       |    |		Load_Top	At_Offset_0
032b e006       |    |		Load	0x0,0x6
032c 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
032d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
032e e22c       | ,  |		Load	0x1,0x2c
032f 1c02       |    |		Execute_Immediate	Run_Utility,0x2
0330 00ca       |    |		Action	Exit_Nullary_Function
0331			TRAP_0320:
0331 0007       |    |		Action	Break_Optional
0332 4810       |H   |		Short_Literal	0x10
0333 00ca       |    |		Action	Exit_Nullary_Function
0334 0000 0000  |    |		.BLANK	0000[0x4]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b       | ;  |		.CONST	0x033b								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0001       |    |		.CONST	0x0001								; Number of locals
033b			BODY_0338:
033b			INIT_0338:
033b 4801       |H   |		Short_Literal	0x1
033c 4820       |H   |		Short_Literal	0x20
033d e5fe       |    |		Load	0x2,-0x2
033e e005       |    |		Load	0x0,0x5
033f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0340 4820       |H   |		Short_Literal	0x20
0341 e5ff       |    |		Load	0x2,-0x1
0342 e005       |    |		Load	0x0,0x5
0343 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0344 e005       |    |		Load	0x0,0x5
0345 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0346 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0347 0000       |    |		.XXX[0x1]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034d       | M  |		.CONST	0x034d								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0003       |    |		.CONST	0x0003								; Number of locals
034b			INIT_0348:
034b 00e1       |    |		Load_Encached	Boolean_Cache
034c 03e9       |    |		Declare_Variable	Discrete,Duplicate
034d			BODY_0348:
034d 4801       |H   |		Short_Literal	0x1
034e 0092 046a  |   j|		Action	Push_String_Extended,0x46a					; "true"
0350 4820       |H   |		Short_Literal	0x20
0351 e5ff       |    |		Load	0x2,-0x1
0352 e005       |    |		Load	0x0,0x5
0353 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0354 e005       |    |		Load	0x0,0x5
0355 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0356 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0357 4801       |H   |		Short_Literal	0x1
0358 0092 046b  |   k|		Action	Push_String_Extended,0x46b					; "false"
035a 4820       |H   |		Short_Literal	0x20
035b e5ff       |    |		Load	0x2,-0x1
035c e005       |    |		Load	0x0,0x5
035d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
035e e005       |    |		Load	0x0,0x5
035f 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0360 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0361 00d9       |    |		Load_Top	At_Offset_1
0362 a5fe       |    |		Store_Unchecked	0x2,-0x2
0363 00d9       |    |		Load_Top	At_Offset_1
0364 7002       |p   |		Jump_Nonzero	0x367
0365 00d8       |    |		Load_Top	At_Offset_0
0366 7801       |x   |		Jump	0x368
0367 4801       |H   |		Short_Literal	0x1
0368 7002       |p   |		Jump_Nonzero	0x36b
0369 4800       |H   |		Short_Literal	0x0
036a a5fd       |    |		Store_Unchecked	0x2,-0x3
036b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
036c 0000 0000  |    |		.BLANK	0000[0x4]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0383       |    |		.CONST	0x0383								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0003       |    |		.CONST	0x0003								; Number of locals
0373			INIT_0370:
0373 e007       |    |		Load	0x0,0x7
0374 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0375 0322       | "  |		Declare_Variable	Record
0376 e004       |    |		Load	0x0,0x4
0377 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0378 e007       |    |		Load	0x0,0x7
0379 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
037a 00d9       |    |		Load_Top	At_Offset_1
037b 017d       | }  |		Execute	Record,Structure_Write
037c 00d8       |    |		Load_Top	At_Offset_0
037d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
037e e007       |    |		Load	0x0,0x7
037f 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0380 e008       |    |		Load	0x0,0x8
0381 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0382 03f1       |    |		Declare_Variable	Discrete,With_Value
0383			BODY_0370:
0383 00d8       |    |		Load_Top	At_Offset_0
0384 4605       |F   |		Jump_Case	0x6
0385 7807       |x   |		Jump	0x38d								; case 0x0
0386 7804       |x   |		Jump	0x38b								; case 0x1
0387 7803       |x   |		Jump	0x38b								; case 0x2
0388 7804       |x   |		Jump	0x38d								; case 0x3
0389 7803       |x   |		Jump	0x38d								; case 0x4
038a 7800       |x   |		Jump	0x38b								; case 0x5
038b 4801       |H   |		Short_Literal	0x1
038c 00ca       |    |		Action	Exit_Nullary_Function
038d 4800       |H   |		Short_Literal	0x0
038e 00ca       |    |		Action	Exit_Nullary_Function
038f 0000       |    |		.XXX[0x1]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 03a3       |    |		.CONST	0x03a3								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0003       |    |		.CONST	0x0003								; Number of locals
0393			INIT_0390:
0393 e007       |    |		Load	0x0,0x7
0394 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0395 0322       | "  |		Declare_Variable	Record
0396 e004       |    |		Load	0x0,0x4
0397 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0398 e007       |    |		Load	0x0,0x7
0399 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
039a 00d9       |    |		Load_Top	At_Offset_1
039b 017d       | }  |		Execute	Record,Structure_Write
039c 00d8       |    |		Load_Top	At_Offset_0
039d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
039e e007       |    |		Load	0x0,0x7
039f 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
03a0 e008       |    |		Load	0x0,0x8
03a1 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
03a2 03f1       |    |		Declare_Variable	Discrete,With_Value
03a3			BODY_0390:
03a3 00d8       |    |		Load_Top	At_Offset_0
03a4 0f04       |    |		Execute_Immediate	Equal,0x4
03a5 7002       |p   |		Jump_Nonzero	0x3a8
03a6 4800       |H   |		Short_Literal	0x0
03a7 00ca       |    |		Action	Exit_Nullary_Function
03a8 4801       |H   |		Short_Literal	0x1
03a9 00ca       |    |		Action	Exit_Nullary_Function
03aa 0000 0000  |    |		.BLANK	0000[0x6]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03bc       |    |		.CONST	0x03bc								; Address of begin
03b1 03c2       |    |		.CONST	0x03c2								; Address of exception handler
03b2 0002       |    |		.CONST	0x0002								; Number of locals
03b3			INIT_03b0:
03b3 e007       |    |		Load	0x0,0x7
03b4 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
03b5 0322       | "  |		Declare_Variable	Record
03b6 e004       |    |		Load	0x0,0x4
03b7 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03b8 e007       |    |		Load	0x0,0x7
03b9 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
03ba 00d9       |    |		Load_Top	At_Offset_1
03bb 017d       | }  |		Execute	Record,Structure_Write
03bc			BODY_03b0:
03bc 4801       |H   |		Short_Literal	0x1
03bd 00d9       |    |		Load_Top	At_Offset_1
03be 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03bf e007       |    |		Load	0x0,0x7
03c0 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
03c1 00ca       |    |		Action	Exit_Nullary_Function
03c2			TRAP_03b0:
03c2 0007       |    |		Action	Break_Optional
03c3 00ea       |    |		Load_Encached	Null_String_Cache
03c4 00ca       |    |		Action	Exit_Nullary_Function
03c5 0000 0000  |    |		.XXX[0x3]
03c7 0000       |    |
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb       |    |		.CONST	0x03cb								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0001       |    |		.CONST	0x0001								; Number of locals
03cb			BODY_03c8:
03cb			INIT_03c8:
03cb 00da       |    |		Load_Top	At_Offset_2
03cc e5fe       |    |		Load	0x2,-0x2
03cd 027f       |    |		Execute	Discrete,Equal
03ce 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03cf 0000       |    |		.XXX[0x1]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3       |    |		.CONST	0x03d3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0001       |    |		.CONST	0x0001								; Number of locals
03d3			BODY_03d0:
03d3			INIT_03d0:
03d3 00da       |    |		Load_Top	At_Offset_2
03d4 e5fe       |    |		Load	0x2,-0x2
03d5 027f       |    |		Execute	Discrete,Equal
03d6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03d7 0000       |    |		.XXX[0x1]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db       |    |		.CONST	0x03db								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0001       |    |		.CONST	0x0001								; Number of locals
03db			BODY_03d8:
03db			INIT_03d8:
03db 00da       |    |		Load_Top	At_Offset_2
03dc 01db       |    |		Execute	Vector,Length
03dd 6805       |h   |		Jump_Zero	0x3e3
03de 00da       |    |		Load_Top	At_Offset_2
03df 0092 046c  |   l|		Action	Push_String_Extended,0x46c					; "<>"
03e1 01df       |    |		Execute	Vector,Equal
03e2 6807       |h   |		Jump_Zero	0x3ea
03e3 e001       |    |		Load	0x0,0x1
03e4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03e5 e001       |    |		Load	0x0,0x1
03e6 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
03e7 e001       |    |		Load	0x0,0x1
03e8 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
03e9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ea 00da       |    |		Load_Top	At_Offset_2
03eb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ec ; --------------------------------------------------------------------------------------
03ec ; STRING TABLE
03ec ; --------------------------------------------------------------------------------------
03ec 0104       |    |		.STRTAB	0x0104->0x046e							; "NIL"
03ed 0105       |    |		.STRTAB	0x0105->0x046f							; "ADA"
03ee 0106       |    |		.STRTAB	0x0106->0x0471							; "LIBRARY"
03ef 010b       |    |		.STRTAB	0x010b->0x0474							; "FILE"
03f0 010d       |    |		.STRTAB	0x010d->0x0476							; "TAPE"
03f1 010f       |    |		.STRTAB	0x010f->0x0478							; "TERMINAL"
03f2 0115       |    |		.STRTAB	0x0115->0x047c							; "USER"
03f3 0117       |    |		.STRTAB	0x0117->0x047e							; "GROUP"
03f4 011a       |    |		.STRTAB	0x011a->0x0481							; "SESSION"
03f5 011f       |    |		.STRTAB	0x011f->0x0484							; "CODE_SEGMENT"
03f6 0129       | )  |		.STRTAB	0x0129->0x048a							; "LINK"
03f7 012b       | +  |		.STRTAB	0x012b->0x048c							; "NULL_DEVICE"
03f8 0134       | 4  |		.STRTAB	0x0134->0x0492							; "PIPE"
03f9 0136       | 6  |		.STRTAB	0x0136->0x0494							; "DDB"
03fa 0137       | 7  |		.STRTAB	0x0137->0x0495							; "ARCHIVED_CODE"
03fb 0142       | B  |		.STRTAB	0x0142->0x049c							; "PROGRAM_LIBRARY"
03fc 014f       | O  |		.STRTAB	0x014f->0x04a3							; "NIL"
03fd 0150       | P  |		.STRTAB	0x0150->0x04a5							; "UNKNOWN"
03fe 0155       | U  |		.STRTAB	0x0155->0x04a8							; "WORLD"
03ff 0158       | X  |		.STRTAB	0x0158->0x04ab							; "DIRECTORY"
0400 015f       | _  |		.STRTAB	0x015f->0x04af							; "SUBSYSTEM"
0401 0166       | f  |		.STRTAB	0x0166->0x04b4							; "SPEC_VIEW"
0402 016d       | m  |		.STRTAB	0x016d->0x04b8							; "LOAD_VIEW"
0403 0174       | t  |		.STRTAB	0x0174->0x04bd							; "MAILBOX"
0404 0179       | y  |		.STRTAB	0x0179->0x04c0							; "GENERIC_PROCEDURE"
0405 0188       |    |		.STRTAB	0x0188->0x04c9							; "GENERIC_FUNCTION"
0406 0196       |    |		.STRTAB	0x0196->0x04d1							; "GENERIC_PACKAGE"
0407 01a3       |    |		.STRTAB	0x01a3->0x04d8							; "UNRECOGNIZABLE_GENERIC"
0408 01b7       |    |		.STRTAB	0x01b7->0x04e3							; "PACKAGE_INSTANTIATION"
0409 01ca       |    |		.STRTAB	0x01ca->0x04ee							; "PACKAGE_SPEC"
040a 01d4       |    |		.STRTAB	0x01d4->0x04f4							; "PACKAGE_RENAME"
040b 01e0       |    |		.STRTAB	0x01e0->0x04fb							; "UNRECOGNIZABLE_PACKAGE_SPEC"
040c 01f9       |    |		.STRTAB	0x01f9->0x0508							; "PROCEDURE_INSTANTIATION"
040d 020e       |    |		.STRTAB	0x020e->0x0514							; "PROCEDURE_SPEC"
040e 021a       |    |		.STRTAB	0x021a->0x051b							; "PROCEDURE_RENAME"
040f 0228       | (  |		.STRTAB	0x0228->0x0523							; "UNRECOGNIZABLE_PROCEDURE_SPEC"
0410 0243       | C  |		.STRTAB	0x0243->0x0531							; "FUNCTION_INSTANTIATION"
0411 0257       | W  |		.STRTAB	0x0257->0x053c							; "FUNCTION_SPEC"
0412 0262       | b  |		.STRTAB	0x0262->0x0543							; "FUNCTION_RENAME"
0413 026f       | o  |		.STRTAB	0x026f->0x054a							; "UNRECOGNIZABLE_FUNCTION_SPEC"
0414 0289       |    |		.STRTAB	0x0289->0x0558							; "SUBPROGRAM_INSTANTIATION"
0415 029f       |    |		.STRTAB	0x029f->0x0564							; "SUBPROGRAM_SPEC"
0416 02ac       |    |		.STRTAB	0x02ac->0x056c							; "SUBPROGRAM_RENAME"
0417 02bb       |    |		.STRTAB	0x02bb->0x0574							; "UNRECOGNIZABLE_SUBPROGRAM_SPEC"
0418 02d7       |    |		.STRTAB	0x02d7->0x0583							; "PROCEDURE_BODY"
0419 02e3       |    |		.STRTAB	0x02e3->0x058a							; "FUNCTION_BODY"
041a 02ee       |    |		.STRTAB	0x02ee->0x0591							; "SUBPROGRAM_BODY"
041b 02fb       |    |		.STRTAB	0x02fb->0x0598							; "TASK_BODY"
041c 0302       |    |		.STRTAB	0x0302->0x059d							; "PACKAGE_BODY"
041d 030c       |    |		.STRTAB	0x030c->0x05a3							; "UNRECOGNIZABLE"
041e 0318       |    |		.STRTAB	0x0318->0x05aa							; "STATEMENT_LIST"
041f 0324       | $  |		.STRTAB	0x0324->0x05b1							; "CONTEXT_LIST"
0420 032e       | .  |		.STRTAB	0x032e->0x05b7							; "PRAGMA_LIST"
0421 0337       | 7  |		.STRTAB	0x0337->0x05bc							; "ALTERNATIVE_LIST"
0422 0345       | E  |		.STRTAB	0x0345->0x05c4							; "GENERIC_PARAMETER_LIST"
0423 0359       | Y  |		.STRTAB	0x0359->0x05cf							; "COMPILATION_UNIT"
0424 0367       | g  |		.STRTAB	0x0367->0x05d7							; "DECLARATION_LIST"
0425 0375       | u  |		.STRTAB	0x0375->0x05df							; "NONTERMINAL"
0426 037e       | ~  |		.STRTAB	0x037e->0x05e5							; "TEXT"
0427 0380       |    |		.STRTAB	0x0380->0x05e7							; "BINARY"
0428 0384       |    |		.STRTAB	0x0384->0x05ea							; "BYTE_ALIGNED"
0429 038e       |    |		.STRTAB	0x038e->0x05f0							; "LOG"
042a 038f       |    |		.STRTAB	0x038f->0x05f1							; "ACTIVITY"
042b 0395       |    |		.STRTAB	0x0395->0x05f5							; "SWITCH"
042c 0399       |    |		.STRTAB	0x0399->0x05f8							; "SEARCH_LIST"
042d 03a2       |    |		.STRTAB	0x03a2->0x05fe							; "OBJECT_SET"
042e 03aa       |    |		.STRTAB	0x03aa->0x0603							; "CODE_DATABASE"
042f 03b5       |    |		.STRTAB	0x03b5->0x0609							; "POSTSCRIPT"
0430 03bd       |    |		.STRTAB	0x03bd->0x060e							; "SWITCH_DEFINITION"
0431 03cc       |    |		.STRTAB	0x03cc->0x0617							; "PURE_ELEMENT_FILE_MAP"
0432 03df       |    |		.STRTAB	0x03df->0x0621							; "MAIL"
0433 03e1       |    |		.STRTAB	0x03e1->0x0623							; "TEMPORARY"
0434 03e8       |    |		.STRTAB	0x03e8->0x0628							; "MAIN_PROCEDURE_SPEC"
0435 03f9       |    |		.STRTAB	0x03f9->0x0631							; "MAIN_PROCEDURE_BODY"
0436 040a       |    |		.STRTAB	0x040a->0x063b							; "MAIN_FUNCTION_SPEC"
0437 041a       |    |		.STRTAB	0x041a->0x0644							; "MAIN_FUNCTION_BODY"
0438 042a       | *  |		.STRTAB	0x042a->0x064d							; "DICTIONARY"
0439 0432       | 2  |		.STRTAB	0x0432->0x0652							; "COMPATIBILITY_DATABASE"
043a 0446       | F  |		.STRTAB	0x0446->0x065d							; "LOADED_PROCEDURE_SPEC"
043b 0459       | Y  |		.STRTAB	0x0459->0x0667							; "LOADED_FUNCTION_SPEC"
043c 046b       | k  |		.STRTAB	0x046b->0x0671							; "SPEC_LOAD_SUBSYSTEM"
043d 047c       | |  |		.STRTAB	0x047c->0x067b							; "COMBINED_SUBSYSTEM"
043e 048c       |    |		.STRTAB	0x048c->0x0684							; "COMBINED_VIEW"
043f 0497       |    |		.STRTAB	0x0497->0x068a							; "MAIL_DATABASE"
0440 04a2       |    |		.STRTAB	0x04a2->0x0691							; "OUTGOING_MAIL_MESSAGE"
0441 04b5       |    |		.STRTAB	0x04b5->0x069b							; "INCOMING_MAIL_MESSAGE"
0442 04c8       |    |		.STRTAB	0x04c8->0x06a6							; "CMVC_DATABASE"
0443 04d3       |    |		.STRTAB	0x04d3->0x06ac							; "DOCUMENT_DATABASE"
0444 04e2       |    |		.STRTAB	0x04e2->0x06b5							; "CONFIGURATION"
0445 04ed       |    |		.STRTAB	0x04ed->0x06bb							; "VENTURE"
0446 04f2       |    |		.STRTAB	0x04f2->0x06bf							; "WORK_ORDER"
0447 04fa       |    |		.STRTAB	0x04fa->0x06c4							; "WORK_ORDER_LIST"
0448 0507       |    |		.STRTAB	0x0507->0x06cb							; "SYSTEM_VIEW"
0449 0510       |    |		.STRTAB	0x0510->0x06d1							; "SYSTEM_SUBSYSTEM"
044a 051e       |    |		.STRTAB	0x051e->0x06d9							; "OBJECT_CODE"
044b 0527       | '  |		.STRTAB	0x0527->0x06de							; "EXECUTABLE_CODE"
044c 0534       | 4  |		.STRTAB	0x0534->0x06e6							; "CMVC_ACCESS"
044d 053d       | =  |		.STRTAB	0x053d->0x06eb							; "ELEMENT_CACHE"
044e 0548       | H  |		.STRTAB	0x0548->0x06f2							; "DESIGN_INFO"
044f 0551       | Q  |		.STRTAB	0x0551->0x06f7							; "MARKUP"
0450 0555       | U  |		.STRTAB	0x0555->0x06fa							; "REMOTE_DOCUMENT"
0451 0562       | b  |		.STRTAB	0x0562->0x0702							; "REMOTE_TEXT"
0452 056b       | k  |		.STRTAB	0x056b->0x0707							; "REMOTE_POSTSCRIPT"
0453 057a       | z  |		.STRTAB	0x057a->0x0710							; "REMOTE_DOCUMENT_SET"
0454 058b       |    |		.STRTAB	0x058b->0x0719							; "DIAGRAM"
0455 0590       |    |		.STRTAB	0x0590->0x071d							; "NIL"
0456 0591       |    |		.STRTAB	0x0591->0x071e							; "ADA"
0457 0592       |    |		.STRTAB	0x0592->0x0720							; "TEXT"
0458 0594       |    |		.STRTAB	0x0594->0x0722							; "MAIL"
0459 0596       |    |		.STRTAB	0x0596->0x0724							; "LINKS"
045a 0599       |    |		.STRTAB	0x0599->0x0726							; "LIBRARY"
045b 059e       |    |		.STRTAB	0x059e->0x072a							; "CMVC"
045c 05a0       |    |		.STRTAB	0x05a0->0x072c							; "SWITCH"
045d 05a4       |    |		.STRTAB	0x05a4->0x072f							; "ACTIVITY"
045e 05aa       |    |		.STRTAB	0x05aa->0x0733							; "WINDOWS"
045f 05af       |    |		.STRTAB	0x05af->0x0736							; "WORK_ORDER"
0460 05b7       |    |		.STRTAB	0x05b7->0x073b							; "VENTURE"
0461 05bc       |    |		.STRTAB	0x05bc->0x073f							; "COMMAND"
0462 05c1       |    |		.STRTAB	0x05c1->0x0742							; "GATEWAY"
0463 05c6       |    |		.STRTAB	0x05c6->0x0746							; "SEARCHLIST"
0464 05ce       |    |		.STRTAB	0x05ce->0x074b							; "DIANA_OE"
0465 05d4       |    |		.STRTAB	0x05d4->0x074f							; "OTHER"
0466 05d7       |    |		.STRTAB	0x05d7->0x0751							; "!Users."
0467 05dc       |    |		.STRTAB	0x05dc->0x0755							; "<image>.$"
0468 05e3       |    |		.STRTAB	0x05e3->0x0759							; "$"
0469 05e2       |    |		.STRTAB	0x05e2->0x075a							; "<cursor>.$"
046a 05ea       |    |		.STRTAB	0x05ea->0x075f							; "true"
046b 05ec       |    |		.STRTAB	0x05ec->0x0761							; "false"
046c 05ef       |    |		.STRTAB	0x05ef->0x0763							; "<>"
046d 05ef       |    |		.STREND 0x05ef->0x0764
046e 4e49 4c41  |NILA|		.STRTAB_STRINGS
0765 0000 0000  |    |		.XXX[0x3]
0767 0000       |    |
0768 ; --------------------------------------------------------------------------------------
0768 ; Debug Table
0768 ; --------------------------------------------------------------------------------------
0768 0004 0011  |    |		.DEBUG4	0x0004,0x0011,0xb90b,0x0000,0x0001,0x0000
076e 415a bc05  |AZ  |		.XXX[0x92]
0770 935e 4b7f  | ^K |
0772 5cd0 6e81  |\ n |
0774 ab34 1861  | 4 a|
0776 42cc 0483  |B   |
0778 4db2 0318  |M   |
077a d46d 020b  | m  |
077c 3418 a1a3  |4   |
077e 2403 6003  |$ ` |
0780 b5a4 db00  |    |
0782 366c 3602  |6l6 |
0784 6d98 0e62  |m  b|
0786 a76c 01ab  | l  |
0788 acdb 0302  |    |
078a e836 82f1  | 6  |
078c b80f 6305  |  c |
078e 9001 b603  |    |
0790 e1d4 6c01  |  l |
0792 6374 1ae1  |ct  |
0794 7edc 07c3  |~   |
0796 4db6 03a5  |M   |
0798 d46f 0133  | o 3|
079a b41b 4132  |  A2|
079c ec07 6359  |  cY|
079e ba00 2284  |  " |
07a0 3300 3742  |3 7B|
07a2 c5d8 0cf2  |    |
07a4 b374 0249  | t I|
07a6 a4dc 0317  |    |
07a8 6837 0291  |h7  |
07aa d80e 72ab  |  r |
07ac 7c02 e8b0  ||   |
07ae 6700 6e83  |g n |
07b0 709b 3679  |p 6y|
07b2 2efc 045b  |.  [|
07b4 5c12 ff5f  |\  _|
07b6 d06d 018b  | m  |
07b8 f41b c14a  |   J|
07ba fc06 5351  |  SQ|
07bc be03 bfd4  |    |
07be 6c00 c034  |l  4|
07c0 1f03 d724  |   $|
07c2 0380 001a  |    |
07c4 d5cf d9f8  |    |
07c6 683b c28a  |h;  |
07c8 180e 3299  |  2 |
07ca e562 bda4  | b  |
07cc 89b4 f3ec  |    |
07ce d3f4 870d  |    |
07d0 300e 017f  |0   |
07d2 4cb1 41f3  |L A |
07d4 da23 6802  | #h |
07d6 333f b96b  |3? k|
07d8 1c05 51bc  |  Q |
07da ca00 e000  |    |
07dc 88ed fe03  |    |
07de 3f99 6f1c  |? o |
07e0 0761 0405  | a  |
07e2 b766 d471  | f q|
07e4 00cc b41d  |    |
07e6 4134 4d04  |A4M |
07e8 b751 c801  | Q  |
07ea 4a7c 3100  |J|1 |
07ec 3882 9258  |8  X|
07ee 0f82 9794  |    |
07f0 03dd ace4  |    |
07f2 0315 683b  |  h;|
07f4 02be 580f  |  X |
07f6 e297 9400  |    |
07f8 d5ac fb85  |    |
07fa ade8 3802  |  8 |
07fc 779a 0a3a  |w  :|
07fe d2c7 49ce  |  I |