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

⟦c807e0962⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

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 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0410       |    |		.CONST	0x0410								; 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 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00d3       |    |		.CONST	0x00d3								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0057       | W  |		.CONST	0x0057								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x04ca,0x8000,0x0000,0x0058,0x03e5,0x0000,0x0003
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x1 = 0xc,0xfffe
000d e001       |    |		Load	0x0,0x1								; Debug Table 0x1 = .DEBUG	0x000d,0x04d0,0x8000,0x0000,0x0058,0x0415,0x0000,0x003d
													; Debug Table 0x1.0x0 = 0xd,0xffff
000e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
000f 0337       | 7  |		Declare_Variable	Array
0010 e001       |    |		Load	0x0,0x1
0011 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0012 0337       | 7  |		Declare_Variable	Array
0013 4801       |H   |		Short_Literal	0x1
0014 4800       |H   |		Short_Literal	0x0
0015 00da       |    |		Load_Top	At_Offset_2
0016 01d6       |    |		Execute	Vector,Field_Write
0017 4801       |H   |		Short_Literal	0x1
0018 4801       |H   |		Short_Literal	0x1
0019 00da       |    |		Load_Top	At_Offset_2
001a 01d6       |    |		Execute	Vector,Field_Write
001b 4801       |H   |		Short_Literal	0x1
001c 4802       |H   |		Short_Literal	0x2
001d 00da       |    |		Load_Top	At_Offset_2
001e 01d6       |    |		Execute	Vector,Field_Write
001f 4801       |H   |		Short_Literal	0x1
0020 4806       |H   |		Short_Literal	0x6
0021 00da       |    |		Load_Top	At_Offset_2
0022 01d6       |    |		Execute	Vector,Field_Write
0023 4805       |H   |		Short_Literal	0x5
0024 4803       |H   |		Short_Literal	0x3
0025 4800       |H   |		Short_Literal	0x0
0026 00d9       |    |		Load_Top	At_Offset_1
0027 e20e       |    |		Load	0x1,0xe
0028 01d6       |    |		Execute	Vector,Field_Write
0029 3ffb       |?   |		Loop_Increasing	0x25
002a 4bff       |K   |		Short_Literal	0x3ff
002b 4807       |H   |		Short_Literal	0x7
002c 4800       |H   |		Short_Literal	0x0
002d 00d9       |    |		Load_Top	At_Offset_1
002e e20e       |    |		Load	0x1,0xe
002f 01d6       |    |		Execute	Vector,Field_Write
0030 3ffb       |?   |		Loop_Increasing	0x2c
0031 e001       |    |		Load	0x0,0x1
0032 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0033 01c3       |    |		Execute	Vector,Check_In_Type
0034 00d9       |    |		Load_Top	At_Offset_1
0035 01d4       |    |		Execute	Vector,Structure_Write
0036 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x1 = 0x36,0xfffe
0037 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0038 02c7       |    |		Declare_Variable	Any
0039 00d8       |    |		Load_Top	At_Offset_0
003a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
003b e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x2 = 0x3b,0xfffd
003c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x3 = 0x3d,0xfffc
003e 622d       |b-  |		Indirect_Literal	Discrete,0x26c,{0x0056c00e, 0x00002b30}
003f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0040 037d       | }  |		Declare_Type	Task,Defined
0041 036f       | o  |		Declare_Variable	Task
0042 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x4 = 0x42,0xfffb
0043 6224       |b$  |		Indirect_Literal	Discrete,0x268,{0x0056c00e, 0x00002930}
0044 02a0       |    |		Declare_Subprogram	Null_Subprogram
0045 037d       | }  |		Declare_Type	Task,Defined
0046 036f       | o  |		Declare_Variable	Task
0047 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x5 = 0x47,0xfffa
0048 621b       |b   |		Indirect_Literal	Discrete,0x264,{0x0056c00e, 0x00002730}
0049 02a0       |    |		Declare_Subprogram	Null_Subprogram
004a 037d       | }  |		Declare_Type	Task,Defined
004b 036f       | o  |		Declare_Variable	Task
004c 029b 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x6 = 0x4c,0xfff9
004e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x7 = 0x4e,0xfff8
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 029d 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call			; Debug Table 0x1.0x8 = 0x50,0xfff7
0052 029d 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call			; Debug Table 0x1.0x9 = 0x52,0xfff6
0054 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xa = 0x54,0xfff5
0055 00c6       |    |		Action	Check_Subprogram_Elaborated
0056 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0057 0092 02bb  |    |		Action	Push_String_Extended,0x2bb					; "Initialize group map"
0059 4801       |H   |		Short_Literal	0x1
005a 4800       |H   |		Short_Literal	0x0
005b 6204       |b   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00580415}
005c 491d       |I   |		Short_Literal	0x11d
005d 4800       |H   |		Short_Literal	0x0
005e 0007       |    |		Action	Break_Optional
005f 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xb = 0x5f,0xfff4
0060 00c6       |    |		Action	Check_Subprogram_Elaborated
0061 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0062 0092 02bc  |    |		Action	Push_String_Extended,0x2bc					; "Set initialize identity"
0064 4801       |H   |		Short_Literal	0x1
0065 4800       |H   |		Short_Literal	0x0
0066 61f9       |a   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00580415}
0067 4926       |I&  |		Short_Literal	0x126
0068 4800       |H   |		Short_Literal	0x0
0069 0007       |    |		Action	Break_Optional
006a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xc = 0x6a,0xfff3
006b 00c6       |    |		Action	Check_Subprogram_Elaborated
006c e003       |    |		Load	0x0,0x3
006d 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
006e 0092 02bd  |    |		Action	Push_String_Extended,0x2bd					; "Standard_R1000_Packages.Initialize"
0070 4801       |H   |		Short_Literal	0x1
0071 4800       |H   |		Short_Literal	0x0
0072 61ed       |a   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00580415}
0073 492f       |I/  |		Short_Literal	0x12f
0074 4800       |H   |		Short_Literal	0x0
0075 0007       |    |		Action	Break_Optional
0076 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xd = 0x76,0xfff2
0077 00c6       |    |		Action	Check_Subprogram_Elaborated
0078 a004       |    |		Store_Unchecked	0x0,0x4
0079 0092 02be  |    |		Action	Push_String_Extended,0x2be					; "Check_Device_Declarations"
007b 4801       |H   |		Short_Literal	0x1
007c 4800       |H   |		Short_Literal	0x0
007d 61e2       |a   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00580415}
007e 493a       |I:  |		Short_Literal	0x13a
007f 4800       |H   |		Short_Literal	0x0
0080 0007       |    |		Action	Break_Optional
0081 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xe = 0x81,0xfff1
0082 00c6       |    |		Action	Check_Subprogram_Elaborated
0083 a005       |    |		Store_Unchecked	0x0,0x5
0084 0092 02bf  |    |		Action	Push_String_Extended,0x2bf					; "Editor_Initialization"
0086 4801       |H   |		Short_Literal	0x1
0087 4801       |H   |		Short_Literal	0x1
0088 61d7       |a   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00580415}
0089 4943       |IC  |		Short_Literal	0x143
008a 4800       |H   |		Short_Literal	0x0
008b 0007       |    |		Action	Break_Optional
008c 029d 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call			; Debug Table 0x1.0xf = 0x8c,0xfff0
008e 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x10 = 0x8e,0xffef
008f 00c6       |    |		Action	Check_Subprogram_Elaborated
0090 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
0091 0092 02c0  |    |		Action	Push_String_Extended,0x2c0					; "Operator.Enable_Terminal (16)"
0093 4800       |H   |		Short_Literal	0x0
0094 4800       |H   |		Short_Literal	0x0
0095 61ca       |a   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00580415}
0096 495d       |I]  |		Short_Literal	0x15d
0097 4800       |H   |		Short_Literal	0x0
0098 0007       |    |		Action	Break_Optional
0099 029d 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call			; Debug Table 0x1.0x11 = 0x99,0xffee
009b 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x12 = 0x9b,0xffed
009c 00c6       |    |		Action	Check_Subprogram_Elaborated
009d 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
009e 0092 02c1  |    |		Action	Push_String_Extended,0x2c1					; "Destroy deleted Ada/Link objects"
00a0 4801       |H   |		Short_Literal	0x1
00a1 4801       |H   |		Short_Literal	0x1
00a2 61bd       |a   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00580415}
00a3 4980       |I   |		Short_Literal	0x180
00a4 4800       |H   |		Short_Literal	0x0
00a5 0007       |    |		Action	Break_Optional
00a6 029d 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call			; Debug Table 0x1.0x13 = 0xa6,0xffec
00a8 029d 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call			; Debug Table 0x1.0x14 = 0xa8,0xffeb
00aa 029d 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call			; Debug Table 0x1.0x15 = 0xaa,0xffea
00ac 029d 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call			; Debug Table 0x1.0x16 = 0xac,0xffe9
00ae 029d 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call			; Debug Table 0x1.0x17 = 0xae,0xffe8
00b0 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x18 = 0xb0,0xffe7
00b1 00c6       |    |		Action	Check_Subprogram_Elaborated
00b2 1d4d       | M  |		Execute_Immediate	Reference_Lex_1,0x4d
00b3 0092 02c2  |    |		Action	Push_String_Extended,0x2c2					; "\x22!Machine.Initialization\x22.Start"
00b5 4801       |H   |		Short_Literal	0x1
00b6 4800       |H   |		Short_Literal	0x0
00b7 61a8       |a   |		Indirect_Literal	Discrete,0x260,{0x00000000, 0x00580415}
00b8 4abc       |J   |		Short_Literal	0x2bc
00b9 4800       |H   |		Short_Literal	0x0
00ba 0007       |    |		Action	Break_Optional
00bb 029d 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call			; Debug Table 0x1.0x19 = 0xbb,0xffe6
00bd 029d 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call			; Debug Table 0x1.0x1a = 0xbd,0xffe5
00bf 029d 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call			; Debug Table 0x1.0x1b = 0xbf,0xffe4
00c1 e006       |    |		Load	0x0,0x6								; Debug Table 0x1.0x1c = 0xc1,0xffe3
00c2 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
00c3 4802       |H   |		Short_Literal	0x2
00c4 e211       |    |		Load	0x1,0x11
00c5 020e       |    |		Execute	Module,Augment_Imports
00c6 0007       |    |		Action	Break_Optional
00c7 e007       |    |		Load	0x0,0x7								; Debug Table 0x1.0x1d = 0xc7,0xffe2
00c8 e006       |    |		Load	0x0,0x6
00c9 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
00ca 4803       |H   |		Short_Literal	0x3
00cb e212       |    |		Load	0x1,0x12
00cc 020e       |    |		Execute	Module,Augment_Imports
00cd 0007       |    |		Action	Break_Optional
00ce e006       |    |		Load	0x0,0x6								; Debug Table 0x1.0x1e = 0xce,0xffe1
00cf 1d57       | W  |		Execute_Immediate	Reference_Lex_1,0x57
00d0 4802       |H   |		Short_Literal	0x2
00d1 e210       |    |		Load	0x1,0x10
00d2 020e       |    |		Execute	Module,Augment_Imports
00d3			BODY_0008:
00d3 00be       |    |		Action	Activate_Tasks
00d4 00bc       |    |		Action	Signal_Activated
00d5 00bb       |    |		Action	Signal_Completion
00d6 0000 0000  |    |		.XXX[0x2]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 00f1       |    |		.CONST	0x00f1								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2 = .DEBUG	0x00db,0x0510,0x2801,0x0002,0x0058,0x0415,0x0000,0x0088
													; Debug Table 0x2.0x0 = 0xdb,0x1
