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

⟦f4464e061⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0694fc, 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 0000 0000  |    |		.BLANK	0000[0x9]
028f 0801 4000  |  @ |		.XXX[0xc]
0291 0000 0000  |    |
0293 0010 0000  |    |
0295 0088 0000  |    |
0297 0000 4000  |  @ |
0299 0002 8000  |    |
029b 0000 0000  |    |		.BLANK	0000[0x2d]
02c8 0100 2800  |  ( |		.XXX[0xc]
02ca 0000 0000  |    |
02cc 0002 0000  |    |
02ce 0011 0000  |    |
02d0 0000 0800  |    |
02d2 0000 5000  |  P |
02d4 0000 0000  |    |		.BLANK	0000[0x2d]
0301 0020 0500  |    |		.XXX[0xc]
0303 0000 0000  |    |
0305 0000 4000  |  @ |
0307 0002 2000  |    |
0309 0000 0100  |    |
030b 0000 0a00  |    |
030d 0000 0000  |    |		.BLANK	0000[0x2d]
033a 0004 00a0  |    |		.XXX[0xc]
033c 0000 0000  |    |
033e 0000 0800  |    |
0340 0000 4400  |  D |
0342 0000 0020  |    |
0344 0000 0140  |   @|
0346 0000 0000  |    |		.BLANK	0000[0x2e]
0374 8014 0000  |    |		.XXX[0xb]
0376 0000 0000  |    |
0378 0100 0000  |    |
037a 0880 0000  |    |
037c 0004 0000  |    |
037e 0028       | (  |
037f 0000 0000  |    |		.BLANK	0000[0x2e]
03ad 1002 8000  |    |		.XXX[0xb]
03af 0000 0000  |    |
03b1 0020 0000  |    |
03b3 0110 0000  |    |
03b5 0000 8000  |    |
03b7 0005       |    |
03b8 0000 0000  |    |		.BLANK	0000[0x48]