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

⟦dc8265414⟧

    Length: 7168 (0x1c00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06e8fd

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0ca0       |    |		.CONST	0x0ca0								; 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 0433  |   3|		Declare_Subprogram	INIT_0430,For_Outer_Call
002b 029d 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call
002d 029d 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call
002f 029d 04fb  |    |		Declare_Subprogram	INIT_04f8,For_Outer_Call
0031 029d 050b  |    |		Declare_Subprogram	INIT_0508,For_Outer_Call
0033 029d 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call
0035 029d 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Outer_Call
0037 029d 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Outer_Call
0039 029d 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Outer_Call
003b 029d 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Outer_Call
003d 029d 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call
003f 029d 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call
0041 029d 0673  |   s|		Declare_Subprogram	INIT_0670,For_Outer_Call
0043 029d 0683  |    |		Declare_Subprogram	INIT_0680,For_Outer_Call
0045 029d 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call
0047 029d 06cb  |    |		Declare_Subprogram	INIT_06c8,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 06db  |    |		Declare_Subprogram	INIT_06d8,For_Outer_Call
005c 029d 06eb  |    |		Declare_Subprogram	INIT_06e8,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 06db  |    |		Declare_Subprogram	INIT_06d8,For_Outer_Call
0070 029d 06fb  |    |		Declare_Subprogram	INIT_06f8,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 06db  |    |		Declare_Subprogram	INIT_06d8,For_Outer_Call
0084 029d 070b  |    |		Declare_Subprogram	INIT_0708,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 081a  |    |		Action	Push_String_Extended,0x81a					; "   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 081b  |    |		Action	Push_String_Extended,0x81b					; "   No rendezvous are in progress in task "
0125 e5ff       |    |		Load	0x2,-0x1
0126 800d       |    |		Call	0x0,0xd
0127 01cc       |    |		Execute	Vector,Catenate
0128 0092 081c  |    |		Action	Push_String_Extended,0x81c					; "."
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 081d  |    |		Action	Push_String_Extended,0x81d					; "   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 081e  |    |		Action	Push_String_Extended,0x81e					; "    No exceptions are active in task "
0155 e5ff       |    |		Load	0x2,-0x1
0156 800d       |    |		Call	0x0,0xd
0157 01cc       |    |		Execute	Vector,Catenate
0158 0092 081c  |    |		Action	Push_String_Extended,0x81c					; "."
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 081f  |    |		Action	Push_String_Extended,0x81f					; "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 0820  |    |		Action	Push_String_Extended,0x820					; "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 0821  |   !|		Action	Push_String_Extended,0x821					; " Running "
018c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
018d 0092 0822  |   "|		Action	Push_String_Extended,0x822					; " At a breakpoint at "
018f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0190 0092 0823  |   #|		Action	Push_String_Extended,0x823					; " Step complete at "
0192 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0193 0092 0824  |   $|		Action	Push_String_Extended,0x824					; " Tracing at "
0195 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0196 0092 0825  |   %|		Action	Push_String_Extended,0x825					; " Instruction step at "
0198 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0199 0092 0826  |   &|		Action	Push_String_Extended,0x826					; " Has been temporarily stopped by the debugger at "
019b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019c 0092 0827  |   '|		Action	Push_String_Extended,0x827					; " Creation break at "
019e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
019f 0092 0828  |   (|		Action	Push_String_Extended,0x828					; " Tracing a task creation at "
01a1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a2 0092 0829  |   )|		Action	Push_String_Extended,0x829					; " Raised exception "
01a4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a5 0092 082a  |   *|		Action	Push_String_Extended,0x82a					; " Stop (hold) at "
01a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a8 0092 082b  |   +|		Action	Push_String_Extended,0x82b					; " Stop at "
01aa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ab 0092 082c  |   ,|		Action	Push_String_Extended,0x82c					; " User call to debugger at "
01ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ae 0092 082d  |   -|		Action	Push_String_Extended,0x82d					; " 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 082e  |   .|		Action	Push_String_Extended,0x82e					; "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 082f  |   /|		Action	Push_String_Extended,0x82f					; "waiting for child elaboration"
01ec 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ed 0092 0830  |   0|		Action	Push_String_Extended,0x830					; "waiting for parent elaboration"
01ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f0 0092 0831  |   1|		Action	Push_String_Extended,0x831					; "activating child packages"
01f2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f3 0092 0832  |   2|		Action	Push_String_Extended,0x832					; "activating child tasks"
01f5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f6 0092 0833  |   3|		Action	Push_String_Extended,0x833					; "waiting for task activation"
01f8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f9 0092 0834  |   4|		Action	Push_String_Extended,0x834					; "waiting for children"
01fb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01fc 0092 0835  |   5|		Action	Push_String_Extended,0x835					; "package completed"
01fe 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ff 0092 0836  |   6|		Action	Push_String_Extended,0x836					; "waiting at entry for accept"
0201 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0202 0092 0837  |   7|		Action	Push_String_Extended,0x837					; "waiting at timed entry for accept"
0204 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0205 0092 0838  |   8|		Action	Push_String_Extended,0x838					; "attempting entry call"
0207 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0208 0092 0839  |   9|		Action	Push_String_Extended,0x839					; "waiting for delay"
020a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020b 0092 083a  |   :|		Action	Push_String_Extended,0x83a					; "aborting task"
020d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020e 0092 083b  |   ;|		Action	Push_String_Extended,0x83b					; "terminated"
0210 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0211 0092 083c  |   <|		Action	Push_String_Extended,0x83c					; "state presently unknown"
0213 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0214 0092 083d  |   =|		Action	Push_String_Extended,0x83d					; "in wait service"
0216 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0217 0092 083e  |   >|		Action	Push_String_Extended,0x83e					; "delaying in wait service"
0219 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021a 0092 083f  |   ?|		Action	Push_String_Extended,0x83f					; "being aborted"
021c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021d 0092 0840  |   @|		Action	Push_String_Extended,0x840					; "waiting at accept for entry call"
021f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0220 0092 0841  |   A|		Action	Push_String_Extended,0x841					; "waiting at select for entry call"
0222 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0223 0092 0842  |   B|		Action	Push_String_Extended,0x842					; "waiting at select-delay for entry call"
0225 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0226 0092 0843  |   C|		Action	Push_String_Extended,0x843					; "waiting at select-terminate for entry call with dependents"
0228 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0229 0092 0844  |   D|		Action	Push_String_Extended,0x844					; "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 0845  |   E|		Action	Push_String_Extended,0x845					; "in environment"
0240 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0241 0092 0846  |   F|		Action	Push_String_Extended,0x846					; "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 071b  |    |		Declare_Subprogram	INIT_0718,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 0847  |   G|		Action	Push_String_Extended,0x847					; " ("
0260 8403       |    |		Call	0x2,0x3
0261 01cc       |    |		Execute	Vector,Catenate
0262 0092 0848  |   H|		Action	Push_String_Extended,0x848					; ")"
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 0849  |   I|		Action	Push_String_Extended,0x849					; ":"
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 084a  |   J|		Action	Push_String_Extended,0x84a					; " 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 084b  |   K|		Action	Push_String_Extended,0x84b					; "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 0820  |    |		Action	Push_String_Extended,0x820					; "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 084c  |   L|		Action	Push_String_Extended,0x84c					; ", 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 084d  |   M|		Action	Push_String_Extended,0x84d					; " 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 084e  |   N|		Action	Push_String_Extended,0x84e					; "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 084f  |   O|		Action	Push_String_Extended,0x84f					; "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 0850  |   P|		Action	Push_String_Extended,0x850					; "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 0851  |   Q|		Action	Push_String_Extended,0x851					; ";"
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 0852  |   R|		Action	Push_String_Extended,0x852					; " 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 0853  |   S|		Action	Push_String_Extended,0x853					; " 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 0854  |   T|		Action	Push_String_Extended,0x854					; " 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 084e  |   N|		Action	Push_String_Extended,0x84e					; "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 084f  |   O|		Action	Push_String_Extended,0x84f					; "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 0850  |   P|		Action	Push_String_Extended,0x850					; "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 0851  |   Q|		Action	Push_String_Extended,0x851					; ";"
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 0852  |   R|		Action	Push_String_Extended,0x852					; " 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 0853  |   S|		Action	Push_String_Extended,0x853					; " 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 0855  |   U|		Action	Push_String_Extended,0x855					; " [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 0856  |   V|		Action	Push_String_Extended,0x856					; ", 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 0857  |   W|		Action	Push_String_Extended,0x857					; ", 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 0858  |   X|		Action	Push_String_Extended,0x858					; "]"
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 0859  |   Y|		Action	Push_String_Extended,0x859					; "\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 081c  |    |		Action	Push_String_Extended,0x81c					; "."
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 03c4       |    |		.CONST	0x03c4								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0003       |    |		.CONST	0x0003								; 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			BODY_03b8:
03c4 801a       |    |		Call	0x0,0x1a
03c5 6805       |h   |		Jump_Zero	0x3cb
03c6 0092 085a  |   Z|		Action	Push_String_Extended,0x85a					; "Task display interrupted.\x0a"
03c8 800b       |    |		Call	0x0,0xb
03c9 e212       |    |		Load	0x1,0x12
03ca 0257       | W  |		Execute	Discrete,Raise
03cb e5ff       |    |		Load	0x2,-0x1
03cc 801b       |    |		Call	0x0,0x1b
03cd 700a       |p   |		Jump_Nonzero	0x3d8
03ce e5ff       |    |		Load	0x2,-0x1
03cf 480a       |H   |		Short_Literal	0xa
03d0 e5ff       |    |		Load	0x2,-0x1
03d1 800d       |    |		Call	0x0,0xd
03d2 0092 085b  |   [|		Action	Push_String_Extended,0x85b					; ": Terminated."
03d4 01cc       |    |		Execute	Vector,Catenate
03d5 01cb       |    |		Execute	Vector,Append
03d6 801c       |    |		Call	0x0,0x1c
03d7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03d8 00d9       |    |		Load_Top	At_Offset_1
03d9 00d9       |    |		Load_Top	At_Offset_1
03da 4801       |H   |		Short_Literal	0x1
03db e5ff       |    |		Load	0x2,-0x1
03dc 801d       |    |		Call	0x0,0x1d
03dd 00d1       |    |		Pop_Control	Pop_Count_1
03de c402       |    |		Store	0x2,0x2
03df 4802       |H   |		Short_Literal	0x2
03e0 00da       |    |		Load_Top	At_Offset_2
03e1 e018       |    |		Load	0x0,0x18
03e2 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03e3 680c       |h   |		Jump_Zero	0x3f0
03e4 e5ff       |    |		Load	0x2,-0x1
03e5 800d       |    |		Call	0x0,0xd
03e6 0092 085c  |   \|		Action	Push_String_Extended,0x85c					; ": unable to read information: "
03e8 01cc       |    |		Execute	Vector,Catenate
03e9 00da       |    |		Load_Top	At_Offset_2
03ea e018       |    |		Load	0x0,0x18
03eb 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
03ec 01cc       |    |		Execute	Vector,Catenate
03ed 800b       |    |		Call	0x0,0xb
03ee 800c       |    |		Call	0x0,0xc
03ef 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f0 00d8       |    |		Load_Top	At_Offset_0
03f1 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03f2 6805       |h   |		Jump_Zero	0x3f8
03f3 801e       |    |		Call	0x0,0x1e
03f4 e5fe       |    |		Load	0x2,-0x2
03f5 0278       | x  |		Execute	Discrete,Or
03f6 7001       |p   |		Jump_Nonzero	0x3f8
03f7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f8 4800       |H   |		Short_Literal	0x0
03f9 e5ff       |    |		Load	0x2,-0x1
03fa e01f       |    |		Load	0x0,0x1f
03fb 00db       |    |		Load_Top	At_Offset_3
03fc 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
03fd e403       |    |		Load	0x2,0x3
03fe 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
03ff e403       |    |		Load	0x2,0x3
0400 3410       |4   |		Execute	Record,Field_Reference,Field_Number 0x10
0401 e403       |    |		Load	0x2,0x3
0402 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0403 e403       |    |		Load	0x2,0x3
0404 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
0405 e403       |    |		Load	0x2,0x3
0406 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0407 e403       |    |		Load	0x2,0x3
0408 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0409 e403       |    |		Load	0x2,0x3
040a 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
040b e403       |    |		Load	0x2,0x3
040c 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
040d e403       |    |		Load	0x2,0x3
040e 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
040f e403       |    |		Load	0x2,0x3
0410 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0411 e403       |    |		Load	0x2,0x3
0412 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0413 e403       |    |		Load	0x2,0x3
0414 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0415 e5ff       |    |		Load	0x2,-0x1
0416 8020       |    |		Call	0x0,0x20
0417 e5ff       |    |		Load	0x2,-0x1
0418 e021       | !  |		Load	0x0,0x21
0419 e022       | "  |		Load	0x0,0x22
041a 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
041b e403       |    |		Load	0x2,0x3
041c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
041d 0f00       |    |		Execute_Immediate	Equal,0x0
041e 801e       |    |		Call	0x0,0x1e
041f e403       |    |		Load	0x2,0x3
0420 3411       |4   |		Execute	Record,Field_Reference,Field_Number 0x11
0421 e403       |    |		Load	0x2,0x3
0422 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0423 e403       |    |		Load	0x2,0x3
0424 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0425 e403       |    |		Load	0x2,0x3
0426 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0427 e5ff       |    |		Load	0x2,-0x1
0428 8217       |    |		Call	0x1,0x17
0429 8023       | #  |		Call	0x0,0x23
042a 800c       |    |		Call	0x0,0xc
042b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
042c 0000 0000  |    |		.BLANK	0000[0x4]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0441       | A  |		.CONST	0x0441								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 000e       |    |		.CONST	0x000e								; Number of locals
0433			INIT_0430:
0433 00e1       |    |		Load_Encached	Boolean_Cache
0434 00e5       |    |		Load_Encached	Long_Integer_Cache
0435 00e5       |    |		Load_Encached	Long_Integer_Cache
0436 00e5       |    |		Load_Encached	Long_Integer_Cache
0437 00e5       |    |		Load_Encached	Long_Integer_Cache
0438 00e5       |    |		Load_Encached	Long_Integer_Cache
0439 00e5       |    |		Load_Encached	Long_Integer_Cache
043a 00e5       |    |		Load_Encached	Long_Integer_Cache
043b 00e5       |    |		Load_Encached	Long_Integer_Cache
043c 00e5       |    |		Load_Encached	Long_Integer_Cache
043d 00e5       |    |		Load_Encached	Long_Integer_Cache
043e 00e5       |    |		Load_Encached	Long_Integer_Cache
043f 029f 0733  |   3|		Declare_Subprogram	INIT_0730,For_Call
0441			BODY_0430:
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 00e5       |    |		Load_Encached	Long_Integer_Cache
0448 00e1       |    |		Load_Encached	Boolean_Cache
0449 e5ff       |    |		Load	0x2,-0x1
044a 8024       | $  |		Call	0x0,0x24
044b e025       | %  |		Load	0x0,0x25
044c 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
044d c402       |    |		Store	0x2,0x2
044e c403       |    |		Store	0x2,0x3
044f c404       |    |		Store	0x2,0x4
0450 c405       |    |		Store	0x2,0x5
0451 c406       |    |		Store	0x2,0x6
0452 c407       |    |		Store	0x2,0x7
0453 c408       |    |		Store	0x2,0x8
0454 c409       |    |		Store	0x2,0x9
0455 e402       |    |		Load	0x2,0x2
0456 7008       |p   |		Jump_Nonzero	0x45f
0457 0092 085d  |   ]|		Action	Push_String_Extended,0x85d					; "Unable to obtain space information for task "
0459 e5ff       |    |		Load	0x2,-0x1
045a 800d       |    |		Call	0x0,0xd
045b 01cc       |    |		Execute	Vector,Catenate
045c 800b       |    |		Call	0x0,0xb
045d 800c       |    |		Call	0x0,0xc
045e 7875       |xu  |		Jump	0x4d4
045f e5ff       |    |		Load	0x2,-0x1
0460 0092 085e  |   ^|		Action	Push_String_Extended,0x85e					; "  Space use for task "
0462 e5ff       |    |		Load	0x2,-0x1
0463 800d       |    |		Call	0x0,0xd
0464 01cc       |    |		Execute	Vector,Catenate
0465 0092 0849  |   I|		Action	Push_String_Extended,0x849					; ":"
0467 01cc       |    |		Execute	Vector,Catenate
0468 801c       |    |		Call	0x0,0x1c
0469 800c       |    |		Call	0x0,0xc
046a e403       |    |		Load	0x2,0x3
046b e405       |    |		Load	0x2,0x5
046c 0273       | s  |		Execute	Discrete,Plus
046d e409       |    |		Load	0x2,0x9
046e 0273       | s  |		Execute	Discrete,Plus
046f 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
0470 a40a       |    |		Store_Unchecked	0x2,0xa
0471 e404       |    |		Load	0x2,0x4
0472 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
0473 a40b       |    |		Store_Unchecked	0x2,0xb
0474 e406       |    |		Load	0x2,0x6
0475 e408       |    |		Load	0x2,0x8
0476 0273       | s  |		Execute	Discrete,Plus
0477 e409       |    |		Load	0x2,0x9
0478 0273       | s  |		Execute	Discrete,Plus
0479 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
047a 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
047b e407       |    |		Load	0x2,0x7
047c 09fd       |    |		Execute_Immediate	Binary_Scale,-0x3
047d 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
047e 0092 085f  |   _|		Action	Push_String_Extended,0x85f					; "  Current control space: "
0480 e40a       |    |		Load	0x2,0xa
0481 00e0       |    |		Load_Encached	Standard_Cache
0482 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0483 01cc       |    |		Execute	Vector,Catenate
0484 0092 0860  |   `|		Action	Push_String_Extended,0x860					; ",   Max control space: "
0486 01cc       |    |		Execute	Vector,Catenate
0487 00db       |    |		Load_Top	At_Offset_3
0488 00e0       |    |		Load_Encached	Standard_Cache
0489 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
048a 01cc       |    |		Execute	Vector,Catenate
048b 0092 0861  |   a|		Action	Push_String_Extended,0x861					; "   (bytes)."
048d 01cc       |    |		Execute	Vector,Catenate
048e 800b       |    |		Call	0x0,0xb
048f 800c       |    |		Call	0x0,0xc
0490 0092 0862  |   b|		Action	Push_String_Extended,0x862					; "  Current data space: "
0492 e40b       |    |		Load	0x2,0xb
0493 00e0       |    |		Load_Encached	Standard_Cache
0494 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0495 01cc       |    |		Execute	Vector,Catenate
0496 0092 0863  |   c|		Action	Push_String_Extended,0x863					; ",   Max data space: "
0498 01cc       |    |		Execute	Vector,Catenate
0499 00da       |    |		Load_Top	At_Offset_2
049a 00e0       |    |		Load_Encached	Standard_Cache
049b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
049c 01cc       |    |		Execute	Vector,Catenate
049d 0092 0861  |   a|		Action	Push_String_Extended,0x861					; "   (bytes)."
049f 01cc       |    |		Execute	Vector,Catenate
04a0 800b       |    |		Call	0x0,0xb
04a1 800c       |    |		Call	0x0,0xc
04a2 801e       |    |		Call	0x0,0x1e
04a3 6830       |h0  |		Jump_Zero	0x4d4
04a4 0092 0864  |   d|		Action	Push_String_Extended,0x864					; "  Address space sizes (in bits):"
04a6 800b       |    |		Call	0x0,0xb
04a7 800c       |    |		Call	0x0,0xc
04a8 480a       |H   |		Short_Literal	0xa
04a9 480a       |H   |		Short_Literal	0xa
04aa 480a       |H   |		Short_Literal	0xa
04ab 480a       |H   |		Short_Literal	0xa
04ac 0092 0865  |   e|		Action	Push_String_Extended,0x865					; "segment      current      max\x0aControl  "
04ae e403       |    |		Load	0x2,0x3
04af 840e       |    |		Call	0x2,0xe
04b0 01cc       |    |		Execute	Vector,Catenate
04b1 e406       |    |		Load	0x2,0x6
04b2 840e       |    |		Call	0x2,0xe
04b3 01cc       |    |		Execute	Vector,Catenate
04b4 01cb       |    |		Execute	Vector,Append
04b5 0092 0866  |   f|		Action	Push_String_Extended,0x866					; "Data     "
04b7 01cc       |    |		Execute	Vector,Catenate
04b8 e404       |    |		Load	0x2,0x4
04b9 840e       |    |		Call	0x2,0xe
04ba 01cc       |    |		Execute	Vector,Catenate
04bb e407       |    |		Load	0x2,0x7
04bc 840e       |    |		Call	0x2,0xe
04bd 01cc       |    |		Execute	Vector,Catenate
04be 01cb       |    |		Execute	Vector,Append
04bf 0092 0867  |   g|		Action	Push_String_Extended,0x867					; "Type     "
04c1 01cc       |    |		Execute	Vector,Catenate
04c2 e405       |    |		Load	0x2,0x5
04c3 840e       |    |		Call	0x2,0xe
04c4 01cc       |    |		Execute	Vector,Catenate
04c5 e408       |    |		Load	0x2,0x8
04c6 840e       |    |		Call	0x2,0xe
04c7 01cc       |    |		Execute	Vector,Catenate
04c8 01cb       |    |		Execute	Vector,Append
04c9 0092 0868  |   h|		Action	Push_String_Extended,0x868					; "Queue    "
04cb 01cc       |    |		Execute	Vector,Catenate
04cc 0092 0869  |   i|		Action	Push_String_Extended,0x869					; "          "
04ce 01cc       |    |		Execute	Vector,Catenate
04cf e409       |    |		Load	0x2,0x9
04d0 840e       |    |		Call	0x2,0xe
04d1 01cc       |    |		Execute	Vector,Catenate
04d2 01cb       |    |		Execute	Vector,Append
04d3 800b       |    |		Call	0x0,0xb
04d4 800c       |    |		Call	0x0,0xc
04d5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04d6 0000 0000  |    |		.XXX[0x2]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db       |    |		.CONST	0x04db								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0001       |    |		.CONST	0x0001								; Number of locals
04db			BODY_04d8:
04db			INIT_04d8:
04db 0092 086a  |   j|		Action	Push_String_Extended,0x86a					; "Program has terminated."
04dd 800b       |    |		Call	0x0,0xb
04de 800c       |    |		Call	0x0,0xc
04df 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
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 086b  |   k|		Action	Push_String_Extended,0x86b					; "Job: "
04e5 e026       | &  |		Load	0x0,0x26
04e6 00e0       |    |		Load_Encached	Standard_Cache
04e7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04e8 01cc       |    |		Execute	Vector,Catenate
04e9 0092 086c  |   l|		Action	Push_String_Extended,0x86c					; ", Root task: "
04eb 01cc       |    |		Execute	Vector,Catenate
04ec e012       |    |		Load	0x0,0x12
04ed 8027       | '  |		Call	0x0,0x27
04ee 01cc       |    |		Execute	Vector,Catenate
04ef 800b       |    |		Call	0x0,0xb
04f0 800c       |    |		Call	0x0,0xc
04f1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04f2 0000 0000  |    |		.BLANK	0000[0x6]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb       |    |		.CONST	0x04fb								; Address of begin
04f9 0004       |    |		.CONST	0x0004								; Address of exception handler
04fa 0001       |    |		.CONST	0x0001								; Number of locals
04fb			BODY_04f8:
04fb			INIT_04f8:
04fb 800a       |    |		Call	0x0,0xa
04fc 6804       |h   |		Jump_Zero	0x501
04fd 821b       |    |		Call	0x1,0x1b
04fe 4801       |H   |		Short_Literal	0x1
04ff 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0500 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0501 821c       |    |		Call	0x1,0x1c
0502 4800       |H   |		Short_Literal	0x0
0503 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0504 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0505 0000 0000  |    |		.XXX[0x3]
0507 0000       |    |
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 0519       |    |		.CONST	0x0519								; Address of begin
0509 0004       |    |		.CONST	0x0004								; Address of exception handler
050a 0006       |    |		.CONST	0x0006								; Number of locals
050b			INIT_0508:
050b e028       | (  |		Load	0x0,0x28
050c 02c7       |    |		Declare_Variable	Any
050d 00d8       |    |		Load_Top	At_Offset_0
050e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
050f e018       |    |		Load	0x0,0x18
0510 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0511 02c7       |    |		Declare_Variable	Any
0512 00d8       |    |		Load_Top	At_Offset_0
0513 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0514 00e1       |    |		Load_Encached	Boolean_Cache
0515 e00f       |    |		Load	0x0,0xf
0516 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0517 00e1       |    |		Load_Encached	Boolean_Cache
0518 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0519			BODY_0508:
0519 4800       |H   |		Short_Literal	0x0
051a 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
051b 4800       |H   |		Short_Literal	0x0
051c 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
051d 00cf       |    |		Action	Mark_Auxiliary
051e e403       |    |		Load	0x2,0x3
051f e402       |    |		Load	0x2,0x2
0520 0120       |    |		Execute	Any,Is_Value
0521 6802       |h   |		Jump_Zero	0x524
0522 e028       | (  |		Load	0x0,0x28
0523 7801       |x   |		Jump	0x525
0524 e402       |    |		Load	0x2,0x2
0525 00e1       |    |		Load_Encached	Boolean_Cache
0526 e405       |    |		Load	0x2,0x5
0527 e5ff       |    |		Load	0x2,-0x1
0528 8029       | )  |		Call	0x0,0x29
0529 c405       |    |		Store	0x2,0x5
052a c404       |    |		Store	0x2,0x4
052b c402       |    |		Store	0x2,0x2
052c c403       |    |		Store	0x2,0x3
052d 4802       |H   |		Short_Literal	0x2
052e e403       |    |		Load	0x2,0x3
052f e018       |    |		Load	0x0,0x18
0530 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0531 6806       |h   |		Jump_Zero	0x538
0532 e403       |    |		Load	0x2,0x3
0533 e018       |    |		Load	0x0,0x18
0534 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0535 800b       |    |		Call	0x0,0xb
0536 800c       |    |		Call	0x0,0xc
0537 7830       |x0  |		Jump	0x568
0538 00db       |    |		Load_Top	At_Offset_3
0539 702e       |p.  |		Jump_Nonzero	0x568
053a 00d9       |    |		Load_Top	At_Offset_1
053b 700d       |p   |		Jump_Nonzero	0x549
053c e5ff       |    |		Load	0x2,-0x1
053d 0092 086d  |   m|		Action	Push_String_Extended,0x86d					; "Task "
053f e5ff       |    |		Load	0x2,-0x1
0540 800d       |    |		Call	0x0,0xd
0541 01cc       |    |		Execute	Vector,Catenate
0542 0092 0849  |   I|		Action	Push_String_Extended,0x849					; ":"
0544 01cc       |    |		Execute	Vector,Catenate
0545 801c       |    |		Call	0x0,0x1c
0546 800c       |    |		Call	0x0,0xc
0547 4801       |H   |		Short_Literal	0x1
0548 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0549 4801       |H   |		Short_Literal	0x1
054a a5fe       |    |		Store_Unchecked	0x2,-0x2
054b e402       |    |		Load	0x2,0x2
054c 0092 086e  |   n|		Action	Push_String_Extended,0x86e					; "  In rendezvous with:  "
054e e402       |    |		Load	0x2,0x2
054f 800d       |    |		Call	0x0,0xd
0550 01cc       |    |		Execute	Vector,Catenate
0551 0092 081c  |    |		Action	Push_String_Extended,0x81c					; "."
0553 01cc       |    |		Execute	Vector,Catenate
0554 801c       |    |		Call	0x0,0x1c
0555 800c       |    |		Call	0x0,0xc
0556 801e       |    |		Call	0x0,0x1e
0557 680e       |h   |		Jump_Zero	0x566
0558 0092 086f  |   o|		Action	Push_String_Extended,0x86f					; "  Control offset: #"
055a 4820       |H   |		Short_Literal	0x20
055b 4800       |H   |		Short_Literal	0x0
055c 4810       |H   |		Short_Literal	0x10
055d e405       |    |		Load	0x2,0x5
055e e02a       | *  |		Load	0x0,0x2a
055f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0560 01cc       |    |		Execute	Vector,Catenate
0561 0092 081c  |    |		Action	Push_String_Extended,0x81c					; "."
0563 01cc       |    |		Execute	Vector,Catenate
0564 800b       |    |		Call	0x0,0xb
0565 800c       |    |		Call	0x0,0xc
0566 00c9       |    |		Action	Pop_Auxiliary_Loop
0567 7fb6       |    |		Jump	0x51e
0568 00ce       |    |		Action	Pop_Auxiliary
0569 00d8       |    |		Load_Top	At_Offset_0
056a 6801       |h   |		Jump_Zero	0x56c
056b 800c       |    |		Call	0x0,0xc
056c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
056d 0000 0000  |    |		.XXX[0x3]
056f 0000       |    |
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 05a4       |    |		.CONST	0x05a4								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0013       |    |		.CONST	0x0013								; Number of locals
0573			INIT_0570:
0573 e00f       |    |		Load	0x0,0xf
0574 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0575 e02b       | +  |		Load	0x0,0x2b
0576 02c7       |    |		Declare_Variable	Any
0577 00d8       |    |		Load_Top	At_Offset_0
0578 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0579 e02b       | +  |		Load	0x0,0x2b
057a 02c7       |    |		Declare_Variable	Any
057b 00d8       |    |		Load_Top	At_Offset_0
057c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
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 e02d       | -  |		Load	0x0,0x2d
0582 02c7       |    |		Declare_Variable	Any
0583 00d8       |    |		Load_Top	At_Offset_0
0584 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0585 e02e       | .  |		Load	0x0,0x2e
0586 02c7       |    |		Declare_Variable	Any
0587 00d8       |    |		Load_Top	At_Offset_0
0588 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0589 e02f       | /  |		Load	0x0,0x2f
058a 0007       |    |		Action	Break_Optional
058b e018       |    |		Load	0x0,0x18
058c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
058d 02c7       |    |		Declare_Variable	Any
058e 00d8       |    |		Load_Top	At_Offset_0
058f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0590 00e1       |    |		Load_Encached	Boolean_Cache
0591 03e9       |    |		Declare_Variable	Discrete,Duplicate
0592 e030       | 0  |		Load	0x0,0x30
0593 02c7       |    |		Declare_Variable	Any
0594 00d8       |    |		Load_Top	At_Offset_0
0595 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0596 00e1       |    |		Load_Encached	Boolean_Cache
0597 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0598 029f 0743  |   C|		Declare_Subprogram	INIT_0740,For_Call
059a 029f 075b  |   [|		Declare_Subprogram	INIT_0758,For_Call
059c 029f 0783  |    |		Declare_Subprogram	INIT_0780,For_Call
059e 029f 0793  |    |		Declare_Subprogram	INIT_0790,For_Call
05a0 029f 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Call
05a2 029f 0813  |    |		Declare_Subprogram	INIT_0810,For_Call
05a4			BODY_0570:
05a4 4800       |H   |		Short_Literal	0x0
05a5 a40a       |    |		Store_Unchecked	0x2,0xa
05a6 4800       |H   |		Short_Literal	0x0
05a7 a402       |    |		Store_Unchecked	0x2,0x2
05a8 8412       |    |		Call	0x2,0x12
05a9 8413       |    |		Call	0x2,0x13
05aa 01cc       |    |		Execute	Vector,Catenate
05ab 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
05ac 0000 0000  |    |		.BLANK	0000[0x4]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b3       |    |		.CONST	0x05b3								; Address of begin
05b1 0004       |    |		.CONST	0x0004								; Address of exception handler
05b2 0001       |    |		.CONST	0x0001								; Number of locals
05b3			BODY_05b0:
05b3			INIT_05b0:
05b3 00db       |    |		Load_Top	At_Offset_3
05b4 4801       |H   |		Short_Literal	0x1
05b5 801e       |    |		Call	0x0,0x1e
05b6 e5ff       |    |		Load	0x2,-0x1
05b7 821f       |    |		Call	0x1,0x1f
05b8 8218       |    |		Call	0x1,0x18
05b9 c5fe       |    |		Store	0x2,-0x2
05ba 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05bb 0000 0000  |    |		.BLANK	0000[0x5]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3       |    |		.CONST	0x05c3								; Address of begin
05c1 0004       |    |		.CONST	0x0004								; Address of exception handler
05c2 0001       |    |		.CONST	0x0001								; Number of locals
05c3			BODY_05c0:
05c3			INIT_05c0:
05c3 0092 0870  |   p|		Action	Push_String_Extended,0x870					; "Display one task passed a null task name"
05c5 00db       |    |		Load_Top	At_Offset_3
05c6 8009       |    |		Call	0x0,0x9
05c7 0f00       |    |		Execute_Immediate	Equal,0x0
05c8 e00e       |    |		Load	0x0,0xe
05c9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05ca 4800       |H   |		Short_Literal	0x0
05cb 00db       |    |		Load_Top	At_Offset_3
05cc 8219       |    |		Call	0x1,0x19
05cd 4800       |H   |		Short_Literal	0x0
05ce a5fd       |    |		Store_Unchecked	0x2,-0x3
05cf 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3       |    |		.CONST	0x05d3								; Address of begin
05d1 0004       |    |		.CONST	0x0004								; Address of exception handler
05d2 0001       |    |		.CONST	0x0001								; Number of locals
05d3			BODY_05d0:
05d3			INIT_05d0:
05d3 0092 0871  |   q|		Action	Push_String_Extended,0x871					; "Rendezvous_Info_For_one_task passed a null task name"
05d5 00db       |    |		Load_Top	At_Offset_3
05d6 8009       |    |		Call	0x0,0x9
05d7 0f00       |    |		Execute_Immediate	Equal,0x0
05d8 e00e       |    |		Load	0x0,0xe
05d9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05da 00db       |    |		Load_Top	At_Offset_3
05db 00db       |    |		Load_Top	At_Offset_3
05dc 821e       |    |		Call	0x1,0x1e
05dd c5fe       |    |		Store	0x2,-0x2
05de 4800       |H   |		Short_Literal	0x0
05df a5fd       |    |		Store_Unchecked	0x2,-0x3
05e0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05e1 0000 0000  |    |		.BLANK	0000[0x7]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05eb       |    |		.CONST	0x05eb								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0001       |    |		.CONST	0x0001								; Number of locals
05eb			BODY_05e8:
05eb			INIT_05e8:
05eb 0092 0872  |   r|		Action	Push_String_Extended,0x872					; "Exception_Info_For_one_task passed a null task name"
05ed 00db       |    |		Load_Top	At_Offset_3
05ee 8009       |    |		Call	0x0,0x9
05ef 0f00       |    |		Execute_Immediate	Equal,0x0
05f0 e00e       |    |		Load	0x0,0xe
05f1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
05f2 00db       |    |		Load_Top	At_Offset_3
05f3 00db       |    |		Load_Top	At_Offset_3
05f4 8220       |    |		Call	0x1,0x20
05f5 c5fe       |    |		Store	0x2,-0x2
05f6 4800       |H   |		Short_Literal	0x0
05f7 a5fd       |    |		Store_Unchecked	0x2,-0x3
05f8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05f9 0000 0000  |    |		.BLANK	0000[0x7]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0603       |    |		.CONST	0x0603								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0001       |    |		.CONST	0x0001								; Number of locals
0603			BODY_0600:
0603			INIT_0600:
0603 0092 0873  |   s|		Action	Push_String_Extended,0x873					; "Space_Info_For_one_task passed a null task name"
0605 00db       |    |		Load_Top	At_Offset_3
0606 8009       |    |		Call	0x0,0x9
0607 0f00       |    |		Execute_Immediate	Equal,0x0
0608 e00e       |    |		Load	0x0,0xe
0609 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
060a 00da       |    |		Load_Top	At_Offset_2
060b 821a       |    |		Call	0x1,0x1a
060c 4800       |H   |		Short_Literal	0x0
060d a5fd       |    |		Store_Unchecked	0x2,-0x3
060e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
060f 0000       |    |		.XXX[0x1]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0615       |    |		.CONST	0x0615								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0002       |    |		.CONST	0x0002								; Number of locals
0613			INIT_0610:
0613 e00f       |    |		Load	0x0,0xf
0614 1b41       | A  |		Execute	Package,Field_Read,Field_Number 0x41
0615			BODY_0610:
0615 00db       |    |		Load_Top	At_Offset_3
0616 8024       | $  |		Call	0x0,0x24
0617 e00f       |    |		Load	0x0,0xf
0618 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0619 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
061a 00d8       |    |		Load_Top	At_Offset_0
061b 461f       |F   |		Jump_Case	0x20
061c 782a       |x*  |		Jump	0x647								; case 0x0
061d 782b       |x+  |		Jump	0x649								; case 0x1
061e 782c       |x,  |		Jump	0x64b								; case 0x2
061f 782d       |x-  |		Jump	0x64d								; case 0x3
0620 782e       |x.  |		Jump	0x64f								; case 0x4
0621 782f       |x/  |		Jump	0x651								; case 0x5
0622 7830       |x0  |		Jump	0x653								; case 0x6
0623 7831       |x1  |		Jump	0x655								; case 0x7
0624 7832       |x2  |		Jump	0x657								; case 0x8
0625 7833       |x3  |		Jump	0x659								; case 0x9
0626 7834       |x4  |		Jump	0x65b								; case 0xa
0627 7835       |x5  |		Jump	0x65d								; case 0xb
0628 7836       |x6  |		Jump	0x65f								; case 0xc
0629 7837       |x7  |		Jump	0x661								; case 0xd
062a 7838       |x8  |		Jump	0x663								; case 0xe
062b 7810       |x   |		Jump	0x63c								; case 0xf
062c 780f       |x   |		Jump	0x63c								; case 0x10
062d 780e       |x   |		Jump	0x63c								; case 0x11
062e 780d       |x   |		Jump	0x63c								; case 0x12
062f 780c       |x   |		Jump	0x63c								; case 0x13
0630 780b       |x   |		Jump	0x63c								; case 0x14
0631 780a       |x   |		Jump	0x63c								; case 0x15
0632 7809       |x   |		Jump	0x63c								; case 0x16
0633 7808       |x   |		Jump	0x63c								; case 0x17
0634 7830       |x0  |		Jump	0x665								; case 0x18
0635 7831       |x1  |		Jump	0x667								; case 0x19
0636 7832       |x2  |		Jump	0x669								; case 0x1a
0637 7833       |x3  |		Jump	0x66b								; case 0x1b
0638 7834       |x4  |		Jump	0x66d								; case 0x1c
0639 7802       |x   |		Jump	0x63c								; case 0x1d
063a 7801       |x   |		Jump	0x63c								; case 0x1e
063b 7800       |x   |		Jump	0x63c								; case 0x1f
063c 0092 082e  |   .|		Action	Push_String_Extended,0x82e					; "Unknown module state: "
063e 00d9       |    |		Load_Top	At_Offset_1
063f e00f       |    |		Load	0x0,0xf
0640 1b41       | A  |		Execute	Package,Field_Read,Field_Number 0x41
0641 011c       |    |		Execute	Any,Convert_Unchecked
0642 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0643 01cc       |    |		Execute	Vector,Catenate
0644 e00e       |    |		Load	0x0,0xe
0645 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0646 7828       |x(  |		Jump	0x66f
0647 4800       |H   |		Short_Literal	0x0
0648 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0649 4800       |H   |		Short_Literal	0x0
064a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
064b 4801       |H   |		Short_Literal	0x1
064c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
064d 4801       |H   |		Short_Literal	0x1
064e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
064f 4801       |H   |		Short_Literal	0x1
0650 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0651 4801       |H   |		Short_Literal	0x1
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 4800       |H   |		Short_Literal	0x0
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 4800       |H   |		Short_Literal	0x0
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 4801       |H   |		Short_Literal	0x1
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 4801       |H   |		Short_Literal	0x1
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 0831       | 1  |		Execute_Immediate	Raise,0x31
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0673       | s  |		.CONST	0x0673								; Address of begin
0671 0004       |    |		.CONST	0x0004								; Address of exception handler
0672 0001       |    |		.CONST	0x0001								; Number of locals
0673			BODY_0670:
0673			INIT_0670:
0673 e031       | 1  |		Load	0x0,0x31
0674 4807       |H   |		Short_Literal	0x7
0675 e032       | 2  |		Load	0x0,0x32
0676 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0677 7003       |p   |		Jump_Nonzero	0x67b
0678 00da       |    |		Load_Top	At_Offset_2
0679 8033       | 3  |		Call	0x0,0x33
067a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
067b 4801       |H   |		Short_Literal	0x1
067c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
067d 0000 0000  |    |		.XXX[0x3]
067f 0000       |    |
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0683       |    |		.CONST	0x0683								; Address of begin
0681 06b5       |    |		.CONST	0x06b5								; Address of exception handler
0682 0001       |    |		.CONST	0x0001								; Number of locals
0683			BODY_0680:
0683			INIT_0680:
0683 e213       |    |		Load	0x1,0x13
0684 00db       |    |		Load_Top	At_Offset_3
0685 8226       | &  |		Call	0x1,0x26
0686 7002       |p   |		Jump_Nonzero	0x689
0687 4800       |H   |		Short_Literal	0x0
0688 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0689 00db       |    |		Load_Top	At_Offset_3
068a 4605       |F   |		Jump_Case	0x6
068b 7808       |x   |		Jump	0x694								; case 0x0
068c 781a       |x   |		Jump	0x6a7								; case 0x1
068d 7822       |x"  |		Jump	0x6b0								; case 0x2
068e 7810       |x   |		Jump	0x69f								; case 0x3
068f 7806       |x   |		Jump	0x696								; case 0x4
0690 7800       |x   |		Jump	0x691								; case 0x5
0691 00da       |    |		Load_Top	At_Offset_2
0692 8034       | 4  |		Call	0x0,0x34
0693 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0694 4801       |H   |		Short_Literal	0x1
0695 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0696 00da       |    |		Load_Top	At_Offset_2
0697 8034       | 4  |		Call	0x0,0x34
0698 7004       |p   |		Jump_Nonzero	0x69d
0699 00da       |    |		Load_Top	At_Offset_2
069a 8225       | %  |		Call	0x1,0x25
069b 0f00       |    |		Execute_Immediate	Equal,0x0
069c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
069d 4800       |H   |		Short_Literal	0x0
069e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
069f 00da       |    |		Load_Top	At_Offset_2
06a0 8225       | %  |		Call	0x1,0x25
06a1 7003       |p   |		Jump_Nonzero	0x6a5
06a2 00da       |    |		Load_Top	At_Offset_2
06a3 8034       | 4  |		Call	0x0,0x34
06a4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06a5 4801       |H   |		Short_Literal	0x1
06a6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06a7 00da       |    |		Load_Top	At_Offset_2
06a8 8225       | %  |		Call	0x1,0x25
06a9 6804       |h   |		Jump_Zero	0x6ae
06aa 00da       |    |		Load_Top	At_Offset_2
06ab 8034       | 4  |		Call	0x0,0x34
06ac 0f00       |    |		Execute_Immediate	Equal,0x0
06ad 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06ae 4800       |H   |		Short_Literal	0x0
06af 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06b0 00da       |    |		Load_Top	At_Offset_2
06b1 e021       | !  |		Load	0x0,0x21
06b2 e022       | "  |		Load	0x0,0x22
06b3 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
06b4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06b5			TRAP_0680:
06b5 0007       |    |		Action	Break_Optional
06b6 4800       |H   |		Short_Literal	0x0
06b7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb       |    |		.CONST	0x06bb								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0001       |    |		.CONST	0x0001								; Number of locals
06bb			BODY_06b8:
06bb			INIT_06b8:
06bb 00db       |    |		Load_Top	At_Offset_3
06bc 00db       |    |		Load_Top	At_Offset_3
06bd e028       | (  |		Load	0x0,0x28
06be 0119       |    |		Execute	Any,Check_In_Formal_Type
06bf 8227       | '  |		Call	0x1,0x27
06c0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06c1 0000 0000  |    |		.BLANK	0000[0x7]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb       |    |		.CONST	0x06cb								; Address of begin
06c9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ca 0001       |    |		.CONST	0x0001								; Number of locals
06cb			BODY_06c8:
06cb			INIT_06c8:
06cb 00e1       |    |		Load_Encached	Boolean_Cache
06cc e5fe       |    |		Load	0x2,-0x2
06cd 00e2       |    |		Load_Encached	Integer_Cache
06ce 025e       | ^  |		Execute	Discrete,Convert
06cf e5ff       |    |		Load	0x2,-0x1
06d0 e028       | (  |		Load	0x0,0x28
06d1 0119       |    |		Execute	Any,Check_In_Formal_Type
06d2 8221       | !  |		Call	0x1,0x21
06d3 c5fe       |    |		Store	0x2,-0x2
06d4 c5fd       |    |		Store	0x2,-0x3
06d5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06d6 0000 0000  |    |		.XXX[0x2]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; SUBPROGRAM
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06db       |    |		.CONST	0x06db								; Address of begin
06d9 0004       |    |		.CONST	0x0004								; Address of exception handler
06da 0001       |    |		.CONST	0x0001								; Number of locals
06db			BODY_06d8:
06db			BODY_06d8:
06db			BODY_06d8:
06db			INIT_06d8:
06db			INIT_06d8:
06db			INIT_06d8:
06db 00db       |    |		Load_Top	At_Offset_3
06dc 00d8       |    |		Load_Top	At_Offset_0
06dd 00e2       |    |		Load_Encached	Integer_Cache
06de 0260       | `  |		Execute	Discrete,In_Type
06df 7001       |p   |		Jump_Nonzero	0x6e1
06e0 0801       |    |		Execute_Immediate	Raise,0x1
06e1 00db       |    |		Load_Top	At_Offset_3
06e2 e028       | (  |		Load	0x0,0x28
06e3 0119       |    |		Execute	Any,Check_In_Formal_Type
06e4 8226       | &  |		Call	0x1,0x26
06e5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06e6 0000 0000  |    |		.XXX[0x2]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06eb       |    |		.CONST	0x06eb								; Address of begin
06e9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ea 0001       |    |		.CONST	0x0001								; Number of locals
06eb			BODY_06e8:
06eb			INIT_06e8:
06eb 00e1       |    |		Load_Encached	Boolean_Cache
06ec e5fe       |    |		Load	0x2,-0x2
06ed 00e2       |    |		Load_Encached	Integer_Cache
06ee 025e       | ^  |		Execute	Discrete,Convert
06ef e5ff       |    |		Load	0x2,-0x1
06f0 e028       | (  |		Load	0x0,0x28
06f1 0119       |    |		Execute	Any,Check_In_Formal_Type
06f2 8224       | $  |		Call	0x1,0x24
06f3 c5fe       |    |		Store	0x2,-0x2
06f4 c5fd       |    |		Store	0x2,-0x3
06f5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06f6 0000 0000  |    |		.XXX[0x2]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb       |    |		.CONST	0x06fb								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0001       |    |		.CONST	0x0001								; Number of locals
06fb			BODY_06f8:
06fb			INIT_06f8:
06fb 00e1       |    |		Load_Encached	Boolean_Cache
06fc e5fe       |    |		Load	0x2,-0x2
06fd 00e1       |    |		Load_Encached	Boolean_Cache
06fe 025e       | ^  |		Execute	Discrete,Convert
06ff e5ff       |    |		Load	0x2,-0x1
0700 e028       | (  |		Load	0x0,0x28
0701 0119       |    |		Execute	Any,Check_In_Formal_Type
0702 8222       | "  |		Call	0x1,0x22
0703 c5fe       |    |		Store	0x2,-0x2
0704 c5fd       |    |		Store	0x2,-0x3
0705 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0706 0000 0000  |    |		.XXX[0x2]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b       |    |		.CONST	0x070b								; Address of begin
0709 0004       |    |		.CONST	0x0004								; Address of exception handler
070a 0001       |    |		.CONST	0x0001								; Number of locals
070b			BODY_0708:
070b			INIT_0708:
070b 00e1       |    |		Load_Encached	Boolean_Cache
070c e5fe       |    |		Load	0x2,-0x2
070d 00e1       |    |		Load_Encached	Boolean_Cache
070e 025e       | ^  |		Execute	Discrete,Convert
070f e5ff       |    |		Load	0x2,-0x1
0710 e028       | (  |		Load	0x0,0x28
0711 0119       |    |		Execute	Any,Check_In_Formal_Type
0712 8223       | #  |		Call	0x1,0x23
0713 c5fe       |    |		Store	0x2,-0x2
0714 c5fd       |    |		Store	0x2,-0x3
0715 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0716 0000 0000  |    |		.XXX[0x2]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071b       |    |		.CONST	0x071b								; Address of begin
0719 0004       |    |		.CONST	0x0004								; Address of exception handler
071a 0001       |    |		.CONST	0x0001								; Number of locals
071b			BODY_0718:
071b			INIT_0718:
071b e014       |    |		Load	0x0,0x14
071c e5fd       |    |		Load	0x2,-0x3
071d 8015       |    |		Call	0x0,0x15
071e 6808       |h   |		Jump_Zero	0x727
071f e5fc       |    |		Load	0x2,-0x4
0720 6803       |h   |		Jump_Zero	0x724
0721 0092 0874  |   t|		Action	Push_String_Extended,0x874					; "obsolete location"
0723 00ca       |    |		Action	Exit_Nullary_Function
0724 0092 0820  |    |		Action	Push_String_Extended,0x820					; "unknown location"
0726 00ca       |    |		Action	Exit_Nullary_Function
0727 4801       |H   |		Short_Literal	0x1
0728 e01f       |    |		Load	0x0,0x1f
0729 e5fd       |    |		Load	0x2,-0x3
072a e5fe       |    |		Load	0x2,-0x2
072b e016       |    |		Load	0x0,0x16
072c 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
072d 00ca       |    |		Action	Exit_Nullary_Function
072e 0000 0000  |    |		.XXX[0x2]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0733       | 3  |		.CONST	0x0733								; Address of begin
0731 0004       |    |		.CONST	0x0004								; Address of exception handler
0732 0001       |    |		.CONST	0x0001								; Number of locals
0733			BODY_0730:
0733			INIT_0730:
0733 4820       |H   |		Short_Literal	0x20
0734 480a       |H   |		Short_Literal	0xa
0735 480a       |H   |		Short_Literal	0xa
0736 e7ff       |    |		Load	0x3,-0x1
0737 e02a       | *  |		Load	0x0,0x2a
0738 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0739 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
073a 0000 0000  |    |		.BLANK	0000[0x6]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743       | C  |		.CONST	0x0743								; Address of begin
0741 0004       |    |		.CONST	0x0004								; Address of exception handler
0742 0001       |    |		.CONST	0x0001								; Number of locals
0743			BODY_0740:
0743			INIT_0740:
0743 e403       |    |		Load	0x2,0x3
0744 e404       |    |		Load	0x2,0x4
0745 012e       | .  |		Execute	Any,Not_Equal
0746 680b       |h   |		Jump_Zero	0x752
0747 480a       |H   |		Short_Literal	0xa
0748 0092 0875  |   u|		Action	Push_String_Extended,0x875					; "    Exception was actually raised in system code at Pc: "
074a e404       |    |		Load	0x2,0x4
074b 8017       |    |		Call	0x0,0x17
074c 01cc       |    |		Execute	Vector,Catenate
074d 0092 081c  |    |		Action	Push_String_Extended,0x81c					; "."
074f 01cc       |    |		Execute	Vector,Catenate
0750 01ca       |    |		Execute	Vector,Prepend
0751 00ca       |    |		Action	Exit_Nullary_Function
0752 00ea       |    |		Load_Encached	Null_String_Cache
0753 00ca       |    |		Action	Exit_Nullary_Function
0754 0000 0000  |    |		.BLANK	0000[0x4]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b       | [  |		.CONST	0x075b								; Address of begin
0759 0004       |    |		.CONST	0x0004								; Address of exception handler
075a 0001       |    |		.CONST	0x0001								; Number of locals
075b			BODY_0758:
075b			INIT_0758:
075b e5fe       |    |		Load	0x2,-0x2
075c 681a       |h   |		Jump_Zero	0x777
075d 480a       |H   |		Short_Literal	0xa
075e 0092 0876  |   v|		Action	Push_String_Extended,0x876					; "   Control offset: #"
0760 4820       |H   |		Short_Literal	0x20
0761 4800       |H   |		Short_Literal	0x0
0762 4810       |H   |		Short_Literal	0x10
0763 e402       |    |		Load	0x2,0x2
0764 e02a       | *  |		Load	0x0,0x2a
0765 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0766 01cc       |    |		Execute	Vector,Catenate
0767 0092 0877  |   w|		Action	Push_String_Extended,0x877					; ",  Raise Pc: "
0769 01cc       |    |		Execute	Vector,Catenate
076a e403       |    |		Load	0x2,0x3
076b 8017       |    |		Call	0x0,0x17
076c 01cc       |    |		Execute	Vector,Catenate
076d 0092 0878  |   x|		Action	Push_String_Extended,0x878					; ", Exception name: "
076f 01cc       |    |		Execute	Vector,Catenate
0770 e40c       |    |		Load	0x2,0xc
0771 8035       | 5  |		Call	0x0,0x35
0772 01cc       |    |		Execute	Vector,Catenate
0773 840e       |    |		Call	0x2,0xe
0774 01cc       |    |		Execute	Vector,Catenate
0775 01cb       |    |		Execute	Vector,Append
0776 00ca       |    |		Action	Exit_Nullary_Function
0777 00ea       |    |		Load_Encached	Null_String_Cache
0778 00ca       |    |		Action	Exit_Nullary_Function
0779 0000 0000  |    |		.BLANK	0000[0x7]
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 0783       |    |		.CONST	0x0783								; Address of begin
0781 0004       |    |		.CONST	0x0004								; Address of exception handler
0782 0001       |    |		.CONST	0x0001								; Number of locals
0783			BODY_0780:
0783			INIT_0780:
0783 e40b       |    |		Load	0x2,0xb
0784 6803       |h   |		Jump_Zero	0x788
0785 0092 0879  |   y|		Action	Push_String_Extended,0x879					; " re-raised; originally"
0787 00ca       |    |		Action	Exit_Nullary_Function
0788 00ea       |    |		Load_Encached	Null_String_Cache
0789 00ca       |    |		Action	Exit_Nullary_Function
078a 0000 0000  |    |		.BLANK	0000[0x6]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0793       |    |		.CONST	0x0793								; Address of begin
0791 0004       |    |		.CONST	0x0004								; Address of exception handler
0792 0001       |    |		.CONST	0x0001								; Number of locals
0793			BODY_0790:
0793			INIT_0790:
0793 480a       |H   |		Short_Literal	0xa
0794 0092 087a  |   z|		Action	Push_String_Extended,0x87a					; "    Exception "
0796 4801       |H   |		Short_Literal	0x1
0797 e40c       |    |		Load	0x2,0xc
0798 8013       |    |		Call	0x0,0x13
0799 01cc       |    |		Execute	Vector,Catenate
079a 8410       |    |		Call	0x2,0x10
079b 01cc       |    |		Execute	Vector,Catenate
079c 0092 087b  |   {|		Action	Push_String_Extended,0x87b					; " raised at: "
079e 01cc       |    |		Execute	Vector,Catenate
079f e5fd       |    |		Load	0x2,-0x3
07a0 e407       |    |		Load	0x2,0x7
07a1 e406       |    |		Load	0x2,0x6
07a2 e405       |    |		Load	0x2,0x5
07a3 e016       |    |		Load	0x0,0x16
07a4 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
07a5 01cc       |    |		Execute	Vector,Catenate
07a6 0092 081c  |    |		Action	Push_String_Extended,0x81c					; "."
07a8 01cc       |    |		Execute	Vector,Catenate
07a9 01cb       |    |		Execute	Vector,Append
07aa 840f       |    |		Call	0x2,0xf
07ab 01cc       |    |		Execute	Vector,Catenate
07ac 00ca       |    |		Action	Exit_Nullary_Function
07ad 0000 0000  |    |		.XXX[0x3]
07af 0000       |    |
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3       |    |		.CONST	0x07b3								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 0001       |    |		.CONST	0x0001								; Number of locals
07b3			BODY_07b0:
07b3			INIT_07b0:
07b3 e409       |    |		Load	0x2,0x9
07b4 e02f       | /  |		Load	0x0,0x2f
07b5 e407       |    |		Load	0x2,0x7
07b6 0120       |    |		Execute	Any,Is_Value
07b7 6802       |h   |		Jump_Zero	0x7ba
07b8 e02e       | .  |		Load	0x0,0x2e
07b9 7801       |x   |		Jump	0x7bb
07ba e407       |    |		Load	0x2,0x7
07bb e406       |    |		Load	0x2,0x6
07bc 0120       |    |		Execute	Any,Is_Value
07bd 6802       |h   |		Jump_Zero	0x7c0
07be e02d       | -  |		Load	0x0,0x2d
07bf 7801       |x   |		Jump	0x7c1
07c0 e406       |    |		Load	0x2,0x6
07c1 e405       |    |		Load	0x2,0x5
07c2 0120       |    |		Execute	Any,Is_Value
07c3 6802       |h   |		Jump_Zero	0x7c6
07c4 e02c       | ,  |		Load	0x0,0x2c
07c5 7801       |x   |		Jump	0x7c7
07c6 e405       |    |		Load	0x2,0x5
07c7 e40c       |    |		Load	0x2,0xc
07c8 0120       |    |		Execute	Any,Is_Value
07c9 6802       |h   |		Jump_Zero	0x7cc
07ca e030       | 0  |		Load	0x0,0x30
07cb 7801       |x   |		Jump	0x7cd
07cc e40c       |    |		Load	0x2,0xc
07cd e403       |    |		Load	0x2,0x3
07ce 0120       |    |		Execute	Any,Is_Value
07cf 6802       |h   |		Jump_Zero	0x7d2
07d0 e02b       | +  |		Load	0x0,0x2b
07d1 7801       |x   |		Jump	0x7d3
07d2 e403       |    |		Load	0x2,0x3
07d3 e404       |    |		Load	0x2,0x4
07d4 0120       |    |		Execute	Any,Is_Value
07d5 6802       |h   |		Jump_Zero	0x7d8
07d6 e02b       | +  |		Load	0x0,0x2b
07d7 7801       |x   |		Jump	0x7d9
07d8 e404       |    |		Load	0x2,0x4
07d9 00e1       |    |		Load_Encached	Boolean_Cache
07da 00e1       |    |		Load_Encached	Boolean_Cache
07db e402       |    |		Load	0x2,0x2
07dc e5ff       |    |		Load	0x2,-0x1
07dd 8036       | 6  |		Call	0x0,0x36
07de c402       |    |		Store	0x2,0x2
07df c40a       |    |		Store	0x2,0xa
07e0 c40b       |    |		Store	0x2,0xb
07e1 c404       |    |		Store	0x2,0x4
07e2 c403       |    |		Store	0x2,0x3
07e3 c40c       |    |		Store	0x2,0xc
07e4 c405       |    |		Store	0x2,0x5
07e5 c406       |    |		Store	0x2,0x6
07e6 c407       |    |		Store	0x2,0x7
07e7 c408       |    |		Store	0x2,0x8
07e8 c409       |    |		Store	0x2,0x9
07e9 4802       |H   |		Short_Literal	0x2
07ea e409       |    |		Load	0x2,0x9
07eb e018       |    |		Load	0x0,0x18
07ec 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
07ed 6806       |h   |		Jump_Zero	0x7f4
07ee 480a       |H   |		Short_Literal	0xa
07ef e409       |    |		Load	0x2,0x9
07f0 e018       |    |		Load	0x0,0x18
07f1 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
07f2 01cb       |    |		Execute	Vector,Append
07f3 00ca       |    |		Action	Exit_Nullary_Function
07f4 e40a       |    |		Load	0x2,0xa
07f5 6802       |h   |		Jump_Zero	0x7f8
07f6 00ea       |    |		Load_Encached	Null_String_Cache
07f7 00ca       |    |		Action	Exit_Nullary_Function
07f8 e40d       |    |		Load	0x2,0xd
07f9 7011       |p   |		Jump_Nonzero	0x80b
07fa 4801       |H   |		Short_Literal	0x1
07fb a40d       |    |		Store_Unchecked	0x2,0xd
07fc 480a       |H   |		Short_Literal	0xa
07fd 0092 086d  |   m|		Action	Push_String_Extended,0x86d					; "Task "
07ff e5ff       |    |		Load	0x2,-0x1
0800 800d       |    |		Call	0x0,0xd
0801 01cc       |    |		Execute	Vector,Catenate
0802 0092 0849  |   I|		Action	Push_String_Extended,0x849					; ":"
0804 01cc       |    |		Execute	Vector,Catenate
0805 01cb       |    |		Execute	Vector,Append
0806 8411       |    |		Call	0x2,0x11
0807 01cc       |    |		Execute	Vector,Catenate
0808 8412       |    |		Call	0x2,0x12
0809 01cc       |    |		Execute	Vector,Catenate
080a 00ca       |    |		Action	Exit_Nullary_Function
080b 8411       |    |		Call	0x2,0x11
080c 8412       |    |		Call	0x2,0x12
080d 01cc       |    |		Execute	Vector,Catenate
080e 00ca       |    |		Action	Exit_Nullary_Function
080f 0000       |    |		.XXX[0x1]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813       |    |		.CONST	0x0813								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0001       |    |		.CONST	0x0001								; Number of locals
0813			BODY_0810:
0813			INIT_0810:
0813 e40d       |    |		Load	0x2,0xd
0814 6803       |h   |		Jump_Zero	0x818
0815 0092 087c  |   ||		Action	Push_String_Extended,0x87c					; "\x0a"
0817 00ca       |    |		Action	Exit_Nullary_Function
0818 00ea       |    |		Load_Encached	Null_String_Cache
0819 00ca       |    |		Action	Exit_Nullary_Function
081a ; --------------------------------------------------------------------------------------
081a ; STRING TABLE
081a ; --------------------------------------------------------------------------------------
081a 00c8       |    |		.STRTAB	0x00c8->0x087e							; "   No rendezvous are in progress for any task."
081b 00f4       |    |		.STRTAB	0x00f4->0x0895							; "   No rendezvous are in progress in task "
081c 011b       |    |		.STRTAB	0x011b->0x08a9							; "."
081d 011a       |    |		.STRTAB	0x011a->0x08aa							; "   No exceptions are active in any tasks."
081e 0141       | A  |		.STRTAB	0x0141->0x08be							; "    No exceptions are active in task "
081f 0164       | d  |		.STRTAB	0x0164->0x08d1							; "get_raise_location called with null task name"
0820 018f       |    |		.STRTAB	0x018f->0x08e7							; "unknown location"
0821 019d       |    |		.STRTAB	0x019d->0x08ef							; " Running "
0822 01a4       |    |		.STRTAB	0x01a4->0x08f4							; " At a breakpoint at "
0823 01b6       |    |		.STRTAB	0x01b6->0x08fe							; " Step complete at "
0824 01c6       |    |		.STRTAB	0x01c6->0x0907							; " Tracing at "
0825 01d0       |    |		.STRTAB	0x01d0->0x090d							; " Instruction step at "
0826 01e3       |    |		.STRTAB	0x01e3->0x0917							; " Has been temporarily stopped by the debugger at "
0827 0212       |    |		.STRTAB	0x0212->0x0930							; " Creation break at "
0828 0223       | #  |		.STRTAB	0x0223->0x0939							; " Tracing a task creation at "
0829 023d       | =  |		.STRTAB	0x023d->0x0947							; " Raised exception "
082a 024d       | M  |		.STRTAB	0x024d->0x0950							; " Stop (hold) at "
082b 025b       | [  |		.STRTAB	0x025b->0x0958							; " Stop at "
082c 0262       | b  |		.STRTAB	0x0262->0x095d							; " User call to debugger at "
082d 027a       | z  |		.STRTAB	0x027a->0x096a							; " Stopped (unknown reason) at "
082e 0295       |    |		.STRTAB	0x0295->0x0978							; "Unknown module state: "
082f 02a9       |    |		.STRTAB	0x02a9->0x0983							; "waiting for child elaboration"
0830 02c4       |    |		.STRTAB	0x02c4->0x0992							; "waiting for parent elaboration"
0831 02e0       |    |		.STRTAB	0x02e0->0x09a1							; "activating child packages"
0832 02f7       |    |		.STRTAB	0x02f7->0x09ad							; "activating child tasks"
0833 030b       |    |		.STRTAB	0x030b->0x09b8							; "waiting for task activation"
0834 0324       | $  |		.STRTAB	0x0324->0x09c6							; "waiting for children"
0835 0336       | 6  |		.STRTAB	0x0336->0x09d0							; "package completed"
0836 0345       | E  |		.STRTAB	0x0345->0x09d8							; "waiting at entry for accept"
0837 035e       | ^  |		.STRTAB	0x035e->0x09e6							; "waiting at timed entry for accept"
0838 037d       | }  |		.STRTAB	0x037d->0x09f6							; "attempting entry call"
0839 0390       |    |		.STRTAB	0x0390->0x0a01							; "waiting for delay"
083a 039f       |    |		.STRTAB	0x039f->0x0a09							; "aborting task"
083b 03aa       |    |		.STRTAB	0x03aa->0x0a10							; "terminated"
083c 03b2       |    |		.STRTAB	0x03b2->0x0a15							; "state presently unknown"
083d 03c7       |    |		.STRTAB	0x03c7->0x0a20							; "in wait service"
083e 03d4       |    |		.STRTAB	0x03d4->0x0a28							; "delaying in wait service"
083f 03ea       |    |		.STRTAB	0x03ea->0x0a34							; "being aborted"
0840 03f5       |    |		.STRTAB	0x03f5->0x0a3a							; "waiting at accept for entry call"
0841 0413       |    |		.STRTAB	0x0413->0x0a4a							; "waiting at select for entry call"
0842 0431       | 1  |		.STRTAB	0x0431->0x0a5a							; "waiting at select-delay for entry call"
0843 0455       | U  |		.STRTAB	0x0455->0x0a6d							; "waiting at select-terminate for entry call with dependents"
0844 048d       |    |		.STRTAB	0x048d->0x0a8a							; "waiting at select-terminate for entry call"
0845 04b5       |    |		.STRTAB	0x04b5->0x0a9f							; "in environment"
0846 04c1       |    |		.STRTAB	0x04c1->0x0aa6							; "for input"
0847 04c8       |    |		.STRTAB	0x04c8->0x0aab							; " ("
0848 04c8       |    |		.STRTAB	0x04c8->0x0aac							; ")"
0849 04c7       |    |		.STRTAB	0x04c7->0x0aac							; ":"
084a 04c6       |    |		.STRTAB	0x04c6->0x0aad							; " at "
084b 04c8       |    |		.STRTAB	0x04c8->0x0aaf							; "obsolete location (program has been recompiled since debugger started)"
084c 050c       |    |		.STRTAB	0x050c->0x0ad2							; ", PC= "
084d 0510       |    |		.STRTAB	0x0510->0x0ad5							; " Stopping, "
084e 0519       |    |		.STRTAB	0x0519->0x0ada							; "Finished Elaboration"
084f 052b       | +  |		.STRTAB	0x052b->0x0ae4							; "Terminated"
0850 0533       | 3  |		.STRTAB	0x0533->0x0ae9							; "Waiting "
0851 0539       | 9  |		.STRTAB	0x0539->0x0aed							; ";"
0852 0538       | 8  |		.STRTAB	0x0538->0x0aee							; " Been Rousted"
0853 0543       | C  |		.STRTAB	0x0543->0x0af4							; " Not Rousted"
0854 054d       | M  |		.STRTAB	0x054d->0x0afa							; " Running, "
0855 0555       | U  |		.STRTAB	0x0555->0x0aff							; " [Pri = "
0856 055b       | [  |		.STRTAB	0x055b->0x0b03							; ", ABORTED"
0857 0562       | b  |		.STRTAB	0x0562->0x0b08							; ", Memory cond ="
0858 056f       | o  |		.STRTAB	0x056f->0x0b0f							; "]"
0859 056e       | n  |		.STRTAB	0x056e->0x0b10							; "\x0a    "
085a 0571       | q  |		.STRTAB	0x0571->0x0b12							; "Task display interrupted.\x0a"
085b 0589       |    |		.STRTAB	0x0589->0x0b1f							; ": Terminated."
085c 0594       |    |		.STRTAB	0x0594->0x0b26							; ": unable to read information: "
085d 05b0       |    |		.STRTAB	0x05b0->0x0b35							; "Unable to obtain space information for task "
085e 05da       |    |		.STRTAB	0x05da->0x0b4b							; "  Space use for task "
085f 05ed       |    |		.STRTAB	0x05ed->0x0b55							; "  Current control space: "
0860 0604       |    |		.STRTAB	0x0604->0x0b62							; ",   Max control space: "
0861 0619       |    |		.STRTAB	0x0619->0x0b6d							; "   (bytes)."
0862 0622       | "  |		.STRTAB	0x0622->0x0b73							; "  Current data space: "
0863 0636       | 6  |		.STRTAB	0x0636->0x0b7e							; ",   Max data space: "
0864 0648       | H  |		.STRTAB	0x0648->0x0b88							; "  Address space sizes (in bits):"
0865 0666       | f  |		.STRTAB	0x0666->0x0b98							; "segment      current      max\x0aControl  "
0866 068b       |    |		.STRTAB	0x068b->0x0bab							; "Data     "
0867 0692       |    |		.STRTAB	0x0692->0x0bb0							; "Type     "
0868 0699       |    |		.STRTAB	0x0699->0x0bb4							; "Queue    "
0869 06a0       |    |		.STRTAB	0x06a0->0x0bb9							; "          "
086a 06a8       |    |		.STRTAB	0x06a8->0x0bbe							; "Program has terminated."
086b 06bd       |    |		.STRTAB	0x06bd->0x0bc9							; "Job: "
086c 06c0       |    |		.STRTAB	0x06c0->0x0bcc							; ", Root task: "
086d 06cb       |    |		.STRTAB	0x06cb->0x0bd2							; "Task "
086e 06ce       |    |		.STRTAB	0x06ce->0x0bd5							; "  In rendezvous with:  "
086f 06e3       |    |		.STRTAB	0x06e3->0x0be0							; "  Control offset: #"
0870 06f4       |    |		.STRTAB	0x06f4->0x0bea							; "Display one task passed a null task name"
0871 071a       |    |		.STRTAB	0x071a->0x0bfe							; "Rendezvous_Info_For_one_task passed a null task name"
0872 074c       | L  |		.STRTAB	0x074c->0x0c18							; "Exception_Info_For_one_task passed a null task name"
0873 077d       | }  |		.STRTAB	0x077d->0x0c31							; "Space_Info_For_one_task passed a null task name"
0874 07aa       |    |		.STRTAB	0x07aa->0x0c49							; "obsolete location"
0875 07b9       |    |		.STRTAB	0x07b9->0x0c51							; "    Exception was actually raised in system code at Pc: "
0876 07ef       |    |		.STRTAB	0x07ef->0x0c6d							; "   Control offset: #"
0877 0801       |    |		.STRTAB	0x0801->0x0c77							; ",  Raise Pc: "
0878 080c       |    |		.STRTAB	0x080c->0x0c7e							; ", Exception name: "
0879 081c       |    |		.STRTAB	0x081c->0x0c87							; " re-raised; originally"
087a 0830       | 0  |		.STRTAB	0x0830->0x0c92							; "    Exception "
087b 083c       | <  |		.STRTAB	0x083c->0x0c99							; " raised at: "
087c 0846       | F  |		.STRTAB	0x0846->0x0c9f							; "\x0a"
087d 0845       | E  |		.STREND 0x0845->0x0c9f
087e 2020 204e  |   N|		.STRTAB_STRINGS
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; Debug Table
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x165f,0x0000,0x0001,0x0000
0ca6 0000 0000  |    |		.BLANK	0000[0x15a]