00dc 6808       |h   |		Jump_Zero	0xe5
00dd e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2.0x1 = 0xdd,0x2
00de 0092 02c3  |    |		Action	Push_String_Extended,0x2c3					; "Running"
00e0 4800       |H   |		Short_Literal	0x0
00e1 0092 02c4  |    |		Action	Push_String_Extended,0x2c4					; "Boot"
00e3 e008       |    |		Load	0x0,0x8
00e4 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
00e5 85fb       |    |		Call	0x2,-0x5							; Debug Table 0x2.0x2 = 0xe5,0x3
00e6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x3 = 0xe6,0x4
00e7 6808       |h   |		Jump_Zero	0xf0
00e8 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2.0x4 = 0xe8,0x5
00e9 0092 02c5  |    |		Action	Push_String_Extended,0x2c5					; "Completed"
00eb 4800       |H   |		Short_Literal	0x0
00ec 0092 02c4  |    |		Action	Push_String_Extended,0x2c4					; "Boot"
00ee e008       |    |		Load	0x0,0x8
00ef 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
00f0 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
00f1			TRAP_00d8:
00f1 0007       |    |		Action	Break_Optional
00f2 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2.0x5 = 0xf2,0x6
00f3 0092 02c6  |    |		Action	Push_String_Extended,0x2c6					; " failed: "
00f5 01cc       |    |		Execute	Vector,Catenate
00f6 e009       |    |		Load	0x0,0x9
00f7 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00f8 01cc       |    |		Execute	Vector,Catenate
00f9 0092 02c7  |    |		Action	Push_String_Extended,0x2c7					; "Unexpected Exception"
00fb 4802       |H   |		Short_Literal	0x2
00fc 0092 02c4  |    |		Action	Push_String_Extended,0x2c4					; "Boot"
00fe e008       |    |		Load	0x0,0x8
00ff 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0100 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0101 0000 0000  |    |		.BLANK	0000[0x7]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3 = .DEBUG	0x010b,0x051e,0x0001,0x0000,0x0058,0x0415,0x0000,0x00fa
													; Debug Table 0x3.0x0 = 0x10b,0x1
