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

⟦cdb8105f0⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3

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 0358       | X  |		.CONST	0x0358								; 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 8002       |    |		.CONST	0x8002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0032       | 2  |		.CONST	0x0032								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0016       |    |		.CONST	0x0016								; 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 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated
0014 c213       |    |		Store	0x1,0x13
0015 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated
0017 c20f       |    |		Store	0x1,0xf
0018 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated
001a c210       |    |		Store	0x1,0x10
001b 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated
001d c211       |    |		Store	0x1,0x11
001e 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
0020 c212       |    |		Store	0x1,0x12
0021 00bf       |    |		Action	Accept_Activation
0022 029d 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Outer_Call
0024 029d 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call
0026 029d 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call
0028 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0029 00c7       |    |		Action	Elaborate_Subprogram
002a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
002b 00c7       |    |		Action	Elaborate_Subprogram
002c 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
002d 00c7       |    |		Action	Elaborate_Subprogram
002e 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
002f 00c7       |    |		Action	Elaborate_Subprogram
0030 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0031 00c7       |    |		Action	Elaborate_Subprogram
0032			BODY_0008:
0032 00bc       |    |		Action	Signal_Activated
0033 00bb       |    |		Action	Signal_Completion
0034 0000 0000  |    |		.BLANK	0000[0x4]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0056       | V  |		.CONST	0x0056								; Address of begin
0039 00b4       |    |		.CONST	0x00b4								; Address of exception handler
003a 0006       |    |		.CONST	0x0006								; Number of locals
003b			INIT_0038:
003b e001       |    |		Load	0x0,0x1
003c 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
003d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
003e 02c7       |    |		Declare_Variable	Any
003f 00d8       |    |		Load_Top	At_Offset_0
0040 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0041 e001       |    |		Load	0x0,0x1
0042 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0043 0322       | "  |		Declare_Variable	Record
0044 00d8       |    |		Load_Top	At_Offset_0
0045 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0046 00d8       |    |		Load_Top	At_Offset_0
0047 0322       | "  |		Declare_Variable	Record
0048 00d8       |    |		Load_Top	At_Offset_0
0049 1c00       |    |		Execute_Immediate	Run_Utility,0x0
004a e001       |    |		Load	0x0,0x1
004b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
004c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
004d 02c7       |    |		Declare_Variable	Any
004e 00d8       |    |		Load_Top	At_Offset_0
004f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0050 e001       |    |		Load	0x0,0x1
0051 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0052 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0053 02c7       |    |		Declare_Variable	Any
0054 00d8       |    |		Load_Top	At_Offset_0
0055 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0056			BODY_0038:
0056 00be       |    |		Action	Activate_Tasks
0057 4800       |H   |		Short_Literal	0x0
0058 a5fb       |    |		Store_Unchecked	0x2,-0x5
0059 e402       |    |		Load	0x2,0x2
005a 4800       |H   |		Short_Literal	0x0
005b e5fe       |    |		Load	0x2,-0x2
005c 4800       |H   |		Short_Literal	0x0
005d e5ff       |    |		Load	0x2,-0x1
005e e002       |    |		Load	0x0,0x2
005f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0060 e001       |    |		Load	0x0,0x1
0061 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0062 e001       |    |		Load	0x0,0x1
0063 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0064 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0065 c402       |    |		Store	0x2,0x2
0066 e5ff       |    |		Load	0x2,-0x1
0067 e403       |    |		Load	0x2,0x3
0068 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0069 e003       |    |		Load	0x0,0x3
006a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
006b e403       |    |		Load	0x2,0x3
006c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
006d 00d8       |    |		Load_Top	At_Offset_0
006e 0120       |    |		Execute	Any,Is_Value
006f 6804       |h   |		Jump_Zero	0x74
0070 e001       |    |		Load	0x0,0x1
0071 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0072 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0073 7801       |x   |		Jump	0x75
0074 00d8       |    |		Load_Top	At_Offset_0
0075 00da       |    |		Load_Top	At_Offset_2
0076 0120       |    |		Execute	Any,Is_Value
0077 6804       |h   |		Jump_Zero	0x7c
0078 e001       |    |		Load	0x0,0x1
0079 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
007a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
007b 7801       |x   |		Jump	0x7d
007c 00da       |    |		Load_Top	At_Offset_2
007d e404       |    |		Load	0x2,0x4
007e e403       |    |		Load	0x2,0x3
007f e402       |    |		Load	0x2,0x2
0080 e001       |    |		Load	0x0,0x1
0081 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0082 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0083 00d1       |    |		Pop_Control	Pop_Count_1
0084 c405       |    |		Store	0x2,0x5
0085 c406       |    |		Store	0x2,0x6
0086 00d9       |    |		Load_Top	At_Offset_1
0087 e001       |    |		Load	0x0,0x1
0088 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0089 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
008a 681f       |h   |		Jump_Zero	0xaa
008b 8215       |    |		Call	0x1,0x15
008c c5fd       |    |		Store	0x2,-0x3
008d e003       |    |		Load	0x0,0x3
008e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
008f c5fc       |    |		Store	0x2,-0x4
0090 e5fe       |    |		Load	0x2,-0x2
0091 4801       |H   |		Short_Literal	0x1
0092 4801       |H   |		Short_Literal	0x1
0093 e004       |    |		Load	0x0,0x4
0094 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0095 035b       | [  |		Declare_Type	Array,Constrained
0096 0337       | 7  |		Declare_Variable	Array
0097 e5ff       |    |		Load	0x2,-0x1
0098 e002       |    |		Load	0x0,0x2
0099 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
009a e004       |    |		Load	0x0,0x4
009b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
009c 0119       |    |		Execute	Any,Check_In_Formal_Type
009d 4801       |H   |		Short_Literal	0x1
009e 00da       |    |		Load_Top	At_Offset_2
009f 01d6       |    |		Execute	Vector,Field_Write
00a0 603b       |`;  |		Indirect_Literal	Discrete,0xdc,{0x00000000, 0x000081e7}
00a1 e005       |    |		Load	0x0,0x5
00a2 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
00a3 e004       |    |		Load	0x0,0x4
00a4 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
00a5 6032       |`2  |		Indirect_Literal	Discrete,0xd8,{0x00000000, 0x000081e6}
00a6 e005       |    |		Load	0x0,0x5
00a7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00a8 a5fb       |    |		Store_Unchecked	0x2,-0x5
00a9 7806       |x   |		Jump	0xb0
00aa 00da       |    |		Load_Top	At_Offset_2
00ab 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00ac c5fd       |    |		Store	0x2,-0x3
00ad 00da       |    |		Load_Top	At_Offset_2
00ae 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00af c5fc       |    |		Store	0x2,-0x4
00b0 e402       |    |		Load	0x2,0x2
00b1 8214       |    |		Call	0x1,0x14
00b2 c402       |    |		Store	0x2,0x2
00b3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00b4			TRAP_0038:
00b4 0007       |    |		Action	Break_Optional
00b5 e402       |    |		Load	0x2,0x2
00b6 8214       |    |		Call	0x1,0x14
00b7 c402       |    |		Store	0x2,0x2
00b8 e5fe       |    |		Load	0x2,-0x2
00b9 4801       |H   |		Short_Literal	0x1
00ba 4801       |H   |		Short_Literal	0x1
00bb e004       |    |		Load	0x0,0x4
00bc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00bd 035b       | [  |		Declare_Type	Array,Constrained
00be 0337       | 7  |		Declare_Variable	Array
00bf e5ff       |    |		Load	0x2,-0x1
00c0 e002       |    |		Load	0x0,0x2
00c1 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
00c2 e004       |    |		Load	0x0,0x4
00c3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00c4 0119       |    |		Execute	Any,Check_In_Formal_Type
00c5 4801       |H   |		Short_Literal	0x1
00c6 00da       |    |		Load_Top	At_Offset_2
00c7 01d6       |    |		Execute	Vector,Field_Write
00c8 6013       |`   |		Indirect_Literal	Discrete,0xdc,{0x00000000, 0x000081e7}
00c9 e005       |    |		Load	0x0,0x5
00ca 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
00cb e004       |    |		Load	0x0,0x4
00cc 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
00cd 600a       |`   |		Indirect_Literal	Discrete,0xd8,{0x00000000, 0x000081e6}
00ce e005       |    |		Load	0x0,0x5
00cf 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00d0 a5fb       |    |		Store_Unchecked	0x2,-0x5
00d1 e003       |    |		Load	0x0,0x3
00d2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00d3 c5fd       |    |		Store	0x2,-0x3
00d4 8215       |    |		Call	0x1,0x15
00d5 c5fc       |    |		Store	0x2,-0x4
00d6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00d7 0000       |    |		.XXX[0x1]
00d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000081e6}
00dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x000081e7}
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 0105       |    |		.CONST	0x0105								; Address of begin
00e1 014b       | K  |		.CONST	0x014b								; Address of exception handler
00e2 0007       |    |		.CONST	0x0007								; Number of locals
00e3			INIT_00e0:
00e3 e001       |    |		Load	0x0,0x1
00e4 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00e5 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00e6 02c7       |    |		Declare_Variable	Any
00e7 00d8       |    |		Load_Top	At_Offset_0
00e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e9 e001       |    |		Load	0x0,0x1
00ea 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00eb 0322       | "  |		Declare_Variable	Record
00ec 00d8       |    |		Load_Top	At_Offset_0
00ed 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00ee 00d8       |    |		Load_Top	At_Offset_0
00ef 0322       | "  |		Declare_Variable	Record
00f0 00d8       |    |		Load_Top	At_Offset_0
00f1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f2 e001       |    |		Load	0x0,0x1
00f3 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00f4 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00f5 02c7       |    |		Declare_Variable	Any
00f6 00d8       |    |		Load_Top	At_Offset_0
00f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f8 e001       |    |		Load	0x0,0x1
00f9 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00fa 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00fb 02c7       |    |		Declare_Variable	Any
00fc 00d8       |    |		Load_Top	At_Offset_0
00fd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00fe e5fd       |    |		Load	0x2,-0x3
00ff 4800       |H   |		Short_Literal	0x0
0100 e5ff       |    |		Load	0x2,-0x1
0101 e002       |    |		Load	0x0,0x2
0102 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0103 e001       |    |		Load	0x0,0x1
0104 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0105			BODY_00e0:
0105 00be       |    |		Action	Activate_Tasks
0106 4800       |H   |		Short_Literal	0x0
0107 a5fc       |    |		Store_Unchecked	0x2,-0x4
0108 e402       |    |		Load	0x2,0x2
0109 4802       |H   |		Short_Literal	0x2
010a 00da       |    |		Load_Top	At_Offset_2
010b e001       |    |		Load	0x0,0x1
010c 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
010d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
010e c402       |    |		Store	0x2,0x2
010f e5ff       |    |		Load	0x2,-0x1
0110 e403       |    |		Load	0x2,0x3
0111 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0112 e5fe       |    |		Load	0x2,-0x2
0113 e403       |    |		Load	0x2,0x3
0114 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0115 00d9       |    |		Load_Top	At_Offset_1
0116 0120       |    |		Execute	Any,Is_Value
0117 6804       |h   |		Jump_Zero	0x11c
0118 e001       |    |		Load	0x0,0x1
0119 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
011a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
011b 7801       |x   |		Jump	0x11d
011c 00d9       |    |		Load_Top	At_Offset_1
011d 00db       |    |		Load_Top	At_Offset_3
011e 0120       |    |		Execute	Any,Is_Value
011f 6804       |h   |		Jump_Zero	0x124
0120 e001       |    |		Load	0x0,0x1
0121 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0122 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0123 7801       |x   |		Jump	0x125
0124 00db       |    |		Load_Top	At_Offset_3
0125 e404       |    |		Load	0x2,0x4
0126 e403       |    |		Load	0x2,0x3
0127 e402       |    |		Load	0x2,0x2
0128 e001       |    |		Load	0x0,0x1
0129 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
012a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
012b 00d1       |    |		Pop_Control	Pop_Count_1
012c c405       |    |		Store	0x2,0x5
012d c406       |    |		Store	0x2,0x6
012e 00da       |    |		Load_Top	At_Offset_2
012f e001       |    |		Load	0x0,0x1
0130 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0131 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0132 680a       |h   |		Jump_Zero	0x13d
0133 8215       |    |		Call	0x1,0x15
0134 e403       |    |		Load	0x2,0x3
0135 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0136 00d9       |    |		Load_Top	At_Offset_1
0137 e403       |    |		Load	0x2,0x3
0138 e402       |    |		Load	0x2,0x2
0139 e001       |    |		Load	0x0,0x1
013a 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
013b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
013c 780a       |x   |		Jump	0x147
013d 00db       |    |		Load_Top	At_Offset_3
013e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
013f e403       |    |		Load	0x2,0x3
0140 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0141 00da       |    |		Load_Top	At_Offset_2
0142 e403       |    |		Load	0x2,0x3
0143 e402       |    |		Load	0x2,0x2
0144 e001       |    |		Load	0x0,0x1
0145 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0146 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0147 e402       |    |		Load	0x2,0x2
0148 8214       |    |		Call	0x1,0x14
0149 c402       |    |		Store	0x2,0x2
014a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
014b			TRAP_00e0:
014b 0007       |    |		Action	Break_Optional
014c e402       |    |		Load	0x2,0x2
014d 8214       |    |		Call	0x1,0x14
014e c402       |    |		Store	0x2,0x2
014f e5fd       |    |		Load	0x2,-0x3
0150 4801       |H   |		Short_Literal	0x1
0151 4801       |H   |		Short_Literal	0x1
0152 e004       |    |		Load	0x0,0x4
0153 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0154 035b       | [  |		Declare_Type	Array,Constrained
0155 0337       | 7  |		Declare_Variable	Array
0156 e5ff       |    |		Load	0x2,-0x1
0157 e002       |    |		Load	0x0,0x2
0158 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0159 e004       |    |		Load	0x0,0x4
015a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
015b 0119       |    |		Execute	Any,Check_In_Formal_Type
015c 4801       |H   |		Short_Literal	0x1
015d 00da       |    |		Load_Top	At_Offset_2
015e 01d6       |    |		Execute	Vector,Field_Write
015f 600c       |`   |		Indirect_Literal	Discrete,0x16c,{0x00000000, 0x000081e9}
0160 e005       |    |		Load	0x0,0x5
0161 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0162 e004       |    |		Load	0x0,0x4
0163 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0164 6007       |`   |		Indirect_Literal	Discrete,0x16c,{0x00000000, 0x000081e9}
0165 e005       |    |		Load	0x0,0x5
0166 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0167 a5fc       |    |		Store_Unchecked	0x2,-0x4
0168 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0169 0000 0000  |    |		.XXX[0x3]
016b 0000       |    |
016c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000081e9}
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0195       |    |		.CONST	0x0195								; Address of begin
0171 01e4       |    |		.CONST	0x01e4								; Address of exception handler
0172 0007       |    |		.CONST	0x0007								; Number of locals
0173			INIT_0170:
0173 e001       |    |		Load	0x0,0x1
0174 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0175 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0176 02c7       |    |		Declare_Variable	Any
0177 00d8       |    |		Load_Top	At_Offset_0
0178 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0179 e001       |    |		Load	0x0,0x1
017a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
017b 0322       | "  |		Declare_Variable	Record
017c 00d8       |    |		Load_Top	At_Offset_0
017d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
017e 00d8       |    |		Load_Top	At_Offset_0
017f 0322       | "  |		Declare_Variable	Record
0180 00d8       |    |		Load_Top	At_Offset_0
0181 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0182 e001       |    |		Load	0x0,0x1
0183 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0184 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0185 02c7       |    |		Declare_Variable	Any
0186 00d8       |    |		Load_Top	At_Offset_0
0187 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0188 e001       |    |		Load	0x0,0x1
0189 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
018a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
018b 02c7       |    |		Declare_Variable	Any
018c 00d8       |    |		Load_Top	At_Offset_0
018d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
018e e5fd       |    |		Load	0x2,-0x3
018f 4800       |H   |		Short_Literal	0x0
0190 e5ff       |    |		Load	0x2,-0x1
0191 e002       |    |		Load	0x0,0x2
0192 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0193 e001       |    |		Load	0x0,0x1
0194 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0195			BODY_0170:
0195 00be       |    |		Action	Activate_Tasks
0196 4800       |H   |		Short_Literal	0x0
0197 a5fc       |    |		Store_Unchecked	0x2,-0x4
0198 00d8       |    |		Load_Top	At_Offset_0
0199 8216       |    |		Call	0x1,0x16
019a e402       |    |		Load	0x2,0x2
019b 4802       |H   |		Short_Literal	0x2
019c e5fd       |    |		Load	0x2,-0x3
019d 4800       |H   |		Short_Literal	0x0
019e e5ff       |    |		Load	0x2,-0x1
019f e002       |    |		Load	0x0,0x2
01a0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01a1 e001       |    |		Load	0x0,0x1
01a2 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01a3 e001       |    |		Load	0x0,0x1
01a4 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01a5 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01a6 c402       |    |		Store	0x2,0x2
01a7 e5ff       |    |		Load	0x2,-0x1
01a8 e403       |    |		Load	0x2,0x3
01a9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01aa e5fe       |    |		Load	0x2,-0x2
01ab e403       |    |		Load	0x2,0x3
01ac 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01ad 00d9       |    |		Load_Top	At_Offset_1
01ae 0120       |    |		Execute	Any,Is_Value
01af 6804       |h   |		Jump_Zero	0x1b4
01b0 e001       |    |		Load	0x0,0x1
01b1 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01b2 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01b3 7801       |x   |		Jump	0x1b5
01b4 00d9       |    |		Load_Top	At_Offset_1
01b5 00db       |    |		Load_Top	At_Offset_3
01b6 0120       |    |		Execute	Any,Is_Value
01b7 6804       |h   |		Jump_Zero	0x1bc
01b8 e001       |    |		Load	0x0,0x1
01b9 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01ba 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01bb 7801       |x   |		Jump	0x1bd
01bc 00db       |    |		Load_Top	At_Offset_3
01bd e404       |    |		Load	0x2,0x4
01be e403       |    |		Load	0x2,0x3
01bf e402       |    |		Load	0x2,0x2
01c0 e001       |    |		Load	0x0,0x1
01c1 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01c2 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01c3 00d1       |    |		Pop_Control	Pop_Count_1
01c4 c405       |    |		Store	0x2,0x5
01c5 c406       |    |		Store	0x2,0x6
01c6 00da       |    |		Load_Top	At_Offset_2
01c7 e001       |    |		Load	0x0,0x1
01c8 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01c9 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01ca 680b       |h   |		Jump_Zero	0x1d6
01cb e003       |    |		Load	0x0,0x3
01cc 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01cd e403       |    |		Load	0x2,0x3
01ce 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01cf 00d9       |    |		Load_Top	At_Offset_1
01d0 e403       |    |		Load	0x2,0x3
01d1 e402       |    |		Load	0x2,0x2
01d2 e001       |    |		Load	0x0,0x1
01d3 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01d4 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01d5 780a       |x   |		Jump	0x1e0
01d6 00db       |    |		Load_Top	At_Offset_3
01d7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01d8 e403       |    |		Load	0x2,0x3
01d9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01da 00da       |    |		Load_Top	At_Offset_2
01db e403       |    |		Load	0x2,0x3
01dc e402       |    |		Load	0x2,0x2
01dd e001       |    |		Load	0x0,0x1
01de 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01df 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01e0 e402       |    |		Load	0x2,0x2
01e1 8214       |    |		Call	0x1,0x14
01e2 c402       |    |		Store	0x2,0x2
01e3 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01e4			TRAP_0170:
01e4 0007       |    |		Action	Break_Optional
01e5 e402       |    |		Load	0x2,0x2
01e6 8214       |    |		Call	0x1,0x14
01e7 c402       |    |		Store	0x2,0x2
01e8 e5fd       |    |		Load	0x2,-0x3
01e9 4801       |H   |		Short_Literal	0x1
01ea 4801       |H   |		Short_Literal	0x1
01eb e004       |    |		Load	0x0,0x4
01ec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01ed 035b       | [  |		Declare_Type	Array,Constrained
01ee 0337       | 7  |		Declare_Variable	Array
01ef e5ff       |    |		Load	0x2,-0x1
01f0 e002       |    |		Load	0x0,0x2
01f1 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
01f2 e004       |    |		Load	0x0,0x4
01f3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01f4 0119       |    |		Execute	Any,Check_In_Formal_Type
01f5 4801       |H   |		Short_Literal	0x1
01f6 00da       |    |		Load_Top	At_Offset_2
01f7 01d6       |    |		Execute	Vector,Field_Write
01f8 600b       |`   |		Indirect_Literal	Discrete,0x204,{0x00000000, 0x000081e8}
01f9 e005       |    |		Load	0x0,0x5
01fa 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
01fb e004       |    |		Load	0x0,0x4
01fc 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
01fd 6006       |`   |		Indirect_Literal	Discrete,0x204,{0x00000000, 0x000081e8}
01fe e005       |    |		Load	0x0,0x5
01ff 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0200 a5fc       |    |		Store_Unchecked	0x2,-0x4
0201 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0202 0000 0000  |    |		.XXX[0x2]
0204 0000 0000  |    |		.LITERAL	{0x00000000, 0x000081e8}
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0222       | "  |		.CONST	0x0222								; Address of begin
0209 0285       |    |		.CONST	0x0285								; Address of exception handler
020a 0005       |    |		.CONST	0x0005								; Number of locals
020b			INIT_0208:
020b e006       |    |		Load	0x0,0x6
020c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
020d 02c7       |    |		Declare_Variable	Any
020e e5f8       |    |		Load	0x2,-0x8
020f 4800       |H   |		Short_Literal	0x0
0210 e5ff       |    |		Load	0x2,-0x1
0211 e002       |    |		Load	0x0,0x2
0212 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0213 a402       |    |		Store_Unchecked	0x2,0x2
0214 e006       |    |		Load	0x0,0x6
0215 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0216 02ff       |    |		Declare_Variable	Variant_Record
0217 00d8       |    |		Load_Top	At_Offset_0
0218 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0219 e005       |    |		Load	0x0,0x5
021a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
021b 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
021c e5f8       |    |		Load	0x2,-0x8
021d e5fe       |    |		Load	0x2,-0x2
021e e5ff       |    |		Load	0x2,-0x1
021f e402       |    |		Load	0x2,0x2
0220 e007       |    |		Load	0x0,0x7
0221 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0222			BODY_0208:
0222 e5f8       |    |		Load	0x2,-0x8
0223 4801       |H   |		Short_Literal	0x1
0224 e402       |    |		Load	0x2,0x2
0225 e002       |    |		Load	0x0,0x2
0226 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0227 00db       |    |		Load_Top	At_Offset_3
0228 016d       | m  |		Execute	Variant_Record,Structure_Write
0229 e5f8       |    |		Load	0x2,-0x8
022a 00db       |    |		Load_Top	At_Offset_3
022b e5ff       |    |		Load	0x2,-0x1
022c e5fc       |    |		Load	0x2,-0x4
022d e5fd       |    |		Load	0x2,-0x3
022e e5fe       |    |		Load	0x2,-0x2
022f e008       |    |		Load	0x0,0x8
0230 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0231 4800       |H   |		Short_Literal	0x0
0232 00d9       |    |		Load_Top	At_Offset_1
0233 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0234 e005       |    |		Load	0x0,0x5
0235 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
0236 7004       |p   |		Jump_Nonzero	0x23b
0237 00d8       |    |		Load_Top	At_Offset_0
0238 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0239 a5f6       |    |		Store_Unchecked	0x2,-0xa
023a 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
023b 4803       |H   |		Short_Literal	0x3
023c e5fc       |    |		Load	0x2,-0x4
023d 01d7       |    |		Execute	Vector,Field_Read
023e 6829       |h)  |		Jump_Zero	0x268
023f 00d9       |    |		Load_Top	At_Offset_1
0240 e5f7       |    |		Load	0x2,-0x9
0241 e5f8       |    |		Load	0x2,-0x8
0242 e403       |    |		Load	0x2,0x3
0243 e5fe       |    |		Load	0x2,-0x2
0244 e009       |    |		Load	0x0,0x9
0245 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0246 e5ff       |    |		Load	0x2,-0x1
0247 e006       |    |		Load	0x0,0x6
0248 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0249 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
024a e5fe       |    |		Load	0x2,-0x2
024b e009       |    |		Load	0x0,0x9
024c 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
024d e009       |    |		Load	0x0,0x9
024e 18c2       |    |		Execute	Package,Field_Execute,Field_Number 0xc2
024f 00ea       |    |		Load_Encached	Null_String_Cache
0250 e009       |    |		Load	0x0,0x9
0251 18df       |    |		Execute	Package,Field_Execute,Field_Number 0xdf
0252 e5fb       |    |		Load	0x2,-0x5
0253 e405       |    |		Load	0x2,0x5
0254 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0255 e5fe       |    |		Load	0x2,-0x2
0256 e009       |    |		Load	0x0,0x9
0257 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0258 e009       |    |		Load	0x0,0x9
0259 1879       | y  |		Execute	Package,Field_Execute,Field_Number 0x79
025a e5fe       |    |		Load	0x2,-0x2
025b e009       |    |		Load	0x0,0x9
025c 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
025d e009       |    |		Load	0x0,0x9
025e 18c2       |    |		Execute	Package,Field_Execute,Field_Number 0xc2
025f e5ff       |    |		Load	0x2,-0x1
0260 e5fc       |    |		Load	0x2,-0x4
0261 e5fd       |    |		Load	0x2,-0x3
0262 e5fe       |    |		Load	0x2,-0x2
0263 e008       |    |		Load	0x0,0x8
0264 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0265 c5f7       |    |		Store	0x2,-0x9
0266 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0267 781a       |x   |		Jump	0x282
0268 00d9       |    |		Load_Top	At_Offset_1
0269 e5f7       |    |		Load	0x2,-0x9
026a e5f8       |    |		Load	0x2,-0x8
026b e403       |    |		Load	0x2,0x3
026c 00ea       |    |		Load_Encached	Null_String_Cache
026d e5fb       |    |		Load	0x2,-0x5
026e e405       |    |		Load	0x2,0x5
026f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0270 e5fe       |    |		Load	0x2,-0x2
0271 e009       |    |		Load	0x0,0x9
0272 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0273 e009       |    |		Load	0x0,0x9
0274 1879       | y  |		Execute	Package,Field_Execute,Field_Number 0x79
0275 e5fe       |    |		Load	0x2,-0x2
0276 e009       |    |		Load	0x0,0x9
0277 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0278 e009       |    |		Load	0x0,0x9
0279 18c2       |    |		Execute	Package,Field_Execute,Field_Number 0xc2
027a e5ff       |    |		Load	0x2,-0x1
027b e5fc       |    |		Load	0x2,-0x4
027c e5fd       |    |		Load	0x2,-0x3
027d e5fe       |    |		Load	0x2,-0x2
027e e008       |    |		Load	0x0,0x8
027f 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0280 c5f7       |    |		Store	0x2,-0x9
0281 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0282 00d9       |    |		Load_Top	At_Offset_1
0283 a5f6       |    |		Store_Unchecked	0x2,-0xa
0284 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
0285			TRAP_0208:
0285 0007       |    |		Action	Break_Optional
0286 e5f8       |    |		Load	0x2,-0x8
0287 4801       |H   |		Short_Literal	0x1
0288 4802       |H   |		Short_Literal	0x2
0289 e004       |    |		Load	0x0,0x4
028a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
028b 035b       | [  |		Declare_Type	Array,Constrained
028c 0337       | 7  |		Declare_Variable	Array
028d 4800       |H   |		Short_Literal	0x0
028e 4801       |H   |		Short_Literal	0x1
028f e00a       |    |		Load	0x0,0xa
0290 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0291 e004       |    |		Load	0x0,0x4
0292 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0293 e004       |    |		Load	0x0,0x4
0294 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0295 0119       |    |		Execute	Any,Check_In_Formal_Type
0296 4801       |H   |		Short_Literal	0x1
0297 00da       |    |		Load_Top	At_Offset_2
0298 01d6       |    |		Execute	Vector,Field_Write
0299 0092 033a  |   :|		Action	Push_String_Extended,0x33a					; "upload_associated_files"
029b e004       |    |		Load	0x0,0x4
029c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
029d e004       |    |		Load	0x0,0x4
029e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
029f 0119       |    |		Execute	Any,Check_In_Formal_Type
02a0 4802       |H   |		Short_Literal	0x2
02a1 00da       |    |		Load_Top	At_Offset_2
02a2 01d6       |    |		Execute	Vector,Field_Write
02a3 600c       |`   |		Indirect_Literal	Discrete,0x2b0,{0x00000000, 0x0000813b}
02a4 e005       |    |		Load	0x0,0x5
02a5 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
02a6 e004       |    |		Load	0x0,0x4
02a7 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
02a8 6007       |`   |		Indirect_Literal	Discrete,0x2b0,{0x00000000, 0x0000813b}
02a9 e005       |    |		Load	0x0,0x5
02aa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02ab a5f6       |    |		Store_Unchecked	0x2,-0xa
02ac 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
02ad 0000 0000  |    |		.XXX[0x3]
02af 0000       |    |
02b0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000813b}
02b4 0000 0000  |    |		.BLANK	0000[0x4]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bf       |    |		.CONST	0x02bf								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0003       |    |		.CONST	0x0003								; Number of locals
02bb			INIT_02b8:
02bb e00b       |    |		Load	0x0,0xb
02bc 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02bd 029f 0313  |    |		Declare_Subprogram	INIT_0310,For_Call
02bf			BODY_02b8:
02bf 8403       |    |		Call	0x2,0x3
02c0 0831       | 1  |		Execute_Immediate	Raise,0x31
02c1 0000 0000  |    |		.BLANK	0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb       |    |		.CONST	0x02cb								; Address of begin
02c9 02d1       |    |		.CONST	0x02d1								; Address of exception handler
02ca 0001       |    |		.CONST	0x0001								; Number of locals
02cb			BODY_02c8:
02cb			INIT_02c8:
02cb 00da       |    |		Load_Top	At_Offset_2
02cc e001       |    |		Load	0x0,0x1
02cd 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02ce 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
02cf c5ff       |    |		Store	0x2,-0x1
02d0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02d1			TRAP_02c8:
02d1 0007       |    |		Action	Break_Optional
02d2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02d3 0000 0000  |    |		.BLANK	0000[0x5]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db 4800       |H   |		Short_Literal	0x0
02dc 4801       |H   |		Short_Literal	0x1
02dd 4801       |H   |		Short_Literal	0x1
02de 6005       |`   |		Indirect_Literal	Discrete,0x2e4,{0x00000000, 0x0000076d}
02df e003       |    |		Load	0x0,0x3
02e0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02e1 00ca       |    |		Action	Exit_Nullary_Function
02e2 0000 0000  |    |		.XXX[0x2]
02e4 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000076d}
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02f1       |    |		.CONST	0x02f1								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0002       |    |		.CONST	0x0002								; Number of locals
02eb			INIT_02e8:
02eb e00c       |    |		Load	0x0,0xc
02ec 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02ed 1b30       | 0  |		Execute	Package,Field_Read,Field_Number 0x30
02ee 02c7       |    |		Declare_Variable	Any
02ef 00d8       |    |		Load_Top	At_Offset_0
02f0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02f1			BODY_02e8:
02f1 00db       |    |		Load_Top	At_Offset_3
02f2 e00c       |    |		Load	0x0,0xc
02f3 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02f4 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
02f5 6815       |h   |		Jump_Zero	0x30b
02f6 00d8       |    |		Load_Top	At_Offset_0
02f7 0120       |    |		Execute	Any,Is_Value
02f8 6804       |h   |		Jump_Zero	0x2fd
02f9 e00c       |    |		Load	0x0,0xc
02fa 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02fb 1b30       | 0  |		Execute	Package,Field_Read,Field_Number 0x30
02fc 7801       |x   |		Jump	0x2fe
02fd 00d8       |    |		Load_Top	At_Offset_0
02fe 4800       |H   |		Short_Literal	0x0
02ff 4801       |H   |		Short_Literal	0x1
0300 e00c       |    |		Load	0x0,0xc
0301 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0302 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0303 e5ff       |    |		Load	0x2,-0x1
0304 e00c       |    |		Load	0x0,0xc
0305 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0306 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0307 e00c       |    |		Load	0x0,0xc
0308 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0309 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
030a c402       |    |		Store	0x2,0x2
030b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
030c 0000 0000  |    |		.BLANK	0000[0x4]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0319       |    |		.CONST	0x0319								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0002       |    |		.CONST	0x0002								; Number of locals
0313			INIT_0310:
0313 4800       |H   |		Short_Literal	0x0
0314 e5fe       |    |		Load	0x2,-0x2
0315 e00d       |    |		Load	0x0,0xd
0316 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0317 e00d       |    |		Load	0x0,0xd
0318 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0319			BODY_0310:
0319 e5ff       |    |		Load	0x2,-0x1
031a e009       |    |		Load	0x0,0x9
031b 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
031c e00e       |    |		Load	0x0,0xe
031d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
031e e00b       |    |		Load	0x0,0xb
031f 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0320 a402       |    |		Store_Unchecked	0x2,0x2
0321 e402       |    |		Load	0x2,0x2
0322 0f01       |    |		Execute_Immediate	Equal,0x1
0323 680b       |h   |		Jump_Zero	0x32f
0324 00d8       |    |		Load_Top	At_Offset_0
0325 0092 033b  |   ;|		Action	Push_String_Extended,0x33b					; "interactive"
0327 01df       |    |		Execute	Vector,Equal
0328 6803       |h   |		Jump_Zero	0x32c
0329 4800       |H   |		Short_Literal	0x0
032a 00cb       |    |		Action	Pop_Block_With_Result
032b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
032c 4801       |H   |		Short_Literal	0x1
032d 00cb       |    |		Action	Pop_Block_With_Result
032e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
032f 00d8       |    |		Load_Top	At_Offset_0
0330 0092 033c  |   <|		Action	Push_String_Extended,0x33c					; "batch"
0332 01df       |    |		Execute	Vector,Equal
0333 6803       |h   |		Jump_Zero	0x337
0334 4801       |H   |		Short_Literal	0x1
0335 00cb       |    |		Action	Pop_Block_With_Result
0336 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0337 4800       |H   |		Short_Literal	0x0
0338 00cb       |    |		Action	Pop_Block_With_Result
0339 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
033a ; --------------------------------------------------------------------------------------
033a ; STRING TABLE
033a ; --------------------------------------------------------------------------------------
033a 0008       |    |		.STRTAB	0x0008->0x033e							; "upload_associated_files"
033b 001d       |    |		.STRTAB	0x001d->0x0349							; "interactive"
033c 0026       | &  |		.STRTAB	0x0026->0x034f							; "batch"
033d 0029       | )  |		.STREND 0x0029->0x0351
033e 7570 6c6f  |uplo|		.STRTAB_STRINGS
0352 0000 0000  |    |		.BLANK	0000[0x6]
0358 ; --------------------------------------------------------------------------------------
0358 ; Debug Table
0358 ; --------------------------------------------------------------------------------------
0358 0004 000f  |    |		.DEBUG4	0x0004,0x000f,0x2ee4,0x0000,0x0001,0x0000
035e 545f 554e  |T_UN|		.XXX[0xa2]
0360 4954 5317  |ITS |
0362 001f 4449  |  DI|
0364 5245 4354  |RECT|
0366 4f52 595f  |ORY_|
0368 544f 4f4c  |TOOL|
036a 532e 4f42  |S.OB|
036c 4a45 4354  |JECT|
036e 2e49 5445  |.ITE|
0370 5241 544f  |RATO|
0372 5200 7e90  |R ~ |
0374 2300 0e52  |#  R|
0376 454d 4f54  |EMOT|
0378 455f 4d41  |E_MA|
037a 4348 494e  |CHIN|
037c 4517 000f  |E   |
037e 5354 414e  |STAN|
0380 4441 5244  |DARD|
0382 2e53 5452  |.STR|
0384 494e 4700  |ING |
0386 7e90 2300  |~ # |
0388 1152 454d  | REM|
038a 4f54 455f  |OTE_|
038c 434f 4e4e  |CONN|
038e 4543 5449  |ECTI|
0390 4f4e 1700  |ON  |
0392 1752 454d  | REM|
0394 4f54 455f  |OTE_|
0396 434f 4d4d  |COMM|
0398 414e 4453  |ANDS|
039a 2e43 4f4e  |.CON|
039c 5445 5854  |TEXT|
039e 007f 9024  |   $|
03a0 0006 5354  |  ST|
03a2 4154 5553  |ATUS|
03a4 1700 1753  |   S|
03a6 494d 504c  |IMPL|
03a8 455f 5354  |E_ST|
03aa 4154 5553  |ATUS|
03ac 2e43 4f4e  |.CON|
03ae 4449 5449  |DITI|
03b0 4f4e 0035  |ON 5|
03b2 3d2c 0018  |=,  |
03b4 4255 494c  |BUIL|
03b6 445f 5343  |D_SC|
03b8 5249 5054  |RIPT|
03ba 5f50 4f53  |_POS|
03bc 5450 524f  |TPRO|
03be 4345 5353  |CESS|
03c0 007b 947e  | { ~|
03c2 9023 0017  | #  |
03c4 434f 4d50  |COMP|
03c6 494c 4154  |ILAT|
03c8 494f 4e5f  |ION_|
03ca 5343 5249  |SCRI|
03cc 5054 5f46  |PT_F|
03ce 494c 4517  |ILE |
03d0 000c 494f  |  IO|
03d2 2e46 494c  |.FIL|
03d4 455f 5459  |E_TY|
03d6 5045 007e  |PE ~|
03d8 9023 0010  | #  |
03da 4d4f 5645  |MOVE|
03dc 5f53 4352  |_SCR|
03de 4950 545f  |IPT_|
03e0 4649 4c45  |FILE|
03e2 1700 0c49  |   I|
03e4 4f2e 4649  |O.FI|
03e6 4c45 5f54  |LE_T|
03e8 5950 4500  |YPE |
03ea 7e90 2300  |~ # |
03ec 0e42 5549  | BUI|
03ee 4c44 5f56  |LD_V|
03f0 4941 5f54  |IA_T|
03f2 4150 4517  |APE |
03f4 0010 5354  |  ST|
03f6 414e 4441  |ANDA|
03f8 5244 2e42  |RD.B|
03fa 4f4f 4c45  |OOLE|
03fc 414e 007e  |AN ~|
03fe 9023 000a  | #  |