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

⟦5af3c9801⟧

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

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 0280       |    |		.CONST	0x0280								; 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 8001       |    |		.CONST	0x8001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0036       | 6  |		.CONST	0x0036								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0015       |    |		.CONST	0x0015								; Number of locals
000b			INIT_0008:
000b 4804       |H   |		Short_Literal	0x4
000c 032b       | +  |		Declare_Type	Record,Incomplete,Visible
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 00c4       |    |		Action	Make_Default
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 4804       |H   |		Short_Literal	0x4
0016 0093 003b  |   ;|		push_full_address	INIT_0038
0018 02a0       |    |		Declare_Subprogram	Null_Subprogram
0019 038d       |    |		Declare_Type	Package,Defined,Visible,Not_Elaborated
001a c213       |    |		Store	0x1,0x13
001b e001       |    |		Load	0x0,0x1
001c 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
001d c214       |    |		Store	0x1,0x14
001e 00d9       |    |		Load_Top	At_Offset_1
001f 00da       |    |		Load_Top	At_Offset_2
0020 00db       |    |		Load_Top	At_Offset_3
0021 e214       |    |		Load	0x1,0x14
0022 02a0       |    |		Declare_Subprogram	Null_Subprogram
0023 e20d       |    |		Load	0x1,0xd
0024 0326       | &  |		Complete_Type	Record,By_Defining
0025 00bf       |    |		Action	Accept_Activation
0026 e002       |    |		Load	0x0,0x2
0027 e003       |    |		Load	0x0,0x3
0028 e004       |    |		Load	0x0,0x4
0029 e005       |    |		Load	0x0,0x5
002a e006       |    |		Load	0x0,0x6
002b a007       |    |		Store_Unchecked	0x0,0x7
002c e008       |    |		Load	0x0,0x8
002d e009       |    |		Load	0x0,0x9
002e e00a       |    |		Load	0x0,0xa
002f e001       |    |		Load	0x0,0x1
0030 e00b       |    |		Load	0x0,0xb
0031 480b       |H   |		Short_Literal	0xb
0032 e213       |    |		Load	0x1,0x13
0033 020e       |    |		Execute	Module,Augment_Imports
0034 00da       |    |		Load_Top	At_Offset_2
0035 020d       |    |		Execute	Module,Elaborate
0036			BODY_0008:
0036 00bc       |    |		Action	Signal_Activated
0037 00bb       |    |		Action	Signal_Completion
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0093       |    |		.CONST	0x0093								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0029       | )  |		.CONST	0x0029								; Number of locals
003b			INIT_0038:
003b 00c4       |    |		Action	Make_Default
003c 00c4       |    |		Action	Make_Default
003d 00c4       |    |		Action	Make_Default
003e 00c4       |    |		Action	Make_Default
003f 00c4       |    |		Action	Make_Default
0040 00c4       |    |		Action	Make_Default
0041 00c4       |    |		Action	Make_Default
0042 00c4       |    |		Action	Make_Default
0043 00c4       |    |		Action	Make_Default
0044 00c4       |    |		Action	Make_Default
0045 00c4       |    |		Action	Make_Default
0046 00c4       |    |		Action	Make_Default
0047 00c4       |    |		Action	Make_Default
0048 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated
004a c21b       |    |		Store	0x1,0x1b
004b 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated
004d c215       |    |		Store	0x1,0x15
004e 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
0050 c216       |    |		Store	0x1,0x16
0051 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated
0053 c217       |    |		Store	0x1,0x17
0054 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated
0056 c21c       |    |		Store	0x1,0x1c
0057 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated
0059 c21a       |    |		Store	0x1,0x1a
005a 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated
005c c21d       |    |		Store	0x1,0x1d
005d 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated
005f c213       |    |		Store	0x1,0x13
0060 00bf       |    |		Action	Accept_Activation
0061 e001       |    |		Load	0x0,0x1
0062 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0063 02c7       |    |		Declare_Variable	Any
0064 00d8       |    |		Load_Top	At_Offset_0
0065 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0066 00ea       |    |		Load_Encached	Null_String_Cache
0067 e002       |    |		Load	0x0,0x2
0068 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0069 02c7       |    |		Declare_Variable	Any
006a 00d8       |    |		Load_Top	At_Offset_0
006b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
006c 029b 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Unelaborated
006e e003       |    |		Load	0x0,0x3
006f e004       |    |		Load	0x0,0x4
0070 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0071 e005       |    |		Load	0x0,0x5
0072 0387       |    |		Declare_Variable	Package
0073 00d8       |    |		Load_Top	At_Offset_0
0074 020f       |    |		Execute	Module,Activate
0075 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0076 00c7       |    |		Action	Elaborate_Subprogram
0077 029d 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call
0079 029d 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call
007b 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
007c 00c7       |    |		Action	Elaborate_Subprogram
007d 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
007e 00c7       |    |		Action	Elaborate_Subprogram
007f 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0080 00c7       |    |		Action	Elaborate_Subprogram
0081 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0082 00c7       |    |		Action	Elaborate_Subprogram
0083 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0084 00c7       |    |		Action	Elaborate_Subprogram
0085 a006       |    |		Store_Unchecked	0x0,0x6
0086 00c6       |    |		Action	Check_Subprogram_Elaborated
0087 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0088 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0089 e007       |    |		Load	0x0,0x7
008a e008       |    |		Load	0x0,0x8
008b 4800       |H   |		Short_Literal	0x0
008c 0007       |    |		Action	Break_Optional
008d 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
008e 00c7       |    |		Action	Elaborate_Subprogram
008f 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0090 00c7       |    |		Action	Elaborate_Subprogram
0091 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0092 00c7       |    |		Action	Elaborate_Subprogram
0093			BODY_0038:
0093 00bc       |    |		Action	Signal_Activated
0094 00bb       |    |		Action	Signal_Completion
0095 0000 0000  |    |		.XXX[0x3]
0097 0000       |    |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009f       |    |		.CONST	0x009f								; Address of begin
0099 00a2       |    |		.CONST	0x00a2								; Address of exception handler
009a 0003       |    |		.CONST	0x0003								; Number of locals
009b			INIT_0098:
009b 029f 0183  |    |		Declare_Subprogram	INIT_0180,For_Call
009d 029f 018b  |    |		Declare_Subprogram	INIT_0188,For_Call
009f			BODY_0098:
009f 8402       |    |		Call	0x2,0x2
00a0 8403       |    |		Call	0x2,0x3
00a1 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
00a2			TRAP_0098:
00a2 0007       |    |		Action	Break_Optional
00a3 4800       |H   |		Short_Literal	0x0
00a4 a5f7       |    |		Store_Unchecked	0x2,-0x9
00a5 0092 024b  |   K|		Action	Push_String_Extended,0x24b					; "Unexpected exception "
00a7 4800       |H   |		Short_Literal	0x0
00a8 4801       |H   |		Short_Literal	0x1
00a9 e009       |    |		Load	0x0,0x9
00aa 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00ab 01cc       |    |		Execute	Vector,Catenate
00ac 8210       |    |		Call	0x1,0x10
00ad 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
00ae 0000 0000  |    |		.XXX[0x2]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 00da       |    |		Load_Top	At_Offset_2
00b4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00b5 7002       |p   |		Jump_Nonzero	0xb8
00b6 00ea       |    |		Load_Encached	Null_String_Cache
00b7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b8 00da       |    |		Load_Top	At_Offset_2
00b9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ba 0227       | '  |		Execute	Access,All_Reference
00bb 0335       | 5  |		Declare_Variable	Array,Duplicate
00bc 00cd       |    |		Action	Spare6_Action
00bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00be 0000 0000  |    |		.XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 00da       |    |		Load_Top	At_Offset_2
00c4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00c5 7002       |p   |		Jump_Nonzero	0xc8
00c6 00ea       |    |		Load_Encached	Null_String_Cache
00c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00c8 00da       |    |		Load_Top	At_Offset_2
00c9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00ca 0227       | '  |		Execute	Access,All_Reference
00cb 0335       | 5  |		Declare_Variable	Array,Duplicate
00cc 00cd       |    |		Action	Spare6_Action
00cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ce 0000 0000  |    |		.XXX[0x2]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 00da       |    |		Load_Top	At_Offset_2
00d4 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00d5 7002       |p   |		Jump_Nonzero	0xd8
00d6 00ea       |    |		Load_Encached	Null_String_Cache
00d7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d8 00da       |    |		Load_Top	At_Offset_2
00d9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00da 0227       | '  |		Execute	Access,All_Reference
00db 0335       | 5  |		Declare_Variable	Array,Duplicate
00dc 00cd       |    |		Action	Spare6_Action
00dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00de 0000 0000  |    |		.XXX[0x2]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3       |    |		.CONST	0x00e3								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0001       |    |		.CONST	0x0001								; Number of locals
00e3			BODY_00e0:
00e3			INIT_00e0:
00e3 00da       |    |		Load_Top	At_Offset_2
00e4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00e5 7002       |p   |		Jump_Nonzero	0xe8
00e6 00ea       |    |		Load_Encached	Null_String_Cache
00e7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e8 00da       |    |		Load_Top	At_Offset_2
00e9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00ea 0227       | '  |		Execute	Access,All_Reference
00eb 0335       | 5  |		Declare_Variable	Array,Duplicate
00ec 00cd       |    |		Action	Spare6_Action
00ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ee 0000 0000  |    |		.XXX[0x2]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f5       |    |		.CONST	0x00f5								; Address of begin
00f1 00f7       |    |		.CONST	0x00f7								; Address of exception handler
00f2 0002       |    |		.CONST	0x0002								; Number of locals
00f3			INIT_00f0:
00f3 029f 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Call
00f5			BODY_00f0:
00f5 8402       |    |		Call	0x2,0x2
00f6 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
00f7			TRAP_00f0:
00f7 0007       |    |		Action	Break_Optional
00f8 0092 024b  |   K|		Action	Push_String_Extended,0x24b					; "Unexpected exception "
00fa 4800       |H   |		Short_Literal	0x0
00fb 4801       |H   |		Short_Literal	0x1
00fc e009       |    |		Load	0x0,0x9
00fd 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00fe 01cc       |    |		Execute	Vector,Catenate
00ff 8210       |    |		Call	0x1,0x10
0100 4800       |H   |		Short_Literal	0x0
0101 a5fa       |    |		Store_Unchecked	0x2,-0x6
0102 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0103 0000 0000  |    |		.BLANK	0000[0x5]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010d       |    |		.CONST	0x010d								; Address of begin
0109 0111       |    |		.CONST	0x0111								; Address of exception handler
010a 0002       |    |		.CONST	0x0002								; Number of locals
010b			INIT_0108:
010b 029f 020b  |    |		Declare_Subprogram	INIT_0208,For_Call
010d			BODY_0108:
010d 4801       |H   |		Short_Literal	0x1
010e a5fa       |    |		Store_Unchecked	0x2,-0x6
010f 8402       |    |		Call	0x2,0x2
0110 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0111			TRAP_0108:
0111 0007       |    |		Action	Break_Optional
0112 0092 024b  |   K|		Action	Push_String_Extended,0x24b					; "Unexpected exception "
0114 4800       |H   |		Short_Literal	0x0
0115 4801       |H   |		Short_Literal	0x1
0116 e009       |    |		Load	0x0,0x9
0117 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0118 01cc       |    |		Execute	Vector,Catenate
0119 8210       |    |		Call	0x1,0x10
011a 4800       |H   |		Short_Literal	0x0
011b a5fa       |    |		Store_Unchecked	0x2,-0x6
011c 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
011d 0000 0000  |    |		.XXX[0x3]
011f 0000       |    |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0129       | )  |		.CONST	0x0129								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0002       |    |		.CONST	0x0002								; Number of locals
0123			INIT_0120:
0123 00db       |    |		Load_Top	At_Offset_3
0124 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0125 0227       | '  |		Execute	Access,All_Reference
0126 00db       |    |		Load_Top	At_Offset_3
0127 e00a       |    |		Load	0x0,0xa
0128 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0129			BODY_0120:
0129 00e1       |    |		Load_Encached	Boolean_Cache
012a e220       |    |		Load	0x1,0x20
012b 4884       |H   |		Short_Literal	0x84
012c 4818       |H   |		Short_Literal	0x18
012d 4801       |H   |		Short_Literal	0x1
012e 4800       |H   |		Short_Literal	0x0
012f e21f       |    |		Load	0x1,0x1f
0130 e21e       |    |		Load	0x1,0x1e
0131 e21f       |    |		Load	0x1,0x1f
0132 e21e       |    |		Load	0x1,0x1e
0133 e21f       |    |		Load	0x1,0x1f
0134 e21e       |    |		Load	0x1,0x1e
0135 e5fe       |    |		Load	0x2,-0x2
0136 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0137 0227       | '  |		Execute	Access,All_Reference
0138 e5fe       |    |		Load	0x2,-0x2
0139 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
013a 0227       | '  |		Execute	Access,All_Reference
013b e402       |    |		Load	0x2,0x2
013c 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
013d 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
013e 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
013f 8006       |    |		Call	0x0,0x6
0140 c5fd       |    |		Store	0x2,-0x3
0141 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0142 0000 0000  |    |		.BLANK	0000[0x6]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 00da       |    |		Load_Top	At_Offset_2
014c 820f       |    |		Call	0x1,0xf
014d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
014e 0000 0000  |    |		.XXX[0x2]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153       | S  |		.CONST	0x0153								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0001       |    |		.CONST	0x0001								; Number of locals
0153			BODY_0150:
0153			INIT_0150:
0153 00da       |    |		Load_Top	At_Offset_2
0154 6805       |h   |		Jump_Zero	0x15a
0155 0092 024c  |   L|		Action	Push_String_Extended,0x24c					; "/bin/cat >> "
0157 e5fe       |    |		Load	0x2,-0x2
0158 01cc       |    |		Execute	Vector,Catenate
0159 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
015a 0092 024d  |   M|		Action	Push_String_Extended,0x24d					; "/bin/cat > "
015c e5fe       |    |		Load	0x2,-0x2
015d 01cc       |    |		Execute	Vector,Catenate
015e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
015f 0000       |    |		.XXX[0x1]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0168       | h  |		.CONST	0x0168								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0002       |    |		.CONST	0x0002								; Number of locals
0163			INIT_0160:
0163 e00b       |    |		Load	0x0,0xb
0164 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0165 02c7       |    |		Declare_Variable	Any
0166 00d8       |    |		Load_Top	At_Offset_0
0167 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0168			BODY_0160:
0168 00d8       |    |		Load_Top	At_Offset_0
0169 e220       |    |		Load	0x1,0x20
016a 0120       |    |		Execute	Any,Is_Value
016b 6803       |h   |		Jump_Zero	0x16f
016c e002       |    |		Load	0x0,0x2
016d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
016e 7801       |x   |		Jump	0x170
016f e220       |    |		Load	0x1,0x20
0170 0092 024e  |   N|		Action	Push_String_Extended,0x24e					; " "
0172 e002       |    |		Load	0x0,0x2
0173 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
0174 c220       |    |		Store	0x1,0x20
0175 c402       |    |		Store	0x2,0x2
0176 00db       |    |		Load_Top	At_Offset_3
0177 e222       | "  |		Load	0x1,0x22
0178 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0179 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
017a 0000 0000  |    |		.BLANK	0000[0x6]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183       |    |		.CONST	0x0183								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0001       |    |		.CONST	0x0001								; Number of locals
0183			BODY_0180:
0183			INIT_0180:
0183 e5f9       |    |		Load	0x2,-0x7
0184 8224       | $  |		Call	0x1,0x24
0185 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0186 0000 0000  |    |		.XXX[0x2]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 019b       |    |		.CONST	0x019b								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0004       |    |		.CONST	0x0004								; Number of locals
018b			INIT_0188:
018b e5fa       |    |		Load	0x2,-0x6
018c e5fb       |    |		Load	0x2,-0x5
018d e5ff       |    |		Load	0x2,-0x1
018e e222       | "  |		Load	0x1,0x22
018f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0190 e5fa       |    |		Load	0x2,-0x6
0191 e5fb       |    |		Load	0x2,-0x5
0192 00da       |    |		Load_Top	At_Offset_2
0193 e5fe       |    |		Load	0x2,-0x2
0194 e222       | "  |		Load	0x1,0x22
0195 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0196 e5fa       |    |		Load	0x2,-0x6
0197 e5fb       |    |		Load	0x2,-0x5
0198 e5fd       |    |		Load	0x2,-0x3
0199 e222       | "  |		Load	0x1,0x22
019a 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
019b			BODY_0188:
019b e222       | "  |		Load	0x1,0x22
019c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
019d 00da       |    |		Load_Top	At_Offset_2
019e 01db       |    |		Execute	Vector,Length
019f 7006       |p   |		Jump_Nonzero	0x1a6
01a0 0092 024f  |   O|		Action	Push_String_Extended,0x24f					; "Unable to get Remote_Machine"
01a2 8210       |    |		Call	0x1,0x10
01a3 4800       |H   |		Short_Literal	0x0
01a4 a5f7       |    |		Store_Unchecked	0x2,-0x9
01a5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01a6 4801       |H   |		Short_Literal	0x1
01a7 a5f7       |    |		Store_Unchecked	0x2,-0x9
01a8 00da       |    |		Load_Top	At_Offset_2
01a9 e00a       |    |		Load	0x0,0xa
01aa 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
01ab 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
01ac e5f8       |    |		Load	0x2,-0x8
01ad 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01ae 00d9       |    |		Load_Top	At_Offset_1
01af e00a       |    |		Load	0x0,0xa
01b0 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
01b1 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
01b2 e5f8       |    |		Load	0x2,-0x8
01b3 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01b4 00d8       |    |		Load_Top	At_Offset_0
01b5 e00a       |    |		Load	0x0,0xa
01b6 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
01b7 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
01b8 e5f8       |    |		Load	0x2,-0x8
01b9 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01ba 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01bb 0000 0000  |    |		.BLANK	0000[0x5]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01d7       |    |		.CONST	0x01d7								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0006       |    |		.CONST	0x0006								; Number of locals
01c3			INIT_01c0:
01c3 e5fe       |    |		Load	0x2,-0x2
01c4 e5ff       |    |		Load	0x2,-0x1
01c5 e00a       |    |		Load	0x0,0xa
01c6 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
01c7 00d8       |    |		Load_Top	At_Offset_0
01c8 e5fc       |    |		Load	0x2,-0x4
01c9 8223       | #  |		Call	0x1,0x23
01ca e5fd       |    |		Load	0x2,-0x3
01cb 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01cc 0227       | '  |		Execute	Access,All_Reference
01cd 00d9       |    |		Load_Top	At_Offset_1
01ce e00a       |    |		Load	0x0,0xa
01cf 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
01d0 e001       |    |		Load	0x0,0x1
01d1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d2 02c7       |    |		Declare_Variable	Any
01d3 00d8       |    |		Load_Top	At_Offset_0
01d4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d5 e00a       |    |		Load	0x0,0xa
01d6 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
01d7			BODY_01c0:
01d7 00d9       |    |		Load_Top	At_Offset_1
01d8 00d9       |    |		Load_Top	At_Offset_1
01d9 e5fb       |    |		Load	0x2,-0x5
01da e5ff       |    |		Load	0x2,-0x1
01db e21f       |    |		Load	0x1,0x1f
01dc e00a       |    |		Load	0x0,0xa
01dd 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
01de 003a       | :  |		Store_Top	Access,At_Offset_2
01df c605       |    |		Store	0x3,0x5
01e0 00d8       |    |		Load_Top	At_Offset_0
01e1 6807       |h   |		Jump_Zero	0x1e9
01e2 00d8       |    |		Load_Top	At_Offset_0
01e3 0227       | '  |		Execute	Access,All_Reference
01e4 8210       |    |		Call	0x1,0x10
01e5 4800       |H   |		Short_Literal	0x0
01e6 a5fa       |    |		Store_Unchecked	0x2,-0x6
01e7 00cc       |    |		Action	Pop_Block
01e8 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
01e9 00e1       |    |		Load_Encached	Boolean_Cache
01ea e220       |    |		Load	0x1,0x20
01eb 4884       |H   |		Short_Literal	0x84
01ec 4818       |H   |		Short_Literal	0x18
01ed 4801       |H   |		Short_Literal	0x1
01ee 4800       |H   |		Short_Literal	0x0
01ef e21f       |    |		Load	0x1,0x1f
01f0 e21e       |    |		Load	0x1,0x1e
01f1 e21f       |    |		Load	0x1,0x1f
01f2 e605       |    |		Load	0x3,0x5
01f3 e21f       |    |		Load	0x1,0x1f
01f4 e21e       |    |		Load	0x1,0x1e
01f5 e5fd       |    |		Load	0x2,-0x3
01f6 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01f7 0227       | '  |		Execute	Access,All_Reference
01f8 e5fd       |    |		Load	0x2,-0x3
01f9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01fa 0227       | '  |		Execute	Access,All_Reference
01fb e604       |    |		Load	0x3,0x4
01fc 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
01fd 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
01fe 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
01ff 8006       |    |		Call	0x0,0x6
0200 c5fa       |    |		Store	0x2,-0x6
0201 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0202 0000 0000  |    |		.BLANK	0000[0x6]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 021f       |    |		.CONST	0x021f								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0005       |    |		.CONST	0x0005								; Number of locals
020b			INIT_0208:
020b e5ff       |    |		Load	0x2,-0x1
020c e5fe       |    |		Load	0x2,-0x2
020d e00a       |    |		Load	0x0,0xa
020e 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
020f e5fd       |    |		Load	0x2,-0x3
0210 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0211 0227       | '  |		Execute	Access,All_Reference
0212 0092 0250  |   P|		Action	Push_String_Extended,0x250					; "/bin/cat < "
0214 00da       |    |		Load_Top	At_Offset_2
0215 01cc       |    |		Execute	Vector,Catenate
0216 e00a       |    |		Load	0x0,0xa
0217 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0218 e001       |    |		Load	0x0,0x1
0219 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
021a 02c7       |    |		Declare_Variable	Any
021b 00d8       |    |		Load_Top	At_Offset_0
021c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
021d e00a       |    |		Load	0x0,0xa
021e 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
021f			BODY_0208:
021f 00d9       |    |		Load_Top	At_Offset_1
0220 00d9       |    |		Load_Top	At_Offset_1
0221 e5fb       |    |		Load	0x2,-0x5
0222 e5fc       |    |		Load	0x2,-0x4
0223 e5fe       |    |		Load	0x2,-0x2
0224 e21f       |    |		Load	0x1,0x1f
0225 e00a       |    |		Load	0x0,0xa
0226 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0227 003a       | :  |		Store_Top	Access,At_Offset_2
0228 c604       |    |		Store	0x3,0x4
0229 00d8       |    |		Load_Top	At_Offset_0
022a 6807       |h   |		Jump_Zero	0x232
022b 00d8       |    |		Load_Top	At_Offset_0
022c 0227       | '  |		Execute	Access,All_Reference
022d 8210       |    |		Call	0x1,0x10
022e 4800       |H   |		Short_Literal	0x0
022f a5fa       |    |		Store_Unchecked	0x2,-0x6
0230 00cc       |    |		Action	Pop_Block
0231 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0232 00e1       |    |		Load_Encached	Boolean_Cache
0233 e220       |    |		Load	0x1,0x20
0234 4884       |H   |		Short_Literal	0x84
0235 4818       |H   |		Short_Literal	0x18
0236 4801       |H   |		Short_Literal	0x1
0237 4800       |H   |		Short_Literal	0x0
0238 e21f       |    |		Load	0x1,0x1f
0239 e21e       |    |		Load	0x1,0x1e
023a e21f       |    |		Load	0x1,0x1f
023b e21e       |    |		Load	0x1,0x1e
023c e21f       |    |		Load	0x1,0x1f
023d e604       |    |		Load	0x3,0x4
023e e5fd       |    |		Load	0x2,-0x3
023f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0240 0227       | '  |		Execute	Access,All_Reference
0241 e5fd       |    |		Load	0x2,-0x3
0242 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0243 0227       | '  |		Execute	Access,All_Reference
0244 e603       |    |		Load	0x3,0x3
0245 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0246 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0247 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0248 8006       |    |		Call	0x0,0x6
0249 c5fa       |    |		Store	0x2,-0x6
024a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
024b ; --------------------------------------------------------------------------------------
024b ; STRING TABLE
024b ; --------------------------------------------------------------------------------------
024b 000e       |    |		.STRTAB	0x000e->0x0252							; "Unexpected exception "
024c 0021       | !  |		.STRTAB	0x0021->0x025c							; "/bin/cat >> "
024d 002b       | +  |		.STRTAB	0x002b->0x0262							; "/bin/cat > "
024e 0034       | 4  |		.STRTAB	0x0034->0x0268							; " "
024f 0033       | 3  |		.STRTAB	0x0033->0x0268							; "Unable to get Remote_Machine"
0250 004d       | M  |		.STRTAB	0x004d->0x0276							; "/bin/cat < "
0251 0056       | V  |		.STREND 0x0056->0x027c
0252 556e 6578  |Unex|		.STRTAB_STRINGS
027c 0000 0000  |    |		.BLANK	0000[0x4]
0280 ; --------------------------------------------------------------------------------------
0280 ; Debug Table
0280 ; --------------------------------------------------------------------------------------
0280 0004 000f  |    |		.DEBUG4	0x0004,0x000f,0xa4e9,0x0000,0x0001,0x0000
0286 1003 fe9b  |    |		.XXX[0x17a]
0288 7dbf de9a  |}   |
028a 7683 0221  |v  !|
028c 9ecc e1c2  |    |
028e fa8a 1e2c  |   ,|
0290 2a9c e1c2  |*   |
0292 9708 d002  |    |
0294 9f08 e2c0  |    |
0296 4e1f 9308  |N   |
0298 d693 1273  |   s|
029a 2ad0 be39  |*  9|
029c dc3b af09  | ;  |
029e 166f d6a3  | o  |
02a0 3a22 4ed6  |:"N |
02a2 ce26 56d5  | &V |
02a4 66ac 5b0d  |f [ |
02a6 c562 3acc  | b: |
02a8 7402 2ab5  |t * |
02aa 3f07 767f  |? v |
02ac 2c70 2802  |,p( |
02ae 9c4e ca74  | N t|
02b0 770d de20  |w   |
02b2 a624 da7e  | $ ~|
02b4 530a 9293  |S   |
02b6 d18b 7e4e  |  ~N|
02b8 9709 c232  |   2|
02ba 6d15 8f0f  |m   |
02bc 942f a678  | / x|
02be ca20 1ea4  |    |
02c0 8407 86a7  |    |
02c2 6e14 d6a8  |n   |
02c4 a220 42c1  |  B |
02c6 9e26 486f  | &Ho|
02c8 6817 d188  |h   |
02ca 7ed7 4694  |~ F |
02cc a057 d001  | W  |
02ce 3cd7 d698  |<   |
02d0 069c de9f  |    |
02d2 3a93 ea99  |:   |
02d4 b2d5 ea4b  |   K|
02d6 79e8 fb0e  |y   |
02d8 1f0c fe92  |    |
02da d518 ba55  |   U|
02dc 9a2d 130f  | -  |
02de 724a 4a52  |rJJR|
02e0 4b0f 2ea1  |K . |
02e2 be21 e808  | !  |
02e4 febe 4b0c  |  K |
02e6 724d 0648  |rM H|
02e8 7e4e fe1a  |~N  |
02ea 8621 2023  | ! #|
02ec 9654 c6be  | T  |
02ee 56ac 3a1c  |V : |
02f0 8801 b58a  |    |
02f2 6d14 d64e  |m  N|
02f4 f621 8e22  | ! "|
02f6 ec37 9933  | 7 3|
02f8 9003 9b08  |    |
02fa 5a87 febb  |Z   |
02fc 0a20 0800  |    |
02fe f803 f25c  |   \|
0300 fe1a 501c  |  P |
0302 7e88 f16e  |~  n|
0304 e013 2a21  |  *!|
0306 8402 c803  |    |
0308 16cf 007f  |    |
030a 4622 50d5  |F"P |
030c b9a2 c30c  |    |
030e 35ad fde8  |5   |
0310 eaad 5eac  |  ^ |
0312 eec8 ae59  |   Y|
0314 fec5 211f  |  ! |
0316 7e23 5297  |~#R |
0318 8a23 30a3  | #0 |
031a 4408 c65b  |D  [|
031c 0304 9696  |    |
031e ac04 eea8  |    |
0320 f285 0d1a  |    |
0322 ab0e ea46  |   F|
0324 42d3 7c0c  |B | |
0326 1419 530c  |  S |
0328 6595 2e8f  |e . |
032a 3a22 7625  |:"v%|
032c 8a26 6158  | &aX|
032e 0e27 6e8b  | 'n |
0330 7688 2224  |v "$|
0332 166f 0001  | o  |
0334 5b0e 86eb  |[   |
0336 d2d1 26bb  |  & |
0338 225a 02ad  |"Z  |
033a f69e ef08  |    |
033c 4efc 570d  |N W |
033e 2eac 5052  |. PR|
0340 c223 0001  | #  |
0342 42c9 2695  |B & |
0344 9f0c 5117  |  Q |
0346 8b0f f215  |    |
0348 af0c 9e19  |    |
034a b70e 970d  |    |
034c c29c 8801  |    |
034e d401 2f0f  |  / |
0350 16b2 be6b  |   k|
0352 6c03 4683  |l F |
0354 4643 130f  |FC  |
0356 8af9 4e27  |  N'|
0358 225a b219  |"Z  |
035a 26a3 e013  |&   |
035c 4007 76ef  |@ v |
035e b30f b6d8  |    |
0360 2310 7c02  |# | |
0362 3625 1ce4  |6%  |
0364 e2fe 4624  |  F$|
0366 3f11 0a28  |?  (|
0368 4713 3e9c  |G > |
036a 0002 de23  |   #|
036c b2da 62a1  |  b |
036e 9708 56bd  |  V |
0370 16be 1806  |    |
0372 beb7 86f8  |    |
0374 1e97 8efa  |    |
0376 0c47 7442  | GtB|
0378 ee8f 70ca  |  p |
037a fa8c 2243  |  "C|
037c 068d ce13  |    |
037e 8247 5074  | GPt|
0380 5e46 f005  |^F  |
0382 d51a f66a  |   j|
0384 12f3 1249  |   I|
0386 dc04 0001  |    |
0388 a003 fd36  |   6|
038a f00d 4c5e  |  L^|
038c 4072 624a  |@rbJ|
038e 5ac1 a645  |Z  E|
0390 6afc 224e  |j "N|
0392 5ac3 2812  |Z ( |
0394 fc1b fd36  |   6|
0396 ba45 8400  | E  |
0398 5c06 840c  |\   |
039a 1402 5dc0  |  ] |
039c fe35 1312  | 5  |
039e 6a48 1802  |jH  |
03a0 fc1a aafa  |    |
03a2 32a0 e815  |2   |
03a4 86fc 79ce  |  y |
03a6 4c00 0216  |L   |
03a8 003f b940  | ? @|
03aa ee40 1401  | @  |
03ac d291 62fc  |  b |
03ae 02af ce70  |   p|
03b0 f2cb 9a23  |   #|
03b2 f28f b2d3  |    |
03b4 1a90 1a80  |    |
03b6 7909 d1ab  |y   |
03b8 2693 7a6b  |& zk|
03ba 2519 b713  |%   |
03bc 26b3 cedb  |&   |
03be 5a9f 7a90  |Z z |
03c0 229c ca19  |"   |
03c2 3ac1 5acc  |: Z |
03c4 d2ab d30c  |    |
03c6 5e24 8006  |^$  |
03c8 3c41 543f  |<AT?|
03ca e9c7 46c6  |  F |
03cc ae26 1d17  | &  |
03ce 6ae5 7acd  |j z |
03d0 eec8 ee87  |    |
03d2 ff0d 9e24  |   $|
03d4 0713 3a59  |  :Y|
03d6 be20 8402  |    |
03d8 ea22 6d17  | "m |
03da d68b 72a9  |  r |
03dc 9710 fc05  |    |
03de fac5 92cd  |    |
03e0 96b4 9a51  |   Q|
03e2 7c9c 66e7  || f |
03e4 2293 8001  |"   |
03e6 9a62 fc19  | b  |
03e8 4d1a a302  |M   |
03ea c246 1a3c  | F <|
03ec ba9b a27e  |   ~|
03ee cf03 5297  |  R |
03f0 86c5 5ecd  |  ^ |
03f2 6b0c 0ac5  |k   |
03f4 2eae 3c42  |. <B|
03f6 e80b e9c6  |    |
03f8 1e8d c227  |   '|
03fa ef0f 68bf  |  h |
03fc 0b06 2312  |  # |
03fe a710 9618  |    |