010c e20d       |    |		Load	0x1,0xd
010d 4804       |H   |		Short_Literal	0x4
010e e00a       |    |		Load	0x0,0xa
010f 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0110 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x1 = 0x110,0x2
0111 4804       |H   |		Short_Literal	0x4
0112 e00a       |    |		Load	0x0,0xa
0113 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0114 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0115 0000 0000  |    |		.XXX[0x3]
0117 0000       |    |
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b       |    |		.CONST	0x011b								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0001       |    |		.CONST	0x0001								; Number of locals
011b			BODY_0118:
011b			INIT_0118:
011b e00b       |    |		Load	0x0,0xb								; Debug Table 0x4 = .DEBUG	0x011b,0x0524,0x0001,0x0000,0x0058,0x0415,0x0000,0x0110
													; Debug Table 0x4.0x0 = 0x11b,0x1
011c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
011d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
011e 0000 0000  |    |		.XXX[0x2]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 0092 02c8  |    |		Action	Push_String_Extended,0x2c8					; "<PROFILE>"
													; Debug Table 0x5 = .DEBUG	0x0123,0x0528,0x0001,0x0000,0x0058,0x0415,0x0000,0x014f
													; Debug Table 0x5.0x0 = 0x123,0x1
0125 4810       |H   |		Short_Literal	0x10
0126 e00c       |    |		Load	0x0,0xc
0127 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0128 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0129 0000 0000  |    |		.BLANK	0000[0x7]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 e00d       |    |		Load	0x0,0xd								; Debug Table 0x6 = .DEBUG	0x0133,0x052c,0x0001,0x0000,0x0058,0x0415,0x0000,0x0169
													; Debug Table 0x6.0x0 = 0x133,0x1
0134 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0135 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x6.0x1 = 0x135,0x2
0136 e00e       |    |		Load	0x0,0xe
0137 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0138 e00f       |    |		Load	0x0,0xf
0139 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
013a e010       |    |		Load	0x0,0x10							; Debug Table 0x6.0x2 = 0x13a,0x3
013b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
013c e011       |    |		Load	0x0,0x11
013d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
013e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
013f 0000       |    |		.XXX[0x1]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0157       | W  |		.CONST	0x0157								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 0092 02c9  |    |		Action	Push_String_Extended,0x2c9					; "!"
													; Debug Table 0x7 = .DEBUG	0x0143,0x0534,0x0001,0x0000,0x0058,0x0415,0x0000,0x018c
													; Debug Table 0x7.0x0 = 0x143,0x1
0145 e012       |    |		Load	0x0,0x12
0146 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0147 01db       |    |		Execute	Vector,Length
0148 6804       |h   |		Jump_Zero	0x14d
0149 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x1 = 0x149,0x2
014a e001       |    |		Load	0x0,0x1
014b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
014c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
014d 0092 02ca  |    |		Action	Push_String_Extended,0x2ca					; " No ACL on \x22!\x22"
													; Debug Table 0x7.0x2 = 0x14d,0x3
014f 0092 02cb  |    |		Action	Push_String_Extended,0x2cb					; "Access_Control_Not_Enabled"
0151 4802       |H   |		Short_Literal	0x2
0152 0092 02c4  |    |		Action	Push_String_Extended,0x2c4					; "Boot"
0154 e008       |    |		Load	0x0,0x8
0155 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0156 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0157			TRAP_0140:
0157 0007       |    |		Action	Break_Optional
0158 0092 02cc  |    |		Action	Push_String_Extended,0x2cc					; " Unable to read ACL for \x22!\x22 due to "
													; Debug Table 0x7.0x3 = 0x158,0x4
015a e009       |    |		Load	0x0,0x9
015b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
015c 01cc       |    |		Execute	Vector,Catenate
015d 0092 02cb  |    |		Action	Push_String_Extended,0x2cb					; "Access_Control_Not_Enabled"
015f 4802       |H   |		Short_Literal	0x2
0160 0092 02c4  |    |		Action	Push_String_Extended,0x2c4					; "Boot"
0162 e008       |    |		Load	0x0,0x8
0163 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0164 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0165 0000 0000  |    |		.XXX[0x3]
0167 0000       |    |
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 016f       | o  |		.CONST	0x016f								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8 = .DEBUG	0x016b,0x053e,0x0001,0x0000,0x0058,0x0415,0x0000,0x01d8
													; Debug Table 0x8.0x0 = 0x16b,0x1
