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

⟦8a72d5712⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0750       | P  |		.CONST	0x0750								; 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 0130       | 0  |		.CONST	0x0130								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0040       | @  |		.CONST	0x0040								; Number of locals
000b			INIT_0008:
000b 00c4       |    |		Action	Make_Default
000c 00c4       |    |		Action	Make_Default
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 00c4       |    |		Action	Make_Default
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 00c4       |    |		Action	Make_Default
0031 00c4       |    |		Action	Make_Default
0032 00c4       |    |		Action	Make_Default
0033 00c4       |    |		Action	Make_Default
0034 00c4       |    |		Action	Make_Default
0035 00c4       |    |		Action	Make_Default
0036 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated
0038 c230       | 0  |		Store	0x1,0x30
0039 00e2       |    |		Load_Encached	Integer_Cache
003a 0129       | )  |		Execute	Any,Make_Visible
003b c20e       |    |		Store	0x1,0xe
003c 00e2       |    |		Load_Encached	Integer_Cache
003d 0129       | )  |		Execute	Any,Make_Visible
003e c20f       |    |		Store	0x1,0xf
003f 00e2       |    |		Load_Encached	Integer_Cache
0040 0129       | )  |		Execute	Any,Make_Visible
0041 c210       |    |		Store	0x1,0x10
0042 00e2       |    |		Load_Encached	Integer_Cache
0043 0129       | )  |		Execute	Any,Make_Visible
0044 c211       |    |		Store	0x1,0x11
0045 00e2       |    |		Load_Encached	Integer_Cache
0046 0129       | )  |		Execute	Any,Make_Visible
0047 c212       |    |		Store	0x1,0x12
0048 00e2       |    |		Load_Encached	Integer_Cache
0049 0129       | )  |		Execute	Any,Make_Visible
004a c231       | 1  |		Store	0x1,0x31
004b 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated
004d c213       |    |		Store	0x1,0x13
004e 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated
0050 c214       |    |		Store	0x1,0x14
0051 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
0053 c215       |    |		Store	0x1,0x15
0054 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated
0056 c216       |    |		Store	0x1,0x16
0057 029a 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Visible,Unelaborated
0059 c217       |    |		Store	0x1,0x17
005a 029a 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call,Visible,Unelaborated
005c c232       | 2  |		Store	0x1,0x32
005d 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated
005f c218       |    |		Store	0x1,0x18
0060 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
0062 c219       |    |		Store	0x1,0x19
0063 029a 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call,Visible,Unelaborated
0065 c21a       |    |		Store	0x1,0x1a
0066 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated
0068 c21b       |    |		Store	0x1,0x1b
0069 029a 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call,Visible,Unelaborated
006b c21c       |    |		Store	0x1,0x1c
006c 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated
006e c233       | 3  |		Store	0x1,0x33
006f 029a 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call,Visible,Unelaborated
0071 c21d       |    |		Store	0x1,0x1d
0072 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated
0074 c21e       |    |		Store	0x1,0x1e
0075 029a 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Visible,Unelaborated
0077 c21f       |    |		Store	0x1,0x1f
0078 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
007a c220       |    |		Store	0x1,0x20
007b 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
007d c221       | !  |		Store	0x1,0x21
007e 029a 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Visible,Unelaborated
0080 c234       | 4  |		Store	0x1,0x34
0081 00e9       |    |		Load_Encached	String_Cache
0082 02a0       |    |		Declare_Subprogram	Null_Subprogram
0083 4818       |H   |		Short_Literal	0x18
0084 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0085 c222       | "  |		Store	0x1,0x22
0086 e001       |    |		Load	0x0,0x1
0087 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0088 00e3       |    |		Load_Encached	Natural_Cache
0089 00e1       |    |		Load_Encached	Boolean_Cache
008a 00e1       |    |		Load_Encached	Boolean_Cache
008b 02a0       |    |		Declare_Subprogram	Null_Subprogram
008c 4804       |H   |		Short_Literal	0x4
008d 032e       | .  |		Declare_Type	Record,Defined,Visible
008e c223       | #  |		Store	0x1,0x23
008f e001       |    |		Load	0x0,0x1
0090 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0091 00e7       |    |		Load_Encached	Duration_Cache
0092 e222       | "  |		Load	0x1,0x22
0093 00d8       |    |		Load_Top	At_Offset_0
0094 02a0       |    |		Declare_Subprogram	Null_Subprogram
0095 4804       |H   |		Short_Literal	0x4
0096 032e       | .  |		Declare_Type	Record,Defined,Visible
0097 c224       | $  |		Store	0x1,0x24
0098 4800       |H   |		Short_Literal	0x0
0099 4803       |H   |		Short_Literal	0x3
009a 029f 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Call
009c 03fe       |    |		Declare_Type	Discrete,Defined,Visible
009d c225       | %  |		Store	0x1,0x25
009e e001       |    |		Load	0x0,0x1
009f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00a0 e222       | "  |		Load	0x1,0x22
00a1 e225       | %  |		Load	0x1,0x25
00a2 02a0       |    |		Declare_Subprogram	Null_Subprogram
00a3 4803       |H   |		Short_Literal	0x3
00a4 032e       | .  |		Declare_Type	Record,Defined,Visible
00a5 c226       | &  |		Store	0x1,0x26
00a6 4800       |H   |		Short_Literal	0x0
00a7 4804       |H   |		Short_Literal	0x4
00a8 029f 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Call
00aa 03fe       |    |		Declare_Type	Discrete,Defined,Visible
00ab c227       | '  |		Store	0x1,0x27
00ac e001       |    |		Load	0x0,0x1
00ad 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00ae e222       | "  |		Load	0x1,0x22
00af e227       | '  |		Load	0x1,0x27
00b0 02a0       |    |		Declare_Subprogram	Null_Subprogram
00b1 4803       |H   |		Short_Literal	0x3
00b2 032e       | .  |		Declare_Type	Record,Defined,Visible
00b3 c228       | (  |		Store	0x1,0x28
00b4 e001       |    |		Load	0x0,0x1
00b5 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00b6 4828       |H(  |		Short_Literal	0x28
00b7 e002       |    |		Load	0x0,0x2
00b8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00b9 1c07       |    |		Execute_Immediate	Run_Utility,0x7
00ba 0129       | )  |		Execute	Any,Make_Visible
00bb 00e7       |    |		Load_Encached	Duration_Cache
00bc 00e3       |    |		Load_Encached	Natural_Cache
00bd 00e3       |    |		Load_Encached	Natural_Cache
00be e222       | "  |		Load	0x1,0x22
00bf 029f 062b  |   +|		Declare_Subprogram	INIT_0628,For_Call
00c1 4806       |H   |		Short_Literal	0x6
00c2 032e       | .  |		Declare_Type	Record,Defined,Visible
00c3 c22f       | /  |		Store	0x1,0x2f
00c4 e001       |    |		Load	0x0,0x1
00c5 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00c6 4828       |H(  |		Short_Literal	0x28
00c7 e002       |    |		Load	0x0,0x2
00c8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00c9 1c07       |    |		Execute_Immediate	Run_Utility,0x7
00ca 0129       | )  |		Execute	Any,Make_Visible
00cb e001       |    |		Load	0x0,0x1
00cc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00cd e001       |    |		Load	0x0,0x1
00ce 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00cf 4814       |H   |		Short_Literal	0x14
00d0 e002       |    |		Load	0x0,0x2
00d1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00d2 1c07       |    |		Execute_Immediate	Run_Utility,0x7
00d3 0129       | )  |		Execute	Any,Make_Visible
00d4 029f 064b  |   K|		Declare_Subprogram	INIT_0648,For_Call
00d6 4805       |H   |		Short_Literal	0x5
00d7 032e       | .  |		Declare_Type	Record,Defined,Visible
00d8 c237       | 7  |		Store	0x1,0x37
00d9 029a 02f3  |    |		Declare_Subprogram	INIT_02f0,For_Outer_Call,Visible,Unelaborated
00db c22a       | *  |		Store	0x1,0x2a
00dc 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated
00de c22b       | +  |		Store	0x1,0x2b
00df 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated
00e1 c22c       | ,  |		Store	0x1,0x2c
00e2 029a 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call,Visible,Unelaborated
00e4 c22d       | -  |		Store	0x1,0x2d
00e5 029a 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Visible,Unelaborated
00e7 c22e       | .  |		Store	0x1,0x2e
00e8 029a 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call,Visible,Unelaborated
00ea c236       | 6  |		Store	0x1,0x36
00eb 00bf       |    |		Action	Accept_Activation
00ec 00e3       |    |		Load_Encached	Natural_Cache
00ed 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00ee 00e1       |    |		Load_Encached	Boolean_Cache
00ef 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00f0 00e1       |    |		Load_Encached	Boolean_Cache
00f1 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00f2 00e1       |    |		Load_Encached	Boolean_Cache
00f3 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00f4 00e1       |    |		Load_Encached	Boolean_Cache
00f5 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00f6 00e3       |    |		Load_Encached	Natural_Cache
00f7 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00f8 029d 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call
00fa 029d 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call
00fc 029d 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call
00fe 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
00ff 00c7       |    |		Action	Elaborate_Subprogram
0100 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0101 00c7       |    |		Action	Elaborate_Subprogram
0102 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0103 00c7       |    |		Action	Elaborate_Subprogram
0104 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0105 00c7       |    |		Action	Elaborate_Subprogram
0106 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0107 00c7       |    |		Action	Elaborate_Subprogram
0108 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0109 00c7       |    |		Action	Elaborate_Subprogram
010a 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
010b 00c7       |    |		Action	Elaborate_Subprogram
010c 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
010d 00c7       |    |		Action	Elaborate_Subprogram
010e 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
010f 00c7       |    |		Action	Elaborate_Subprogram
0110 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0111 00c7       |    |		Action	Elaborate_Subprogram
0112 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0113 00c7       |    |		Action	Elaborate_Subprogram
0114 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0115 00c7       |    |		Action	Elaborate_Subprogram
0116 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
0117 00c7       |    |		Action	Elaborate_Subprogram
0118 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0119 00c7       |    |		Action	Elaborate_Subprogram
011a 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
011b 00c7       |    |		Action	Elaborate_Subprogram
011c 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
011d 00c7       |    |		Action	Elaborate_Subprogram
011e 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
011f 00c7       |    |		Action	Elaborate_Subprogram
0120 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0121 00c7       |    |		Action	Elaborate_Subprogram
0122 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
0123 00c7       |    |		Action	Elaborate_Subprogram
0124 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
0125 00c7       |    |		Action	Elaborate_Subprogram
0126 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
0127 00c7       |    |		Action	Elaborate_Subprogram
0128 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
0129 00c7       |    |		Action	Elaborate_Subprogram
012a 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
012b 00c7       |    |		Action	Elaborate_Subprogram
012c 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
012d 00c7       |    |		Action	Elaborate_Subprogram
012e 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
012f 00c7       |    |		Action	Elaborate_Subprogram
0130			BODY_0008:
0130 00bc       |    |		Action	Signal_Activated
0131 00bb       |    |		Action	Signal_Completion
0132 0000 0000  |    |		.BLANK	0000[0x6]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 016f       | o  |		.CONST	0x016f								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 000f       |    |		.CONST	0x000f								; Number of locals
013b			INIT_0138:
013b e001       |    |		Load	0x0,0x1
013c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
013d 0322       | "  |		Declare_Variable	Record
013e e001       |    |		Load	0x0,0x1
013f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0140 0322       | "  |		Declare_Variable	Record
0141 e001       |    |		Load	0x0,0x1
0142 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0143 0322       | "  |		Declare_Variable	Record
0144 e001       |    |		Load	0x0,0x1
0145 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0146 e404       |    |		Load	0x2,0x4
0147 017d       | }  |		Execute	Record,Structure_Write
0148 e003       |    |		Load	0x0,0x3
0149 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014a e004       |    |		Load	0x0,0x4
014b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
014c 02c7       |    |		Declare_Variable	Any
014d 00d8       |    |		Load_Top	At_Offset_0
014e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
014f e001       |    |		Load	0x0,0x1
0150 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0151 0322       | "  |		Declare_Variable	Record
0152 e001       |    |		Load	0x0,0x1
0153 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0154 e407       |    |		Load	0x2,0x7
0155 017d       | }  |		Execute	Record,Structure_Write
0156 e001       |    |		Load	0x0,0x1
0157 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0158 0322       | "  |		Declare_Variable	Record
0159 e001       |    |		Load	0x0,0x1
015a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
015b e408       |    |		Load	0x2,0x8
015c 017d       | }  |		Execute	Record,Structure_Write
015d e001       |    |		Load	0x0,0x1
015e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
015f 0322       | "  |		Declare_Variable	Record
0160 e001       |    |		Load	0x0,0x1
0161 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0162 e409       |    |		Load	0x2,0x9
0163 017d       | }  |		Execute	Record,Structure_Write
0164 00e7       |    |		Load_Encached	Duration_Cache
0165 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0166 e005       |    |		Load	0x0,0x5
0167 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0168 00e1       |    |		Load_Encached	Boolean_Cache
0169 029f 0393  |    |		Declare_Subprogram	INIT_0390,For_Call
016b 029f 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Call
016d 029f 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Call
016f			BODY_0138:
016f 840d       |    |		Call	0x2,0xd
0170 840e       |    |		Call	0x2,0xe
0171 e5fd       |    |		Load	0x2,-0x3
0172 e403       |    |		Load	0x2,0x3
0173 e001       |    |		Load	0x0,0x1
0174 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0175 e402       |    |		Load	0x2,0x2
0176 e001       |    |		Load	0x0,0x1
0177 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0178 e003       |    |		Load	0x0,0x3
0179 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
017a e406       |    |		Load	0x2,0x6
017b e003       |    |		Load	0x0,0x3
017c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
017d e003       |    |		Load	0x0,0x3
017e 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
017f c405       |    |		Store	0x2,0x5
0180 c406       |    |		Store	0x2,0x6
0181 e006       |    |		Load	0x0,0x6
0182 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0183 e007       |    |		Load	0x0,0x7
0184 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0185 e008       |    |		Load	0x0,0x8
0186 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0187 e009       |    |		Load	0x0,0x9
0188 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0189 e00a       |    |		Load	0x0,0xa
018a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
018b e00b       |    |		Load	0x0,0xb
018c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
018d 00cf       |    |		Action	Mark_Auxiliary
018e 7808       |x   |		Jump	0x197
018f 840f       |    |		Call	0x2,0xf
0190 e406       |    |		Load	0x2,0x6
0191 e405       |    |		Load	0x2,0x5
0192 e003       |    |		Load	0x0,0x3
0193 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0194 c405       |    |		Store	0x2,0x5
0195 c406       |    |		Store	0x2,0x6
0196 00c9       |    |		Action	Pop_Auxiliary_Loop
0197 e405       |    |		Load	0x2,0x5
0198 e003       |    |		Load	0x0,0x3
0199 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
019a 6ff4       |o   |		Jump_Zero	0x18f
019b 00ce       |    |		Action	Pop_Auxiliary
019c e407       |    |		Load	0x2,0x7
019d e001       |    |		Load	0x0,0x1
019e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
019f e408       |    |		Load	0x2,0x8
01a0 e00c       |    |		Load	0x0,0xc
01a1 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01a2 e00d       |    |		Load	0x0,0xd
01a3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01a4 a5fc       |    |		Store_Unchecked	0x2,-0x4
01a5 e5fb       |    |		Load	0x2,-0x5
01a6 e004       |    |		Load	0x0,0x4
01a7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01a8 c5fb       |    |		Store	0x2,-0x5
01a9 e00e       |    |		Load	0x0,0xe
01aa 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01ab 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01ac 0000 0000  |    |		.BLANK	0000[0x4]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 e009       |    |		Load	0x0,0x9
01b4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01b5 e009       |    |		Load	0x0,0x9
01b6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01b7 c5ff       |    |		Store	0x2,-0x1
01b8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01b9 0000 0000  |    |		.BLANK	0000[0x7]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3       |    |		.CONST	0x01c3								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0001       |    |		.CONST	0x0001								; Number of locals
01c3			BODY_01c0:
01c3			INIT_01c0:
01c3 e00a       |    |		Load	0x0,0xa
01c4 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
01c5 e00a       |    |		Load	0x0,0xa
01c6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01c7 c5ff       |    |		Store	0x2,-0x1
01c8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01c9 0000 0000  |    |		.BLANK	0000[0x7]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 e007       |    |		Load	0x0,0x7
01d4 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01d5 e007       |    |		Load	0x0,0x7
01d6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01d7 c5ff       |    |		Store	0x2,-0x1
01d8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01d9 0000 0000  |    |		.BLANK	0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3       |    |		.CONST	0x01e3								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0001       |    |		.CONST	0x0001								; Number of locals
01e3			BODY_01e0:
01e3			INIT_01e0:
01e3 e008       |    |		Load	0x0,0x8
01e4 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
01e5 e008       |    |		Load	0x0,0x8
01e6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01e7 c5ff       |    |		Store	0x2,-0x1
01e8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01e9 0000 0000  |    |		.BLANK	0000[0x7]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 e006       |    |		Load	0x0,0x6
01f4 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
01f5 e006       |    |		Load	0x0,0x6
01f6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01f7 c5ff       |    |		Store	0x2,-0x1
01f8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01f9 0000 0000  |    |		.BLANK	0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 e00b       |    |		Load	0x0,0xb
0204 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0205 e00b       |    |		Load	0x0,0xb
0206 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0207 c5ff       |    |		Store	0x2,-0x1
0208 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0209 0000 0000  |    |		.BLANK	0000[0x7]
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 e5ff       |    |		Load	0x2,-0x1
0214 e009       |    |		Load	0x0,0x9
0215 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0216 025e       | ^  |		Execute	Discrete,Convert
0217 e009       |    |		Load	0x0,0x9
0218 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0219 c5ff       |    |		Store	0x2,-0x1
021a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
021b 0000 0000  |    |		.BLANK	0000[0x5]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 e5ff       |    |		Load	0x2,-0x1
0224 e00a       |    |		Load	0x0,0xa
0225 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0226 025e       | ^  |		Execute	Discrete,Convert
0227 e00a       |    |		Load	0x0,0xa
0228 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0229 c5ff       |    |		Store	0x2,-0x1
022a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
022b 0000 0000  |    |		.BLANK	0000[0x5]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233       | 3  |		.CONST	0x0233								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0001       |    |		.CONST	0x0001								; Number of locals
0233			BODY_0230:
0233			INIT_0230:
0233 e5ff       |    |		Load	0x2,-0x1
0234 e007       |    |		Load	0x0,0x7
0235 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0236 025e       | ^  |		Execute	Discrete,Convert
0237 e007       |    |		Load	0x0,0x7
0238 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0239 c5ff       |    |		Store	0x2,-0x1
023a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
023b 0000 0000  |    |		.BLANK	0000[0x5]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243       | C  |		.CONST	0x0243								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0001       |    |		.CONST	0x0001								; Number of locals
0243			BODY_0240:
0243			INIT_0240:
0243 e5ff       |    |		Load	0x2,-0x1
0244 e008       |    |		Load	0x0,0x8
0245 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0246 025e       | ^  |		Execute	Discrete,Convert
0247 e008       |    |		Load	0x0,0x8
0248 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0249 c5ff       |    |		Store	0x2,-0x1
024a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
024b 0000 0000  |    |		.BLANK	0000[0x5]
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 e5ff       |    |		Load	0x2,-0x1
0254 e006       |    |		Load	0x0,0x6
0255 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0256 025e       | ^  |		Execute	Discrete,Convert
0257 e006       |    |		Load	0x0,0x6
0258 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0259 c5ff       |    |		Store	0x2,-0x1
025a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
025b 0000 0000  |    |		.BLANK	0000[0x5]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263       | c  |		.CONST	0x0263								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0001       |    |		.CONST	0x0001								; Number of locals
0263			BODY_0260:
0263			INIT_0260:
0263 e5ff       |    |		Load	0x2,-0x1
0264 e00b       |    |		Load	0x0,0xb
0265 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0266 025e       | ^  |		Execute	Discrete,Convert
0267 e00b       |    |		Load	0x0,0xb
0268 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0269 c5ff       |    |		Store	0x2,-0x1
026a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
026b 0000 0000  |    |		.BLANK	0000[0x5]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 e5ff       |    |		Load	0x2,-0x1
0274 e009       |    |		Load	0x0,0x9
0275 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0276 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0277 0000       |    |		.XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b       | {  |		.CONST	0x027b								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0001       |    |		.CONST	0x0001								; Number of locals
027b			BODY_0278:
027b			INIT_0278:
027b e5ff       |    |		Load	0x2,-0x1
027c e00a       |    |		Load	0x0,0xa
027d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
027e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
027f 0000       |    |		.XXX[0x1]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283       |    |		.CONST	0x0283								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0001       |    |		.CONST	0x0001								; Number of locals
0283			BODY_0280:
0283			INIT_0280:
0283 e5ff       |    |		Load	0x2,-0x1
0284 e007       |    |		Load	0x0,0x7
0285 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0286 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0287 0000       |    |		.XXX[0x1]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b e5ff       |    |		Load	0x2,-0x1
028c e008       |    |		Load	0x0,0x8
028d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
028e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
028f 0000       |    |		.XXX[0x1]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 e5ff       |    |		Load	0x2,-0x1
0294 e006       |    |		Load	0x0,0x6
0295 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0296 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0297 0000       |    |		.XXX[0x1]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b       |    |		.CONST	0x029b								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0001       |    |		.CONST	0x0001								; Number of locals
029b			BODY_0298:
029b			INIT_0298:
029b e5ff       |    |		Load	0x2,-0x1
029c e00b       |    |		Load	0x0,0xb
029d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
029e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029f 0000       |    |		.XXX[0x1]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 4607       |F   |		Jump_Case	0x8
02a4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
02a5 7806       |x   |		Jump	0x2ac								; case 0x1
02a6 7809       |x   |		Jump	0x2b0								; case 0x2
02a7 780d       |x   |		Jump	0x2b5								; case 0x3
02a8 7810       |x   |		Jump	0x2b9								; case 0x4
02a9 7811       |x   |		Jump	0x2bb								; case 0x5
02aa 7812       |x   |		Jump	0x2bd								; case 0x6
02ab 7815       |x   |		Jump	0x2c1								; case 0x7
02ac 00da       |    |		Load_Top	At_Offset_2
02ad 0091 066a  |   j|		Action	Push_String_Extended_Indexed,0x66a				; "USER_OPERATION"
02af 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
02b0 00db       |    |		Load_Top	At_Offset_3
02b1 00db       |    |		Load_Top	At_Offset_3
02b2 00e0       |    |		Load_Encached	Standard_Cache
02b3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02b4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02b5 00da       |    |		Load_Top	At_Offset_2
02b6 00e0       |    |		Load_Encached	Standard_Cache
02b7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02b8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
02b9 00db       |    |		Load_Top	At_Offset_3
02ba 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02bb 00db       |    |		Load_Top	At_Offset_3
02bc 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02bd e225       | %  |		Load	0x1,0x25
02be 00dc       |    |		Load_Top	At_Offset_4
02bf 0267       | g  |		Execute	Discrete,Predecessor
02c0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02c1 e225       | %  |		Load	0x1,0x25
02c2 00dc       |    |		Load_Top	At_Offset_4
02c3 0268       | h  |		Execute	Discrete,Successor
02c4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02c5 0000 0000  |    |		.XXX[0x3]
02c7 0000       |    |
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb       |    |		.CONST	0x02cb								; Address of begin
02c9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ca 0001       |    |		.CONST	0x0001								; Number of locals
02cb			BODY_02c8:
02cb			INIT_02c8:
02cb 4607       |F   |		Jump_Case	0x8
02cc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
02cd 7806       |x   |		Jump	0x2d4								; case 0x1
02ce 7809       |x   |		Jump	0x2d8								; case 0x2
02cf 780d       |x   |		Jump	0x2dd								; case 0x3
02d0 7810       |x   |		Jump	0x2e1								; case 0x4
02d1 7811       |x   |		Jump	0x2e3								; case 0x5
02d2 7812       |x   |		Jump	0x2e5								; case 0x6
02d3 7815       |x   |		Jump	0x2e9								; case 0x7
02d4 00da       |    |		Load_Top	At_Offset_2
02d5 0091 066e  |   n|		Action	Push_String_Extended_Indexed,0x66e				; "DISK"
02d7 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
02d8 00db       |    |		Load_Top	At_Offset_3
02d9 00db       |    |		Load_Top	At_Offset_3
02da 00e0       |    |		Load_Encached	Standard_Cache
02db 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02dc 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02dd 00da       |    |		Load_Top	At_Offset_2
02de 00e0       |    |		Load_Encached	Standard_Cache
02df 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02e0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
02e1 00db       |    |		Load_Top	At_Offset_3
02e2 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02e3 00db       |    |		Load_Top	At_Offset_3
02e4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02e5 e227       | '  |		Load	0x1,0x27
02e6 00dc       |    |		Load_Top	At_Offset_4
02e7 0267       | g  |		Execute	Discrete,Predecessor
02e8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02e9 e227       | '  |		Load	0x1,0x27
02ea 00dc       |    |		Load_Top	At_Offset_4
02eb 0268       | h  |		Execute	Discrete,Successor
02ec 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
02ed 0000 0000  |    |		.XXX[0x3]
02ef 0000       |    |
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3       |    |		.CONST	0x02f3								; Address of begin
02f1 0004       |    |		.CONST	0x0004								; Address of exception handler
02f2 0001       |    |		.CONST	0x0001								; Number of locals
02f3			BODY_02f0:
02f3			INIT_02f0:
02f3 e5ff       |    |		Load	0x2,-0x1
02f4 e009       |    |		Load	0x0,0x9
02f5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02f6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f7 0000       |    |		.XXX[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 e5ff       |    |		Load	0x2,-0x1
02fc e00a       |    |		Load	0x0,0xa
02fd 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02fe 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ff 0000       |    |		.XXX[0x1]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303       |    |		.CONST	0x0303								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0001       |    |		.CONST	0x0001								; Number of locals
0303			BODY_0300:
0303			INIT_0300:
0303 e5ff       |    |		Load	0x2,-0x1
0304 e007       |    |		Load	0x0,0x7
0305 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0306 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0307 0000       |    |		.XXX[0x1]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b e5ff       |    |		Load	0x2,-0x1
030c e008       |    |		Load	0x0,0x8
030d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
030e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030f 0000       |    |		.XXX[0x1]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 e5ff       |    |		Load	0x2,-0x1
0314 e006       |    |		Load	0x0,0x6
0315 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0316 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0317 0000       |    |		.XXX[0x1]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031b       |    |		.CONST	0x031b								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0001       |    |		.CONST	0x0001								; Number of locals
031b			BODY_0318:
031b			INIT_0318:
031b e5ff       |    |		Load	0x2,-0x1
031c e00b       |    |		Load	0x0,0xb
031d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
031e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
031f 0000       |    |		.XXX[0x1]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0329       | )  |		.CONST	0x0329								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0002       |    |		.CONST	0x0002								; Number of locals
0323			INIT_0320:
0323 e001       |    |		Load	0x0,0x1
0324 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0325 0322       | "  |		Declare_Variable	Record
0326 e5ff       |    |		Load	0x2,-0x1
0327 e402       |    |		Load	0x2,0x2
0328 017d       | }  |		Execute	Record,Structure_Write
0329			BODY_0320:
0329 4800       |H   |		Short_Literal	0x0
032a e402       |    |		Load	0x2,0x2
032b 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
032c 4800       |H   |		Short_Literal	0x0
032d e402       |    |		Load	0x2,0x2
032e 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
032f 00d8       |    |		Load_Top	At_Offset_0
0330 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0331 0000 0000  |    |		.BLANK	0000[0x7]
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 e5fe       |    |		Load	0x2,-0x2
033c e001       |    |		Load	0x0,0x1
033d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
033e e5ff       |    |		Load	0x2,-0x1
033f e001       |    |		Load	0x0,0x1
0340 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0341 e00d       |    |		Load	0x0,0xd
0342 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0343 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0344 0000 0000  |    |		.BLANK	0000[0x4]
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 00e2       |    |		Load_Encached	Integer_Cache
034c 03e9       |    |		Declare_Variable	Discrete,Duplicate
034d			BODY_0348:
034d 4800       |H   |		Short_Literal	0x0
034e e5ff       |    |		Load	0x2,-0x1
034f e5fe       |    |		Load	0x2,-0x2
0350 e00f       |    |		Load	0x0,0xf
0351 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0352 a402       |    |		Store_Unchecked	0x2,0x2
0353 e402       |    |		Load	0x2,0x2
0354 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0355 6835       |h5  |		Jump_Zero	0x38b
0356 e402       |    |		Load	0x2,0x2
0357 0a01       |    |		Execute_Immediate	Plus,0x1
0358 c403       |    |		Store	0x2,0x3
0359 00cf       |    |		Action	Mark_Auxiliary
035a 7817       |x   |		Jump	0x372
035b e403       |    |		Load	0x2,0x3
035c e5ff       |    |		Load	0x2,-0x1
035d 01d7       |    |		Execute	Vector,Field_Read
035e 00d8       |    |		Load_Top	At_Offset_0
035f 0d20       |    |		Execute_Immediate	Less,0x20
0360 700b       |p   |		Jump_Nonzero	0x36c
0361 00d8       |    |		Load_Top	At_Offset_0
0362 0c2d       | -  |		Execute_Immediate	Greater_Equal,0x2d
0363 7005       |p   |		Jump_Nonzero	0x369
0364 4821       |H!  |		Short_Literal	0x21
0365 482b       |H+  |		Short_Literal	0x2b
0366 0262       | b  |		Execute	Discrete,In_Range
0367 7005       |p   |		Jump_Nonzero	0x36d
0368 780e       |x   |		Jump	0x377
0369 0f3b       | ;  |		Execute_Immediate	Equal,0x3b
036a 700c       |p   |		Jump_Nonzero	0x377
036b 7801       |x   |		Jump	0x36d
036c 00d1       |    |		Pop_Control	Pop_Count_1
036d e403       |    |		Load	0x2,0x3
036e 0a01       |    |		Execute_Immediate	Plus,0x1
036f c403       |    |		Store	0x2,0x3
0370 7800       |x   |		Jump	0x371
0371 00c9       |    |		Action	Pop_Auxiliary_Loop
0372 e403       |    |		Load	0x2,0x3
0373 e5ff       |    |		Load	0x2,-0x1
0374 01dc       |    |		Execute	Vector,Last
0375 027a       | z  |		Execute	Discrete,Less_Equal
0376 77e4       |w   |		Jump_Nonzero	0x35b
0377 00ce       |    |		Action	Pop_Auxiliary
0378 e402       |    |		Load	0x2,0x2
0379 e5fe       |    |		Load	0x2,-0x2
037a 01db       |    |		Execute	Vector,Length
037b 0273       | s  |		Execute	Discrete,Plus
037c 00d8       |    |		Load_Top	At_Offset_0
037d 00e2       |    |		Load_Encached	Integer_Cache
037e 0260       | `  |		Execute	Discrete,In_Type
037f 7001       |p   |		Jump_Nonzero	0x381
0380 0801       |    |		Execute_Immediate	Raise,0x1
0381 e403       |    |		Load	0x2,0x3
0382 0aff       |    |		Execute_Immediate	Plus,-0x1
0383 00d8       |    |		Load_Top	At_Offset_0
0384 00e2       |    |		Load_Encached	Integer_Cache
0385 0260       | `  |		Execute	Discrete,In_Type
0386 7001       |p   |		Jump_Nonzero	0x388
0387 0801       |    |		Execute_Immediate	Raise,0x1
0388 e5ff       |    |		Load	0x2,-0x1
0389 01cf       |    |		Execute	Vector,Slice_Read
038a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
038b 00ea       |    |		Load_Encached	Null_String_Cache
038c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
038d 0000 0000  |    |		.XXX[0x3]
038f 0000       |    |
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393       |    |		.CONST	0x0393								; Address of begin
0391 039b       |    |		.CONST	0x039b								; Address of exception handler
0392 0001       |    |		.CONST	0x0001								; Number of locals
0393			BODY_0390:
0393			INIT_0390:
0393 e5ff       |    |		Load	0x2,-0x1
0394 e001       |    |		Load	0x0,0x1
0395 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0396 e402       |    |		Load	0x2,0x2
0397 017d       | }  |		Execute	Record,Structure_Write
0398 4800       |H   |		Short_Literal	0x0
0399 a40c       |    |		Store_Unchecked	0x2,0xc
039a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
039b			TRAP_0390:
039b 0007       |    |		Action	Break_Optional
039c e001       |    |		Load	0x0,0x1
039d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
039e e402       |    |		Load	0x2,0x2
039f 017d       | }  |		Execute	Record,Structure_Write
03a0 4801       |H   |		Short_Literal	0x1
03a1 a40c       |    |		Store_Unchecked	0x2,0xc
03a2 e5ff       |    |		Load	0x2,-0x1
03a3 01db       |    |		Execute	Vector,Length
03a4 6810       |h   |		Jump_Zero	0x3b5
03a5 e010       |    |		Load	0x0,0x10
03a6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03a7 4807       |H   |		Short_Literal	0x7
03a8 0092 0673  |   s|		Action	Push_String_Extended,0x673					; "Start time illegal: "
03aa e5ff       |    |		Load	0x2,-0x1
03ab 01cc       |    |		Execute	Vector,Catenate
03ac e011       |    |		Load	0x0,0x11
03ad 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03ae e010       |    |		Load	0x0,0x10
03af 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03b0 4807       |H   |		Short_Literal	0x7
03b1 0092 0674  |   t|		Action	Push_String_Extended,0x674					; "Processing will start from earliest information"
03b3 e011       |    |		Load	0x0,0x11
03b4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03b5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b6 0000 0000  |    |		.XXX[0x2]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 03c1       |    |		.CONST	0x03c1								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb e5fe       |    |		Load	0x2,-0x2
03bc e001       |    |		Load	0x0,0x1
03bd 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
03be e403       |    |		Load	0x2,0x3
03bf 017d       | }  |		Execute	Record,Structure_Write
03c0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03c1			TRAP_03b8:
03c1 0007       |    |		Action	Break_Optional
03c2 e001       |    |		Load	0x0,0x1
03c3 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03c4 e403       |    |		Load	0x2,0x3
03c5 017d       | }  |		Execute	Record,Structure_Write
03c6 e5fe       |    |		Load	0x2,-0x2
03c7 01db       |    |		Execute	Vector,Length
03c8 6810       |h   |		Jump_Zero	0x3d9
03c9 e010       |    |		Load	0x0,0x10
03ca 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03cb 4807       |H   |		Short_Literal	0x7
03cc 0092 0675  |   u|		Action	Push_String_Extended,0x675					; "End time illegal: "
03ce e5fe       |    |		Load	0x2,-0x2
03cf 01cc       |    |		Execute	Vector,Catenate
03d0 e011       |    |		Load	0x0,0x11
03d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03d2 e010       |    |		Load	0x0,0x10
03d3 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03d4 4807       |H   |		Short_Literal	0x7
03d5 0092 0676  |   v|		Action	Push_String_Extended,0x676					; "Processing will end at current time"
03d7 e011       |    |		Load	0x0,0x11
03d8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03d9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03da 0000 0000  |    |		.BLANK	0000[0x6]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e5       |    |		.CONST	0x03e5								; Address of begin
03e1 05f3       |    |		.CONST	0x05f3								; Address of exception handler
03e2 0002       |    |		.CONST	0x0002								; Number of locals
03e3			INIT_03e0:
03e3 029f 060b  |    |		Declare_Subprogram	INIT_0608,For_Call
03e5			BODY_03e0:
03e5 e40c       |    |		Load	0x2,0xc
03e6 701c       |p   |		Jump_Nonzero	0x403
03e7 e402       |    |		Load	0x2,0x2
03e8 e405       |    |		Load	0x2,0x5
03e9 e003       |    |		Load	0x0,0x3
03ea 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03eb 823f       | ?  |		Call	0x1,0x3f
03ec 7016       |p   |		Jump_Nonzero	0x403
03ed 4801       |H   |		Short_Literal	0x1
03ee a40c       |    |		Store_Unchecked	0x2,0xc
03ef e001       |    |		Load	0x0,0x1
03f0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03f1 e408       |    |		Load	0x2,0x8
03f2 017d       | }  |		Execute	Record,Structure_Write
03f3 e00a       |    |		Load	0x0,0xa
03f4 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03f5 e006       |    |		Load	0x0,0x6
03f6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03f7 e007       |    |		Load	0x0,0x7
03f8 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03f9 e008       |    |		Load	0x0,0x8
03fa 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03fb e009       |    |		Load	0x0,0x9
03fc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03fd e00b       |    |		Load	0x0,0xb
03fe 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
03ff e402       |    |		Load	0x2,0x2
0400 823e       | >  |		Call	0x1,0x3e
0401 e404       |    |		Load	0x2,0x4
0402 017d       | }  |		Execute	Record,Structure_Write
0403 e405       |    |		Load	0x2,0x5
0404 e003       |    |		Load	0x0,0x3
0405 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0406 e405       |    |		Load	0x2,0x5
0407 e003       |    |		Load	0x0,0x3
0408 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0409 e005       |    |		Load	0x0,0x5
040a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
040b a40b       |    |		Store_Unchecked	0x2,0xb
040c e40b       |    |		Load	0x2,0xb
040d 4624       |F$  |		Jump_Case	0x25
040e 7845       |xE  |		Jump	0x454								; case 0x0
040f 784c       |xL  |		Jump	0x45c								; case 0x1
0410 7871       |xq  |		Jump	0x482								; case 0x2
0411 7821       |x!  |		Jump	0x433								; case 0x3
0412 78ac       |x   |		Jump	0x4bf								; case 0x4
0413 7881       |x   |		Jump	0x495								; case 0x5
0414 7884       |x   |		Jump	0x499								; case 0x6
0415 7944       |yD  |		Jump	0x55a								; case 0x7
0416 794e       |yN  |		Jump	0x565								; case 0x8
0417 78ba       |x   |		Jump	0x4d2								; case 0x9
0418 78c6       |x   |		Jump	0x4df								; case 0xa
0419 7819       |x   |		Jump	0x433								; case 0xb
041a 78d1       |x   |		Jump	0x4ec								; case 0xc
041b 78db       |x   |		Jump	0x4f7								; case 0xd
041c 78e5       |x   |		Jump	0x502								; case 0xe
041d 78ef       |x   |		Jump	0x50d								; case 0xf
041e 78f9       |x   |		Jump	0x518								; case 0x10
041f 7903       |y   |		Jump	0x523								; case 0x11
0420 790d       |y   |		Jump	0x52e								; case 0x12
0421 7917       |y   |		Jump	0x539								; case 0x13
0422 7921       |y!  |		Jump	0x544								; case 0x14
0423 792b       |y+  |		Jump	0x54f								; case 0x15
0424 794b       |yK  |		Jump	0x570								; case 0x16
0425 7955       |yU  |		Jump	0x57b								; case 0x17
0426 795f       |y_  |		Jump	0x586								; case 0x18
0427 7969       |yi  |		Jump	0x591								; case 0x19
0428 7877       |xw  |		Jump	0x4a0								; case 0x1a
0429 7888       |x   |		Jump	0x4b2								; case 0x1b
042a 787e       |x~  |		Jump	0x4a9								; case 0x1c
042b 7890       |x   |		Jump	0x4bc								; case 0x1d
042c 796f       |yo  |		Jump	0x59c								; case 0x1e
042d 7974       |yt  |		Jump	0x5a2								; case 0x1f
042e 7985       |y   |		Jump	0x5b4								; case 0x20
042f 7882       |x   |		Jump	0x4b2								; case 0x21
0430 788e       |x   |		Jump	0x4bf								; case 0x22
0431 788d       |x   |		Jump	0x4bf								; case 0x23
0432 7800       |x   |		Jump	0x433								; case 0x24
0433 e405       |    |		Load	0x2,0x5
0434 e003       |    |		Load	0x0,0x3
0435 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0436 0092 0677  |   w|		Action	Push_String_Extended,0x677					; "!!!"
0438 01df       |    |		Execute	Vector,Equal
0439 7007       |p   |		Jump_Nonzero	0x441
043a e405       |    |		Load	0x2,0x5
043b e003       |    |		Load	0x0,0x3
043c 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
043d 0092 0678  |   x|		Action	Push_String_Extended,0x678					; "***"
043f 01df       |    |		Execute	Vector,Equal
0440 697e       |i~  |		Jump_Zero	0x5bf
0441 e40b       |    |		Load	0x2,0xb
0442 e405       |    |		Load	0x2,0x5
0443 e003       |    |		Load	0x0,0x3
0444 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0445 e405       |    |		Load	0x2,0x5
0446 e003       |    |		Load	0x0,0x3
0447 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0448 e405       |    |		Load	0x2,0x5
0449 e003       |    |		Load	0x0,0x3
044a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
044b e405       |    |		Load	0x2,0x5
044c e003       |    |		Load	0x0,0x3
044d 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
044e e405       |    |		Load	0x2,0x5
044f e003       |    |		Load	0x0,0x3
0450 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0451 e007       |    |		Load	0x0,0x7
0452 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0453 796b       |yk  |		Jump	0x5bf
0454 4801       |H   |		Short_Literal	0x1
0455 a23b       | ;  |		Store_Unchecked	0x1,0x3b
0456 e408       |    |		Load	0x2,0x8
0457 e409       |    |		Load	0x2,0x9
0458 017d       | }  |		Execute	Record,Structure_Write
0459 4800       |H   |		Short_Literal	0x0
045a a238       | 8  |		Store_Unchecked	0x1,0x38
045b 7963       |yc  |		Jump	0x5bf
045c 4801       |H   |		Short_Literal	0x1
045d e405       |    |		Load	0x2,0x5
045e e003       |    |		Load	0x0,0x3
045f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0460 0092 0679  |   y|		Action	Push_String_Extended,0x679					; "\x22!Machine"
0462 e00f       |    |		Load	0x0,0xf
0463 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0464 695a       |iZ  |		Jump_Zero	0x5bf
0465 4801       |H   |		Short_Literal	0x1
0466 a23c       | <  |		Store_Unchecked	0x1,0x3c
0467 e40c       |    |		Load	0x2,0xc
0468 6956       |iV  |		Jump_Zero	0x5bf
0469 e409       |    |		Load	0x2,0x9
046a e001       |    |		Load	0x0,0x1
046b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
046c 700c       |p   |		Jump_Nonzero	0x479
046d e409       |    |		Load	0x2,0x9
046e e001       |    |		Load	0x0,0x1
046f 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0470 e405       |    |		Load	0x2,0x5
0471 e003       |    |		Load	0x0,0x3
0472 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0473 e001       |    |		Load	0x0,0x1
0474 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0475 e00d       |    |		Load	0x0,0xd
0476 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0477 a40a       |    |		Store_Unchecked	0x2,0xa
0478 7802       |x   |		Jump	0x47b
0479 4800       |H   |		Short_Literal	0x0
047a a40a       |    |		Store_Unchecked	0x2,0xa
047b e40a       |    |		Load	0x2,0xa
047c e405       |    |		Load	0x2,0x5
047d e003       |    |		Load	0x0,0x3
047e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
047f e00a       |    |		Load	0x0,0xa
0480 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0481 793d       |y=  |		Jump	0x5bf
0482 e408       |    |		Load	0x2,0x8
0483 e001       |    |		Load	0x0,0x1
0484 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0485 6809       |h   |		Jump_Zero	0x48f
0486 e405       |    |		Load	0x2,0x5
0487 e003       |    |		Load	0x0,0x3
0488 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0489 e407       |    |		Load	0x2,0x7
048a 017d       | }  |		Execute	Record,Structure_Write
048b e407       |    |		Load	0x2,0x7
048c 823e       | >  |		Call	0x1,0x3e
048d e404       |    |		Load	0x2,0x4
048e 017d       | }  |		Execute	Record,Structure_Write
048f e405       |    |		Load	0x2,0x5
0490 e003       |    |		Load	0x0,0x3
0491 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0492 e408       |    |		Load	0x2,0x8
0493 017d       | }  |		Execute	Record,Structure_Write
0494 792a       |y*  |		Jump	0x5bf
0495 e238       | 8  |		Load	0x1,0x38
0496 0a01       |    |		Execute_Immediate	Plus,0x1
0497 c238       | 8  |		Store	0x1,0x38
0498 7926       |y&  |		Jump	0x5bf
0499 e238       | 8  |		Load	0x1,0x38
049a 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
049b 6923       |i#  |		Jump_Zero	0x5bf
049c e238       | 8  |		Load	0x1,0x38
049d 0aff       |    |		Execute_Immediate	Plus,-0x1
049e c238       | 8  |		Store	0x1,0x38
049f 791f       |y   |		Jump	0x5bf
04a0 e405       |    |		Load	0x2,0x5
04a1 e003       |    |		Load	0x0,0x3
04a2 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04a3 e405       |    |		Load	0x2,0x5
04a4 e003       |    |		Load	0x0,0x3
04a5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04a6 e00a       |    |		Load	0x0,0xa
04a7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
04a8 7916       |y   |		Jump	0x5bf
04a9 e405       |    |		Load	0x2,0x5
04aa e003       |    |		Load	0x0,0x3
04ab 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04ac 0092 067a  |   z|		Action	Push_String_Extended,0x67a					; " "
04ae 01cc       |    |		Execute	Vector,Catenate
04af e00a       |    |		Load	0x0,0xa
04b0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
04b1 790d       |y   |		Jump	0x5bf
04b2 e40b       |    |		Load	0x2,0xb
04b3 e405       |    |		Load	0x2,0x5
04b4 e003       |    |		Load	0x0,0x3
04b5 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04b6 e405       |    |		Load	0x2,0x5
04b7 e003       |    |		Load	0x0,0x3
04b8 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04b9 e00a       |    |		Load	0x0,0xa
04ba 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04bb 7903       |y   |		Jump	0x5bf
04bc e00a       |    |		Load	0x0,0xa
04bd 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
04be 7900       |y   |		Jump	0x5bf
04bf e40b       |    |		Load	0x2,0xb
04c0 e405       |    |		Load	0x2,0x5
04c1 e003       |    |		Load	0x0,0x3
04c2 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04c3 e405       |    |		Load	0x2,0x5
04c4 e003       |    |		Load	0x0,0x3
04c5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04c6 e405       |    |		Load	0x2,0x5
04c7 e003       |    |		Load	0x0,0x3
04c8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04c9 e405       |    |		Load	0x2,0x5
04ca e003       |    |		Load	0x0,0x3
04cb 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
04cc e405       |    |		Load	0x2,0x5
04cd e003       |    |		Load	0x0,0x3
04ce 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04cf e007       |    |		Load	0x0,0x7
04d0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
04d1 78ed       |x   |		Jump	0x5bf
04d2 4801       |H   |		Short_Literal	0x1
04d3 a239       | 9  |		Store_Unchecked	0x1,0x39
04d4 e405       |    |		Load	0x2,0x5
04d5 e003       |    |		Load	0x0,0x3
04d6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04d7 0092 067b  |   {|		Action	Push_String_Extended,0x67b					; "Disk"
04d9 e405       |    |		Load	0x2,0x5
04da e003       |    |		Load	0x0,0x3
04db 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04dc e006       |    |		Load	0x0,0x6
04dd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04de 78e0       |x   |		Jump	0x5bf
04df 4801       |H   |		Short_Literal	0x1
04e0 a23a       | :  |		Store_Unchecked	0x1,0x3a
04e1 e405       |    |		Load	0x2,0x5
04e2 e003       |    |		Load	0x0,0x3
04e3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04e4 0092 067b  |   {|		Action	Push_String_Extended,0x67b					; "Disk"
04e6 e405       |    |		Load	0x2,0x5
04e7 e003       |    |		Load	0x0,0x3
04e8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04e9 e006       |    |		Load	0x0,0x6
04ea 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04eb 78d3       |x   |		Jump	0x5bf
04ec e405       |    |		Load	0x2,0x5
04ed e003       |    |		Load	0x0,0x3
04ee 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04ef 0092 067c  |   ||		Action	Push_String_Extended,0x67c					; "File"
04f1 e405       |    |		Load	0x2,0x5
04f2 e003       |    |		Load	0x0,0x3
04f3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04f4 e006       |    |		Load	0x0,0x6
04f5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04f6 78c8       |x   |		Jump	0x5bf
04f7 e405       |    |		Load	0x2,0x5
04f8 e003       |    |		Load	0x0,0x3
04f9 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04fa 0092 067c  |   ||		Action	Push_String_Extended,0x67c					; "File"
04fc e405       |    |		Load	0x2,0x5
04fd e003       |    |		Load	0x0,0x3
04fe 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04ff e006       |    |		Load	0x0,0x6
0500 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0501 78bd       |x   |		Jump	0x5bf
0502 e405       |    |		Load	0x2,0x5
0503 e003       |    |		Load	0x0,0x3
0504 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0505 0092 067d  |   }|		Action	Push_String_Extended,0x67d					; "Ada"
0507 e405       |    |		Load	0x2,0x5
0508 e003       |    |		Load	0x0,0x3
0509 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
050a e006       |    |		Load	0x0,0x6
050b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
050c 78b2       |x   |		Jump	0x5bf
050d e405       |    |		Load	0x2,0x5
050e e003       |    |		Load	0x0,0x3
050f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0510 0092 067d  |   }|		Action	Push_String_Extended,0x67d					; "Ada"
0512 e405       |    |		Load	0x2,0x5
0513 e003       |    |		Load	0x0,0x3
0514 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0515 e006       |    |		Load	0x0,0x6
0516 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0517 78a7       |x   |		Jump	0x5bf
0518 e405       |    |		Load	0x2,0x5
0519 e003       |    |		Load	0x0,0x3
051a 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
051b 0092 067e  |   ~|		Action	Push_String_Extended,0x67e					; "Action"
051d e405       |    |		Load	0x2,0x5
051e e003       |    |		Load	0x0,0x3
051f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0520 e006       |    |		Load	0x0,0x6
0521 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0522 789c       |x   |		Jump	0x5bf
0523 e405       |    |		Load	0x2,0x5
0524 e003       |    |		Load	0x0,0x3
0525 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0526 0092 067e  |   ~|		Action	Push_String_Extended,0x67e					; "Action"
0528 e405       |    |		Load	0x2,0x5
0529 e003       |    |		Load	0x0,0x3
052a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
052b e006       |    |		Load	0x0,0x6
052c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
052d 7891       |x   |		Jump	0x5bf
052e e405       |    |		Load	0x2,0x5
052f e003       |    |		Load	0x0,0x3
0530 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0531 0092 067f  |    |		Action	Push_String_Extended,0x67f					; "Code_Segment"
0533 e405       |    |		Load	0x2,0x5
0534 e003       |    |		Load	0x0,0x3
0535 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0536 e006       |    |		Load	0x0,0x6
0537 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0538 7886       |x   |		Jump	0x5bf
0539 e405       |    |		Load	0x2,0x5
053a e003       |    |		Load	0x0,0x3
053b 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
053c 0092 067f  |    |		Action	Push_String_Extended,0x67f					; "Code_Segment"
053e e405       |    |		Load	0x2,0x5
053f e003       |    |		Load	0x0,0x3
0540 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0541 e006       |    |		Load	0x0,0x6
0542 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0543 787b       |x{  |		Jump	0x5bf
0544 e405       |    |		Load	0x2,0x5
0545 e003       |    |		Load	0x0,0x3
0546 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0547 0092 0680  |    |		Action	Push_String_Extended,0x680					; "Directory"
0549 e405       |    |		Load	0x2,0x5
054a e003       |    |		Load	0x0,0x3
054b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
054c e006       |    |		Load	0x0,0x6
054d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
054e 7870       |xp  |		Jump	0x5bf
054f e405       |    |		Load	0x2,0x5
0550 e003       |    |		Load	0x0,0x3
0551 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0552 0092 0680  |    |		Action	Push_String_Extended,0x680					; "Directory"
0554 e405       |    |		Load	0x2,0x5
0555 e003       |    |		Load	0x0,0x3
0556 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0557 e006       |    |		Load	0x0,0x6
0558 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0559 7865       |xe  |		Jump	0x5bf
055a e405       |    |		Load	0x2,0x5
055b e003       |    |		Load	0x0,0x3
055c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
055d 0092 0681  |    |		Action	Push_String_Extended,0x681					; "Ddb"
055f e405       |    |		Load	0x2,0x5
0560 e003       |    |		Load	0x0,0x3
0561 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0562 e006       |    |		Load	0x0,0x6
0563 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0564 785a       |xZ  |		Jump	0x5bf
0565 e405       |    |		Load	0x2,0x5
0566 e003       |    |		Load	0x0,0x3
0567 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0568 0092 0681  |    |		Action	Push_String_Extended,0x681					; "Ddb"
056a e405       |    |		Load	0x2,0x5
056b e003       |    |		Load	0x0,0x3
056c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
056d e006       |    |		Load	0x0,0x6
056e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
056f 784f       |xO  |		Jump	0x5bf
0570 e405       |    |		Load	0x2,0x5
0571 e003       |    |		Load	0x0,0x3
0572 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0573 0092 0682  |    |		Action	Push_String_Extended,0x682					; "Memory"
0575 e405       |    |		Load	0x2,0x5
0576 e003       |    |		Load	0x0,0x3
0577 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0578 e008       |    |		Load	0x0,0x8
0579 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
057a 7844       |xD  |		Jump	0x5bf
057b e405       |    |		Load	0x2,0x5
057c e003       |    |		Load	0x0,0x3
057d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
057e 0092 0683  |    |		Action	Push_String_Extended,0x683					; "Ethernet"
0580 e405       |    |		Load	0x2,0x5
0581 e003       |    |		Load	0x0,0x3
0582 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0583 e008       |    |		Load	0x0,0x8
0584 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0585 7839       |x9  |		Jump	0x5bf
0586 e405       |    |		Load	0x2,0x5
0587 e003       |    |		Load	0x0,0x3
0588 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0589 0092 0684  |    |		Action	Push_String_Extended,0x684					; "Tape"
058b e405       |    |		Load	0x2,0x5
058c e003       |    |		Load	0x0,0x3
058d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
058e e008       |    |		Load	0x0,0x8
058f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0590 782e       |x.  |		Jump	0x5bf
0591 e405       |    |		Load	0x2,0x5
0592 e003       |    |		Load	0x0,0x3
0593 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0594 0092 067b  |   {|		Action	Push_String_Extended,0x67b					; "Disk"
0596 e405       |    |		Load	0x2,0x5
0597 e003       |    |		Load	0x0,0x3
0598 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0599 e008       |    |		Load	0x0,0x8
059a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
059b 7823       |x#  |		Jump	0x5bf
059c e405       |    |		Load	0x2,0x5
059d e003       |    |		Load	0x0,0x3
059e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
059f e00b       |    |		Load	0x0,0xb
05a0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05a1 781d       |x   |		Jump	0x5bf
05a2 0092 0685  |    |		Action	Push_String_Extended,0x685					; "Density="
05a4 e405       |    |		Load	0x2,0x5
05a5 e003       |    |		Load	0x0,0x3
05a6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05a7 8240       | @  |		Call	0x1,0x40
05a8 0092 0686  |    |		Action	Push_String_Extended,0x686					; "Volume_Id="
05aa e405       |    |		Load	0x2,0x5
05ab e003       |    |		Load	0x0,0x3
05ac 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05ad 8240       | @  |		Call	0x1,0x40
05ae e405       |    |		Load	0x2,0x5
05af e003       |    |		Load	0x0,0x3
05b0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05b1 e00b       |    |		Load	0x0,0xb
05b2 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
05b3 780b       |x   |		Jump	0x5bf
05b4 0092 0686  |    |		Action	Push_String_Extended,0x686					; "Volume_Id="
05b6 e405       |    |		Load	0x2,0x5
05b7 e003       |    |		Load	0x0,0x3
05b8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05b9 8240       | @  |		Call	0x1,0x40
05ba e405       |    |		Load	0x2,0x5
05bb e003       |    |		Load	0x0,0x3
05bc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05bd e00b       |    |		Load	0x0,0xb
05be 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05bf e404       |    |		Load	0x2,0x4
05c0 e001       |    |		Load	0x0,0x1
05c1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
05c2 701d       |p   |		Jump_Nonzero	0x5e0
05c3 e404       |    |		Load	0x2,0x4
05c4 e001       |    |		Load	0x0,0x1
05c5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05c6 e405       |    |		Load	0x2,0x5
05c7 e003       |    |		Load	0x0,0x3
05c8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05c9 e001       |    |		Load	0x0,0x1
05ca 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05cb e00d       |    |		Load	0x0,0xd
05cc 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
05cd 6812       |h   |		Jump_Zero	0x5e0
05ce e23c       | <  |		Load	0x1,0x3c
05cf e23b       | ;  |		Load	0x1,0x3b
05d0 e23a       | :  |		Load	0x1,0x3a
05d1 e239       | 9  |		Load	0x1,0x39
05d2 e404       |    |		Load	0x2,0x4
05d3 e405       |    |		Load	0x2,0x5
05d4 e003       |    |		Load	0x0,0x3
05d5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05d6 e408       |    |		Load	0x2,0x8
05d7 e238       | 8  |		Load	0x1,0x38
05d8 e40c       |    |		Load	0x2,0xc
05d9 e009       |    |		Load	0x0,0x9
05da 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05db 00d1       |    |		Pop_Control	Pop_Count_1
05dc c239       | 9  |		Store	0x1,0x39
05dd c23a       | :  |		Store	0x1,0x3a
05de c23b       | ;  |		Store	0x1,0x3b
05df c23c       | <  |		Store	0x1,0x3c
05e0 e403       |    |		Load	0x2,0x3
05e1 e001       |    |		Load	0x0,0x1
05e2 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
05e3 700e       |p   |		Jump_Nonzero	0x5f2
05e4 e403       |    |		Load	0x2,0x3
05e5 e001       |    |		Load	0x0,0x1
05e6 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05e7 e405       |    |		Load	0x2,0x5
05e8 e003       |    |		Load	0x0,0x3
05e9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05ea e001       |    |		Load	0x0,0x1
05eb 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
05ec e00d       |    |		Load	0x0,0xd
05ed 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
05ee 6803       |h   |		Jump_Zero	0x5f2
05ef 00cc       |    |		Action	Pop_Block
05f0 00a7 019b  |    |		Action	Jump_Extended,0x19b
05f2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05f3			TRAP_03e0:
05f3 0007       |    |		Action	Break_Optional
05f4 e010       |    |		Load	0x0,0x10
05f5 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05f6 4806       |H   |		Short_Literal	0x6
05f7 0092 0687  |    |		Action	Push_String_Extended,0x687					; "Exception "
05f9 4800       |H   |		Short_Literal	0x0
05fa 4801       |H   |		Short_Literal	0x1
05fb e012       |    |		Load	0x0,0x12
05fc 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05fd 01cc       |    |		Execute	Vector,Catenate
05fe 0092 0688  |    |		Action	Push_String_Extended,0x688					; " processing error log entry.  Unknown effect on report"
0600 01cc       |    |		Execute	Vector,Catenate
0601 e00e       |    |		Load	0x0,0xe
0602 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0603 8602       |    |		Call	0x3,0x2
0604 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0605 0000 0000  |    |		.XXX[0x3]
0607 0000       |    |
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b       |    |		.CONST	0x060b								; Address of begin
0609 0622       | "  |		.CONST	0x0622								; Address of exception handler
060a 0001       |    |		.CONST	0x0001								; Number of locals
060b			BODY_0608:
060b			INIT_0608:
060b e010       |    |		Load	0x0,0x10
060c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
060d 4802       |H   |		Short_Literal	0x2
060e 0092 0689  |    |		Action	Push_String_Extended,0x689					; "Log file: "
0610 e405       |    |		Load	0x2,0x5
0611 e003       |    |		Load	0x0,0x3
0612 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0613 01cc       |    |		Execute	Vector,Catenate
0614 e00e       |    |		Load	0x0,0xe
0615 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0616 e010       |    |		Load	0x0,0x10
0617 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0618 4802       |H   |		Short_Literal	0x2
0619 0092 068a  |    |		Action	Push_String_Extended,0x68a					; "Log entry: "
061b e405       |    |		Load	0x2,0x5
061c e003       |    |		Load	0x0,0x3
061d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
061e 01cc       |    |		Execute	Vector,Catenate
061f e00e       |    |		Load	0x0,0xe
0620 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0621 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0622			TRAP_0608:
0622 0007       |    |		Action	Break_Optional
0623 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0624 0000 0000  |    |		.BLANK	0000[0x4]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b       | +  |		.CONST	0x062b								; Address of begin
0629 0004       |    |		.CONST	0x0004								; Address of exception handler
062a 0001       |    |		.CONST	0x0001								; Number of locals
062b			BODY_0628:
062b			INIT_0628:
062b 4608       |F   |		Jump_Case	0x9
062c 7808       |x   |		Jump	0x635								; case 0x0
062d 780e       |x   |		Jump	0x63c								; case 0x1
062e 7811       |x   |		Jump	0x640								; case 0x2
062f 7810       |x   |		Jump	0x640								; case 0x3
0630 780f       |x   |		Jump	0x640								; case 0x4
0631 780e       |x   |		Jump	0x640								; case 0x5
0632 780d       |x   |		Jump	0x640								; case 0x6
0633 780c       |x   |		Jump	0x640								; case 0x7
0634 780b       |x   |		Jump	0x640								; case 0x8
0635 e5ff       |    |		Load	0x2,-0x1
0636 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0637 0125       | %  |		Execute	Any,Set_Constraint
0638 e5ff       |    |		Load	0x2,-0x1
0639 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
063a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
063b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
063c e5ff       |    |		Load	0x2,-0x1
063d 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
063e 0125       | %  |		Execute	Any,Set_Constraint
063f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0640 0869       | i  |		Execute_Immediate	Raise,0x69
0641 0000 0000  |    |		.BLANK	0000[0x7]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b       | K  |		.CONST	0x064b								; Address of begin
0649 0004       |    |		.CONST	0x0004								; Address of exception handler
064a 0001       |    |		.CONST	0x0001								; Number of locals
064b			BODY_0648:
064b			INIT_0648:
064b 4608       |F   |		Jump_Case	0x9
064c 7808       |x   |		Jump	0x655								; case 0x0
064d 7814       |x   |		Jump	0x662								; case 0x1
064e 781a       |x   |		Jump	0x669								; case 0x2
064f 7819       |x   |		Jump	0x669								; case 0x3
0650 7818       |x   |		Jump	0x669								; case 0x4
0651 7817       |x   |		Jump	0x669								; case 0x5
0652 7816       |x   |		Jump	0x669								; case 0x6
0653 7815       |x   |		Jump	0x669								; case 0x7
0654 7814       |x   |		Jump	0x669								; case 0x8
0655 e5ff       |    |		Load	0x2,-0x1
0656 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0657 0125       | %  |		Execute	Any,Set_Constraint
0658 e5ff       |    |		Load	0x2,-0x1
0659 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
065a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
065b e5ff       |    |		Load	0x2,-0x1
065c 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
065d 0125       | %  |		Execute	Any,Set_Constraint
065e e5ff       |    |		Load	0x2,-0x1
065f 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0660 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0661 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0662 e5ff       |    |		Load	0x2,-0x1
0663 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0664 0125       | %  |		Execute	Any,Set_Constraint
0665 e5ff       |    |		Load	0x2,-0x1
0666 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0667 0125       | %  |		Execute	Any,Set_Constraint
0668 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0669 0869       | i  |		Execute_Immediate	Raise,0x69
066a ; --------------------------------------------------------------------------------------
066a ; STRING TABLE
066a ; --------------------------------------------------------------------------------------
066a 0044       | D  |		.STRTAB	0x0044->0x068c							; "USER_OPERATION"
066b 0050       | P  |		.STRTAB	0x0050->0x0693							; "EXCEPTION_COND"
066c 005c       | \  |		.STRTAB	0x005c->0x069a							; "SYSTEM_BOOT"
066d 0065       | e  |		.STRTAB	0x0065->0x069f							; "OTHER_EVENT"
066e 006e       | n  |		.STRTAB	0x006e->0x06a5							; "DISK"
066f 0070       | p  |		.STRTAB	0x0070->0x06a7							; "TAPE"
0670 0072       | r  |		.STRTAB	0x0072->0x06a9							; "ETHERNET"
0671 0078       | x  |		.STRTAB	0x0078->0x06ad							; "MEMORY"
0672 007c       | |  |		.STRTAB	0x007c->0x06b0							; "OTHER_DEVICE"
0673 0086       |    |		.STRTAB	0x0086->0x06b6							; "Start time illegal: "
0674 0098       |    |		.STRTAB	0x0098->0x06c0							; "Processing will start from earliest information"
0675 00c5       |    |		.STRTAB	0x00c5->0x06d7							; "End time illegal: "
0676 00d5       |    |		.STRTAB	0x00d5->0x06e0							; "Processing will end at current time"
0677 00f6       |    |		.STRTAB	0x00f6->0x06f2							; "!!!"
0678 00f7       |    |		.STRTAB	0x00f7->0x06f3							; "***"
0679 00f8       |    |		.STRTAB	0x00f8->0x06f5							; "\x22!Machine"
067a 00ff       |    |		.STRTAB	0x00ff->0x06f9							; " "
067b 00fe       |    |		.STRTAB	0x00fe->0x06fa							; "Disk"
067c 0100       |    |		.STRTAB	0x0100->0x06fc							; "File"
067d 0102       |    |		.STRTAB	0x0102->0x06fe							; "Ada"
067e 0103       |    |		.STRTAB	0x0103->0x06ff							; "Action"
067f 0107       |    |		.STRTAB	0x0107->0x0702							; "Code_Segment"
0680 0111       |    |		.STRTAB	0x0111->0x0708							; "Directory"
0681 0118       |    |		.STRTAB	0x0118->0x070d							; "Ddb"
0682 0119       |    |		.STRTAB	0x0119->0x070e							; "Memory"
0683 011d       |    |		.STRTAB	0x011d->0x0711							; "Ethernet"
0684 0123       | #  |		.STRTAB	0x0123->0x0715							; "Tape"
0685 0125       | %  |		.STRTAB	0x0125->0x0717							; "Density="
0686 012b       | +  |		.STRTAB	0x012b->0x071b							; "Volume_Id="
0687 0133       | 3  |		.STRTAB	0x0133->0x0720							; "Exception "
0688 013b       | ;  |		.STRTAB	0x013b->0x0725							; " processing error log entry.  Unknown effect on report"
0689 016f       | o  |		.STRTAB	0x016f->0x0740							; "Log file: "
068a 0177       | w  |		.STRTAB	0x0177->0x0745							; "Log entry: "
068b 0180       |    |		.STREND 0x0180->0x074b
068c 5553 4552  |USER|		.STRTAB_STRINGS
074b 0000 0000  |    |		.BLANK	0000[0x5]
0750 ; --------------------------------------------------------------------------------------
0750 ; Debug Table
0750 ; --------------------------------------------------------------------------------------
0750 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0x400d,0x0000,0x0001,0x0000
0756 0000 0000  |    |		.BLANK	0000[0x1e]
0774 8014 0000  |    |		.XXX[0xb]
0776 0000 0000  |    |
0778 0100 0000  |    |
077a 0880 0000  |    |
077c 0004 0000  |    |
077e 0028       | (  |
077f 0000 0000  |    |		.BLANK	0000[0x2e]
07ad 1002 8000  |    |		.XXX[0xb]
07af 0000 0000  |    |
07b1 0020 0000  |    |
07b3 0110 0000  |    |
07b5 0000 8000  |    |
07b7 0005       |    |
07b8 0000 0000  |    |		.BLANK	0000[0x48]