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

⟦80faec687⟧

    Length: 7168 (0x1c00)
    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 0ca8       |    |		.CONST	0x0ca8								; 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 8007       |    |		.CONST	0x8007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00a0       |    |		.CONST	0x00a0								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0047       | G  |		.CONST	0x0047								; Number of locals
000b			INIT_0008:
000b 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated
000d 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated
000f 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated
0011 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated
0013 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated
0015 00bf       |    |		Action	Accept_Activation
0016 0093 0000  |    |		push_full_address	0x0
0018 60bf       |`   |		Indirect_Literal	Discrete,0xd8,{0x80000000, 0x00010000}
0019 0273       | s  |		Execute	Discrete,Plus
001a 0007       |    |		Action	Break_Optional
001b 00e2       |    |		Load_Encached	Integer_Cache
001c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
001d 029d 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call
001f 029d 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call
0021 029d 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call
0023 029d 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call
0025 029d 03ab  |    |		Declare_Subprogram	INIT_03a8,For_Outer_Call
0027 029d 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call
0029 029d 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call
002b 029d 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call
002d 029d 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Outer_Call
002f 029d 0503  |    |		Declare_Subprogram	INIT_0500,For_Outer_Call
0031 029d 0513  |    |		Declare_Subprogram	INIT_0510,For_Outer_Call
0033 029d 057b  |   {|		Declare_Subprogram	INIT_0578,For_Outer_Call
0035 029d 05bb  |    |		Declare_Subprogram	INIT_05b8,For_Outer_Call
0037 029d 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call
0039 029d 05db  |    |		Declare_Subprogram	INIT_05d8,For_Outer_Call
003b 029d 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call
003d 029d 060b  |    |		Declare_Subprogram	INIT_0608,For_Outer_Call
003f 029d 061b  |    |		Declare_Subprogram	INIT_0618,For_Outer_Call
0041 029d 067b  |   {|		Declare_Subprogram	INIT_0678,For_Outer_Call
0043 029d 068b  |    |		Declare_Subprogram	INIT_0688,For_Outer_Call
0045 029d 06c3  |    |		Declare_Subprogram	INIT_06c0,For_Outer_Call
0047 029d 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call
0049 a002       |    |		Store_Unchecked	0x0,0x2
004a 00c6       |    |		Action	Check_Subprogram_Elaborated
004b e003       |    |		Load	0x0,0x3
004c 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
004d 00e2       |    |		Load_Encached	Integer_Cache
004e 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
004f 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
0050 0093 0000  |    |		push_full_address	0x0
0052 6081       |`   |		Indirect_Literal	Discrete,0xd4,{0x80000000, 0x00040000}
0053 0273       | s  |		Execute	Discrete,Plus
0054 e004       |    |		Load	0x0,0x4
0055 0273       | s  |		Execute	Discrete,Plus
0056 e005       |    |		Load	0x0,0x5
0057 0273       | s  |		Execute	Discrete,Plus
0058 4800       |H   |		Short_Literal	0x0
0059 0007       |    |		Action	Break_Optional
005a 029d 06e3  |    |		Declare_Subprogram	INIT_06e0,For_Outer_Call
005c 029d 06f3  |    |		Declare_Subprogram	INIT_06f0,For_Outer_Call
005e a002       |    |		Store_Unchecked	0x0,0x2
005f 00c6       |    |		Action	Check_Subprogram_Elaborated
0060 00e2       |    |		Load_Encached	Integer_Cache
0061 00e2       |    |		Load_Encached	Integer_Cache
0062 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
0063 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
0064 0093 0000  |    |		push_full_address	0x0
0066 6069       |`i  |		Indirect_Literal	Discrete,0xd0,{0x80000000, 0x00030000}
0067 0273       | s  |		Execute	Discrete,Plus
0068 e004       |    |		Load	0x0,0x4
0069 0273       | s  |		Execute	Discrete,Plus
006a e006       |    |		Load	0x0,0x6
006b 0273       | s  |		Execute	Discrete,Plus
006c 4800       |H   |		Short_Literal	0x0
006d 0007       |    |		Action	Break_Optional
006e 029d 06e3  |    |		Declare_Subprogram	INIT_06e0,For_Outer_Call
0070 029d 0703  |    |		Declare_Subprogram	INIT_0700,For_Outer_Call
0072 a002       |    |		Store_Unchecked	0x0,0x2
0073 00c6       |    |		Action	Check_Subprogram_Elaborated
0074 00e2       |    |		Load_Encached	Integer_Cache
0075 00e1       |    |		Load_Encached	Boolean_Cache
0076 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
0077 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
0078 0093 0000  |    |		push_full_address	0x0
007a 6051       |`Q  |		Indirect_Literal	Discrete,0xcc,{0x80000000, 0x00020000}
007b 0273       | s  |		Execute	Discrete,Plus
007c e004       |    |		Load	0x0,0x4
007d 0273       | s  |		Execute	Discrete,Plus
007e e007       |    |		Load	0x0,0x7
007f 0273       | s  |		Execute	Discrete,Plus
0080 4800       |H   |		Short_Literal	0x0
0081 0007       |    |		Action	Break_Optional
0082 029d 06e3  |    |		Declare_Subprogram	INIT_06e0,For_Outer_Call
0084 029d 0713  |    |		Declare_Subprogram	INIT_0710,For_Outer_Call
0086 a002       |    |		Store_Unchecked	0x0,0x2
0087 00c6       |    |		Action	Check_Subprogram_Elaborated
0088 00e2       |    |		Load_Encached	Integer_Cache
0089 00e1       |    |		Load_Encached	Boolean_Cache
008a 1d40       | @  |		Execute_Immediate	Reference_Lex_1,0x40
008b 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
008c 0093 0000  |    |		push_full_address	0x0
008e 6039       |`9  |		Indirect_Literal	Discrete,0xc8,{0x80000000, 0x00010000}
008f 0273       | s  |		Execute	Discrete,Plus
0090 e004       |    |		Load	0x0,0x4
0091 0273       | s  |		Execute	Discrete,Plus
0092 e008       |    |		Load	0x0,0x8
0093 0273       | s  |		Execute	Discrete,Plus
0094 4800       |H   |		Short_Literal	0x0
0095 0007       |    |		Action	Break_Optional
0096 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0097 00c7       |    |		Action	Elaborate_Subprogram
0098 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0099 00c7       |    |		Action	Elaborate_Subprogram
009a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
009b 00c7       |    |		Action	Elaborate_Subprogram
009c 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
009d 00c7       |    |		Action	Elaborate_Subprogram
009e 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
009f 00c7       |    |		Action	Elaborate_Subprogram
00a0			BODY_0008:
00a0 00bc       |    |		Action	Signal_Activated
00a1 00bb       |    |		Action	Signal_Completion
00a2 0000 0000  |    |		.BLANK	0000[0x6]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ac       |    |		.CONST	0x00ac								; Address of begin
00a9 00c3       |    |		.CONST	0x00c3								; Address of exception handler
00aa 0002       |    |		.CONST	0x0002								; Number of locals
00ab			INIT_00a8:
00ab 00e1       |    |		Load_Encached	Boolean_Cache
00ac			BODY_00a8:
00ac 00db       |    |		Load_Top	At_Offset_3
00ad 8009       |    |		Call	0x0,0x9
00ae 6810       |h   |		Jump_Zero	0xbf
00af 00e1       |    |		Load_Encached	Boolean_Cache
00b0 821d       |    |		Call	0x1,0x1d
00b1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00b2 00d8       |    |		Load_Top	At_Offset_0
00b3 700a       |p   |		Jump_Nonzero	0xbe
00b4 e213       |    |		Load	0x1,0x13
00b5 e5fe       |    |		Load	0x2,-0x2
00b6 4803       |H   |		Short_Literal	0x3
00b7 e22a       | *  |		Load	0x1,0x2a
00b8 e22b       | +  |		Load	0x1,0x2b
00b9 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
00ba 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
00bb 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
00bc 8002       |    |		Call	0x0,0x2
00bd c213       |    |		Store	0x1,0x13
00be 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00bf 4801       |H   |		Short_Literal	0x1
00c0 e5ff       |    |		Load	0x2,-0x1
00c1 8219       |    |		Call	0x1,0x19
00c2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00c3			TRAP_00a8:
00c3 e212       |    |		Load	0x1,0x12
00c4 010f       |    |		Execute	Exception,Equal
00c5 6801       |h   |		Jump_Zero	0xc7
00c6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00c7 0100       |    |		Execute	Exception,Raise
00c8 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
00cc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
00d0 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
00d4 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
00d8 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
00dc 0000 0000  |    |		.BLANK	0000[0x4]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e4       |    |		.CONST	0x00e4								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0002       |    |		.CONST	0x0002								; Number of locals
00e3			INIT_00e0:
00e3 00e1       |    |		Load_Encached	Boolean_Cache
00e4			BODY_00e0:
00e4 00db       |    |		Load_Top	At_Offset_3
00e5 8009       |    |		Call	0x0,0x9
00e6 6810       |h   |		Jump_Zero	0xf7
00e7 00e1       |    |		Load_Encached	Boolean_Cache
00e8 821d       |    |		Call	0x1,0x1d
00e9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00ea 00d8       |    |		Load_Top	At_Offset_0
00eb 700a       |p   |		Jump_Nonzero	0xf6
00ec e213       |    |		Load	0x1,0x13
00ed 00d8       |    |		Load_Top	At_Offset_0
00ee 4803       |H   |		Short_Literal	0x3
00ef e232       | 2  |		Load	0x1,0x32
00f0 e233       | 3  |		Load	0x1,0x33
00f1 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
00f2 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
00f3 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
00f4 8002       |    |		Call	0x0,0x2
00f5 c213       |    |		Store	0x1,0x13
00f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00f7 00db       |    |		Load_Top	At_Offset_3
00f8 821a       |    |		Call	0x1,0x1a
00f9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00fa 0000 0000  |    |		.BLANK	0000[0x6]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0105       |    |		.CONST	0x0105								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0002       |    |		.CONST	0x0002								; Number of locals
0103			INIT_0100:
0103 00e1       |    |		Load_Encached	Boolean_Cache
0104 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0105			BODY_0100:
0105 00db       |    |		Load_Top	At_Offset_3
0106 8009       |    |		Call	0x0,0x9
0107 6815       |h   |		Jump_Zero	0x11d
0108 800a       |    |		Call	0x0,0xa
0109 6802       |h   |		Jump_Zero	0x10c
010a 821b       |    |		Call	0x1,0x1b
010b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
010c 00d8       |    |		Load_Top	At_Offset_0
010d e213       |    |		Load	0x1,0x13
010e 4803       |H   |		Short_Literal	0x3
010f e23a       | :  |		Load	0x1,0x3a
0110 e23b       | ;  |		Load	0x1,0x3b
0111 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c
0112 1d3d       | =  |		Execute_Immediate	Reference_Lex_1,0x3d
0113 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
0114 8002       |    |		Call	0x0,0x2
0115 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0116 00d8       |    |		Load_Top	At_Offset_0
0117 7004       |p   |		Jump_Nonzero	0x11c
0118 0092 0822  |   "|		Action	Push_String_Extended,0x822					; "   No rendezvous are in progress for any task."
011a 800b       |    |		Call	0x0,0xb
011b 800c       |    |		Call	0x0,0xc
011c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
011d 00d8       |    |		Load_Top	At_Offset_0
011e e5ff       |    |		Load	0x2,-0x1
011f 821e       |    |		Call	0x1,0x1e
0120 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0121 00d8       |    |		Load_Top	At_Offset_0
0122 700a       |p   |		Jump_Nonzero	0x12d
0123 0092 0823  |   #|		Action	Push_String_Extended,0x823					; "   No rendezvous are in progress in task "
0125 e5ff       |    |		Load	0x2,-0x1
0126 800d       |    |		Call	0x0,0xd
0127 01cc       |    |		Execute	Vector,Catenate
0128 0092 0824  |   $|		Action	Push_String_Extended,0x824					; "."
012a 01cc       |    |		Execute	Vector,Catenate
012b 800b       |    |		Call	0x0,0xb
012c 800c       |    |		Call	0x0,0xc
012d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
012e 0000 0000  |    |		.XXX[0x2]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0135       | 5  |		.CONST	0x0135								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0002       |    |		.CONST	0x0002								; Number of locals
0133			INIT_0130:
0133 00e1       |    |		Load_Encached	Boolean_Cache
0134 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0135			BODY_0130:
0135 00db       |    |		Load_Top	At_Offset_3
0136 8009       |    |		Call	0x0,0x9
0137 6815       |h   |		Jump_Zero	0x14d
0138 800a       |    |		Call	0x0,0xa
0139 6802       |h   |		Jump_Zero	0x13c
013a 821b       |    |		Call	0x1,0x1b
013b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
013c 00d8       |    |		Load_Top	At_Offset_0
013d e213       |    |		Load	0x1,0x13
013e 4803       |H   |		Short_Literal	0x3
013f e242       | B  |		Load	0x1,0x42
0140 e243       | C  |		Load	0x1,0x43
0141 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
0142 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45
0143 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
0144 8002       |    |		Call	0x0,0x2
0145 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0146 00d8       |    |		Load_Top	At_Offset_0
0147 7004       |p   |		Jump_Nonzero	0x14c
0148 0092 0825  |   %|		Action	Push_String_Extended,0x825					; "   No exceptions are active in any tasks."
014a 800b       |    |		Call	0x0,0xb
014b 800c       |    |		Call	0x0,0xc
014c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
014d 00d8       |    |		Load_Top	At_Offset_0
014e e5ff       |    |		Load	0x2,-0x1
014f 8220       |    |		Call	0x1,0x20
0150 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0151 00d8       |    |		Load_Top	At_Offset_0
0152 700a       |p   |		Jump_Nonzero	0x15d
0153 0092 0826  |   &|		Action	Push_String_Extended,0x826					; "    No exceptions are active in task "
0155 e5ff       |    |		Load	0x2,-0x1
0156 800d       |    |		Call	0x0,0xd
0157 01cc       |    |		Execute	Vector,Catenate
0158 0092 0824  |   $|		Action	Push_String_Extended,0x824					; "."
015a 01cc       |    |		Execute	Vector,Catenate
015b 800b       |    |		Call	0x0,0xb
015c 800c       |    |		Call	0x0,0xc
015d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
015e 0000 0000  |    |		.XXX[0x2]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 016f       | o  |		.CONST	0x016f								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 0092 0827  |   '|		Action	Push_String_Extended,0x827					; "get_raise_location called with null task name"
0165 00db       |    |		Load_Top	At_Offset_3
0166 8009       |    |		Call	0x0,0x9
0167 0f00       |    |		Execute_Immediate	Equal,0x0
0168 e00e       |    |		Load	0x0,0xe
0169 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
016a 00db       |    |		Load_Top	At_Offset_3
016b e5fd       |    |		Load	0x2,-0x3
016c e5ff       |    |		Load	0x2,-0x1
016d 821f       |    |		Call	0x1,0x1f
016e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
016f			TRAP_0160:
016f 0007       |    |		Action	Break_Optional
0170 0092 0828  |   (|		Action	Push_String_Extended,0x828					; "unknown location"
0172 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0173 0000 0000  |    |		.BLANK	0000[0x5]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b       | {  |		.CONST	0x017b								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0001       |    |		.CONST	0x0001								; Number of locals
017b			BODY_0178:
017b			INIT_0178:
017b 00da       |    |		Load_Top	At_Offset_2
017c 460c       |F   |		Jump_Case	0xd
017d 780f       |x   |		Jump	0x18d								; case 0x0
017e 781d       |x   |		Jump	0x19c								; case 0x1
017f 781f       |x   |		Jump	0x19f								; case 0x2
0180 780f       |x   |		Jump	0x190								; case 0x3
0181 7820       |x   |		Jump	0x1a2								; case 0x4
0182 7810       |x   |		Jump	0x193								; case 0x5
0183 7812       |x   |		Jump	0x196								; case 0x6
0184 7820       |x   |		Jump	0x1a5								; case 0x7
0185 7822       |x"  |		Jump	0x1a8								; case 0x8
0186 7812       |x   |		Jump	0x199								; case 0x9
0187 7826       |x&  |		Jump	0x1ae								; case 0xa
0188 7822       |x"  |		Jump	0x1ab								; case 0xb
0189 7800       |x   |		Jump	0x18a								; case 0xc
018a 0092 0829  |   )|		Action	Push_String_Extended,0x829					; " Running "
018c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
018d 0092 082a  |   *|		Action	Push_String_Extended,0x82a					; " At a breakpoint at "
018f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0190 0092 082b  |   +|		Action	Push_String_Extended,0x82b					; " Step complete at "
0192 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0193 0092 082c  |   ,|		Action	Push_String_Extended,0x82c					; " Tracing at "
0195 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0196 0092 082d  |   -|		Action	Push_String_Extended,0x82d					; " Instruction step at "
0198 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0199 0092 082e  |   .|		Action	Push_String_Extended,0x82e					; " Has been temporarily stopped by the debugger at "
019b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019c 0092 082f  |   /|		Action	Push_String_Extended,0x82f					; " Creation break at "
019e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019f 0092 0830  |   0|		Action	Push_String_Extended,0x830					; " Tracing a task creation at "
01a1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a2 0092 0831  |   1|		Action	Push_String_Extended,0x831					; " Raised exception "
01a4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a5 0092 0832  |   2|		Action	Push_String_Extended,0x832					; " Stop (hold) at "
01a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a8 0092 0833  |   3|		Action	Push_String_Extended,0x833					; " Stop at "
01aa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ab 0092 0834  |   4|		Action	Push_String_Extended,0x834					; " User call to debugger at "
01ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ae 0092 0835  |   5|		Action	Push_String_Extended,0x835					; " Stopped (unknown reason) at "
01b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01b1 0000 0000  |    |		.BLANK	0000[0x7]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb 00da       |    |		Load_Top	At_Offset_2
01bc 461f       |F   |		Jump_Case	0x20
01bd 782a       |x*  |		Jump	0x1e8								; case 0x0
01be 782b       |x+  |		Jump	0x1ea								; case 0x1
01bf 782d       |x-  |		Jump	0x1ed								; case 0x2
01c0 782f       |x/  |		Jump	0x1f0								; case 0x3
01c1 7831       |x1  |		Jump	0x1f3								; case 0x4
01c2 7833       |x3  |		Jump	0x1f6								; case 0x5
01c3 7835       |x5  |		Jump	0x1f9								; case 0x6
01c4 7837       |x7  |		Jump	0x1fc								; case 0x7
01c5 7839       |x9  |		Jump	0x1ff								; case 0x8
01c6 783b       |x;  |		Jump	0x202								; case 0x9
01c7 783d       |x=  |		Jump	0x205								; case 0xa
01c8 783f       |x?  |		Jump	0x208								; case 0xb
01c9 7841       |xA  |		Jump	0x20b								; case 0xc
01ca 7843       |xC  |		Jump	0x20e								; case 0xd
01cb 7845       |xE  |		Jump	0x211								; case 0xe
01cc 7847       |xG  |		Jump	0x214								; case 0xf
01cd 7849       |xI  |		Jump	0x217								; case 0x10
01ce 784b       |xK  |		Jump	0x21a								; case 0x11
01cf 780d       |x   |		Jump	0x1dd								; case 0x12
01d0 780c       |x   |		Jump	0x1dd								; case 0x13
01d1 780b       |x   |		Jump	0x1dd								; case 0x14
01d2 780a       |x   |		Jump	0x1dd								; case 0x15
01d3 7809       |x   |		Jump	0x1dd								; case 0x16
01d4 7808       |x   |		Jump	0x1dd								; case 0x17
01d5 7847       |xG  |		Jump	0x21d								; case 0x18
01d6 7849       |xI  |		Jump	0x220								; case 0x19
01d7 784b       |xK  |		Jump	0x223								; case 0x1a
01d8 784d       |xM  |		Jump	0x226								; case 0x1b
01d9 784f       |xO  |		Jump	0x229								; case 0x1c
01da 7802       |x   |		Jump	0x1dd								; case 0x1d
01db 7801       |x   |		Jump	0x1dd								; case 0x1e
01dc 7800       |x   |		Jump	0x1dd								; case 0x1f
01dd 0092 0836  |   6|		Action	Push_String_Extended,0x836					; "Unknown module state: "
01df 00db       |    |		Load_Top	At_Offset_3
01e0 e00f       |    |		Load	0x0,0xf
01e1 1b41       | A  |		Execute	Package,Field_Read,Field_Number 0x41
01e2 011c       |    |		Execute	Any,Convert_Unchecked
01e3 1c01       |    |		Execute_Immediate	Run_Utility,0x1
01e4 01cc       |    |		Execute	Vector,Catenate
01e5 e00e       |    |		Load	0x0,0xe
01e6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01e7 7844       |xD  |		Jump	0x22c
01e8 00ea       |    |		Load_Encached	Null_String_Cache
01e9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ea 0092 0837  |   7|		Action	Push_String_Extended,0x837					; "waiting for child elaboration"
01ec 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ed 0092 0838  |   8|		Action	Push_String_Extended,0x838					; "waiting for parent elaboration"
01ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f0 0092 0839  |   9|		Action	Push_String_Extended,0x839					; "activating child packages"
01f2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f3 0092 083a  |   :|		Action	Push_String_Extended,0x83a					; "activating child tasks"
01f5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f6 0092 083b  |   ;|		Action	Push_String_Extended,0x83b					; "waiting for task activation"
01f8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f9 0092 083c  |   <|		Action	Push_String_Extended,0x83c					; "waiting for children"
01fb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01fc 0092 083d  |   =|		Action	Push_String_Extended,0x83d					; "package completed"
01fe 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ff 0092 083e  |   >|		Action	Push_String_Extended,0x83e					; "waiting at entry for accept"
0201 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0202 0092 083f  |   ?|		Action	Push_String_Extended,0x83f					; "waiting at timed entry for accept"
0204 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0205 0092 0840  |   @|		Action	Push_String_Extended,0x840					; "attempting entry call"
0207 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0208 0092 0841  |   A|		Action	Push_String_Extended,0x841					; "waiting for delay"
020a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020b 0092 0842  |   B|		Action	Push_String_Extended,0x842					; "aborting task"
020d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020e 0092 0843  |   C|		Action	Push_String_Extended,0x843					; "terminated"
0210 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0211 0092 0844  |   D|		Action	Push_String_Extended,0x844					; "state presently unknown"
0213 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0214 0092 0845  |   E|		Action	Push_String_Extended,0x845					; "in wait service"
0216 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0217 0092 0846  |   F|		Action	Push_String_Extended,0x846					; "delaying in wait service"
0219 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021a 0092 0847  |   G|		Action	Push_String_Extended,0x847					; "being aborted"
021c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021d 0092 0848  |   H|		Action	Push_String_Extended,0x848					; "waiting at accept for entry call"
021f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0220 0092 0849  |   I|		Action	Push_String_Extended,0x849					; "waiting at select for entry call"
0222 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0223 0092 084a  |   J|		Action	Push_String_Extended,0x84a					; "waiting at select-delay for entry call"
0225 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0226 0092 084b  |   K|		Action	Push_String_Extended,0x84b					; "waiting at select-terminate for entry call with dependents"
0228 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0229 0092 084c  |   L|		Action	Push_String_Extended,0x84c					; "waiting at select-terminate for entry call"
022b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
022c 0831       | 1  |		Execute_Immediate	Raise,0x31
022d 0000 0000  |    |		.XXX[0x3]
022f 0000       |    |
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 00da       |    |		Load_Top	At_Offset_2
0234 0f25       | %  |		Execute_Immediate	Equal,0x25
0235 700b       |p   |		Jump_Nonzero	0x241
0236 00db       |    |		Load_Top	At_Offset_3
0237 6806       |h   |		Jump_Zero	0x23e
0238 00da       |    |		Load_Top	At_Offset_2
0239 e010       |    |		Load	0x0,0x10
023a 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
023b 011c       |    |		Execute	Any,Convert_Unchecked
023c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
023d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
023e 0092 084d  |   M|		Action	Push_String_Extended,0x84d					; "in environment"
0240 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0241 0092 084e  |   N|		Action	Push_String_Extended,0x84e					; "for input"
0243 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0244 0000 0000  |    |		.BLANK	0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0253       | S  |		.CONST	0x0253								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0003       |    |		.CONST	0x0003								; Number of locals
024b			INIT_0248:
024b 4990       |I   |		Short_Literal	0x190
024c e011       |    |		Load	0x0,0x11
024d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
024e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
024f 00d8       |    |		Load_Top	At_Offset_0
0250 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0251 029f 0723  |   #|		Declare_Subprogram	INIT_0720,For_Call
0253			BODY_0248:
0253 00d9       |    |		Load_Top	At_Offset_1
0254 e5ff       |    |		Load	0x2,-0x1
0255 800d       |    |		Call	0x0,0xd
0256 e011       |    |		Load	0x0,0x11
0257 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0258 00d1       |    |		Pop_Control	Pop_Count_1
0259 e5ff       |    |		Load	0x2,-0x1
025a e012       |    |		Load	0x0,0x12
025b 012f       | /  |		Execute	Any,Equal
025c 700b       |p   |		Jump_Nonzero	0x268
025d 00d9       |    |		Load_Top	At_Offset_1
025e 0092 084f  |   O|		Action	Push_String_Extended,0x84f					; " ("
0260 8403       |    |		Call	0x2,0x3
0261 01cc       |    |		Execute	Vector,Catenate
0262 0092 0850  |   P|		Action	Push_String_Extended,0x850					; ")"
0264 01cc       |    |		Execute	Vector,Catenate
0265 e011       |    |		Load	0x0,0x11
0266 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0267 00d1       |    |		Pop_Control	Pop_Count_1
0268 00d9       |    |		Load_Top	At_Offset_1
0269 0092 0851  |   Q|		Action	Push_String_Extended,0x851					; ":"
026b e011       |    |		Load	0x0,0x11
026c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
026d 00d1       |    |		Pop_Control	Pop_Count_1
026e e5f9       |    |		Load	0x2,-0x7
026f 683d       |h=  |		Jump_Zero	0x2ad
0270 00d9       |    |		Load_Top	At_Offset_1
0271 e5f7       |    |		Load	0x2,-0x9
0272 8214       |    |		Call	0x1,0x14
0273 e011       |    |		Load	0x0,0x11
0274 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0275 00d1       |    |		Pop_Control	Pop_Count_1
0276 e5f7       |    |		Load	0x2,-0x9
0277 0f04       |    |		Execute_Immediate	Equal,0x4
0278 680a       |h   |		Jump_Zero	0x283
0279 00d9       |    |		Load_Top	At_Offset_1
027a 4801       |H   |		Short_Literal	0x1
027b e5f0       |    |		Load	0x2,-0x10
027c 8013       |    |		Call	0x0,0x13
027d 0092 0852  |   R|		Action	Push_String_Extended,0x852					; " at "
027f 01cc       |    |		Execute	Vector,Catenate
0280 e011       |    |		Load	0x0,0x11
0281 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0282 00d1       |    |		Pop_Control	Pop_Count_1
0283 e014       |    |		Load	0x0,0x14
0284 e5f4       |    |		Load	0x2,-0xc
0285 8015       |    |		Call	0x0,0x15
0286 700b       |p   |		Jump_Nonzero	0x292
0287 00d9       |    |		Load_Top	At_Offset_1
0288 4801       |H   |		Short_Literal	0x1
0289 e5f2       |    |		Load	0x2,-0xe
028a e5f4       |    |		Load	0x2,-0xc
028b e5f5       |    |		Load	0x2,-0xb
028c e016       |    |		Load	0x0,0x16
028d 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
028e e011       |    |		Load	0x0,0x11
028f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0290 00d1       |    |		Pop_Control	Pop_Count_1
0291 780f       |x   |		Jump	0x2a1
0292 e5f3       |    |		Load	0x2,-0xd
0293 6807       |h   |		Jump_Zero	0x29b
0294 00d9       |    |		Load_Top	At_Offset_1
0295 0092 0853  |   S|		Action	Push_String_Extended,0x853					; "obsolete location (program has been recompiled since debugger started)"
0297 e011       |    |		Load	0x0,0x11
0298 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0299 00d1       |    |		Pop_Control	Pop_Count_1
029a 7806       |x   |		Jump	0x2a1
029b 00d9       |    |		Load_Top	At_Offset_1
029c 0092 0828  |   (|		Action	Push_String_Extended,0x828					; "unknown location"
029e e011       |    |		Load	0x0,0x11
029f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02a0 00d1       |    |		Pop_Control	Pop_Count_1
02a1 e5fa       |    |		Load	0x2,-0x6
02a2 68c1       |h   |		Jump_Zero	0x364
02a3 00d9       |    |		Load_Top	At_Offset_1
02a4 0092 0854  |   T|		Action	Push_String_Extended,0x854					; ", PC= "
02a6 e5f1       |    |		Load	0x2,-0xf
02a7 8017       |    |		Call	0x0,0x17
02a8 01cc       |    |		Execute	Vector,Catenate
02a9 e011       |    |		Load	0x0,0x11
02aa 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02ab 00d1       |    |		Pop_Control	Pop_Count_1
02ac 78b7       |x   |		Jump	0x364
02ad e5f8       |    |		Load	0x2,-0x8
02ae 685b       |h[  |		Jump_Zero	0x30a
02af e5f6       |    |		Load	0x2,-0xa
02b0 461f       |F   |		Jump_Case	0x20
02b1 781f       |x   |		Jump	0x2d1								; case 0x0
02b2 781e       |x   |		Jump	0x2d1								; case 0x1
02b3 781d       |x   |		Jump	0x2d1								; case 0x2
02b4 781c       |x   |		Jump	0x2d1								; case 0x3
02b5 781b       |x   |		Jump	0x2d1								; case 0x4
02b6 781a       |x   |		Jump	0x2d1								; case 0x5
02b7 7819       |x   |		Jump	0x2d1								; case 0x6
02b8 7822       |x"  |		Jump	0x2db								; case 0x7
02b9 7817       |x   |		Jump	0x2d1								; case 0x8
02ba 7816       |x   |		Jump	0x2d1								; case 0x9
02bb 7815       |x   |		Jump	0x2d1								; case 0xa
02bc 7814       |x   |		Jump	0x2d1								; case 0xb
02bd 7813       |x   |		Jump	0x2d1								; case 0xc
02be 7823       |x#  |		Jump	0x2e2								; case 0xd
02bf 7811       |x   |		Jump	0x2d1								; case 0xe
02c0 7828       |x(  |		Jump	0x2e9								; case 0xf
02c1 7827       |x'  |		Jump	0x2e9								; case 0x10
02c2 780e       |x   |		Jump	0x2d1								; case 0x11
02c3 780d       |x   |		Jump	0x2d1								; case 0x12
02c4 780c       |x   |		Jump	0x2d1								; case 0x13
02c5 780b       |x   |		Jump	0x2d1								; case 0x14
02c6 780a       |x   |		Jump	0x2d1								; case 0x15
02c7 7809       |x   |		Jump	0x2d1								; case 0x16
02c8 7808       |x   |		Jump	0x2d1								; case 0x17
02c9 7807       |x   |		Jump	0x2d1								; case 0x18
02ca 7806       |x   |		Jump	0x2d1								; case 0x19
02cb 7805       |x   |		Jump	0x2d1								; case 0x1a
02cc 7804       |x   |		Jump	0x2d1								; case 0x1b
02cd 7803       |x   |		Jump	0x2d1								; case 0x1c
02ce 7802       |x   |		Jump	0x2d1								; case 0x1d
02cf 7801       |x   |		Jump	0x2d1								; case 0x1e
02d0 7800       |x   |		Jump	0x2d1								; case 0x1f
02d1 00d9       |    |		Load_Top	At_Offset_1
02d2 0092 0855  |   U|		Action	Push_String_Extended,0x855					; " Stopping, "
02d4 e5f6       |    |		Load	0x2,-0xa
02d5 8215       |    |		Call	0x1,0x15
02d6 01cc       |    |		Execute	Vector,Catenate
02d7 e011       |    |		Load	0x0,0x11
02d8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02d9 00d1       |    |		Pop_Control	Pop_Count_1
02da 7889       |x   |		Jump	0x364
02db 00d9       |    |		Load_Top	At_Offset_1
02dc 0092 0856  |   V|		Action	Push_String_Extended,0x856					; "Finished Elaboration"
02de e011       |    |		Load	0x0,0x11
02df 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02e0 00d1       |    |		Pop_Control	Pop_Count_1
02e1 7882       |x   |		Jump	0x364
02e2 00d9       |    |		Load_Top	At_Offset_1
02e3 0092 0857  |   W|		Action	Push_String_Extended,0x857					; "Terminated"
02e5 e011       |    |		Load	0x0,0x11
02e6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02e7 00d1       |    |		Pop_Control	Pop_Count_1
02e8 787b       |x{  |		Jump	0x364
02e9 00d9       |    |		Load_Top	At_Offset_1
02ea 0092 0858  |   X|		Action	Push_String_Extended,0x858					; "Waiting "
02ec e5fa       |    |		Load	0x2,-0x6
02ed e5ec       |    |		Load	0x2,-0x14
02ee 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02ef 8216       |    |		Call	0x1,0x16
02f0 01cc       |    |		Execute	Vector,Catenate
02f1 0092 0859  |   Y|		Action	Push_String_Extended,0x859					; ";"
02f3 01cc       |    |		Execute	Vector,Catenate
02f4 e011       |    |		Load	0x0,0x11
02f5 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02f6 00d1       |    |		Pop_Control	Pop_Count_1
02f7 e5fa       |    |		Load	0x2,-0x6
02f8 686b       |hk  |		Jump_Zero	0x364
02f9 e5ec       |    |		Load	0x2,-0x14
02fa 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02fb 6807       |h   |		Jump_Zero	0x303
02fc 00d9       |    |		Load_Top	At_Offset_1
02fd 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; " Been Rousted"
02ff e011       |    |		Load	0x0,0x11
0300 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0301 00d1       |    |		Pop_Control	Pop_Count_1
0302 7861       |xa  |		Jump	0x364
0303 00d9       |    |		Load_Top	At_Offset_1
0304 0092 085b  |   [|		Action	Push_String_Extended,0x85b					; " Not Rousted"
0306 e011       |    |		Load	0x0,0x11
0307 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0308 00d1       |    |		Pop_Control	Pop_Count_1
0309 785a       |xZ  |		Jump	0x364
030a e5f6       |    |		Load	0x2,-0xa
030b 461f       |F   |		Jump_Case	0x20
030c 781f       |x   |		Jump	0x32c								; case 0x0
030d 781e       |x   |		Jump	0x32c								; case 0x1
030e 781d       |x   |		Jump	0x32c								; case 0x2
030f 781c       |x   |		Jump	0x32c								; case 0x3
0310 781b       |x   |		Jump	0x32c								; case 0x4
0311 781a       |x   |		Jump	0x32c								; case 0x5
0312 7819       |x   |		Jump	0x32c								; case 0x6
0313 7822       |x"  |		Jump	0x336								; case 0x7
0314 7817       |x   |		Jump	0x32c								; case 0x8
0315 7816       |x   |		Jump	0x32c								; case 0x9
0316 7815       |x   |		Jump	0x32c								; case 0xa
0317 7814       |x   |		Jump	0x32c								; case 0xb
0318 7813       |x   |		Jump	0x32c								; case 0xc
0319 7823       |x#  |		Jump	0x33d								; case 0xd
031a 7811       |x   |		Jump	0x32c								; case 0xe
031b 7828       |x(  |		Jump	0x344								; case 0xf
031c 7827       |x'  |		Jump	0x344								; case 0x10
031d 780e       |x   |		Jump	0x32c								; case 0x11
031e 780d       |x   |		Jump	0x32c								; case 0x12
031f 780c       |x   |		Jump	0x32c								; case 0x13
0320 780b       |x   |		Jump	0x32c								; case 0x14
0321 780a       |x   |		Jump	0x32c								; case 0x15
0322 7809       |x   |		Jump	0x32c								; case 0x16
0323 7808       |x   |		Jump	0x32c								; case 0x17
0324 7807       |x   |		Jump	0x32c								; case 0x18
0325 7806       |x   |		Jump	0x32c								; case 0x19
0326 7805       |x   |		Jump	0x32c								; case 0x1a
0327 7804       |x   |		Jump	0x32c								; case 0x1b
0328 7803       |x   |		Jump	0x32c								; case 0x1c
0329 7802       |x   |		Jump	0x32c								; case 0x1d
032a 7801       |x   |		Jump	0x32c								; case 0x1e
032b 7800       |x   |		Jump	0x32c								; case 0x1f
032c 00d9       |    |		Load_Top	At_Offset_1
032d 0092 085c  |   \|		Action	Push_String_Extended,0x85c					; " Running, "
032f e5f6       |    |		Load	0x2,-0xa
0330 8215       |    |		Call	0x1,0x15
0331 01cc       |    |		Execute	Vector,Catenate
0332 e011       |    |		Load	0x0,0x11
0333 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0334 00d1       |    |		Pop_Control	Pop_Count_1
0335 782e       |x.  |		Jump	0x364
0336 00d9       |    |		Load_Top	At_Offset_1
0337 0092 0856  |   V|		Action	Push_String_Extended,0x856					; "Finished Elaboration"
0339 e011       |    |		Load	0x0,0x11
033a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
033b 00d1       |    |		Pop_Control	Pop_Count_1
033c 7827       |x'  |		Jump	0x364
033d 00d9       |    |		Load_Top	At_Offset_1
033e 0092 0857  |   W|		Action	Push_String_Extended,0x857					; "Terminated"
0340 e011       |    |		Load	0x0,0x11
0341 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0342 00d1       |    |		Pop_Control	Pop_Count_1
0343 7820       |x   |		Jump	0x364
0344 00d9       |    |		Load_Top	At_Offset_1
0345 0092 0858  |   X|		Action	Push_String_Extended,0x858					; "Waiting "
0347 e5fa       |    |		Load	0x2,-0x6
0348 e5ec       |    |		Load	0x2,-0x14
0349 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
034a 8216       |    |		Call	0x1,0x16
034b 01cc       |    |		Execute	Vector,Catenate
034c 0092 0859  |   Y|		Action	Push_String_Extended,0x859					; ";"
034e 01cc       |    |		Execute	Vector,Catenate
034f e011       |    |		Load	0x0,0x11
0350 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0351 00d1       |    |		Pop_Control	Pop_Count_1
0352 e5fa       |    |		Load	0x2,-0x6
0353 6810       |h   |		Jump_Zero	0x364
0354 e5ec       |    |		Load	0x2,-0x14
0355 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0356 6807       |h   |		Jump_Zero	0x35e
0357 00d9       |    |		Load_Top	At_Offset_1
0358 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; " Been Rousted"
035a e011       |    |		Load	0x0,0x11
035b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
035c 00d1       |    |		Pop_Control	Pop_Count_1
035d 7806       |x   |		Jump	0x364
035e 00d9       |    |		Load_Top	At_Offset_1
035f 0092 085b  |   [|		Action	Push_String_Extended,0x85b					; " Not Rousted"
0361 e011       |    |		Load	0x0,0x11
0362 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0363 00d1       |    |		Pop_Control	Pop_Count_1
0364 00d9       |    |		Load_Top	At_Offset_1
0365 0092 085d  |   ]|		Action	Push_String_Extended,0x85d					; " [Pri = "
0367 e011       |    |		Load	0x0,0x11
0368 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0369 00d1       |    |		Pop_Control	Pop_Count_1
036a 00d9       |    |		Load_Top	At_Offset_1
036b e5ef       |    |		Load	0x2,-0x11
036c 00e0       |    |		Load_Encached	Standard_Cache
036d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
036e e011       |    |		Load	0x0,0x11
036f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0370 00d1       |    |		Pop_Control	Pop_Count_1
0371 e5ee       |    |		Load	0x2,-0x12
0372 6806       |h   |		Jump_Zero	0x379
0373 00d9       |    |		Load_Top	At_Offset_1
0374 0092 085e  |   ^|		Action	Push_String_Extended,0x85e					; ", ABORTED"
0376 e011       |    |		Load	0x0,0x11
0377 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0378 00d1       |    |		Pop_Control	Pop_Count_1
0379 e5fa       |    |		Load	0x2,-0x6
037a 680d       |h   |		Jump_Zero	0x388
037b 00d9       |    |		Load_Top	At_Offset_1
037c 0092 085f  |   _|		Action	Push_String_Extended,0x85f					; ", Memory cond ="
037e e011       |    |		Load	0x0,0x11
037f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0380 00d1       |    |		Pop_Control	Pop_Count_1
0381 00d9       |    |		Load_Top	At_Offset_1
0382 e5ed       |    |		Load	0x2,-0x13
0383 00e0       |    |		Load_Encached	Standard_Cache
0384 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0385 e011       |    |		Load	0x0,0x11
0386 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0387 00d1       |    |		Pop_Control	Pop_Count_1
0388 00d9       |    |		Load_Top	At_Offset_1
0389 0092 0860  |   `|		Action	Push_String_Extended,0x860					; "]"
038b e011       |    |		Load	0x0,0x11
038c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
038d 00d1       |    |		Pop_Control	Pop_Count_1
038e e5fa       |    |		Load	0x2,-0x6
038f 6812       |h   |		Jump_Zero	0x3a2
0390 e5fb       |    |		Load	0x2,-0x5
0391 e011       |    |		Load	0x0,0x11
0392 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0393 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0394 680d       |h   |		Jump_Zero	0x3a2
0395 00d9       |    |		Load_Top	At_Offset_1
0396 0092 0861  |   a|		Action	Push_String_Extended,0x861					; "\x0a    "
0398 e5fb       |    |		Load	0x2,-0x5
0399 e011       |    |		Load	0x0,0x11
039a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
039b 01cc       |    |		Execute	Vector,Catenate
039c 0092 0824  |   $|		Action	Push_String_Extended,0x824					; "."
039e 01cc       |    |		Execute	Vector,Catenate
039f e011       |    |		Load	0x0,0x11
03a0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03a1 00d1       |    |		Pop_Control	Pop_Count_1
03a2 00d9       |    |		Load_Top	At_Offset_1
03a3 e011       |    |		Load	0x0,0x11
03a4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03a5 4414       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x14
03a6 0000 0000  |    |		.XXX[0x2]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab       |    |		.CONST	0x03ab								; Address of begin
03a9 0004       |    |		.CONST	0x0004								; Address of exception handler
03aa 0001       |    |		.CONST	0x0001								; Number of locals
03ab			BODY_03a8:
03ab			INIT_03a8:
03ab 00da       |    |		Load_Top	At_Offset_2
03ac 800b       |    |		Call	0x0,0xb
03ad 00da       |    |		Load_Top	At_Offset_2
03ae 01db       |    |		Execute	Vector,Length
03af 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
03b0 6802       |h   |		Jump_Zero	0x3b3
03b1 4801       |H   |		Short_Literal	0x1
03b2 a5fe       |    |		Store_Unchecked	0x2,-0x2
03b3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03b4 0000 0000  |    |		.BLANK	0000[0x4]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03c5       |    |		.CONST	0x03c5								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0004       |    |		.CONST	0x0004								; Number of locals
03bb			INIT_03b8:
03bb e018       |    |		Load	0x0,0x18
03bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03bd 02c7       |    |		Declare_Variable	Any
03be 00d8       |    |		Load_Top	At_Offset_0
03bf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03c0 e019       |    |		Load	0x0,0x19
03c1 0322       | "  |		Declare_Variable	Record
03c2 00d8       |    |		Load_Top	At_Offset_0
03c3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03c4 00e1       |    |		Load_Encached	Boolean_Cache
03c5			BODY_03b8:
03c5 801a       |    |		Call	0x0,0x1a
03c6 6805       |h   |		Jump_Zero	0x3cc
03c7 0092 0862  |   b|		Action	Push_String_Extended,0x862					; "Task display interrupted.\x0a"
03c9 800b       |    |		Call	0x0,0xb
03ca e212       |    |		Load	0x1,0x12
03cb 0257       | W  |		Execute	Discrete,Raise
03cc e5ff       |    |		Load	0x2,-0x1
03cd 801b       |    |		Call	0x0,0x1b
03ce 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03cf 00d8       |    |		Load_Top	At_Offset_0
03d0 700d       |p   |		Jump_Nonzero	0x3de
03d1 e5ff       |    |		Load	0x2,-0x1
03d2 801c       |    |		Call	0x0,0x1c
03d3 700a       |p   |		Jump_Nonzero	0x3de
03d4 e5ff       |    |		Load	0x2,-0x1
03d5 480a       |H   |		Short_Literal	0xa
03d6 e5ff       |    |		Load	0x2,-0x1
03d7 800d       |    |		Call	0x0,0xd
03d8 0092 0863  |   c|		Action	Push_String_Extended,0x863					; ": Terminated."
03da 01cc       |    |		Execute	Vector,Catenate
03db 01cb       |    |		Execute	Vector,Append
03dc 801d       |    |		Call	0x0,0x1d
03dd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03de 00da       |    |		Load_Top	At_Offset_2
03df 00da       |    |		Load_Top	At_Offset_2
03e0 4801       |H   |		Short_Literal	0x1
03e1 e5ff       |    |		Load	0x2,-0x1
03e2 801e       |    |		Call	0x0,0x1e
03e3 00d1       |    |		Pop_Control	Pop_Count_1
03e4 c402       |    |		Store	0x2,0x2
03e5 4802       |H   |		Short_Literal	0x2
03e6 00db       |    |		Load_Top	At_Offset_3
03e7 e018       |    |		Load	0x0,0x18
03e8 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03e9 680c       |h   |		Jump_Zero	0x3f6
03ea e5ff       |    |		Load	0x2,-0x1
03eb 800d       |    |		Call	0x0,0xd
03ec 0092 0864  |   d|		Action	Push_String_Extended,0x864					; ": unable to read information: "
03ee 01cc       |    |		Execute	Vector,Catenate
03ef 00db       |    |		Load_Top	At_Offset_3
03f0 e018       |    |		Load	0x0,0x18
03f1 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
03f2 01cc       |    |		Execute	Vector,Catenate
03f3 800b       |    |		Call	0x0,0xb
03f4 800c       |    |		Call	0x0,0xc
03f5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f6 00d8       |    |		Load_Top	At_Offset_0
03f7 6808       |h   |		Jump_Zero	0x400
03f8 00d9       |    |		Load_Top	At_Offset_1
03f9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03fa 6805       |h   |		Jump_Zero	0x400
03fb 801f       |    |		Call	0x0,0x1f
03fc e5fe       |    |		Load	0x2,-0x2
03fd 0278       | x  |		Execute	Discrete,Or
03fe 7001       |p   |		Jump_Nonzero	0x400
03ff 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0400 4800       |H   |		Short_Literal	0x0
0401 e5ff       |    |		Load	0x2,-0x1
0402 e020       |    |		Load	0x0,0x20
0403 e403       |    |		Load	0x2,0x3
0404 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0405 e403       |    |		Load	0x2,0x3
0406 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0407 e403       |    |		Load	0x2,0x3
0408 3410       |4   |		Execute	Record,Field_Reference,Field_Number 0x10
0409 e403       |    |		Load	0x2,0x3
040a 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
040b e403       |    |		Load	0x2,0x3
040c 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
040d e403       |    |		Load	0x2,0x3
040e 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
040f e403       |    |		Load	0x2,0x3
0410 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0411 e403       |    |		Load	0x2,0x3
0412 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0413 e403       |    |		Load	0x2,0x3
0414 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0415 e403       |    |		Load	0x2,0x3
0416 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0417 e403       |    |		Load	0x2,0x3
0418 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0419 e403       |    |		Load	0x2,0x3
041a 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
041b e403       |    |		Load	0x2,0x3
041c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
041d e5ff       |    |		Load	0x2,-0x1
041e 8021       | !  |		Call	0x0,0x21
041f e5ff       |    |		Load	0x2,-0x1
0420 e022       | "  |		Load	0x0,0x22
0421 e023       | #  |		Load	0x0,0x23
0422 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0423 e403       |    |		Load	0x2,0x3
0424 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0425 0f00       |    |		Execute_Immediate	Equal,0x0
0426 801f       |    |		Call	0x0,0x1f
0427 e403       |    |		Load	0x2,0x3
0428 3411       |4   |		Execute	Record,Field_Reference,Field_Number 0x11
0429 e403       |    |		Load	0x2,0x3
042a 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
042b e403       |    |		Load	0x2,0x3
042c 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
042d e403       |    |		Load	0x2,0x3
042e 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
042f e5ff       |    |		Load	0x2,-0x1
0430 8217       |    |		Call	0x1,0x17
0431 8024       | $  |		Call	0x0,0x24
0432 800c       |    |		Call	0x0,0xc
0433 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0434 0000 0000  |    |		.BLANK	0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 0449       | I  |		.CONST	0x0449								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 000e       |    |		.CONST	0x000e								; Number of locals
043b			INIT_0438:
043b 00e1       |    |		Load_Encached	Boolean_Cache
043c 00e5       |    |		Load_Encached	Long_Integer_Cache
043d 00e5       |    |		Load_Encached	Long_Integer_Cache
043e 00e5       |    |		Load_Encached	Long_Integer_Cache
043f 00e5       |    |		Load_Encached	Long_Integer_Cache
0440 00e5       |    |		Load_Encached	Long_Integer_Cache
0441 00e5       |    |		Load_Encached	Long_Integer_Cache
0442 00e5       |    |		Load_Encached	Long_Integer_Cache
0443 00e5       |    |		Load_Encached	Long_Integer_Cache
0444 00e5       |    |		Load_Encached	Long_Integer_Cache
0445 00e5       |    |		Load_Encached	Long_Integer_Cache
0446 00e5       |    |		Load_Encached	Long_Integer_Cache
0447 029f 073b  |   ;|		Declare_Subprogram	INIT_0738,For_Call
0449			BODY_0438:
0449 00e5       |    |		Load_Encached	Long_Integer_Cache
044a 00e5       |    |		Load_Encached	Long_Integer_Cache
044b 00e5       |    |		Load_Encached	Long_Integer_Cache
044c 00e5       |    |		Load_Encached	Long_Integer_Cache
044d 00e5       |    |		Load_Encached	Long_Integer_Cache
044e 00e5       |    |		Load_Encached	Long_Integer_Cache
044f 00e5       |    |		Load_Encached	Long_Integer_Cache
0450 00e1       |    |		Load_Encached	Boolean_Cache
0451 e5ff       |    |		Load	0x2,-0x1
0452 8025       | %  |		Call	0x0,0x25
0453 e026       | &  |		Load	0x0,0x26
0454 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0455 c402       |    |		Store	0x2,0x2
0456 c403       |    |		Store	0x2,0x3
0457 c404       |    |		Store	0x2,0x4
0458 c405       |    |		Store	0x2,0x5
0459 c406       |    |		Store	0x2,0x6
045a c407       |    |		Store	0x2,0x7
045b c408       |    |		Store	0x2,0x8
045c c409       |    |		Store	0x2,0x9
045d e402       |    |		Load	0x2,0x2
045e 7008       |p   |		Jump_Nonzero	0x467
045f 0092 0865  |   e|		Action	Push_String_Extended,0x865					; "Unable to obtain space information for task "
0461 e5ff       |    |		Load	0x2,-0x1
0462 800d       |    |		Call	0x0,0xd
0463 01cc       |    |		Execute	Vector,Catenate
0464 800b       |    |		Call	0x0,0xb
0465 800c       |    |		Call	0x0,0xc
0466 7875       |xu  |		Jump	0x4dc
0467 e5ff       |    |		Load	0x2,-0x1
0468 0092 0866  |   f|		Action	Push_String_Extended,0x866					; "  Space use for task "
046a e5ff       |    |		Load	0x2,-0x1
046b 800d       |    |		Call	0x0,0xd
046c 01cc       |    |		Execute	Vector,Catenate
046d 0092 0851  |   Q|		Action	Push_String_Extended,0x851					; ":"
046f 01cc       |    |		Execute	Vector,Catenate
0470 801d       |    |		Call	0x0,0x1d
0471 800c       |    |		Call	0x0,0xc
0472 e403       |    |		Load	0x2,0x3
0473 e405       |    |		Load	0x2,0x5
0474 0273       | s  |		Execute	Discrete,Plus
0475 e409       |    |		Load	0x2,0x9
0476 0273       | s  |		Execute	Discrete,Plus
0477 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
0478 a40a       |    |		Store_Unchecked	0x2,0xa
0479 e404       |    |		Load	0x2,0x4
047a 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
047b a40b       |    |		Store_Unchecked	0x2,0xb
047c e406       |    |		Load	0x2,0x6
047d e408       |    |		Load	0x2,0x8
047e 0273       | s  |		Execute	Discrete,Plus
047f e409       |    |		Load	0x2,0x9
0480 0273       | s  |		Execute	Discrete,Plus
0481 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
0482 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0483 e407       |    |		Load	0x2,0x7
0484 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
0485 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0486 0092 0867  |   g|		Action	Push_String_Extended,0x867					; "  Current control space: "
0488 e40a       |    |		Load	0x2,0xa
0489 00e0       |    |		Load_Encached	Standard_Cache
048a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
048b 01cc       |    |		Execute	Vector,Catenate
048c 0092 0868  |   h|		Action	Push_String_Extended,0x868					; ",   Max control space: "
048e 01cc       |    |		Execute	Vector,Catenate
048f 00db       |    |		Load_Top	At_Offset_3
0490 00e0       |    |		Load_Encached	Standard_Cache
0491 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0492 01cc       |    |		Execute	Vector,Catenate
0493 0092 0869  |   i|		Action	Push_String_Extended,0x869					; "   (bytes)."
0495 01cc       |    |		Execute	Vector,Catenate
0496 800b       |    |		Call	0x0,0xb
0497 800c       |    |		Call	0x0,0xc
0498 0092 086a  |   j|		Action	Push_String_Extended,0x86a					; "  Current data space: "
049a e40b       |    |		Load	0x2,0xb
049b 00e0       |    |		Load_Encached	Standard_Cache
049c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
049d 01cc       |    |		Execute	Vector,Catenate
049e 0092 086b  |   k|		Action	Push_String_Extended,0x86b					; ",   Max data space: "
04a0 01cc       |    |		Execute	Vector,Catenate
04a1 00da       |    |		Load_Top	At_Offset_2
04a2 00e0       |    |		Load_Encached	Standard_Cache
04a3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04a4 01cc       |    |		Execute	Vector,Catenate
04a5 0092 0869  |   i|		Action	Push_String_Extended,0x869					; "   (bytes)."
04a7 01cc       |    |		Execute	Vector,Catenate
04a8 800b       |    |		Call	0x0,0xb
04a9 800c       |    |		Call	0x0,0xc
04aa 801f       |    |		Call	0x0,0x1f
04ab 6830       |h0  |		Jump_Zero	0x4dc
04ac 0092 086c  |   l|		Action	Push_String_Extended,0x86c					; "  Address space sizes (in bits):"
04ae 800b       |    |		Call	0x0,0xb
04af 800c       |    |		Call	0x0,0xc
04b0 480a       |H   |		Short_Literal	0xa
04b1 480a       |H   |		Short_Literal	0xa
04b2 480a       |H   |		Short_Literal	0xa
04b3 480a       |H   |		Short_Literal	0xa
04b4 0092 086d  |   m|		Action	Push_String_Extended,0x86d					; "segment      current      max\x0aControl  "
04b6 e403       |    |		Load	0x2,0x3
04b7 840e       |    |		Call	0x2,0xe
04b8 01cc       |    |		Execute	Vector,Catenate
04b9 e406       |    |		Load	0x2,0x6
04ba 840e       |    |		Call	0x2,0xe
04bb 01cc       |    |		Execute	Vector,Catenate
04bc 01cb       |    |		Execute	Vector,Append
04bd 0092 086e  |   n|		Action	Push_String_Extended,0x86e					; "Data     "
04bf 01cc       |    |		Execute	Vector,Catenate
04c0 e404       |    |		Load	0x2,0x4
04c1 840e       |    |		Call	0x2,0xe
04c2 01cc       |    |		Execute	Vector,Catenate
04c3 e407       |    |		Load	0x2,0x7
04c4 840e       |    |		Call	0x2,0xe
04c5 01cc       |    |		Execute	Vector,Catenate
04c6 01cb       |    |		Execute	Vector,Append
04c7 0092 086f  |   o|		Action	Push_String_Extended,0x86f					; "Type     "
04c9 01cc       |    |		Execute	Vector,Catenate
04ca e405       |    |		Load	0x2,0x5
04cb 840e       |    |		Call	0x2,0xe
04cc 01cc       |    |		Execute	Vector,Catenate
04cd e408       |    |		Load	0x2,0x8
04ce 840e       |    |		Call	0x2,0xe
04cf 01cc       |    |		Execute	Vector,Catenate
04d0 01cb       |    |		Execute	Vector,Append
04d1 0092 0870  |   p|		Action	Push_String_Extended,0x870					; "Queue    "
04d3 01cc       |    |		Execute	Vector,Catenate
04d4 0092 0871  |   q|		Action	Push_String_Extended,0x871					; "          "
04d6 01cc       |    |		Execute	Vector,Catenate
04d7 e409       |    |		Load	0x2,0x9
04d8 840e       |    |		Call	0x2,0xe
04d9 01cc       |    |		Execute	Vector,Catenate
04da 01cb       |    |		Execute	Vector,Append
04db 800b       |    |		Call	0x0,0xb
04dc 800c       |    |		Call	0x0,0xc
04dd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04de 0000 0000  |    |		.XXX[0x2]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e3       |    |		.CONST	0x04e3								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0001       |    |		.CONST	0x0001								; Number of locals
04e3			BODY_04e0:
04e3			INIT_04e0:
04e3 0092 0872  |   r|		Action	Push_String_Extended,0x872					; "Program has terminated."
04e5 800b       |    |		Call	0x0,0xb
04e6 800c       |    |		Call	0x0,0xc
04e7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb       |    |		.CONST	0x04eb								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0001       |    |		.CONST	0x0001								; Number of locals
04eb			BODY_04e8:
04eb			INIT_04e8:
04eb 0092 0873  |   s|		Action	Push_String_Extended,0x873					; "Job: "
04ed e027       | '  |		Load	0x0,0x27
04ee 00e0       |    |		Load_Encached	Standard_Cache
04ef 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04f0 01cc       |    |		Execute	Vector,Catenate
04f1 0092 0874  |   t|		Action	Push_String_Extended,0x874					; ", Root task: "
04f3 01cc       |    |		Execute	Vector,Catenate
04f4 e012       |    |		Load	0x0,0x12
04f5 8028       | (  |		Call	0x0,0x28
04f6 01cc       |    |		Execute	Vector,Catenate
04f7 800b       |    |		Call	0x0,0xb
04f8 800c       |    |		Call	0x0,0xc
04f9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04fa 0000 0000  |    |		.BLANK	0000[0x6]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503       |    |		.CONST	0x0503								; Address of begin
0501 0004       |    |		.CONST	0x0004								; Address of exception handler
0502 0001       |    |		.CONST	0x0001								; Number of locals
0503			BODY_0500:
0503			INIT_0500:
0503 800a       |    |		Call	0x0,0xa
0504 6804       |h   |		Jump_Zero	0x509
0505 821b       |    |		Call	0x1,0x1b
0506 4801       |H   |		Short_Literal	0x1
0507 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0508 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0509 821c       |    |		Call	0x1,0x1c
050a 4800       |H   |		Short_Literal	0x0
050b 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
050c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
050d 0000 0000  |    |		.XXX[0x3]
050f 0000       |    |
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0521       | !  |		.CONST	0x0521								; Address of begin
0511 0004       |    |		.CONST	0x0004								; Address of exception handler
0512 0006       |    |		.CONST	0x0006								; Number of locals
0513			INIT_0510:
0513 e029       | )  |		Load	0x0,0x29
0514 02c7       |    |		Declare_Variable	Any
0515 00d8       |    |		Load_Top	At_Offset_0
0516 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0517 e018       |    |		Load	0x0,0x18
0518 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0519 02c7       |    |		Declare_Variable	Any
051a 00d8       |    |		Load_Top	At_Offset_0
051b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
051c 00e1       |    |		Load_Encached	Boolean_Cache
051d e00f       |    |		Load	0x0,0xf
051e 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
051f 00e1       |    |		Load_Encached	Boolean_Cache
0520 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0521			BODY_0510:
0521 4800       |H   |		Short_Literal	0x0
0522 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0523 4800       |H   |		Short_Literal	0x0
0524 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0525 00cf       |    |		Action	Mark_Auxiliary
0526 e403       |    |		Load	0x2,0x3
0527 e402       |    |		Load	0x2,0x2
0528 0120       |    |		Execute	Any,Is_Value
0529 6802       |h   |		Jump_Zero	0x52c
052a e029       | )  |		Load	0x0,0x29
052b 7801       |x   |		Jump	0x52d
052c e402       |    |		Load	0x2,0x2
052d 00e1       |    |		Load_Encached	Boolean_Cache
052e e405       |    |		Load	0x2,0x5
052f e5ff       |    |		Load	0x2,-0x1
0530 802a       | *  |		Call	0x0,0x2a
0531 c405       |    |		Store	0x2,0x5
0532 c404       |    |		Store	0x2,0x4
0533 c402       |    |		Store	0x2,0x2
0534 c403       |    |		Store	0x2,0x3
0535 4802       |H   |		Short_Literal	0x2
0536 e403       |    |		Load	0x2,0x3
0537 e018       |    |		Load	0x0,0x18
0538 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0539 6806       |h   |		Jump_Zero	0x540
053a e403       |    |		Load	0x2,0x3
053b e018       |    |		Load	0x0,0x18
053c 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
053d 800b       |    |		Call	0x0,0xb
053e 800c       |    |		Call	0x0,0xc
053f 7830       |x0  |		Jump	0x570
0540 00db       |    |		Load_Top	At_Offset_3
0541 702e       |p.  |		Jump_Nonzero	0x570
0542 00d9       |    |		Load_Top	At_Offset_1
0543 700d       |p   |		Jump_Nonzero	0x551
0544 e5ff       |    |		Load	0x2,-0x1
0545 0092 0875  |   u|		Action	Push_String_Extended,0x875					; "Task "
0547 e5ff       |    |		Load	0x2,-0x1
0548 800d       |    |		Call	0x0,0xd
0549 01cc       |    |		Execute	Vector,Catenate
054a 0092 0851  |   Q|		Action	Push_String_Extended,0x851					; ":"
054c 01cc       |    |		Execute	Vector,Catenate
054d 801d       |    |		Call	0x0,0x1d
054e 800c       |    |		Call	0x0,0xc
054f 4801       |H   |		Short_Literal	0x1
0550 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0551 4801       |H   |		Short_Literal	0x1
0552 a5fe       |    |		Store_Unchecked	0x2,-0x2
0553 e402       |    |		Load	0x2,0x2
0554 0092 0876  |   v|		Action	Push_String_Extended,0x876					; "  In rendezvous with:  "
0556 e402       |    |		Load	0x2,0x2
0557 800d       |    |		Call	0x0,0xd
0558 01cc       |    |		Execute	Vector,Catenate
0559 0092 0824  |   $|		Action	Push_String_Extended,0x824					; "."
055b 01cc       |    |		Execute	Vector,Catenate
055c 801d       |    |		Call	0x0,0x1d
055d 800c       |    |		Call	0x0,0xc
055e 801f       |    |		Call	0x0,0x1f
055f 680e       |h   |		Jump_Zero	0x56e
0560 0092 0877  |   w|		Action	Push_String_Extended,0x877					; "  Control offset: #"
0562 4820       |H   |		Short_Literal	0x20
0563 4800       |H   |		Short_Literal	0x0
0564 4810       |H   |		Short_Literal	0x10
0565 e405       |    |		Load	0x2,0x5
0566 e02b       | +  |		Load	0x0,0x2b
0567 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0568 01cc       |    |		Execute	Vector,Catenate
0569 0092 0824  |   $|		Action	Push_String_Extended,0x824					; "."
056b 01cc       |    |		Execute	Vector,Catenate
056c 800b       |    |		Call	0x0,0xb
056d 800c       |    |		Call	0x0,0xc
056e 00c9       |    |		Action	Pop_Auxiliary_Loop
056f 7fb6       |    |		Jump	0x526
0570 00ce       |    |		Action	Pop_Auxiliary
0571 00d8       |    |		Load_Top	At_Offset_0
0572 6801       |h   |		Jump_Zero	0x574
0573 800c       |    |		Call	0x0,0xc
0574 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0575 0000 0000  |    |		.XXX[0x3]
0577 0000       |    |
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 05ac       |    |		.CONST	0x05ac								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0013       |    |		.CONST	0x0013								; Number of locals
057b			INIT_0578:
057b e00f       |    |		Load	0x0,0xf
057c 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
057d e02c       | ,  |		Load	0x0,0x2c
057e 02c7       |    |		Declare_Variable	Any
057f 00d8       |    |		Load_Top	At_Offset_0
0580 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0581 e02c       | ,  |		Load	0x0,0x2c
0582 02c7       |    |		Declare_Variable	Any
0583 00d8       |    |		Load_Top	At_Offset_0
0584 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0585 e02d       | -  |		Load	0x0,0x2d
0586 02c7       |    |		Declare_Variable	Any
0587 00d8       |    |		Load_Top	At_Offset_0
0588 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0589 e02e       | .  |		Load	0x0,0x2e
058a 02c7       |    |		Declare_Variable	Any
058b 00d8       |    |		Load_Top	At_Offset_0
058c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
058d e02f       | /  |		Load	0x0,0x2f
058e 02c7       |    |		Declare_Variable	Any
058f 00d8       |    |		Load_Top	At_Offset_0
0590 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0591 e030       | 0  |		Load	0x0,0x30
0592 0007       |    |		Action	Break_Optional
0593 e018       |    |		Load	0x0,0x18
0594 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0595 02c7       |    |		Declare_Variable	Any
0596 00d8       |    |		Load_Top	At_Offset_0
0597 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0598 00e1       |    |		Load_Encached	Boolean_Cache
0599 03e9       |    |		Declare_Variable	Discrete,Duplicate
059a e031       | 1  |		Load	0x0,0x31
059b 02c7       |    |		Declare_Variable	Any
059c 00d8       |    |		Load_Top	At_Offset_0
059d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
059e 00e1       |    |		Load_Encached	Boolean_Cache
059f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
05a0 029f 074b  |   K|		Declare_Subprogram	INIT_0748,For_Call
05a2 029f 0763  |   c|		Declare_Subprogram	INIT_0760,For_Call
05a4 029f 078b  |    |		Declare_Subprogram	INIT_0788,For_Call
05a6 029f 079b  |    |		Declare_Subprogram	INIT_0798,For_Call
05a8 029f 07bb  |    |		Declare_Subprogram	INIT_07b8,For_Call
05aa 029f 081b  |    |		Declare_Subprogram	INIT_0818,For_Call
05ac			BODY_0578:
05ac 4800       |H   |		Short_Literal	0x0
05ad a40a       |    |		Store_Unchecked	0x2,0xa
05ae 4800       |H   |		Short_Literal	0x0
05af a402       |    |		Store_Unchecked	0x2,0x2
05b0 8412       |    |		Call	0x2,0x12
05b1 8413       |    |		Call	0x2,0x13
05b2 01cc       |    |		Execute	Vector,Catenate
05b3 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
05b4 0000 0000  |    |		.BLANK	0000[0x4]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb       |    |		.CONST	0x05bb								; Address of begin
05b9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ba 0001       |    |		.CONST	0x0001								; Number of locals
05bb			BODY_05b8:
05bb			INIT_05b8:
05bb 00db       |    |		Load_Top	At_Offset_3
05bc 4801       |H   |		Short_Literal	0x1
05bd 801f       |    |		Call	0x0,0x1f
05be e5ff       |    |		Load	0x2,-0x1
05bf 821f       |    |		Call	0x1,0x1f
05c0 8218       |    |		Call	0x1,0x18
05c1 c5fe       |    |		Store	0x2,-0x2
05c2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05c3 0000 0000  |    |		.BLANK	0000[0x5]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb       |    |		.CONST	0x05cb								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0001       |    |		.CONST	0x0001								; Number of locals
05cb			BODY_05c8:
05cb			INIT_05c8:
05cb 0092 0878  |   x|		Action	Push_String_Extended,0x878					; "Display one task passed a null task name"
05cd 00db       |    |		Load_Top	At_Offset_3
05ce 8009       |    |		Call	0x0,0x9
05cf 0f00       |    |		Execute_Immediate	Equal,0x0
05d0 e00e       |    |		Load	0x0,0xe
05d1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05d2 4800       |H   |		Short_Literal	0x0
05d3 00db       |    |		Load_Top	At_Offset_3
05d4 8219       |    |		Call	0x1,0x19
05d5 4800       |H   |		Short_Literal	0x0
05d6 a5fd       |    |		Store_Unchecked	0x2,-0x3
05d7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db       |    |		.CONST	0x05db								; Address of begin
05d9 0004       |    |		.CONST	0x0004								; Address of exception handler
05da 0001       |    |		.CONST	0x0001								; Number of locals
05db			BODY_05d8:
05db			INIT_05d8:
05db 0092 0879  |   y|		Action	Push_String_Extended,0x879					; "Rendezvous_Info_For_one_task passed a null task name"
05dd 00db       |    |		Load_Top	At_Offset_3
05de 8009       |    |		Call	0x0,0x9
05df 0f00       |    |		Execute_Immediate	Equal,0x0
05e0 e00e       |    |		Load	0x0,0xe
05e1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05e2 00db       |    |		Load_Top	At_Offset_3
05e3 00db       |    |		Load_Top	At_Offset_3
05e4 821e       |    |		Call	0x1,0x1e
05e5 c5fe       |    |		Store	0x2,-0x2
05e6 4800       |H   |		Short_Literal	0x0
05e7 a5fd       |    |		Store_Unchecked	0x2,-0x3
05e8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05e9 0000 0000  |    |		.BLANK	0000[0x7]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f3       |    |		.CONST	0x05f3								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0001       |    |		.CONST	0x0001								; Number of locals
05f3			BODY_05f0:
05f3			INIT_05f0:
05f3 0092 087a  |   z|		Action	Push_String_Extended,0x87a					; "Exception_Info_For_one_task passed a null task name"
05f5 00db       |    |		Load_Top	At_Offset_3
05f6 8009       |    |		Call	0x0,0x9
05f7 0f00       |    |		Execute_Immediate	Equal,0x0
05f8 e00e       |    |		Load	0x0,0xe
05f9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05fa 00db       |    |		Load_Top	At_Offset_3
05fb 00db       |    |		Load_Top	At_Offset_3
05fc 8220       |    |		Call	0x1,0x20
05fd c5fe       |    |		Store	0x2,-0x2
05fe 4800       |H   |		Short_Literal	0x0
05ff a5fd       |    |		Store_Unchecked	0x2,-0x3
0600 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0601 0000 0000  |    |		.BLANK	0000[0x7]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b       |    |		.CONST	0x060b								; Address of begin
0609 0004       |    |		.CONST	0x0004								; Address of exception handler
060a 0001       |    |		.CONST	0x0001								; Number of locals
060b			BODY_0608:
060b			INIT_0608:
060b 0092 087b  |   {|		Action	Push_String_Extended,0x87b					; "Space_Info_For_one_task passed a null task name"
060d 00db       |    |		Load_Top	At_Offset_3
060e 8009       |    |		Call	0x0,0x9
060f 0f00       |    |		Execute_Immediate	Equal,0x0
0610 e00e       |    |		Load	0x0,0xe
0611 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0612 00da       |    |		Load_Top	At_Offset_2
0613 821a       |    |		Call	0x1,0x1a
0614 4800       |H   |		Short_Literal	0x0
0615 a5fd       |    |		Store_Unchecked	0x2,-0x3
0616 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0617 0000       |    |		.XXX[0x1]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061d       |    |		.CONST	0x061d								; Address of begin
0619 0004       |    |		.CONST	0x0004								; Address of exception handler
061a 0002       |    |		.CONST	0x0002								; Number of locals
061b			INIT_0618:
061b e00f       |    |		Load	0x0,0xf
061c 1b41       | A  |		Execute	Package,Field_Read,Field_Number 0x41
061d			BODY_0618:
061d 00db       |    |		Load_Top	At_Offset_3
061e 8025       | %  |		Call	0x0,0x25
061f e00f       |    |		Load	0x0,0xf
0620 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0621 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0622 00d8       |    |		Load_Top	At_Offset_0
0623 461f       |F   |		Jump_Case	0x20
0624 782a       |x*  |		Jump	0x64f								; case 0x0
0625 782b       |x+  |		Jump	0x651								; case 0x1
0626 782c       |x,  |		Jump	0x653								; case 0x2
0627 782d       |x-  |		Jump	0x655								; case 0x3
0628 782e       |x.  |		Jump	0x657								; case 0x4
0629 782f       |x/  |		Jump	0x659								; case 0x5
062a 7830       |x0  |		Jump	0x65b								; case 0x6
062b 7831       |x1  |		Jump	0x65d								; case 0x7
062c 7832       |x2  |		Jump	0x65f								; case 0x8
062d 7833       |x3  |		Jump	0x661								; case 0x9
062e 7834       |x4  |		Jump	0x663								; case 0xa
062f 7835       |x5  |		Jump	0x665								; case 0xb
0630 7836       |x6  |		Jump	0x667								; case 0xc
0631 7837       |x7  |		Jump	0x669								; case 0xd
0632 7838       |x8  |		Jump	0x66b								; case 0xe
0633 7810       |x   |		Jump	0x644								; case 0xf
0634 780f       |x   |		Jump	0x644								; case 0x10
0635 780e       |x   |		Jump	0x644								; case 0x11
0636 780d       |x   |		Jump	0x644								; case 0x12
0637 780c       |x   |		Jump	0x644								; case 0x13
0638 780b       |x   |		Jump	0x644								; case 0x14
0639 780a       |x   |		Jump	0x644								; case 0x15
063a 7809       |x   |		Jump	0x644								; case 0x16
063b 7808       |x   |		Jump	0x644								; case 0x17
063c 7830       |x0  |		Jump	0x66d								; case 0x18
063d 7831       |x1  |		Jump	0x66f								; case 0x19
063e 7832       |x2  |		Jump	0x671								; case 0x1a
063f 7833       |x3  |		Jump	0x673								; case 0x1b
0640 7834       |x4  |		Jump	0x675								; case 0x1c
0641 7802       |x   |		Jump	0x644								; case 0x1d
0642 7801       |x   |		Jump	0x644								; case 0x1e
0643 7800       |x   |		Jump	0x644								; case 0x1f
0644 0092 0836  |   6|		Action	Push_String_Extended,0x836					; "Unknown module state: "
0646 00d9       |    |		Load_Top	At_Offset_1
0647 e00f       |    |		Load	0x0,0xf
0648 1b41       | A  |		Execute	Package,Field_Read,Field_Number 0x41
0649 011c       |    |		Execute	Any,Convert_Unchecked
064a 1c01       |    |		Execute_Immediate	Run_Utility,0x1
064b 01cc       |    |		Execute	Vector,Catenate
064c e00e       |    |		Load	0x0,0xe
064d 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
064e 7828       |x(  |		Jump	0x677
064f 4800       |H   |		Short_Literal	0x0
0650 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0651 4800       |H   |		Short_Literal	0x0
0652 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0653 4801       |H   |		Short_Literal	0x1
0654 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0655 4801       |H   |		Short_Literal	0x1
0656 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0657 4801       |H   |		Short_Literal	0x1
0658 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0659 4801       |H   |		Short_Literal	0x1
065a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
065b 4801       |H   |		Short_Literal	0x1
065c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
065d 4801       |H   |		Short_Literal	0x1
065e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
065f 4801       |H   |		Short_Literal	0x1
0660 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0661 4801       |H   |		Short_Literal	0x1
0662 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0663 4801       |H   |		Short_Literal	0x1
0664 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0665 4801       |H   |		Short_Literal	0x1
0666 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0667 4800       |H   |		Short_Literal	0x0
0668 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0669 4801       |H   |		Short_Literal	0x1
066a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
066b 4800       |H   |		Short_Literal	0x0
066c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
066d 4801       |H   |		Short_Literal	0x1
066e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
066f 4801       |H   |		Short_Literal	0x1
0670 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0671 4801       |H   |		Short_Literal	0x1
0672 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0673 4801       |H   |		Short_Literal	0x1
0674 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0675 4801       |H   |		Short_Literal	0x1
0676 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0677 0831       | 1  |		Execute_Immediate	Raise,0x31
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 067b       | {  |		.CONST	0x067b								; Address of begin
0679 0004       |    |		.CONST	0x0004								; Address of exception handler
067a 0001       |    |		.CONST	0x0001								; Number of locals
067b			BODY_0678:
067b			INIT_0678:
067b e032       | 2  |		Load	0x0,0x32
067c 4807       |H   |		Short_Literal	0x7
067d e033       | 3  |		Load	0x0,0x33
067e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
067f 7003       |p   |		Jump_Nonzero	0x683
0680 00da       |    |		Load_Top	At_Offset_2
0681 8034       | 4  |		Call	0x0,0x34
0682 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0683 4801       |H   |		Short_Literal	0x1
0684 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0685 0000 0000  |    |		.XXX[0x3]
0687 0000       |    |
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b       |    |		.CONST	0x068b								; Address of begin
0689 06bd       |    |		.CONST	0x06bd								; Address of exception handler
068a 0001       |    |		.CONST	0x0001								; Number of locals
068b			BODY_0688:
068b			INIT_0688:
068b e213       |    |		Load	0x1,0x13
068c 00db       |    |		Load_Top	At_Offset_3
068d 8226       | &  |		Call	0x1,0x26
068e 7002       |p   |		Jump_Nonzero	0x691
068f 4800       |H   |		Short_Literal	0x0
0690 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0691 00db       |    |		Load_Top	At_Offset_3
0692 4605       |F   |		Jump_Case	0x6
0693 7808       |x   |		Jump	0x69c								; case 0x0
0694 781a       |x   |		Jump	0x6af								; case 0x1
0695 7822       |x"  |		Jump	0x6b8								; case 0x2
0696 7810       |x   |		Jump	0x6a7								; case 0x3
0697 7806       |x   |		Jump	0x69e								; case 0x4
0698 7800       |x   |		Jump	0x699								; case 0x5
0699 00da       |    |		Load_Top	At_Offset_2
069a 8035       | 5  |		Call	0x0,0x35
069b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
069c 4801       |H   |		Short_Literal	0x1
069d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
069e 00da       |    |		Load_Top	At_Offset_2
069f 8035       | 5  |		Call	0x0,0x35
06a0 7004       |p   |		Jump_Nonzero	0x6a5
06a1 00da       |    |		Load_Top	At_Offset_2
06a2 8225       | %  |		Call	0x1,0x25
06a3 0f00       |    |		Execute_Immediate	Equal,0x0
06a4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06a5 4800       |H   |		Short_Literal	0x0
06a6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06a7 00da       |    |		Load_Top	At_Offset_2
06a8 8225       | %  |		Call	0x1,0x25
06a9 7003       |p   |		Jump_Nonzero	0x6ad
06aa 00da       |    |		Load_Top	At_Offset_2
06ab 8035       | 5  |		Call	0x0,0x35
06ac 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06ad 4801       |H   |		Short_Literal	0x1
06ae 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06af 00da       |    |		Load_Top	At_Offset_2
06b0 8225       | %  |		Call	0x1,0x25
06b1 6804       |h   |		Jump_Zero	0x6b6
06b2 00da       |    |		Load_Top	At_Offset_2
06b3 8035       | 5  |		Call	0x0,0x35
06b4 0f00       |    |		Execute_Immediate	Equal,0x0
06b5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06b6 4800       |H   |		Short_Literal	0x0
06b7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06b8 00da       |    |		Load_Top	At_Offset_2
06b9 e022       | "  |		Load	0x0,0x22
06ba e023       | #  |		Load	0x0,0x23
06bb 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
06bc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06bd			TRAP_0688:
06bd 0007       |    |		Action	Break_Optional
06be 4800       |H   |		Short_Literal	0x0
06bf 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3       |    |		.CONST	0x06c3								; Address of begin
06c1 0004       |    |		.CONST	0x0004								; Address of exception handler
06c2 0001       |    |		.CONST	0x0001								; Number of locals
06c3			BODY_06c0:
06c3			INIT_06c0:
06c3 00db       |    |		Load_Top	At_Offset_3
06c4 00db       |    |		Load_Top	At_Offset_3
06c5 e029       | )  |		Load	0x0,0x29
06c6 0119       |    |		Execute	Any,Check_In_Formal_Type
06c7 8227       | '  |		Call	0x1,0x27
06c8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06c9 0000 0000  |    |		.BLANK	0000[0x7]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d3       |    |		.CONST	0x06d3								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0001       |    |		.CONST	0x0001								; Number of locals
06d3			BODY_06d0:
06d3			INIT_06d0:
06d3 00e1       |    |		Load_Encached	Boolean_Cache
06d4 e5fe       |    |		Load	0x2,-0x2
06d5 00e2       |    |		Load_Encached	Integer_Cache
06d6 025e       | ^  |		Execute	Discrete,Convert
06d7 e5ff       |    |		Load	0x2,-0x1
06d8 e029       | )  |		Load	0x0,0x29
06d9 0119       |    |		Execute	Any,Check_In_Formal_Type
06da 8221       | !  |		Call	0x1,0x21
06db c5fe       |    |		Store	0x2,-0x2
06dc c5fd       |    |		Store	0x2,-0x3
06dd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06de 0000 0000  |    |		.XXX[0x2]
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; SUBPROGRAM
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e3       |    |		.CONST	0x06e3								; Address of begin
06e1 0004       |    |		.CONST	0x0004								; Address of exception handler
06e2 0001       |    |		.CONST	0x0001								; Number of locals
06e3			BODY_06e0:
06e3			BODY_06e0:
06e3			BODY_06e0:
06e3			INIT_06e0:
06e3			INIT_06e0:
06e3			INIT_06e0:
06e3 00db       |    |		Load_Top	At_Offset_3
06e4 00d8       |    |		Load_Top	At_Offset_0
06e5 00e2       |    |		Load_Encached	Integer_Cache
06e6 0260       | `  |		Execute	Discrete,In_Type
06e7 7001       |p   |		Jump_Nonzero	0x6e9
06e8 0801       |    |		Execute_Immediate	Raise,0x1
06e9 00db       |    |		Load_Top	At_Offset_3
06ea e029       | )  |		Load	0x0,0x29
06eb 0119       |    |		Execute	Any,Check_In_Formal_Type
06ec 8226       | &  |		Call	0x1,0x26
06ed 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06ee 0000 0000  |    |		.XXX[0x2]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3       |    |		.CONST	0x06f3								; Address of begin
06f1 0004       |    |		.CONST	0x0004								; Address of exception handler
06f2 0001       |    |		.CONST	0x0001								; Number of locals
06f3			BODY_06f0:
06f3			INIT_06f0:
06f3 00e1       |    |		Load_Encached	Boolean_Cache
06f4 e5fe       |    |		Load	0x2,-0x2
06f5 00e2       |    |		Load_Encached	Integer_Cache
06f6 025e       | ^  |		Execute	Discrete,Convert
06f7 e5ff       |    |		Load	0x2,-0x1
06f8 e029       | )  |		Load	0x0,0x29
06f9 0119       |    |		Execute	Any,Check_In_Formal_Type
06fa 8224       | $  |		Call	0x1,0x24
06fb c5fe       |    |		Store	0x2,-0x2
06fc c5fd       |    |		Store	0x2,-0x3
06fd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06fe 0000 0000  |    |		.XXX[0x2]
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0703       |    |		.CONST	0x0703								; Address of begin
0701 0004       |    |		.CONST	0x0004								; Address of exception handler
0702 0001       |    |		.CONST	0x0001								; Number of locals
0703			BODY_0700:
0703			INIT_0700:
0703 00e1       |    |		Load_Encached	Boolean_Cache
0704 e5fe       |    |		Load	0x2,-0x2
0705 00e1       |    |		Load_Encached	Boolean_Cache
0706 025e       | ^  |		Execute	Discrete,Convert
0707 e5ff       |    |		Load	0x2,-0x1
0708 e029       | )  |		Load	0x0,0x29
0709 0119       |    |		Execute	Any,Check_In_Formal_Type
070a 8222       | "  |		Call	0x1,0x22
070b c5fe       |    |		Store	0x2,-0x2
070c c5fd       |    |		Store	0x2,-0x3
070d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
070e 0000 0000  |    |		.XXX[0x2]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713       |    |		.CONST	0x0713								; Address of begin
0711 0004       |    |		.CONST	0x0004								; Address of exception handler
0712 0001       |    |		.CONST	0x0001								; Number of locals
0713			BODY_0710:
0713			INIT_0710:
0713 00e1       |    |		Load_Encached	Boolean_Cache
0714 e5fe       |    |		Load	0x2,-0x2
0715 00e1       |    |		Load_Encached	Boolean_Cache
0716 025e       | ^  |		Execute	Discrete,Convert
0717 e5ff       |    |		Load	0x2,-0x1
0718 e029       | )  |		Load	0x0,0x29
0719 0119       |    |		Execute	Any,Check_In_Formal_Type
071a 8223       | #  |		Call	0x1,0x23
071b c5fe       |    |		Store	0x2,-0x2
071c c5fd       |    |		Store	0x2,-0x3
071d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
071e 0000 0000  |    |		.XXX[0x2]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723       | #  |		.CONST	0x0723								; Address of begin
0721 0004       |    |		.CONST	0x0004								; Address of exception handler
0722 0001       |    |		.CONST	0x0001								; Number of locals
0723			BODY_0720:
0723			INIT_0720:
0723 e014       |    |		Load	0x0,0x14
0724 e5fd       |    |		Load	0x2,-0x3
0725 8015       |    |		Call	0x0,0x15
0726 6808       |h   |		Jump_Zero	0x72f
0727 e5fc       |    |		Load	0x2,-0x4
0728 6803       |h   |		Jump_Zero	0x72c
0729 0092 087c  |   ||		Action	Push_String_Extended,0x87c					; "obsolete location"
072b 00ca       |    |		Action	Exit_Nullary_Function
072c 0092 0828  |   (|		Action	Push_String_Extended,0x828					; "unknown location"
072e 00ca       |    |		Action	Exit_Nullary_Function
072f 4801       |H   |		Short_Literal	0x1
0730 e020       |    |		Load	0x0,0x20
0731 e5fd       |    |		Load	0x2,-0x3
0732 e5fe       |    |		Load	0x2,-0x2
0733 e016       |    |		Load	0x0,0x16
0734 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
0735 00ca       |    |		Action	Exit_Nullary_Function
0736 0000 0000  |    |		.XXX[0x2]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073b       | ;  |		.CONST	0x073b								; Address of begin
0739 0004       |    |		.CONST	0x0004								; Address of exception handler
073a 0001       |    |		.CONST	0x0001								; Number of locals
073b			BODY_0738:
073b			INIT_0738:
073b 4820       |H   |		Short_Literal	0x20
073c 480a       |H   |		Short_Literal	0xa
073d 480a       |H   |		Short_Literal	0xa
073e e7ff       |    |		Load	0x3,-0x1
073f e02b       | +  |		Load	0x0,0x2b
0740 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0741 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0742 0000 0000  |    |		.BLANK	0000[0x6]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 074b       | K  |		.CONST	0x074b								; Address of begin
0749 0004       |    |		.CONST	0x0004								; Address of exception handler
074a 0001       |    |		.CONST	0x0001								; Number of locals
074b			BODY_0748:
074b			INIT_0748:
074b e403       |    |		Load	0x2,0x3
074c e404       |    |		Load	0x2,0x4
074d 012e       | .  |		Execute	Any,Not_Equal
074e 680b       |h   |		Jump_Zero	0x75a
074f 480a       |H   |		Short_Literal	0xa
0750 0092 087d  |   }|		Action	Push_String_Extended,0x87d					; "    Exception was actually raised in system code at Pc: "
0752 e404       |    |		Load	0x2,0x4
0753 8017       |    |		Call	0x0,0x17
0754 01cc       |    |		Execute	Vector,Catenate
0755 0092 0824  |   $|		Action	Push_String_Extended,0x824					; "."
0757 01cc       |    |		Execute	Vector,Catenate
0758 01ca       |    |		Execute	Vector,Prepend
0759 00ca       |    |		Action	Exit_Nullary_Function
075a 00ea       |    |		Load_Encached	Null_String_Cache
075b 00ca       |    |		Action	Exit_Nullary_Function
075c 0000 0000  |    |		.BLANK	0000[0x4]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0763       | c  |		.CONST	0x0763								; Address of begin
0761 0004       |    |		.CONST	0x0004								; Address of exception handler
0762 0001       |    |		.CONST	0x0001								; Number of locals
0763			BODY_0760:
0763			INIT_0760:
0763 e5fe       |    |		Load	0x2,-0x2
0764 681a       |h   |		Jump_Zero	0x77f
0765 480a       |H   |		Short_Literal	0xa
0766 0092 087e  |   ~|		Action	Push_String_Extended,0x87e					; "   Control offset: #"
0768 4820       |H   |		Short_Literal	0x20
0769 4800       |H   |		Short_Literal	0x0
076a 4810       |H   |		Short_Literal	0x10
076b e402       |    |		Load	0x2,0x2
076c e02b       | +  |		Load	0x0,0x2b
076d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
076e 01cc       |    |		Execute	Vector,Catenate
076f 0092 087f  |    |		Action	Push_String_Extended,0x87f					; ",  Raise Pc: "
0771 01cc       |    |		Execute	Vector,Catenate
0772 e403       |    |		Load	0x2,0x3
0773 8017       |    |		Call	0x0,0x17
0774 01cc       |    |		Execute	Vector,Catenate
0775 0092 0880  |    |		Action	Push_String_Extended,0x880					; ", Exception name: "
0777 01cc       |    |		Execute	Vector,Catenate
0778 e40c       |    |		Load	0x2,0xc
0779 8036       | 6  |		Call	0x0,0x36
077a 01cc       |    |		Execute	Vector,Catenate
077b 840e       |    |		Call	0x2,0xe
077c 01cc       |    |		Execute	Vector,Catenate
077d 01cb       |    |		Execute	Vector,Append
077e 00ca       |    |		Action	Exit_Nullary_Function
077f 00ea       |    |		Load_Encached	Null_String_Cache
0780 00ca       |    |		Action	Exit_Nullary_Function
0781 0000 0000  |    |		.BLANK	0000[0x7]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b       |    |		.CONST	0x078b								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0001       |    |		.CONST	0x0001								; Number of locals
078b			BODY_0788:
078b			INIT_0788:
078b e40b       |    |		Load	0x2,0xb
078c 6803       |h   |		Jump_Zero	0x790
078d 0092 0881  |    |		Action	Push_String_Extended,0x881					; " re-raised; originally"
078f 00ca       |    |		Action	Exit_Nullary_Function
0790 00ea       |    |		Load_Encached	Null_String_Cache
0791 00ca       |    |		Action	Exit_Nullary_Function
0792 0000 0000  |    |		.BLANK	0000[0x6]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b       |    |		.CONST	0x079b								; Address of begin
0799 0004       |    |		.CONST	0x0004								; Address of exception handler
079a 0001       |    |		.CONST	0x0001								; Number of locals
079b			BODY_0798:
079b			INIT_0798:
079b 480a       |H   |		Short_Literal	0xa
079c 0092 0882  |    |		Action	Push_String_Extended,0x882					; "    Exception "
079e 4801       |H   |		Short_Literal	0x1
079f e40c       |    |		Load	0x2,0xc
07a0 8013       |    |		Call	0x0,0x13
07a1 01cc       |    |		Execute	Vector,Catenate
07a2 8410       |    |		Call	0x2,0x10
07a3 01cc       |    |		Execute	Vector,Catenate
07a4 0092 0883  |    |		Action	Push_String_Extended,0x883					; " raised at: "
07a6 01cc       |    |		Execute	Vector,Catenate
07a7 e5fd       |    |		Load	0x2,-0x3
07a8 e407       |    |		Load	0x2,0x7
07a9 e406       |    |		Load	0x2,0x6
07aa e405       |    |		Load	0x2,0x5
07ab e016       |    |		Load	0x0,0x16
07ac 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
07ad 01cc       |    |		Execute	Vector,Catenate
07ae 0092 0824  |   $|		Action	Push_String_Extended,0x824					; "."
07b0 01cc       |    |		Execute	Vector,Catenate
07b1 01cb       |    |		Execute	Vector,Append
07b2 840f       |    |		Call	0x2,0xf
07b3 01cc       |    |		Execute	Vector,Catenate
07b4 00ca       |    |		Action	Exit_Nullary_Function
07b5 0000 0000  |    |		.XXX[0x3]
07b7 0000       |    |
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bb       |    |		.CONST	0x07bb								; Address of begin
07b9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ba 0001       |    |		.CONST	0x0001								; Number of locals
07bb			BODY_07b8:
07bb			INIT_07b8:
07bb e409       |    |		Load	0x2,0x9
07bc e030       | 0  |		Load	0x0,0x30
07bd e407       |    |		Load	0x2,0x7
07be 0120       |    |		Execute	Any,Is_Value
07bf 6802       |h   |		Jump_Zero	0x7c2
07c0 e02f       | /  |		Load	0x0,0x2f
07c1 7801       |x   |		Jump	0x7c3
07c2 e407       |    |		Load	0x2,0x7
07c3 e406       |    |		Load	0x2,0x6
07c4 0120       |    |		Execute	Any,Is_Value
07c5 6802       |h   |		Jump_Zero	0x7c8
07c6 e02e       | .  |		Load	0x0,0x2e
07c7 7801       |x   |		Jump	0x7c9
07c8 e406       |    |		Load	0x2,0x6
07c9 e405       |    |		Load	0x2,0x5
07ca 0120       |    |		Execute	Any,Is_Value
07cb 6802       |h   |		Jump_Zero	0x7ce
07cc e02d       | -  |		Load	0x0,0x2d
07cd 7801       |x   |		Jump	0x7cf
07ce e405       |    |		Load	0x2,0x5
07cf e40c       |    |		Load	0x2,0xc
07d0 0120       |    |		Execute	Any,Is_Value
07d1 6802       |h   |		Jump_Zero	0x7d4
07d2 e031       | 1  |		Load	0x0,0x31
07d3 7801       |x   |		Jump	0x7d5
07d4 e40c       |    |		Load	0x2,0xc
07d5 e403       |    |		Load	0x2,0x3
07d6 0120       |    |		Execute	Any,Is_Value
07d7 6802       |h   |		Jump_Zero	0x7da
07d8 e02c       | ,  |		Load	0x0,0x2c
07d9 7801       |x   |		Jump	0x7db
07da e403       |    |		Load	0x2,0x3
07db e404       |    |		Load	0x2,0x4
07dc 0120       |    |		Execute	Any,Is_Value
07dd 6802       |h   |		Jump_Zero	0x7e0
07de e02c       | ,  |		Load	0x0,0x2c
07df 7801       |x   |		Jump	0x7e1
07e0 e404       |    |		Load	0x2,0x4
07e1 00e1       |    |		Load_Encached	Boolean_Cache
07e2 00e1       |    |		Load_Encached	Boolean_Cache
07e3 e402       |    |		Load	0x2,0x2
07e4 e5ff       |    |		Load	0x2,-0x1
07e5 8037       | 7  |		Call	0x0,0x37
07e6 c402       |    |		Store	0x2,0x2
07e7 c40a       |    |		Store	0x2,0xa
07e8 c40b       |    |		Store	0x2,0xb
07e9 c404       |    |		Store	0x2,0x4
07ea c403       |    |		Store	0x2,0x3
07eb c40c       |    |		Store	0x2,0xc
07ec c405       |    |		Store	0x2,0x5
07ed c406       |    |		Store	0x2,0x6
07ee c407       |    |		Store	0x2,0x7
07ef c408       |    |		Store	0x2,0x8
07f0 c409       |    |		Store	0x2,0x9
07f1 4802       |H   |		Short_Literal	0x2
07f2 e409       |    |		Load	0x2,0x9
07f3 e018       |    |		Load	0x0,0x18
07f4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
07f5 6806       |h   |		Jump_Zero	0x7fc
07f6 480a       |H   |		Short_Literal	0xa
07f7 e409       |    |		Load	0x2,0x9
07f8 e018       |    |		Load	0x0,0x18
07f9 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
07fa 01cb       |    |		Execute	Vector,Append
07fb 00ca       |    |		Action	Exit_Nullary_Function
07fc e40a       |    |		Load	0x2,0xa
07fd 6802       |h   |		Jump_Zero	0x800
07fe 00ea       |    |		Load_Encached	Null_String_Cache
07ff 00ca       |    |		Action	Exit_Nullary_Function
0800 e40d       |    |		Load	0x2,0xd
0801 7011       |p   |		Jump_Nonzero	0x813
0802 4801       |H   |		Short_Literal	0x1
0803 a40d       |    |		Store_Unchecked	0x2,0xd
0804 480a       |H   |		Short_Literal	0xa
0805 0092 0875  |   u|		Action	Push_String_Extended,0x875					; "Task "
0807 e5ff       |    |		Load	0x2,-0x1
0808 800d       |    |		Call	0x0,0xd
0809 01cc       |    |		Execute	Vector,Catenate
080a 0092 0851  |   Q|		Action	Push_String_Extended,0x851					; ":"
080c 01cc       |    |		Execute	Vector,Catenate
080d 01cb       |    |		Execute	Vector,Append
080e 8411       |    |		Call	0x2,0x11
080f 01cc       |    |		Execute	Vector,Catenate
0810 8412       |    |		Call	0x2,0x12
0811 01cc       |    |		Execute	Vector,Catenate
0812 00ca       |    |		Action	Exit_Nullary_Function
0813 8411       |    |		Call	0x2,0x11
0814 8412       |    |		Call	0x2,0x12
0815 01cc       |    |		Execute	Vector,Catenate
0816 00ca       |    |		Action	Exit_Nullary_Function
0817 0000       |    |		.XXX[0x1]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 081b       |    |		.CONST	0x081b								; Address of begin
0819 0004       |    |		.CONST	0x0004								; Address of exception handler
081a 0001       |    |		.CONST	0x0001								; Number of locals
081b			BODY_0818:
081b			INIT_0818:
081b e40d       |    |		Load	0x2,0xd
081c 6803       |h   |		Jump_Zero	0x820
081d 0092 0884  |    |		Action	Push_String_Extended,0x884					; "\x0a"
081f 00ca       |    |		Action	Exit_Nullary_Function
0820 00ea       |    |		Load_Encached	Null_String_Cache
0821 00ca       |    |		Action	Exit_Nullary_Function
0822 ; --------------------------------------------------------------------------------------
0822 ; STRING TABLE
0822 ; --------------------------------------------------------------------------------------
0822 00c8       |    |		.STRTAB	0x00c8->0x0886							; "   No rendezvous are in progress for any task."
0823 00f4       |    |		.STRTAB	0x00f4->0x089d							; "   No rendezvous are in progress in task "
0824 011b       |    |		.STRTAB	0x011b->0x08b1							; "."
0825 011a       |    |		.STRTAB	0x011a->0x08b2							; "   No exceptions are active in any tasks."
0826 0141       | A  |		.STRTAB	0x0141->0x08c6							; "    No exceptions are active in task "
0827 0164       | d  |		.STRTAB	0x0164->0x08d9							; "get_raise_location called with null task name"
0828 018f       |    |		.STRTAB	0x018f->0x08ef							; "unknown location"
0829 019d       |    |		.STRTAB	0x019d->0x08f7							; " Running "
082a 01a4       |    |		.STRTAB	0x01a4->0x08fc							; " At a breakpoint at "
082b 01b6       |    |		.STRTAB	0x01b6->0x0906							; " Step complete at "
082c 01c6       |    |		.STRTAB	0x01c6->0x090f							; " Tracing at "
082d 01d0       |    |		.STRTAB	0x01d0->0x0915							; " Instruction step at "
082e 01e3       |    |		.STRTAB	0x01e3->0x091f							; " Has been temporarily stopped by the debugger at "
082f 0212       |    |		.STRTAB	0x0212->0x0938							; " Creation break at "
0830 0223       | #  |		.STRTAB	0x0223->0x0941							; " Tracing a task creation at "
0831 023d       | =  |		.STRTAB	0x023d->0x094f							; " Raised exception "
0832 024d       | M  |		.STRTAB	0x024d->0x0958							; " Stop (hold) at "
0833 025b       | [  |		.STRTAB	0x025b->0x0960							; " Stop at "
0834 0262       | b  |		.STRTAB	0x0262->0x0965							; " User call to debugger at "
0835 027a       | z  |		.STRTAB	0x027a->0x0972							; " Stopped (unknown reason) at "
0836 0295       |    |		.STRTAB	0x0295->0x0980							; "Unknown module state: "
0837 02a9       |    |		.STRTAB	0x02a9->0x098b							; "waiting for child elaboration"
0838 02c4       |    |		.STRTAB	0x02c4->0x099a							; "waiting for parent elaboration"
0839 02e0       |    |		.STRTAB	0x02e0->0x09a9							; "activating child packages"
083a 02f7       |    |		.STRTAB	0x02f7->0x09b5							; "activating child tasks"
083b 030b       |    |		.STRTAB	0x030b->0x09c0							; "waiting for task activation"
083c 0324       | $  |		.STRTAB	0x0324->0x09ce							; "waiting for children"
083d 0336       | 6  |		.STRTAB	0x0336->0x09d8							; "package completed"
083e 0345       | E  |		.STRTAB	0x0345->0x09e0							; "waiting at entry for accept"
083f 035e       | ^  |		.STRTAB	0x035e->0x09ee							; "waiting at timed entry for accept"
0840 037d       | }  |		.STRTAB	0x037d->0x09fe							; "attempting entry call"
0841 0390       |    |		.STRTAB	0x0390->0x0a09							; "waiting for delay"
0842 039f       |    |		.STRTAB	0x039f->0x0a11							; "aborting task"
0843 03aa       |    |		.STRTAB	0x03aa->0x0a18							; "terminated"
0844 03b2       |    |		.STRTAB	0x03b2->0x0a1d							; "state presently unknown"
0845 03c7       |    |		.STRTAB	0x03c7->0x0a28							; "in wait service"
0846 03d4       |    |		.STRTAB	0x03d4->0x0a30							; "delaying in wait service"
0847 03ea       |    |		.STRTAB	0x03ea->0x0a3c							; "being aborted"
0848 03f5       |    |		.STRTAB	0x03f5->0x0a42							; "waiting at accept for entry call"
0849 0413       |    |		.STRTAB	0x0413->0x0a52							; "waiting at select for entry call"
084a 0431       | 1  |		.STRTAB	0x0431->0x0a62							; "waiting at select-delay for entry call"
084b 0455       | U  |		.STRTAB	0x0455->0x0a75							; "waiting at select-terminate for entry call with dependents"
084c 048d       |    |		.STRTAB	0x048d->0x0a92							; "waiting at select-terminate for entry call"
084d 04b5       |    |		.STRTAB	0x04b5->0x0aa7							; "in environment"
084e 04c1       |    |		.STRTAB	0x04c1->0x0aae							; "for input"
084f 04c8       |    |		.STRTAB	0x04c8->0x0ab3							; " ("
0850 04c8       |    |		.STRTAB	0x04c8->0x0ab4							; ")"
0851 04c7       |    |		.STRTAB	0x04c7->0x0ab4							; ":"
0852 04c6       |    |		.STRTAB	0x04c6->0x0ab5							; " at "
0853 04c8       |    |		.STRTAB	0x04c8->0x0ab7							; "obsolete location (program has been recompiled since debugger started)"
0854 050c       |    |		.STRTAB	0x050c->0x0ada							; ", PC= "
0855 0510       |    |		.STRTAB	0x0510->0x0add							; " Stopping, "
0856 0519       |    |		.STRTAB	0x0519->0x0ae2							; "Finished Elaboration"
0857 052b       | +  |		.STRTAB	0x052b->0x0aec							; "Terminated"
0858 0533       | 3  |		.STRTAB	0x0533->0x0af1							; "Waiting "
0859 0539       | 9  |		.STRTAB	0x0539->0x0af5							; ";"
085a 0538       | 8  |		.STRTAB	0x0538->0x0af6							; " Been Rousted"
085b 0543       | C  |		.STRTAB	0x0543->0x0afc							; " Not Rousted"
085c 054d       | M  |		.STRTAB	0x054d->0x0b02							; " Running, "
085d 0555       | U  |		.STRTAB	0x0555->0x0b07							; " [Pri = "
085e 055b       | [  |		.STRTAB	0x055b->0x0b0b							; ", ABORTED"
085f 0562       | b  |		.STRTAB	0x0562->0x0b10							; ", Memory cond ="
0860 056f       | o  |		.STRTAB	0x056f->0x0b17							; "]"
0861 056e       | n  |		.STRTAB	0x056e->0x0b18							; "\x0a    "
0862 0571       | q  |		.STRTAB	0x0571->0x0b1a							; "Task display interrupted.\x0a"
0863 0589       |    |		.STRTAB	0x0589->0x0b27							; ": Terminated."
0864 0594       |    |		.STRTAB	0x0594->0x0b2e							; ": unable to read information: "
0865 05b0       |    |		.STRTAB	0x05b0->0x0b3d							; "Unable to obtain space information for task "
0866 05da       |    |		.STRTAB	0x05da->0x0b53							; "  Space use for task "
0867 05ed       |    |		.STRTAB	0x05ed->0x0b5d							; "  Current control space: "
0868 0604       |    |		.STRTAB	0x0604->0x0b6a							; ",   Max control space: "
0869 0619       |    |		.STRTAB	0x0619->0x0b75							; "   (bytes)."
086a 0622       | "  |		.STRTAB	0x0622->0x0b7b							; "  Current data space: "
086b 0636       | 6  |		.STRTAB	0x0636->0x0b86							; ",   Max data space: "
086c 0648       | H  |		.STRTAB	0x0648->0x0b90							; "  Address space sizes (in bits):"
086d 0666       | f  |		.STRTAB	0x0666->0x0ba0							; "segment      current      max\x0aControl  "
086e 068b       |    |		.STRTAB	0x068b->0x0bb3							; "Data     "
086f 0692       |    |		.STRTAB	0x0692->0x0bb8							; "Type     "
0870 0699       |    |		.STRTAB	0x0699->0x0bbc							; "Queue    "
0871 06a0       |    |		.STRTAB	0x06a0->0x0bc1							; "          "
0872 06a8       |    |		.STRTAB	0x06a8->0x0bc6							; "Program has terminated."
0873 06bd       |    |		.STRTAB	0x06bd->0x0bd1							; "Job: "
0874 06c0       |    |		.STRTAB	0x06c0->0x0bd4							; ", Root task: "
0875 06cb       |    |		.STRTAB	0x06cb->0x0bda							; "Task "
0876 06ce       |    |		.STRTAB	0x06ce->0x0bdd							; "  In rendezvous with:  "
0877 06e3       |    |		.STRTAB	0x06e3->0x0be8							; "  Control offset: #"
0878 06f4       |    |		.STRTAB	0x06f4->0x0bf2							; "Display one task passed a null task name"
0879 071a       |    |		.STRTAB	0x071a->0x0c06							; "Rendezvous_Info_For_one_task passed a null task name"
087a 074c       | L  |		.STRTAB	0x074c->0x0c20							; "Exception_Info_For_one_task passed a null task name"
087b 077d       | }  |		.STRTAB	0x077d->0x0c39							; "Space_Info_For_one_task passed a null task name"
087c 07aa       |    |		.STRTAB	0x07aa->0x0c51							; "obsolete location"
087d 07b9       |    |		.STRTAB	0x07b9->0x0c59							; "    Exception was actually raised in system code at Pc: "
087e 07ef       |    |		.STRTAB	0x07ef->0x0c75							; "   Control offset: #"
087f 0801       |    |		.STRTAB	0x0801->0x0c7f							; ",  Raise Pc: "
0880 080c       |    |		.STRTAB	0x080c->0x0c86							; ", Exception name: "
0881 081c       |    |		.STRTAB	0x081c->0x0c8f							; " re-raised; originally"
0882 0830       | 0  |		.STRTAB	0x0830->0x0c9a							; "    Exception "
0883 083c       | <  |		.STRTAB	0x083c->0x0ca1							; " raised at: "
0884 0846       | F  |		.STRTAB	0x0846->0x0ca7							; "\x0a"
0885 0845       | E  |		.STREND 0x0845->0x0ca7
0886 2020 204e  |   N|		.STRTAB_STRINGS
0ca8 ; --------------------------------------------------------------------------------------
0ca8 ; Debug Table
0ca8 ; --------------------------------------------------------------------------------------
0ca8 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0x7d98,0x0000,0x0001,0x0000
0cae 0000 10c0  |    |		.XXX[0x1d]
0cb0 0d59 2004  | Y  |
0cb2 8000 0012  |    |
0cb4 0d59 2004  | Y  |
0cb6 0000 1340  |   @|
0cb8 0d59 2004  | Y  |
0cba 8000 0012  |    |
0cbc 0d59 2004  | Y  |
0cbe 0000 1240  |   @|
0cc0 0d59 2004  | Y  |
0cc2 8000 0012  |    |
0cc4 0d59 2004  | Y  |
0cc6 0000 12c0  |    |
0cc8 0000 0000  |    |
0cca 8000       |    |
0ccb 0000 0000  |    |		.BLANK	0000[0x4]
0ccf 0053 0001  | S  |		.XXX[0x14]
0cd1 0404 8800  |    |
0cd3 0bec 0d59  |   Y|
0cd5 2004 0000  |    |
0cd7 0001 0001  |    |
0cd9 0404 8800  |    |
0cdb 0bec 0d59  |   Y|
0cdd 2004 0000  |    |
0cdf 0099 0000  |    |
0ce1 0000 8000  |    |
0ce3 0000 0000  |    |		.BLANK	0000[0x4]
0ce7 0001 0000  |    |		.XXX[0x4]
0ce9 0000 8000  |    |
0ceb 0000 0000  |    |		.BLANK	0000[0x5]
0cf0 0d59 4004  | Y@ |		.XXX[0x18]
0cf2 0000 0036  |   6|
0cf4 00bb 3814  |  8 |
0cf6 0000 2432  |  $2|
0cf8 0d59 4004  | Y@ |
0cfa 0000 0036  |   6|
0cfc 00bb 3814  |  8 |
0cfe 0000 24b2  |  $ |
0d00 0d59 4004  | Y@ |
0d02 0000 0016  |    |
0d04 00bb 3814  |  8 |
0d06 0000 2832  |  (2|
0d08 0000 0000  |    |		.BLANK	0000[0x8]
0d10 0001 0404  |    |		.XXX[0x10]
0d12 0800 0bec  |    |
0d14 0d59 2004  | Y  |
0d16 0000 0099  |    |
0d18 0001 0404  |    |
0d1a 0800 0bec  |    |
0d1c 0d59 2004  | Y  |
0d1e 0000 0001  |    |
0d20 0000 0000  |    |		.BLANK	0000[0x7]
0d27 0053 0d59  | S Y|		.XXX[0x2d]
0d29 4004 0000  |@   |
0d2b 007f 00bb  |    |
0d2d 3814 0000  |8   |
0d2f 23c2 0d59  |#  Y|
0d31 4004 0000  |@   |
0d33 003f 0000  | ?  |
0d35 0049 0000  | I  |
0d37 0001 0001  |    |
0d39 0404 0800  |    |
0d3b 0bec 0d59  |   Y|
0d3d 4004 0000  |@   |
0d3f 02b9 0001  |    |
0d41 0404 0800  |    |
0d43 0bec 0d59  |   Y|
0d45 4004 0000  |@   |
0d47 0789 001a  |    |
0d49 a004 0800  |    |
0d4b 3210 0000  |2   |
0d4d 0000 0000  |    |
0d4f 825d 001a  | ]  |
0d51 a004 0800  |    |
0d53 3210       |2   |
0d54 0000 0000  |    |		.BLANK	0000[0x4]
0d58 0d59 4004  | Y@ |		.XXX[0x4c]
0d5a 0000 1296  |    |
0d5c 00bb 3814  |  8 |
0d5e 0000 29b3  |  ) |
0d60 0d59 4004  | Y@ |
0d62 0000 1296  |    |
0d64 00bb 3814  |  8 |
0d66 0000 2c33  |  ,3|
0d68 0d59 4004  | Y@ |
0d6a 0000 12ff  |    |
0d6c 00bb 3814  |  8 |
0d6e 0000 27a3  |  ' |
0d70 0d59 4004  | Y@ |
0d72 0000 003f  |   ?|
0d74 0002 5058  |  PX|
0d76 0000 08e8  |    |
0d78 001a a004  |    |
0d7a 0800 3210  |  2 |
0d7c 0000 0000  |    |
0d7e 0000 7cbb  |  | |
0d80 00ea 380a  |  8 |
0d82 0000 9b7e  |   ~|
0d84 0000 0000  |    |
0d86 1396 1402  |    |
0d88 0001 0404  |    |
0d8a 0800 0bec  |    |
0d8c 0d59 4004  | Y@ |
0d8e 0000 02b9  |    |
0d90 0d1a cc04  |    |
0d92 0000 007f  |    |
0d94 00bb 3814  |  8 |
0d96 0000 3142  |  1B|
0d98 0d1a cc04  |    |
0d9a 0000 003f  |   ?|
0d9c 0002 d046  |   F|
0d9e 0000 08e8  |    |
0da0 0d1a cc04  |    |
0da2 0800 0f90  |    |
0da4 0000 0000  |    |		.BLANK	0000[0x4]
0da8 0d1e d804  |    |		.XXX[0x24]
0daa 0000 007f  |    |
0dac 00bb 3814  |  8 |
0dae 0000 30f2  |  0 |
0db0 0d1e d804  |    |
0db2 0000 003f  |   ?|
0db4 0002 d020  |    |
0db6 0000 08e8  |    |
0db8 0d1e d804  |    |
0dba 0800 0914  |    |
0dbc 0d1e d804  |    |
0dbe 0100 26c8  |  & |
0dc0 0d1a cc04  |    |
0dc2 0000 007f  |    |
0dc4 00be a814  |    |
0dc6 0000 2392  |  # |
0dc8 0d1e d804  |    |
0dca 0800 0910  |    |
0dcc 0000 0000  |    |		.BLANK	0000[0x4]
0dd0 0d1a cc04  |    |		.XXX[0x20]
0dd2 0000 007f  |    |
0dd4 00be a814  |    |
0dd6 0000 1f22  |   "|
0dd8 0d1a cc04  |    |
0dda 0000 003f  |   ?|
0ddc 0003 20ef  |    |
0dde 0000 0b90  |    |
0de0 0d1a cc04  |    |
0de2 0800 0f90  |    |
0de4 0000 0000  |    |
0de6 0000 b491  |    |
0de8 0d1e d804  |    |
0dea 0000 007f  |    |
0dec 00ea 380a  |  8 |
0dee 0000 1202  |    |
0df0 0000 0000  |    |		.BLANK	0000[0xa]
0dfa 3800 001f  |8   |		.XXX[0x6]
0dfc 0000 0000  |    |
0dfe 0000 0a68  |   h|