016c e006       |    |		Load	0x0,0x6
016d 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
016e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
016f			TRAP_0168:
016f 0007       |    |		Action	Break_Optional
0170 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x8.0x1 = 0x170,0x2
0171 0000 0000  |    |		.BLANK	0000[0x7]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b       | {  |		.CONST	0x017b								; Address of begin
0179 0182       |    |		.CONST	0x0182								; Address of exception handler
017a 0001       |    |		.CONST	0x0001								; Number of locals
017b			BODY_0178:
017b			INIT_0178:
017b 0092 02c8  |    |		Action	Push_String_Extended,0x2c8					; "<PROFILE>"
													; Debug Table 0x9 = .DEBUG	0x017b,0x0544,0x0001,0x0000,0x0058,0x0415,0x0000,0x01eb
													; Debug Table 0x9.0x0 = 0x17b,0x1
017d 0092 02cd  |    |		Action	Push_String_Extended,0x2cd					; "!machine.release.current.activity"
017f e013       |    |		Load	0x0,0x13
0180 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0181 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0182			TRAP_0178:
0182 0007       |    |		Action	Break_Optional
0183 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x9.0x1 = 0x183,0x2
0184 0000 0000  |    |		.BLANK	0000[0x4]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b       |    |		.CONST	0x018b								; Address of begin
0189 0192       |    |		.CONST	0x0192								; Address of exception handler
018a 0001       |    |		.CONST	0x0001								; Number of locals
018b			BODY_0188:
018b			INIT_0188:
018b 0092 02c8  |    |		Action	Push_String_Extended,0x2c8					; "<PROFILE>"
													; Debug Table 0xa = .DEBUG	0x018b,0x054a,0x0001,0x0000,0x0058,0x0415,0x0000,0x01fe
													; Debug Table 0xa.0x0 = 0x18b,0x1
018d 0092 02ce  |    |		Action	Push_String_Extended,0x2ce					; "!machine.error_logs"
018f e014       |    |		Load	0x0,0x14
0190 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0191 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0192			TRAP_0188:
0192 0007       |    |		Action	Break_Optional
0193 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0xa.0x1 = 0x193,0x2
0194 0000 0000  |    |		.BLANK	0000[0x4]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a8       |    |		.CONST	0x01a8								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0004       |    |		.CONST	0x0004								; Number of locals
019b			INIT_0198:
019b e001       |    |		Load	0x0,0x1								; Debug Table 0xb = .DEBUG	0x019b,0x0550,0x0001,0x0000,0x0058,0x0415,0x0000,0x0211
													; Debug Table 0xb.0x0 = 0x19b,0xffff
019c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
019d e015       |    |		Load	0x0,0x15							; Debug Table 0xb.0x1 = 0x19d,0xfffe
019e 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
019f e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x2 = 0x19f,0xfffd
01a0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01a1 0337       | 7  |		Declare_Variable	Array
01a2 e010       |    |		Load	0x0,0x10
01a3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01a4 e00a       |    |		Load	0x0,0xa
01a5 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
01a6 00d9       |    |		Load_Top	At_Offset_1
01a7 01d4       |    |		Execute	Vector,Structure_Write
01a8			BODY_0198:
01a8 e015       |    |		Load	0x0,0x15							; Debug Table 0xb.0x3 = 0x1a8,0x1
01a9 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
01aa e001       |    |		Load	0x0,0x1
01ab 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01ac e00e       |    |		Load	0x0,0xe
01ad 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01ae 4800       |H   |		Short_Literal	0x0
01af e016       |    |		Load	0x0,0x16
01b0 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01b1 e017       |    |		Load	0x0,0x17
01b2 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
01b3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01b4 c402       |    |		Store	0x2,0x2
01b5 005a       | Z  |		Store_Top	Discrete,At_Offset_2
01b6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x4 = 0x1b6,0x2
01b7 700b       |p   |		Jump_Nonzero	0x1c3
01b8 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x5 = 0x1b8,0x3
01b9 00db       |    |		Load_Top	At_Offset_3
01ba 00da       |    |		Load_Top	At_Offset_2
01bb 01d6       |    |		Execute	Vector,Field_Write
01bc 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x6 = 0x1bc,0x4
01bd 00d9       |    |		Load_Top	At_Offset_1
01be e010       |    |		Load	0x0,0x10
01bf 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01c0 e00a       |    |		Load	0x0,0xa
01c1 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
01c2 7808       |x   |		Jump	0x1cb
01c3 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0xb.0x7 = 0x1c3,0x5
01c4 0092 02cf  |    |		Action	Push_String_Extended,0x2cf					; "Cant_Get_Operator_Group_Id"
01c6 4802       |H   |		Short_Literal	0x2
01c7 0092 02c4  |    |		Action	Push_String_Extended,0x2c4					; "Boot"
01c9 e008       |    |		Load	0x0,0x8
01ca 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01cb e20e       |    |		Load	0x1,0xe								; Debug Table 0xb.0x8 = 0x1cb,0x6
01cc e002       |    |		Load	0x0,0x2
01cd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ce 00ea       |    |		Load_Encached	Null_String_Cache
01cf 00ea       |    |		Load_Encached	Null_String_Cache
01d0 4800       |H   |		Short_Literal	0x0
01d1 0092 02ce  |    |		Action	Push_String_Extended,0x2ce					; "!machine.error_logs"
01d3 4800       |H   |		Short_Literal	0x0
01d4 0092 02d0  |    |		Action	Push_String_Extended,0x2d0					; "\x22!Machine.Initialization\x22.Start(Effort_Only => false);"
01d6 e002       |    |		Load	0x0,0x2
01d7 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01d8 c20f       |    |		Store	0x1,0xf
01d9 c20e       |    |		Store	0x1,0xe
01da e20e       |    |		Load	0x1,0xe								; Debug Table 0xb.0x9 = 0x1da,0x7
01db e002       |    |		Load	0x0,0x2
01dc 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01dd 701b       |p   |		Jump_Nonzero	0x1f9
01de e20e       |    |		Load	0x1,0xe								; Debug Table 0xb.0xa = 0x1de,0x8
01df e008       |    |		Load	0x0,0x8
01e0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01e1 c20e       |    |		Store	0x1,0xe
01e2 e20e       |    |		Load	0x1,0xe								; Debug Table 0xb.0xb = 0x1e2,0x9
01e3 e002       |    |		Load	0x0,0x2
01e4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01e5 00ea       |    |		Load_Encached	Null_String_Cache
01e6 00ea       |    |		Load_Encached	Null_String_Cache
01e7 4800       |H   |		Short_Literal	0x0
01e8 0092 02ce  |    |		Action	Push_String_Extended,0x2ce					; "!machine.error_logs"
01ea 4800       |H   |		Short_Literal	0x0
01eb 0092 02d1  |    |		Action	Push_String_Extended,0x2d1					; "\x22!Machine\x22.Initialize;"
01ed e002       |    |		Load	0x0,0x2
01ee 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01ef c20f       |    |		Store	0x1,0xf
01f0 c20e       |    |		Store	0x1,0xe
01f1 e20e       |    |		Load	0x1,0xe								; Debug Table 0xb.0xc = 0x1f1,0xa
01f2 e002       |    |		Load	0x0,0x2
01f3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01f4 7004       |p   |		Jump_Nonzero	0x1f9
01f5 e20e       |    |		Load	0x1,0xe								; Debug Table 0xb.0xd = 0x1f5,0xb
01f6 e008       |    |		Load	0x0,0x8
01f7 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01f8 c20e       |    |		Store	0x1,0xe
01f9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01fa 0000 0000  |    |		.BLANK	0000[0x6]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32				; Debug Table 0xc = .DEBUG	0x0203,0x056e,0x0001,0x0000,0x0058,0x0415,0x0000,0x02c5
													; Debug Table 0xc.0x0 = 0x203,0x1
0204 e233       | 3  |		Load	0x1,0x33
0205 e234       | 4  |		Load	0x1,0x34
0206 e235       | 5  |		Load	0x1,0x35
0207 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
0208 8213       |    |		Call	0x1,0x13
0209 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a				; Debug Table 0xc.0x1 = 0x209,0x2
020a e23b       | ;  |		Load	0x1,0x3b
020b e23c       | <  |		Load	0x1,0x3c
020c e23d       | =  |		Load	0x1,0x3d
020d 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
020e 8213       |    |		Call	0x1,0x13
020f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42				; Debug Table 0xd = .DEBUG	0x0213,0x0574,0x0001,0x0000,0x0058,0x0415,0x0000,0x02d3
													; Debug Table 0xd.0x0 = 0x213,0x1
0214 e243       | C  |		Load	0x1,0x43
0215 e244       | D  |		Load	0x1,0x44
0216 e245       | E  |		Load	0x1,0x45
0217 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
0218 8213       |    |		Call	0x1,0x13
0219 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
021a 0000 0000  |    |		.BLANK	0000[0x6]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0252       | R  |		.CONST	0x0252								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0xe = .DEBUG	0x0223,0x0578,0x0001,0x0000,0x0058,0x0415,0x0000,0x02de
													; Debug Table 0xe.0x0 = 0x223,0x1
0224 e21e       |    |		Load	0x1,0x1e
0225 e21f       |    |		Load	0x1,0x1f
0226 e220       |    |		Load	0x1,0x20
0227 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0228 8213       |    |		Call	0x1,0x13
0229 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0xe.0x1 = 0x229,0x2
022a e225       | %  |		Load	0x1,0x25
022b e226       | &  |		Load	0x1,0x26
022c e227       | '  |		Load	0x1,0x27
022d 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
022e 8213       |    |		Call	0x1,0x13
022f 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b				; Debug Table 0xe.0x2 = 0x22f,0x3
0230 e22c       | ,  |		Load	0x1,0x2c
0231 e22d       | -  |		Load	0x1,0x2d
0232 e22e       | .  |		Load	0x1,0x2e
0233 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
0234 8213       |    |		Call	0x1,0x13
0235 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x3 = 0x235,0x4
0236 e211       |    |		Load	0x1,0x11
0237 170d       |    |		Execute	Task,Entry_Call,Field_Number 0xd
0238 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0xe.0x4 = 0x238,0x5
0239 e217       |    |		Load	0x1,0x17
023a e218       |    |		Load	0x1,0x18
023b e219       |    |		Load	0x1,0x19
023c 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
023d 8213       |    |		Call	0x1,0x13
023e 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x5 = 0x23e,0x6
023f e212       |    |		Load	0x1,0x12
0240 170d       |    |		Execute	Task,Entry_Call,Field_Number 0xd
0241 8249       | I  |		Call	0x1,0x49							; Debug Table 0xe.0x6 = 0x241,0x7
0242 824a       | J  |		Call	0x1,0x4a							; Debug Table 0xe.0x7 = 0x242,0x8
0243 824b       | K  |		Call	0x1,0x4b							; Debug Table 0xe.0x8 = 0x243,0x9
0244 824c       | L  |		Call	0x1,0x4c							; Debug Table 0xe.0x9 = 0x244,0xa
0245 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e				; Debug Table 0xe.0xa = 0x245,0xb
0246 e24f       | O  |		Load	0x1,0x4f
0247 e250       | P  |		Load	0x1,0x50
0248 e251       | Q  |		Load	0x1,0x51
0249 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
024a 8213       |    |		Call	0x1,0x13
024b 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0xe.0xb = 0x24b,0xc
024c e21e       |    |		Load	0x1,0x1e
024d e21f       |    |		Load	0x1,0x1f
024e e220       |    |		Load	0x1,0x20
024f 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0250 8213       |    |		Call	0x1,0x13
0251 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0252			TRAP_0220:
0252 0007       |    |		Action	Break_Optional
0253 0092 02d2  |    |		Action	Push_String_Extended,0x2d2					; "Reached main Boot procedure: "
													; Debug Table 0xe.0xc = 0x253,0xd
0255 e009       |    |		Load	0x0,0x9
0256 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0257 01cc       |    |		Execute	Vector,Catenate
0258 0092 02d3  |    |		Action	Push_String_Extended,0x2d3					; "Unhandled Exception"
025a 4802       |H   |		Short_Literal	0x2
025b 0092 02c4  |    |		Action	Push_String_Extended,0x2c4					; "Boot"
025d e008       |    |		Load	0x0,0x8
025e 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
025f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0260 0000 0000  |    |		.LITERAL	{0x00000000, 0x00580415}
0264 0056 c00e  | V  |		.LITERAL	{0x0056c00e, 0x00002730}
0268 0056 c00e  | V  |		.LITERAL	{0x0056c00e, 0x00002930}
026c 0056 c00e  | V  |		.LITERAL	{0x0056c00e, 0x00002b30}
0270 027a 0004  | z  |		.XXX[0x3]
0272 000e       |    |
0273 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf = .DEBUG	0x0273,0x0594,0x0000,0x0000,0x0058,0x0415,0x0000,0x0080
0274 02cb       |    |		Declare_Variable	Entry
0275 00bf       |    |		Action	Accept_Activation
0276 480d       |H   |		Short_Literal	0xd							; Debug Table 0x10 = .DEBUG	0x0276,0x0596,0x0000,0x0000,0x0058,0x0415,0x0000,0x033e
0277 0299 028b  |    |		Declare_Subprogram	INIT_0288,For_Accept
0279 00bc       |    |		Action	Signal_Activated
027a 480f       |H   |		Short_Literal	0xf							; Debug Table 0x10.0x0 = 0x27a,0x1
027b e001       |    |		Load	0x0,0x1
027c 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
027d 0092 02d4  |    |		Action	Push_String_Extended,0x2d4					; "initialize_housekeeping_thread"
													; Debug Table 0x10.0x1 = 0x27d,0x2
027f e002       |    |		Load	0x0,0x2
0280 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0281 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x10.0x2 = 0x281,0x3
0282 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0283 0137       | 7  |		Execute	Entry,Rendezvous
0284 8003       |    |		Call	0x0,0x3								; Debug Table 0x10.0x3 = 0x284,0x4
0285 00bb       |    |		Action	Signal_Completion
0286 0000 0000  |    |		.XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b 4100       |A   |		End_Rendezvous	0x0							; Debug Table 0x11 = .DEBUG	0x028b,0x05a0,0x0003,0x0000,0x0058,0x0415,0x0000,0x0351
028c 0000 0000  |    |		.BLANK	0000[0x4]
0290 029a 0004  |    |		.XXX[0x3]
0292 000e       |    |
0293 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12 = .DEBUG	0x0293,0x05a2,0x0000,0x0000,0x0058,0x0415,0x0000,0x0078
0294 02cb       |    |		Declare_Variable	Entry
0295 00bf       |    |		Action	Accept_Activation
0296 480d       |H   |		Short_Literal	0xd							; Debug Table 0x13 = .DEBUG	0x0296,0x05a4,0x0000,0x0000,0x0058,0x0415,0x0000,0x032b
0297 0299 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Accept
0299 00bc       |    |		Action	Signal_Activated
029a 0092 02d5  |    |		Action	Push_String_Extended,0x2d5					; "initialize_editor_thread"
													; Debug Table 0x13.0x0 = 0x29a,0x1
029c e001       |    |		Load	0x0,0x1
029d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
029e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x13.0x1 = 0x29e,0x2
029f 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
02a0 0137       | 7  |		Execute	Entry,Rendezvous
02a1 8002       |    |		Call	0x0,0x2								; Debug Table 0x13.0x2 = 0x2a1,0x3
02a2 00bb       |    |		Action	Signal_Completion
02a3 0000 0000  |    |		.BLANK	0000[0x5]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab 4100       |A   |		End_Rendezvous	0x0							; Debug Table 0x14 = .DEBUG	0x02ab,0x05ac,0x0003,0x0000,0x0058,0x0415,0x0000,0x0336
02ac 0000 0000  |    |		.BLANK	0000[0x4]
02b0 02b5 0004  |    |		.XXX[0x3]
02b2 000c       |    |
02b3 00bf       |    |		Action	Accept_Activation						; Debug Table 0x15 = .DEBUG	0x02b3,0x05ae,0x0000,0x0000,0x0058,0x0415,0x0000,0x0074
02b4 00bc       |    |		Action	Signal_Activated						; Debug Table 0x16 = .DEBUG	0x02b4,0x05b0,0x0000,0x0000,0x0058,0x0415,0x0000,0x0359
02b5 0092 02d6  |    |		Action	Push_String_Extended,0x2d6					; "initialize_thread"
													; Debug Table 0x16.0x0 = 0x2b5,0x1
02b7 e001       |    |		Load	0x0,0x1
02b8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02b9 8002       |    |		Call	0x0,0x2								; Debug Table 0x16.0x1 = 0x2b9,0x2
02ba 00bb       |    |		Action	Signal_Completion
02bb ; --------------------------------------------------------------------------------------
02bb ; STRING TABLE
02bb ; --------------------------------------------------------------------------------------
02bb 003a       | :  |		.STRTAB	0x003a->0x02d8							; "Initialize group map"
02bc 004c       | L  |		.STRTAB	0x004c->0x02e2							; "Set initialize identity"
02bd 0061       | a  |		.STRTAB	0x0061->0x02ed							; "Standard_R1000_Packages.Initialize"
02be 0081       |    |		.STRTAB	0x0081->0x02fe							; "Check_Device_Declarations"
02bf 0098       |    |		.STRTAB	0x0098->0x030b							; "Editor_Initialization"
02c0 00ab       |    |		.STRTAB	0x00ab->0x0315							; "Operator.Enable_Terminal (16)"
02c1 00c6       |    |		.STRTAB	0x00c6->0x0324							; "Destroy deleted Ada/Link objects"
02c2 00e4       |    |		.STRTAB	0x00e4->0x0334							; "\x22!Machine.Initialization\x22.Start"
02c3 0101       |    |		.STRTAB	0x0101->0x0343							; "Running"
02c4 0106       |    |		.STRTAB	0x0106->0x0347							; "Boot"
02c5 0108       |    |		.STRTAB	0x0108->0x0349							; "Completed"
02c6 010f       |    |		.STRTAB	0x010f->0x034d							; " failed: "
02c7 0116       |    |		.STRTAB	0x0116->0x0352							; "Unexpected Exception"
02c8 0128       | (  |		.STRTAB	0x0128->0x035c							; "<PROFILE>"
02c9 012f       | /  |		.STRTAB	0x012f->0x0360							; "!"
02ca 012e       | .  |		.STRTAB	0x012e->0x0361							; " No ACL on \x22!\x22"
02cb 013a       | :  |		.STRTAB	0x013a->0x0368							; "Access_Control_Not_Enabled"
02cc 0152       | R  |		.STRTAB	0x0152->0x0375							; " Unable to read ACL for \x22!\x22 due to "
02cd 0173       | s  |		.STRTAB	0x0173->0x0386							; "!machine.release.current.activity"
02ce 0192       |    |		.STRTAB	0x0192->0x0397							; "!machine.error_logs"
02cf 01a3       |    |		.STRTAB	0x01a3->0x03a0							; "Cant_Get_Operator_Group_Id"
02d0 01bb       |    |		.STRTAB	0x01bb->0x03ad							; "\x22!Machine.Initialization\x22.Start(Effort_Only => false);"
02d1 01ef       |    |		.STRTAB	0x01ef->0x03c8							; "\x22!Machine\x22.Initialize;"
02d2 0203       |    |		.STRTAB	0x0203->0x03d3							; "Reached main Boot procedure: "
02d3 021e       |    |		.STRTAB	0x021e->0x03e2							; "Unhandled Exception"
02d4 022f       | /  |		.STRTAB	0x022f->0x03eb							; "initialize_housekeeping_thread"
02d5 024b       | K  |		.STRTAB	0x024b->0x03fa							; "initialize_editor_thread"
02d6 0261       | a  |		.STRTAB	0x0261->0x0406							; "initialize_thread"
02d7 0270       | p  |		.STREND 0x0270->0x040f
02d8 496e 6974  |Init|		.STRTAB_STRINGS
040f 0000       |    |		.XXX[0x1]
0410 ; --------------------------------------------------------------------------------------
0410 ; Debug Table
0410 ; --------------------------------------------------------------------------------------
0410 0003 0017  |    |		.CONST	0x0003,0x0017
0412 000b 04ca  |    |		.DEBUG	0x000b,0x04ca,0x8000,0x0000,0x0058,0x03e5,0x0000,0x0003
041a 000d 04d0  |    |		.DEBUG	0x000d,0x04d0,0x8000,0x0000,0x0058,0x0415,0x0000,0x003d
0422 00db 0510  |    |		.DEBUG	0x00db,0x0510,0x2801,0x0002,0x0058,0x0415,0x0000,0x0088
042a 010b 051e  |    |		.DEBUG	0x010b,0x051e,0x0001,0x0000,0x0058,0x0415,0x0000,0x00fa
0432 011b 0524  |   $|		.DEBUG	0x011b,0x0524,0x0001,0x0000,0x0058,0x0415,0x0000,0x0110
043a 0123 0528  | # (|		.DEBUG	0x0123,0x0528,0x0001,0x0000,0x0058,0x0415,0x0000,0x014f
0442 0133 052c  | 3 ,|		.DEBUG	0x0133,0x052c,0x0001,0x0000,0x0058,0x0415,0x0000,0x0169
044a 0143 0534  | C 4|		.DEBUG	0x0143,0x0534,0x0001,0x0000,0x0058,0x0415,0x0000,0x018c
0452 016b 053e  | k >|		.DEBUG	0x016b,0x053e,0x0001,0x0000,0x0058,0x0415,0x0000,0x01d8
045a 017b 0544  | { D|		.DEBUG	0x017b,0x0544,0x0001,0x0000,0x0058,0x0415,0x0000,0x01eb
0462 018b 054a  |   J|		.DEBUG	0x018b,0x054a,0x0001,0x0000,0x0058,0x0415,0x0000,0x01fe
046a 019b 0550  |   P|		.DEBUG	0x019b,0x0550,0x0001,0x0000,0x0058,0x0415,0x0000,0x0211
0472 0203 056e  |   n|		.DEBUG	0x0203,0x056e,0x0001,0x0000,0x0058,0x0415,0x0000,0x02c5
047a 0213 0574  |   t|		.DEBUG	0x0213,0x0574,0x0001,0x0000,0x0058,0x0415,0x0000,0x02d3
0482 0223 0578  | # x|		.DEBUG	0x0223,0x0578,0x0001,0x0000,0x0058,0x0415,0x0000,0x02de
048a 0273 0594  | s  |		.DEBUG	0x0273,0x0594,0x0000,0x0000,0x0058,0x0415,0x0000,0x0080
0492 0276 0596  | v  |		.DEBUG	0x0276,0x0596,0x0000,0x0000,0x0058,0x0415,0x0000,0x033e
049a 028b 05a0  |    |		.DEBUG	0x028b,0x05a0,0x0003,0x0000,0x0058,0x0415,0x0000,0x0351
04a2 0293 05a2  |    |		.DEBUG	0x0293,0x05a2,0x0000,0x0000,0x0058,0x0415,0x0000,0x0078
04aa 0296 05a4  |    |		.DEBUG	0x0296,0x05a4,0x0000,0x0000,0x0058,0x0415,0x0000,0x032b
04b2 02ab 05ac  |    |		.DEBUG	0x02ab,0x05ac,0x0003,0x0000,0x0058,0x0415,0x0000,0x0336
04ba 02b3 05ae  |    |		.DEBUG	0x02b3,0x05ae,0x0000,0x0000,0x0058,0x0415,0x0000,0x0074
04c2 02b4 05b0  |    |		.DEBUG	0x02b4,0x05b0,0x0000,0x0000,0x0058,0x0415,0x0000,0x0359
04ca ; --------------------------------------------------------------------------------------
04ca ; Debug3 Subtable 0x0
04ca ; --------------------------------------------------------------------------------------
04ca 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
04cc 000b ffff  |    |		.CONST	0x000b,0xffff
04ce 000c fffe  |    |		.CONST	0x000c,0xfffe
04d0 ; --------------------------------------------------------------------------------------
04d0 ; Debug3 Subtable 0x1
04d0 ; --------------------------------------------------------------------------------------
04d0 001f 0000  |    |		.DBG3TAB	0x001f,0x0000
04d2 000d ffff  |    |		.CONST	0x000d,0xffff
04d4 0036 fffe  | 6  |		.CONST	0x0036,0xfffe
04d6 003b fffd  | ;  |		.CONST	0x003b,0xfffd
04d8 003d fffc  | =  |		.CONST	0x003d,0xfffc
04da 0042 fffb  | B  |		.CONST	0x0042,0xfffb
04dc 0047 fffa  | G  |		.CONST	0x0047,0xfffa
04de 004c fff9  | L  |		.CONST	0x004c,0xfff9
04e0 004e fff8  | N  |		.CONST	0x004e,0xfff8
04e2 0050 fff7  | P  |		.CONST	0x0050,0xfff7
04e4 0052 fff6  | R  |		.CONST	0x0052,0xfff6
04e6 0054 fff5  | T  |		.CONST	0x0054,0xfff5
04e8 005f fff4  | _  |		.CONST	0x005f,0xfff4
04ea 006a fff3  | j  |		.CONST	0x006a,0xfff3
04ec 0076 fff2  | v  |		.CONST	0x0076,0xfff2
04ee 0081 fff1  |    |		.CONST	0x0081,0xfff1
04f0 008c fff0  |    |		.CONST	0x008c,0xfff0
04f2 008e ffef  |    |		.CONST	0x008e,0xffef
04f4 0099 ffee  |    |		.CONST	0x0099,0xffee
04f6 009b ffed  |    |		.CONST	0x009b,0xffed
04f8 00a6 ffec  |    |		.CONST	0x00a6,0xffec
04fa 00a8 ffeb  |    |		.CONST	0x00a8,0xffeb
04fc 00aa ffea  |    |		.CONST	0x00aa,0xffea
04fe 00ac ffe9  |    |		.CONST	0x00ac,0xffe9
0500 00ae ffe8  |    |		.CONST	0x00ae,0xffe8
0502 00b0 ffe7  |    |		.CONST	0x00b0,0xffe7
0504 00bb ffe6  |    |		.CONST	0x00bb,0xffe6
0506 00bd ffe5  |    |		.CONST	0x00bd,0xffe5
0508 00bf ffe4  |    |		.CONST	0x00bf,0xffe4
050a 00c1 ffe3  |    |		.CONST	0x00c1,0xffe3
050c 00c7 ffe2  |    |		.CONST	0x00c7,0xffe2
050e 00ce ffe1  |    |		.CONST	0x00ce,0xffe1
0510 ; --------------------------------------------------------------------------------------
0510 ; Debug3 Subtable 0x2
0510 ; --------------------------------------------------------------------------------------
0510 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0512 00db 0001  |    |		.CONST	0x00db,0x0001
0514 00dd 0002  |    |		.CONST	0x00dd,0x0002
0516 00e5 0003  |    |		.CONST	0x00e5,0x0003
0518 00e6 0004  |    |		.CONST	0x00e6,0x0004
051a 00e8 0005  |    |		.CONST	0x00e8,0x0005
051c 00f2 0006  |    |		.CONST	0x00f2,0x0006
051e ; --------------------------------------------------------------------------------------
051e ; Debug3 Subtable 0x3
051e ; --------------------------------------------------------------------------------------
051e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0520 010b 0001  |    |		.CONST	0x010b,0x0001
0522 0110 0002  |    |		.CONST	0x0110,0x0002
0524 ; --------------------------------------------------------------------------------------
0524 ; Debug3 Subtable 0x4
0524 ; --------------------------------------------------------------------------------------
0524 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0526 011b 0001  |    |		.CONST	0x011b,0x0001
0528 ; --------------------------------------------------------------------------------------
0528 ; Debug3 Subtable 0x5
0528 ; --------------------------------------------------------------------------------------
0528 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
052a 0123 0001  | #  |		.CONST	0x0123,0x0001
052c ; --------------------------------------------------------------------------------------
052c ; Debug3 Subtable 0x6
052c ; --------------------------------------------------------------------------------------
052c 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
052e 0133 0001  | 3  |		.CONST	0x0133,0x0001
0530 0135 0002  | 5  |		.CONST	0x0135,0x0002
0532 013a 0003  | :  |		.CONST	0x013a,0x0003
0534 ; --------------------------------------------------------------------------------------
0534 ; Debug3 Subtable 0x7
0534 ; --------------------------------------------------------------------------------------
0534 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0536 0143 0001  | C  |		.CONST	0x0143,0x0001
0538 0149 0002  | I  |		.CONST	0x0149,0x0002
053a 014d 0003  | M  |		.CONST	0x014d,0x0003
053c 0158 0004  | X  |		.CONST	0x0158,0x0004
053e ; --------------------------------------------------------------------------------------
053e ; Debug3 Subtable 0x8
053e ; --------------------------------------------------------------------------------------
053e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0540 016b 0001  | k  |		.CONST	0x016b,0x0001
0542 0170 0002  | p  |		.CONST	0x0170,0x0002
0544 ; --------------------------------------------------------------------------------------
0544 ; Debug3 Subtable 0x9
0544 ; --------------------------------------------------------------------------------------
0544 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0546 017b 0001  | {  |		.CONST	0x017b,0x0001
0548 0183 0002  |    |		.CONST	0x0183,0x0002
054a ; --------------------------------------------------------------------------------------
054a ; Debug3 Subtable 0xa
054a ; --------------------------------------------------------------------------------------
054a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
054c 018b 0001  |    |		.CONST	0x018b,0x0001
054e 0193 0002  |    |		.CONST	0x0193,0x0002
0550 ; --------------------------------------------------------------------------------------
0550 ; Debug3 Subtable 0xb
0550 ; --------------------------------------------------------------------------------------
0550 0003 000b  |    |		.DBG3TAB	0x0003,0x000b
0552 019b ffff  |    |		.CONST	0x019b,0xffff
0554 019d fffe  |    |		.CONST	0x019d,0xfffe
0556 019f fffd  |    |		.CONST	0x019f,0xfffd
0558 01a8 0001  |    |		.CONST	0x01a8,0x0001
055a 01b6 0002  |    |		.CONST	0x01b6,0x0002
055c 01b8 0003  |    |		.CONST	0x01b8,0x0003
055e 01bc 0004  |    |		.CONST	0x01bc,0x0004
0560 01c3 0005  |    |		.CONST	0x01c3,0x0005
0562 01cb 0006  |    |		.CONST	0x01cb,0x0006
0564 01da 0007  |    |		.CONST	0x01da,0x0007
0566 01de 0008  |    |		.CONST	0x01de,0x0008
0568 01e2 0009  |    |		.CONST	0x01e2,0x0009
056a 01f1 000a  |    |		.CONST	0x01f1,0x000a
056c 01f5 000b  |    |		.CONST	0x01f5,0x000b
056e ; --------------------------------------------------------------------------------------
056e ; Debug3 Subtable 0xc
056e ; --------------------------------------------------------------------------------------
056e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0570 0203 0001  |    |		.CONST	0x0203,0x0001
0572 0209 0002  |    |		.CONST	0x0209,0x0002
0574 ; --------------------------------------------------------------------------------------
0574 ; Debug3 Subtable 0xd
0574 ; --------------------------------------------------------------------------------------
0574 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0576 0213 0001  |    |		.CONST	0x0213,0x0001
0578 ; --------------------------------------------------------------------------------------
0578 ; Debug3 Subtable 0xe
0578 ; --------------------------------------------------------------------------------------
0578 0000 000d  |    |		.DBG3TAB	0x0000,0x000d
057a 0223 0001  | #  |		.CONST	0x0223,0x0001
057c 0229 0002  | )  |		.CONST	0x0229,0x0002
057e 022f 0003  | /  |		.CONST	0x022f,0x0003
0580 0235 0004  | 5  |		.CONST	0x0235,0x0004
0582 0238 0005  | 8  |		.CONST	0x0238,0x0005
0584 023e 0006  | >  |		.CONST	0x023e,0x0006
0586 0241 0007  | A  |		.CONST	0x0241,0x0007
0588 0242 0008  | B  |		.CONST	0x0242,0x0008
058a 0243 0009  | C  |		.CONST	0x0243,0x0009
058c 0244 000a  | D  |		.CONST	0x0244,0x000a
058e 0245 000b  | E  |		.CONST	0x0245,0x000b
0590 024b 000c  | K  |		.CONST	0x024b,0x000c
0592 0253 000d  | S  |		.CONST	0x0253,0x000d
0594 ; --------------------------------------------------------------------------------------
0594 ; Debug3 Subtable 0xf
0594 ; --------------------------------------------------------------------------------------
0594 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0596 ; --------------------------------------------------------------------------------------
0596 ; Debug3 Subtable 0x10
0596 ; --------------------------------------------------------------------------------------
0596 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0598 027a 0001  | z  |		.CONST	0x027a,0x0001
059a 027d 0002  | }  |		.CONST	0x027d,0x0002
059c 0281 0003  |    |		.CONST	0x0281,0x0003
059e 0284 0004  |    |		.CONST	0x0284,0x0004
05a0 ; --------------------------------------------------------------------------------------
05a0 ; Debug3 Subtable 0x11
05a0 ; --------------------------------------------------------------------------------------
05a0 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
05a2 ; --------------------------------------------------------------------------------------
05a2 ; Debug3 Subtable 0x12
05a2 ; --------------------------------------------------------------------------------------
05a2 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
05a4 ; --------------------------------------------------------------------------------------
05a4 ; Debug3 Subtable 0x13
05a4 ; --------------------------------------------------------------------------------------
05a4 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05a6 029a 0001  |    |		.CONST	0x029a,0x0001
05a8 029e 0002  |    |		.CONST	0x029e,0x0002
05aa 02a1 0003  |    |		.CONST	0x02a1,0x0003
05ac ; --------------------------------------------------------------------------------------
05ac ; Debug3 Subtable 0x14
05ac ; --------------------------------------------------------------------------------------
05ac 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
05ae ; --------------------------------------------------------------------------------------
05ae ; Debug3 Subtable 0x15
05ae ; --------------------------------------------------------------------------------------
05ae 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
05b0 ; --------------------------------------------------------------------------------------
05b0 ; Debug3 Subtable 0x16
05b0 ; --------------------------------------------------------------------------------------
05b0 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
05b2 02b5 0001  |    |		.CONST	0x02b5,0x0001
05b4 02b9 0002  |    |		.CONST	0x02b9,0x0002
05b6 0000 0000  |    |		.BLANK	0000[0x4a]