|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
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 0470 | p | .CONST 0x0470 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 005c | \ | .CONST 0x005c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002c | , | .CONST 0x002c ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
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 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
001d c21a | | Store 0x1,0x1a
001e 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated
0020 c217 | | Store 0x1,0x17
0021 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
0023 c21b | | Store 0x1,0x1b
0024 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated
0026 c21c | | Store 0x1,0x1c
0027 00bf | | Action Accept_Activation
0028 e001 | | Load 0x0,0x1
0029 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002a 02c7 | | Declare_Variable Any
002b 00d8 | | Load_Top At_Offset_0
002c 1c00 | | Execute_Immediate Run_Utility,0x0
002d 029b 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Unelaborated
002f 029b 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Unelaborated
0031 029b 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Unelaborated
0033 e002 | | Load 0x0,0x2
0034 e003 | | Load 0x0,0x3
0035 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0036 e004 | | Load 0x0,0x4
0037 0387 | | Declare_Variable Package
0038 00d8 | | Load_Top At_Offset_0
0039 020f | | Execute Module,Activate
003a a005 | | Store_Unchecked 0x0,0x5
003b 00c6 | | Action Check_Subprogram_Elaborated
003c 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
003d 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
003e e006 | | Load 0x0,0x6
003f e007 | | Load 0x0,0x7
0040 4800 |H | Short_Literal 0x0
0041 0007 | | Action Break_Optional
0042 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0043 00c7 | | Action Elaborate_Subprogram
0044 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0045 00c7 | | Action Elaborate_Subprogram
0046 029d 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call
0048 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0049 00c7 | | Action Elaborate_Subprogram
004a 029d 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call
004c 029d 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call
004e 029d 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call
0050 029d 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call
0052 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0053 00c7 | | Action Elaborate_Subprogram
0054 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0055 00c7 | | Action Elaborate_Subprogram
0056 029d 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call
0058 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0059 00c7 | | Action Elaborate_Subprogram
005a 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
005b 00c7 | | Action Elaborate_Subprogram
005c BODY_0008:
005c 00bc | | Action Signal_Activated
005d 00bb | | Action Signal_Completion
005e 0000 0000 | | .XXX[0x2]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 006d | m | .CONST 0x006d ; Address of begin
0061 006f | o | .CONST 0x006f ; Address of exception handler
0062 0003 | | .CONST 0x0003 ; Number of locals
0063 INIT_0060:
0063 e008 | | Load 0x0,0x8
0064 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0065 02c7 | | Declare_Variable Any
0066 e008 | | Load 0x0,0x8
0067 180e | | Execute Package,Field_Execute,Field_Number 0xe
0068 e5f7 | | Load 0x2,-0x9
0069 8228 | ( | Call 0x1,0x28
006a a402 | | Store_Unchecked 0x2,0x2
006b 029f 027b | {| Declare_Subprogram INIT_0278,For_Call
006d BODY_0060:
006d 8403 | | Call 0x2,0x3
006e 450a |E | Exit_Suprogram New_Top_Offset 0xa
006f TRAP_0060:
006f e009 | | Load 0x0,0x9
0070 010f | | Execute Exception,Equal
0071 6808 |h | Jump_Zero 0x7a
0072 00da | | Load_Top At_Offset_2
0073 0092 03c6 | | Action Push_String_Extended,0x3c6 ; "Run quitting after errors"
0075 8227 | ' | Call 0x1,0x27
0076 00da | | Load_Top At_Offset_2
0077 e00a | | Load 0x0,0xa
0078 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0079 450a |E | Exit_Suprogram New_Top_Offset 0xa
007a 00da | | Load_Top At_Offset_2
007b 4808 |H | Short_Literal 0x8
007c 0092 03c7 | | Action Push_String_Extended,0x3c7 ; "Unexpected exception "
007e 4800 |H | Short_Literal 0x0
007f 4801 |H | Short_Literal 0x1
0080 e00b | | Load 0x0,0xb
0081 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0082 01cc | | Execute Vector,Catenate
0083 e00c | | Load 0x0,0xc
0084 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0085 00da | | Load_Top At_Offset_2
0086 0092 03c6 | | Action Push_String_Extended,0x3c6 ; "Run quitting after errors"
0088 8227 | ' | Call 0x1,0x27
0089 00da | | Load_Top At_Offset_2
008a e00a | | Load 0x0,0xa
008b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
008c 450a |E | Exit_Suprogram New_Top_Offset 0xa
008d 0000 0000 | | .XXX[0x3]
008f 0000 | |
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 009e | | .CONST 0x009e ; Address of begin
0091 00a0 | | .CONST 0x00a0 ; Address of exception handler
0092 0004 | | .CONST 0x0004 ; Number of locals
0093 INIT_0090:
0093 e008 | | Load 0x0,0x8
0094 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0095 02c7 | | Declare_Variable Any
0096 e008 | | Load 0x0,0x8
0097 180e | | Execute Package,Field_Execute,Field_Number 0xe
0098 e5fb | | Load 0x2,-0x5
0099 8228 | ( | Call 0x1,0x28
009a a402 | | Store_Unchecked 0x2,0x2
009b 00e1 | | Load_Encached Boolean_Cache
009c 029f 0313 | | Declare_Subprogram INIT_0310,For_Call
009e BODY_0090:
009e 8404 | | Call 0x2,0x4
009f 4506 |E | Exit_Suprogram New_Top_Offset 0x6
00a0 TRAP_0090:
00a0 e009 | | Load 0x0,0x9
00a1 010f | | Execute Exception,Equal
00a2 6808 |h | Jump_Zero 0xab
00a3 00db | | Load_Top At_Offset_3
00a4 0092 03c8 | | Action Push_String_Extended,0x3c8 ; "Rlogin quitting after errors"
00a6 8227 | ' | Call 0x1,0x27
00a7 00db | | Load_Top At_Offset_3
00a8 e00a | | Load 0x0,0xa
00a9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00aa 4506 |E | Exit_Suprogram New_Top_Offset 0x6
00ab 00db | | Load_Top At_Offset_3
00ac 4808 |H | Short_Literal 0x8
00ad 0092 03c7 | | Action Push_String_Extended,0x3c7 ; "Unexpected exception "
00af 4800 |H | Short_Literal 0x0
00b0 4801 |H | Short_Literal 0x1
00b1 e00b | | Load 0x0,0xb
00b2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00b3 01cc | | Execute Vector,Catenate
00b4 e00c | | Load 0x0,0xc
00b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b6 00db | | Load_Top At_Offset_3
00b7 0092 03c8 | | Action Push_String_Extended,0x3c8 ; "Rlogin quitting after errors"
00b9 8227 | ' | Call 0x1,0x27
00ba 00db | | Load_Top At_Offset_3
00bb e00a | | Load 0x0,0xa
00bc 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00bd 4506 |E | Exit_Suprogram New_Top_Offset 0x6
00be 0000 0000 | | .XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00cd | | .CONST 0x00cd ; Address of begin
00c1 00cf | | .CONST 0x00cf ; Address of exception handler
00c2 0003 | | .CONST 0x0003 ; Number of locals
00c3 INIT_00c0:
00c3 e008 | | Load 0x0,0x8
00c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c5 02c7 | | Declare_Variable Any
00c6 e008 | | Load 0x0,0x8
00c7 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c8 e5f8 | | Load 0x2,-0x8
00c9 8228 | ( | Call 0x1,0x28
00ca a402 | | Store_Unchecked 0x2,0x2
00cb 029f 034b | K| Declare_Subprogram INIT_0348,For_Call
00cd BODY_00c0:
00cd 8403 | | Call 0x2,0x3
00ce 4509 |E | Exit_Suprogram New_Top_Offset 0x9
00cf TRAP_00c0:
00cf e009 | | Load 0x0,0x9
00d0 010f | | Execute Exception,Equal
00d1 6808 |h | Jump_Zero 0xda
00d2 00da | | Load_Top At_Offset_2
00d3 0092 03c9 | | Action Push_String_Extended,0x3c9 ; "Get_Text_File quitting after errors"
00d5 8227 | ' | Call 0x1,0x27
00d6 00da | | Load_Top At_Offset_2
00d7 e00a | | Load 0x0,0xa
00d8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00d9 4509 |E | Exit_Suprogram New_Top_Offset 0x9
00da 00da | | Load_Top At_Offset_2
00db 4808 |H | Short_Literal 0x8
00dc 0092 03c7 | | Action Push_String_Extended,0x3c7 ; "Unexpected exception "
00de 4800 |H | Short_Literal 0x0
00df 4801 |H | Short_Literal 0x1
00e0 e00b | | Load 0x0,0xb
00e1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00e2 01cc | | Execute Vector,Catenate
00e3 e00c | | Load 0x0,0xc
00e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00e5 00da | | Load_Top At_Offset_2
00e6 0092 03c9 | | Action Push_String_Extended,0x3c9 ; "Get_Text_File quitting after errors"
00e8 8227 | ' | Call 0x1,0x27
00e9 00da | | Load_Top At_Offset_2
00ea e00a | | Load 0x0,0xa
00eb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00ec 4509 |E | Exit_Suprogram New_Top_Offset 0x9
00ed 0000 0000 | | .XXX[0x3]
00ef 0000 | |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00fd | | .CONST 0x00fd ; Address of begin
00f1 00ff | | .CONST 0x00ff ; Address of exception handler
00f2 0003 | | .CONST 0x0003 ; Number of locals
00f3 INIT_00f0:
00f3 e008 | | Load 0x0,0x8
00f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f5 02c7 | | Declare_Variable Any
00f6 e008 | | Load 0x0,0x8
00f7 180e | | Execute Package,Field_Execute,Field_Number 0xe
00f8 e5f8 | | Load 0x2,-0x8
00f9 8228 | ( | Call 0x1,0x28
00fa a402 | | Store_Unchecked 0x2,0x2
00fb 029f 03b3 | | Declare_Subprogram INIT_03b0,For_Call
00fd BODY_00f0:
00fd 8403 | | Call 0x2,0x3
00fe 4509 |E | Exit_Suprogram New_Top_Offset 0x9
00ff TRAP_00f0:
00ff 0007 | | Action Break_Optional
0100 00da | | Load_Top At_Offset_2
0101 4808 |H | Short_Literal 0x8
0102 0092 03c7 | | Action Push_String_Extended,0x3c7 ; "Unexpected exception "
0104 4800 |H | Short_Literal 0x0
0105 4801 |H | Short_Literal 0x1
0106 e00b | | Load 0x0,0xb
0107 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0108 01cc | | Execute Vector,Catenate
0109 e00c | | Load 0x0,0xc
010a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
010b 00da | | Load_Top At_Offset_2
010c 0092 03ca | | Action Push_String_Extended,0x3ca ; "Put_Text_File quitting after errors"
010e 8227 | ' | Call 0x1,0x27
010f 00da | | Load_Top At_Offset_2
0110 e00a | | Load 0x0,0xa
0111 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0112 4509 |E | Exit_Suprogram New_Top_Offset 0x9
0113 0000 0000 | | .BLANK 0000[0x5]
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 4502 |E | Exit_Suprogram New_Top_Offset 0x2
011c 0000 0000 | | .BLANK 0000[0x4]
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 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0124 0000 0000 | | .BLANK 0000[0x4]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 00db | | Load_Top At_Offset_3
012c 4802 |H | Short_Literal 0x2
012d e5ff | | Load 0x2,-0x1
012e e00c | | Load 0x0,0xc
012f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0130 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0131 0000 0000 | | .BLANK 0000[0x7]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b 00db | | Load_Top At_Offset_3
013c 4807 |H | Short_Literal 0x7
013d e5ff | | Load 0x2,-0x1
013e e00c | | Load 0x0,0xc
013f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0140 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0141 0000 0000 | | .BLANK 0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0155 | U | .CONST 0x0155 ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0003 | | .CONST 0x0003 ; Number of locals
014b INIT_0148:
014b e00d | | Load 0x0,0xd
014c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014d 02c7 | | Declare_Variable Any
014e 00d8 | | Load_Top At_Offset_0
014f 1c00 | | Execute_Immediate Run_Utility,0x0
0150 e008 | | Load 0x0,0x8
0151 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0152 02c7 | | Declare_Variable Any
0153 00d8 | | Load_Top At_Offset_0
0154 1c00 | | Execute_Immediate Run_Utility,0x0
0155 BODY_0148:
0155 00d9 | | Load_Top At_Offset_1
0156 00d9 | | Load_Top At_Offset_1
0157 0120 | | Execute Any,Is_Value
0158 6803 |h | Jump_Zero 0x15c
0159 e008 | | Load 0x0,0x8
015a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
015b 7801 |x | Jump 0x15d
015c 00d9 | | Load_Top At_Offset_1
015d e5ff | | Load 0x2,-0x1
015e e008 | | Load 0x0,0x8
015f 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
0160 c403 | | Store 0x2,0x3
0161 c402 | | Store 0x2,0x2
0162 4801 |H | Short_Literal 0x1
0163 00da | | Load_Top At_Offset_2
0164 e00d | | Load 0x0,0xd
0165 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0166 6806 |h | Jump_Zero 0x16d
0167 e5fe | | Load 0x2,-0x2
0168 00da | | Load_Top At_Offset_2
0169 e00c | | Load 0x0,0xc
016a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
016b e009 | | Load 0x0,0x9
016c 0257 | W | Execute Discrete,Raise
016d 00d8 | | Load_Top At_Offset_0
016e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
016f 0000 | | .XXX[0x1]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0186 | | .CONST 0x0186 ; Address of begin
0171 01aa | | .CONST 0x01aa ; Address of exception handler
0172 0005 | | .CONST 0x0005 ; Number of locals
0173 INIT_0170:
0173 e00e | | Load 0x0,0xe
0174 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0175 02c7 | | Declare_Variable Any
0176 00d8 | | Load_Top At_Offset_0
0177 1c00 | | Execute_Immediate Run_Utility,0x0
0178 e00f | | Load 0x0,0xf
0179 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017b 02c7 | | Declare_Variable Any
017c 00d8 | | Load_Top At_Offset_0
017d 1c00 | | Execute_Immediate Run_Utility,0x0
017e e00f | | Load 0x0,0xf
017f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0180 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0181 02c7 | | Declare_Variable Any
0182 00d8 | | Load_Top At_Offset_0
0183 1c00 | | Execute_Immediate Run_Utility,0x0
0184 e010 | | Load 0x0,0x10
0185 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0186 BODY_0170:
0186 4801 |H | Short_Literal 0x1
0187 e00f | | Load 0x0,0xf
0188 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0189 1813 | | Execute Package,Field_Execute,Field_Number 0x13
018a 0092 03cb | | Action Push_String_Extended,0x3cb ; "$"
018c e00f | | Load 0x0,0xf
018d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
018e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
018f c404 | | Store 0x2,0x4
0190 00d9 | | Load_Top At_Offset_1
0191 e00f | | Load 0x0,0xf
0192 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0193 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0194 c403 | | Store 0x2,0x3
0195 e010 | | Load 0x0,0x10
0196 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0197 e402 | | Load 0x2,0x2
0198 0120 | | Execute Any,Is_Value
0199 6803 |h | Jump_Zero 0x19d
019a e010 | | Load 0x0,0x10
019b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
019c 7801 |x | Jump 0x19e
019d e402 | | Load 0x2,0x2
019e 6011 |` | Indirect_Literal Discrete,0x1b0,{0x00000000, 0x00028000}
019f e011 | | Load 0x0,0x11
01a0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a1 e403 | | Load 0x2,0x3
01a2 e00f | | Load 0x0,0xf
01a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a4 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01a5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01a6 c402 | | Store 0x2,0x2
01a7 0059 | Y | Store_Top Discrete,At_Offset_1
01a8 00db | | Load_Top At_Offset_3
01a9 00ca | | Action Exit_Nullary_Function
01aa TRAP_0170:
01aa 0007 | | Action Break_Optional
01ab e402 | | Load 0x2,0x2
01ac 00ca | | Action Exit_Nullary_Function
01ad 0000 0000 | | .XXX[0x3]
01af 0000 | |
01b0 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
01b4 0000 0000 | | .BLANK 0000[0x4]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c0 | | .CONST 0x01c0 ; Address of begin
01b9 01c7 | | .CONST 0x01c7 ; Address of exception handler
01ba 0002 | | .CONST 0x0002 ; Number of locals
01bb INIT_01b8:
01bb e00e | | Load 0x0,0xe
01bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01bd 02c7 | | Declare_Variable Any
01be 8229 | ) | Call 0x1,0x29
01bf a402 | | Store_Unchecked 0x2,0x2
01c0 BODY_01b8:
01c0 00d8 | | Load_Top At_Offset_0
01c1 e5ff | | Load 0x2,-0x1
01c2 e221 | ! | Load 0x1,0x21
01c3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01c4 c402 | | Store 0x2,0x2
01c5 4801 |H | Short_Literal 0x1
01c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01c7 TRAP_01b8:
01c7 0007 | | Action Break_Optional
01c8 4801 |H | Short_Literal 0x1
01c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01ca 0000 0000 | | .BLANK 0000[0x6]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01e6 | | .CONST 0x01e6 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0005 | | .CONST 0x0005 ; Number of locals
01d3 INIT_01d0:
01d3 e00f | | Load 0x0,0xf
01d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d6 02c7 | | Declare_Variable Any
01d7 00d8 | | Load_Top At_Offset_0
01d8 1c00 | | Execute_Immediate Run_Utility,0x0
01d9 e00f | | Load 0x0,0xf
01da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01dc 02c7 | | Declare_Variable Any
01dd 00d8 | | Load_Top At_Offset_0
01de 1c00 | | Execute_Immediate Run_Utility,0x0
01df e001 | | Load 0x0,0x1
01e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e1 02c7 | | Declare_Variable Any
01e2 00d8 | | Load_Top At_Offset_0
01e3 1c00 | | Execute_Immediate Run_Utility,0x0
01e4 e00a | | Load 0x0,0xa
01e5 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01e6 BODY_01d0:
01e6 e5fc | | Load 0x2,-0x4
01e7 e001 | | Load 0x0,0x1
01e8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01e9 7014 |p | Jump_Nonzero 0x1fe
01ea 00d9 | | Load_Top At_Offset_1
01eb 00d9 | | Load_Top At_Offset_1
01ec e011 | | Load 0x0,0x11
01ed 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ee 4800 |H | Short_Literal 0x0
01ef e5fd | | Load 0x2,-0x3
01f0 e5ff | | Load 0x2,-0x1
01f1 e00a | | Load 0x0,0xa
01f2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01f3 003a | : | Store_Top Access,At_Offset_2
01f4 c404 | | Store 0x2,0x4
01f5 00d8 | | Load_Top At_Offset_0
01f6 6805 |h | Jump_Zero 0x1fc
01f7 e5fb | | Load 0x2,-0x5
01f8 00d9 | | Load_Top At_Offset_1
01f9 0227 | ' | Execute Access,All_Reference
01fa 8227 | ' | Call 0x1,0x27
01fb 7802 |x | Jump 0x1fe
01fc 00d9 | | Load_Top At_Offset_1
01fd 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
01fe e5ff | | Load 0x2,-0x1
01ff 01db | | Execute Vector,Length
0200 705e |p^ | Jump_Nonzero 0x25f
0201 e5fd | | Load 0x2,-0x3
0202 01db | | Execute Vector,Length
0203 680e |h | Jump_Zero 0x212
0204 4801 |H | Short_Literal 0x1
0205 0092 03cc | | Action Push_String_Extended,0x3cc ; "<NONE>"
0207 e5fd | | Load 0x2,-0x3
0208 e012 | | Load 0x0,0x12
0209 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
020a 7007 |p | Jump_Nonzero 0x212
020b 4801 |H | Short_Literal 0x1
020c 0092 03cd | | Action Push_String_Extended,0x3cd ; "<DEFAULT>"
020e e5fd | | Load 0x2,-0x3
020f e012 | | Load 0x0,0x12
0210 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0211 6802 |h | Jump_Zero 0x214
0212 00d9 | | Load_Top At_Offset_1
0213 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0214 4801 |H | Short_Literal 0x1
0215 e00f | | Load 0x0,0xf
0216 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0217 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0218 e5fe | | Load 0x2,-0x2
0219 e00f | | Load 0x0,0xf
021a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
021c c402 | | Store 0x2,0x2
021d 4801 |H | Short_Literal 0x1
021e e00f | | Load 0x0,0xf
021f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0220 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0221 e5fd | | Load 0x2,-0x3
0222 e00f | | Load 0x0,0xf
0223 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0224 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0225 c403 | | Store 0x2,0x3
0226 00da | | Load_Top At_Offset_2
0227 e402 | | Load 0x2,0x2
0228 e00f | | Load 0x0,0xf
0229 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
022b 6802 |h | Jump_Zero 0x22e
022c e5fc | | Load 0x2,-0x4
022d 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
022e 00da | | Load_Top At_Offset_2
022f e00f | | Load 0x0,0xf
0230 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0231 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
0232 6810 |h | Jump_Zero 0x243
0233 00d9 | | Load_Top At_Offset_1
0234 e011 | | Load 0x0,0x11
0235 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0236 e010 | | Load 0x0,0x10
0237 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0238 00ea | | Load_Encached Null_String_Cache
0239 e403 | | Load 0x2,0x3
023a e00f | | Load 0x0,0xf
023b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
023d 4801 |H | Short_Literal 0x1
023e e001 | | Load 0x0,0x1
023f 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0240 c404 | | Store 0x2,0x4
0241 00d9 | | Load_Top At_Offset_1
0242 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0243 e5fd | | Load 0x2,-0x3
0244 e00f | | Load 0x0,0xf
0245 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0246 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0247 680f |h | Jump_Zero 0x257
0248 00d9 | | Load_Top At_Offset_1
0249 e011 | | Load 0x0,0x11
024a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
024b e010 | | Load 0x0,0x10
024c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
024d e010 | | Load 0x0,0x10
024e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
024f 00ea | | Load_Encached Null_String_Cache
0250 e5fd | | Load 0x2,-0x3
0251 4801 |H | Short_Literal 0x1
0252 e001 | | Load 0x0,0x1
0253 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0254 c404 | | Store 0x2,0x4
0255 00d9 | | Load_Top At_Offset_1
0256 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0257 e5fb | | Load 0x2,-0x5
0258 0092 03ce | | Action Push_String_Extended,0x3ce ; "Ill formed name: "
025a e5fd | | Load 0x2,-0x3
025b 01cc | | Execute Vector,Catenate
025c 8227 | ' | Call 0x1,0x27
025d e009 | | Load 0x0,0x9
025e 0257 | W | Execute Discrete,Raise
025f 00d9 | | Load_Top At_Offset_1
0260 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0261 0000 0000 | | .BLANK 0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b 00da | | Load_Top At_Offset_2
026c 6805 |h | Jump_Zero 0x272
026d 0092 03cf | | Action Push_String_Extended,0x3cf ; "/bin/cat >> "
026f e5fe | | Load 0x2,-0x2
0270 01cc | | Execute Vector,Catenate
0271 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0272 0092 03d0 | | Action Push_String_Extended,0x3d0 ; "/bin/cat > "
0274 e5fe | | Load 0x2,-0x2
0275 01cc | | Execute Vector,Catenate
0276 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0277 0000 | | .XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 02ba | | .CONST 0x02ba ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 000e | | .CONST 0x000e ; Number of locals
027b INIT_0278:
027b e402 | | Load 0x2,0x2
027c 822a | * | Call 0x1,0x2a
027d 00e1 | | Load_Encached Boolean_Cache
027e 03f1 | | Declare_Variable Discrete,With_Value
027f e010 | | Load 0x0,0x10
0280 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0281 4801 |H | Short_Literal 0x1
0282 e5fe | | Load 0x2,-0x2
0283 e221 | ! | Load 0x1,0x21
0284 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0285 e010 | | Load 0x0,0x10
0286 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0287 4801 |H | Short_Literal 0x1
0288 00da | | Load_Top At_Offset_2
0289 e5fd | | Load 0x2,-0x3
028a e221 | ! | Load 0x1,0x21
028b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
028c e010 | | Load 0x0,0x10
028d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
028e 4801 |H | Short_Literal 0x1
028f e5fc | | Load 0x2,-0x4
0290 e221 | ! | Load 0x1,0x21
0291 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0292 e5f8 | | Load 0x2,-0x8
0293 e5fa | | Load 0x2,-0x6
0294 e5f9 | | Load 0x2,-0x7
0295 00d8 | | Load_Top At_Offset_0
0296 e00a | | Load 0x0,0xa
0297 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0298 e5f8 | | Load 0x2,-0x8
0299 e5fa | | Load 0x2,-0x6
029a e5f9 | | Load 0x2,-0x7
029b e5fa | | Load 0x2,-0x6
029c e00a | | Load 0x0,0xa
029d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
029e e5f8 | | Load 0x2,-0x8
029f e5fa | | Load 0x2,-0x6
02a0 e5f9 | | Load 0x2,-0x7
02a1 e5f8 | | Load 0x2,-0x8
02a2 e00a | | Load 0x0,0xa
02a3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
02a4 00db | | Load_Top At_Offset_3
02a5 e5ff | | Load 0x2,-0x1
02a6 e00a | | Load 0x0,0xa
02a7 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02a8 e001 | | Load 0x0,0x1
02a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02aa 02c7 | | Declare_Variable Any
02ab 00d8 | | Load_Top At_Offset_0
02ac 1c00 | | Execute_Immediate Run_Utility,0x0
02ad e001 | | Load 0x0,0x1
02ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02af 02c7 | | Declare_Variable Any
02b0 00d8 | | Load_Top At_Offset_0
02b1 1c00 | | Execute_Immediate Run_Utility,0x0
02b2 e001 | | Load 0x0,0x1
02b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b4 02c7 | | Declare_Variable Any
02b5 00d8 | | Load_Top At_Offset_0
02b6 1c00 | | Execute_Immediate Run_Utility,0x0
02b7 e00a | | Load 0x0,0xa
02b8 1b20 | | Execute Package,Field_Read,Field_Number 0x20
02b9 00e1 | | Load_Encached Boolean_Cache
02ba BODY_0278:
02ba e221 | ! | Load 0x1,0x21
02bb 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02bc e60a | | Load 0x3,0xa
02bd 00da | | Load_Top At_Offset_2
02be e011 | | Load 0x0,0x11
02bf 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02c0 e5f9 | | Load 0x2,-0x7
02c1 e606 | | Load 0x3,0x6
02c2 e00a | | Load 0x0,0xa
02c3 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
02c4 003b | ; | Store_Top Access,At_Offset_3
02c5 c60a | | Store 0x3,0xa
02c6 00d9 | | Load_Top At_Offset_1
02c7 6806 |h | Jump_Zero 0x2ce
02c8 e402 | | Load 0x2,0x2
02c9 00da | | Load_Top At_Offset_2
02ca 0227 | ' | Execute Access,All_Reference
02cb 8227 | ' | Call 0x1,0x27
02cc e009 | | Load 0x0,0x9
02cd 0257 | W | Execute Discrete,Raise
02ce 00db | | Load_Top At_Offset_3
02cf 00da | | Load_Top At_Offset_2
02d0 e011 | | Load 0x0,0x11
02d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d2 4800 |H | Short_Literal 0x0
02d3 e5fa | | Load 0x2,-0x6
02d4 e607 | | Load 0x3,0x7
02d5 e00a | | Load 0x0,0xa
02d6 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
02d7 003b | ; | Store_Top Access,At_Offset_3
02d8 c60b | | Store 0x3,0xb
02d9 00d9 | | Load_Top At_Offset_1
02da 6806 |h | Jump_Zero 0x2e1
02db e402 | | Load 0x2,0x2
02dc 00da | | Load_Top At_Offset_2
02dd 0227 | ' | Execute Access,All_Reference
02de 8227 | ' | Call 0x1,0x27
02df e009 | | Load 0x0,0x9
02e0 0257 | W | Execute Discrete,Raise
02e1 e402 | | Load 0x2,0x2
02e2 e60b | | Load 0x3,0xb
02e3 e5f8 | | Load 0x2,-0x8
02e4 e5fa | | Load 0x2,-0x6
02e5 e608 | | Load 0x3,0x8
02e6 822b | + | Call 0x1,0x2b
02e7 c60c | | Store 0x3,0xc
02e8 00e1 | | Load_Encached Boolean_Cache
02e9 e402 | | Load 0x2,0x2
02ea 4884 |H | Short_Literal 0x84
02eb 4818 |H | Short_Literal 0x18
02ec 4800 |H | Short_Literal 0x0
02ed 4800 |H | Short_Literal 0x0
02ee e608 | | Load 0x3,0x8
02ef e60c | | Load 0x3,0xc
02f0 e606 | | Load 0x3,0x6
02f1 e60a | | Load 0x3,0xa
02f2 e607 | | Load 0x3,0x7
02f3 e60b | | Load 0x3,0xb
02f4 e604 | | Load 0x3,0x4
02f5 e603 | | Load 0x3,0x3
02f6 e609 | | Load 0x3,0x9
02f7 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
02f8 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
02f9 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
02fa 8005 | | Call 0x0,0x5
02fb 0059 | Y | Store_Top Discrete,At_Offset_1
02fc 00d8 | | Load_Top At_Offset_0
02fd 6807 |h | Jump_Zero 0x305
02fe e402 | | Load 0x2,0x2
02ff 4803 |H | Short_Literal 0x3
0300 0092 03d1 | | Action Push_String_Extended,0x3d1 ; "Command execution completed successfully"
0302 e00c | | Load 0x0,0xc
0303 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0304 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0305 e402 | | Load 0x2,0x2
0306 0092 03d2 | | Action Push_String_Extended,0x3d2 ; "Error messages generated while executing command."
0308 8227 | ' | Call 0x1,0x27
0309 4501 |E | Exit_Suprogram New_Top_Offset 0x1
030a 0000 0000 | | .BLANK 0000[0x6]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0324 | $ | .CONST 0x0324 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0004 | | .CONST 0x0004 ; Number of locals
0313 INIT_0310:
0313 e402 | | Load 0x2,0x2
0314 822a | * | Call 0x1,0x2a
0315 00e1 | | Load_Encached Boolean_Cache
0316 03f1 | | Declare_Variable Discrete,With_Value
0317 e010 | | Load 0x0,0x10
0318 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0319 4801 |H | Short_Literal 0x1
031a e5ff | | Load 0x2,-0x1
031b e221 | ! | Load 0x1,0x21
031c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
031d e010 | | Load 0x0,0x10
031e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
031f 4801 |H | Short_Literal 0x1
0320 00da | | Load_Top At_Offset_2
0321 e5fe | | Load 0x2,-0x2
0322 e221 | ! | Load 0x1,0x21
0323 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0324 BODY_0310:
0324 e221 | ! | Load 0x1,0x21
0325 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0326 00e1 | | Load_Encached Boolean_Cache
0327 e402 | | Load 0x2,0x2
0328 e5fc | | Load 0x2,-0x4
0329 e5fd | | Load 0x2,-0x3
032a 4800 |H | Short_Literal 0x0
032b 4801 |H | Short_Literal 0x1
032c e603 | | Load 0x3,0x3
032d 0092 03d3 | | Action Push_String_Extended,0x3d3 ; " login"
032f 01cc | | Execute Vector,Catenate
0330 e21d | | Load 0x1,0x1d
0331 e603 | | Load 0x3,0x3
0332 0092 03d3 | | Action Push_String_Extended,0x3d3 ; " login"
0334 01cc | | Execute Vector,Catenate
0335 e21d | | Load 0x1,0x1d
0336 e603 | | Load 0x3,0x3
0337 0092 03d3 | | Action Push_String_Extended,0x3d3 ; " login"
0339 01cc | | Execute Vector,Catenate
033a e21d | | Load 0x1,0x1d
033b e604 | | Load 0x3,0x4
033c e603 | | Load 0x3,0x3
033d 00ea | | Load_Encached Null_String_Cache
033e 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
033f 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0340 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0341 8005 | | Call 0x0,0x5
0342 c403 | | Store 0x2,0x3
0343 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0344 0000 0000 | | .BLANK 0000[0x4]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0376 | v | .CONST 0x0376 ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 000b | | .CONST 0x000b ; Number of locals
034b INIT_0348:
034b e402 | | Load 0x2,0x2
034c 822a | * | Call 0x1,0x2a
034d 00e1 | | Load_Encached Boolean_Cache
034e 03f1 | | Declare_Variable Discrete,With_Value
034f e010 | | Load 0x0,0x10
0350 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0351 4801 |H | Short_Literal 0x1
0352 e5fd | | Load 0x2,-0x3
0353 e221 | ! | Load 0x1,0x21
0354 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0355 e010 | | Load 0x0,0x10
0356 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0357 4801 |H | Short_Literal 0x1
0358 00da | | Load_Top At_Offset_2
0359 e5fc | | Load 0x2,-0x4
035a e221 | ! | Load 0x1,0x21
035b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
035c e010 | | Load 0x0,0x10
035d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
035e 4801 |H | Short_Literal 0x1
035f e5fb | | Load 0x2,-0x5
0360 e221 | ! | Load 0x1,0x21
0361 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0362 00ea | | Load_Encached Null_String_Cache
0363 e5ff | | Load 0x2,-0x1
0364 e5fe | | Load 0x2,-0x2
0365 e00a | | Load 0x0,0xa
0366 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0367 00da | | Load_Top At_Offset_2
0368 0092 03d4 | | Action Push_String_Extended,0x3d4 ; "/bin/cat < "
036a 00da | | Load_Top At_Offset_2
036b 01cc | | Execute Vector,Catenate
036c e00a | | Load 0x0,0xa
036d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
036e e001 | | Load 0x0,0x1
036f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0370 02c7 | | Declare_Variable Any
0371 00d8 | | Load_Top At_Offset_0
0372 1c00 | | Execute_Immediate Run_Utility,0x0
0373 e00a | | Load 0x0,0xa
0374 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0375 00e1 | | Load_Encached Boolean_Cache
0376 BODY_0348:
0376 e221 | ! | Load 0x1,0x21
0377 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0378 00da | | Load_Top At_Offset_2
0379 00da | | Load_Top At_Offset_2
037a e011 | | Load 0x0,0x11
037b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
037c e5f9 | | Load 0x2,-0x7
037d e5fe | | Load 0x2,-0x2
037e e606 | | Load 0x3,0x6
037f e00a | | Load 0x0,0xa
0380 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0381 003b | ; | Store_Top Access,At_Offset_3
0382 c609 | | Store 0x3,0x9
0383 00d9 | | Load_Top At_Offset_1
0384 6806 |h | Jump_Zero 0x38b
0385 e402 | | Load 0x2,0x2
0386 00da | | Load_Top At_Offset_2
0387 0227 | ' | Execute Access,All_Reference
0388 8227 | ' | Call 0x1,0x27
0389 e009 | | Load 0x0,0x9
038a 0257 | W | Execute Discrete,Raise
038b 00e1 | | Load_Encached Boolean_Cache
038c e402 | | Load 0x2,0x2
038d 4884 |H | Short_Literal 0x84
038e 4818 |H | Short_Literal 0x18
038f 4800 |H | Short_Literal 0x0
0390 4800 |H | Short_Literal 0x0
0391 e606 | | Load 0x3,0x6
0392 e21d | | Load 0x1,0x1d
0393 e606 | | Load 0x3,0x6
0394 e21d | | Load 0x1,0x1d
0395 e606 | | Load 0x3,0x6
0396 e609 | | Load 0x3,0x9
0397 e604 | | Load 0x3,0x4
0398 e603 | | Load 0x3,0x3
0399 e608 | | Load 0x3,0x8
039a 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
039b 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
039c 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
039d 8005 | | Call 0x0,0x5
039e 0059 | Y | Store_Top Discrete,At_Offset_1
039f 00d8 | | Load_Top At_Offset_0
03a0 6807 |h | Jump_Zero 0x3a8
03a1 e402 | | Load 0x2,0x2
03a2 4803 |H | Short_Literal 0x3
03a3 0092 03d1 | | Action Push_String_Extended,0x3d1 ; "Command execution completed successfully"
03a5 e00c | | Load 0x0,0xc
03a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03a8 e402 | | Load 0x2,0x2
03a9 0092 03d2 | | Action Push_String_Extended,0x3d2 ; "Error messages generated while executing command."
03ab 8227 | ' | Call 0x1,0x27
03ac 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03ad 0000 0000 | | .XXX[0x3]
03af 0000 | |
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03ba | | .CONST 0x03ba ; Address of begin
03b1 0004 | | .CONST 0x0004 ; Address of exception handler
03b2 0003 | | .CONST 0x0003 ; Number of locals
03b3 INIT_03b0:
03b3 e5fe | | Load 0x2,-0x2
03b4 e5ff | | Load 0x2,-0x1
03b5 e00a | | Load 0x0,0xa
03b6 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
03b7 00d8 | | Load_Top At_Offset_0
03b8 e5f9 | | Load 0x2,-0x7
03b9 822c | , | Call 0x1,0x2c
03ba BODY_03b0:
03ba e5f8 | | Load 0x2,-0x8
03bb 00ea | | Load_Encached Null_String_Cache
03bc e5ff | | Load 0x2,-0x1
03bd 00ea | | Load_Encached Null_String_Cache
03be 0092 03cd | | Action Push_String_Extended,0x3cd ; "<DEFAULT>"
03c0 e5fb | | Load 0x2,-0x5
03c1 e5fc | | Load 0x2,-0x4
03c2 e5fd | | Load 0x2,-0x3
03c3 e603 | | Load 0x3,0x3
03c4 821a | | Call 0x1,0x1a
03c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03c6 ; --------------------------------------------------------------------------------------
03c6 ; STRING TABLE
03c6 ; --------------------------------------------------------------------------------------
03c6 0020 | | .STRTAB 0x0020->0x03d6 ; "Run quitting after errors"
03c7 0037 | 7 | .STRTAB 0x0037->0x03e2 ; "Unexpected exception "
03c8 004a | J | .STRTAB 0x004a->0x03ed ; "Rlogin quitting after errors"
03c9 0064 | d | .STRTAB 0x0064->0x03fb ; "Get_Text_File quitting after errors"
03ca 0085 | | .STRTAB 0x0085->0x040c ; "Put_Text_File quitting after errors"
03cb 00a6 | | .STRTAB 0x00a6->0x041e ; "$"
03cc 00a5 | | .STRTAB 0x00a5->0x041e ; "<NONE>"
03cd 00a9 | | .STRTAB 0x00a9->0x0421 ; "<DEFAULT>"
03ce 00b0 | | .STRTAB 0x00b0->0x0426 ; "Ill formed name: "
03cf 00bf | | .STRTAB 0x00bf->0x042e ; "/bin/cat >> "
03d0 00c9 | | .STRTAB 0x00c9->0x0434 ; "/bin/cat > "
03d1 00d2 | | .STRTAB 0x00d2->0x043a ; "Command execution completed successfully"
03d2 00f8 | | .STRTAB 0x00f8->0x044e ; "Error messages generated while executing command."
03d3 0127 | ' | .STRTAB 0x0127->0x0466 ; " login"
03d4 012b | + | .STRTAB 0x012b->0x0469 ; "/bin/cat < "
03d5 0134 | 4 | .STREND 0x0134->0x046f
03d6 5275 6e20 |Run | .STRTAB_STRINGS
046f 0000 | | .XXX[0x1]
0470 ; --------------------------------------------------------------------------------------
0470 ; Debug Table
0470 ; --------------------------------------------------------------------------------------
0470 0004 000f | | .DEBUG4 0x0004,0x000f,0xa4e8,0x0000,0x0001,0x0000
0476 2804 3ca0 |( < | .XXX[0x18a]
0478 9e7c d164 | | d|
047a 7501 4b58 |u KX|
047c 1562 4dd5 | bM |
047e ef63 922b | c +|
0480 78da e66c |x l|
0482 f0cd c01e | |
0484 4251 c404 |BQ |
0486 8038 9803 | 8 |
0488 1914 2443 | $C|
048a 7bcc 17a0 |{ |
048c 0b21 eefa | ! |
048e 0312 877f | |
0490 5002 c02c |P ,|
0492 0160 8a3c | ` <|
0494 4e95 0c4d |N M|
0496 52c8 afe5 |R |
0498 7d2a 2ee8 |}*. |
049a 0252 53b4 | RS |
049c 0559 9577 | Y w|
049e 0288 5097 | P |
04a0 1f2f 0c1d | / |
04a2 6256 b435 |bV 5|
04a4 5996 0ab5 |Y |
04a6 6148 5e08 |aH^ |
04a8 a7a7 cb10 | |
04aa 6c00 e140 |l @|
04ac 4e42 68b3 |NBh |
04ae cf5d a83b | ] ;|
04b0 f816 e235 | 5|
04b2 fc05 813b | ;|
04b4 43b1 14e6 |C |
04b6 8ef1 4618 | F |
04b8 01d2 503c | P<|
04ba 0094 036f | o|
04bc 85d8 51c6 | Q |
04be e0db 9927 | '|
04c0 e5b0 b0c8 | |
04c2 a97c 30b0 | |0 |
04c4 3e03 8ecd |> |
04c6 4381 a6e0 |C |
04c8 ad95 d551 | Q|
04ca 4106 1b7f |A |
04cc 89b1 04f9 | |
04ce ea19 48b4 | H |
04d0 508f 3f90 |P ? |
04d2 f2c0 052a | *|
04d4 4d00 32a0 |M 2 |
04d6 7f36 8f40 | 6 @|
04d8 0173 735a | ssZ|
04da 8e7f 85d0 | |
04dc 4d3e fb50 |M> P|
04de 600f f033 |` 3|
04e0 8000 4917 | I |
04e2 508b 9e14 |P |
04e4 1a01 fd10 | |
04e6 0c38 2fa2 | 8/ |
04e8 00f8 542d | T-|
04ea 82eb 003b | ;|
04ec 609f bd36 |` 6|
04ee e005 1347 | G|
04f0 7890 3002 |x 0 |
04f2 8cca 0234 | 4|
04f4 9ecd c340 | @|
04f6 04ea 1a12 | |
04f8 1c1a 041a | |
04fa c167 c3c5 | g |
04fc a041 0000 | A |
04fe 8d6e 32c4 | n2 |
0500 9b04 5f01 | _ |
0502 b3d4 b140 | @|
0504 0d10 2eb9 | . |
0506 10e3 c5c5 | |
0508 60c2 30c4 |` 0 |
050a 9b53 e584 | S |
050c 131a 841f | |
050e 9e40 9928 | @ (|
0510 01c3 5f34 | _4|
0512 319f 9ba1 |1 |
0514 bd45 8b56 | E V|
0516 ab03 e020 | |
0518 0571 d8b0 | q |
051a 2e5c 2728 |.\'(|
051c 8f4e 86a4 | N |
051e dc61 19a8 | a |
0520 3440 a5ac |4@ |
0522 0cd9 d65d | ]|
0524 1d2f cb4c | / L|
0526 50f0 68c9 |P h |
0528 90a9 cf49 | I|
052a aacc 9ee9 | |
052c 522d 55ca |R-U |
052e 592b 80a6 |Y+ |
0530 f956 1de5 | V |
0532 e7b4 e9a1 | |
0534 0367 c07d | g }|
0536 c9b4 a792 | |
0538 1873 32c1 | s2 |
053a 22f8 de0a |" |
053c 3f5a 6523 |?Ze#|
053e fa8d a8b1 | |
0540 8277 170f | w |
0542 62dd 8107 |b |
0544 bcbe 5801 | X |
0546 e007 d599 | |
0548 26e2 7241 |& rA|
054a cd00 a8d2 | |
054c c068 aa14 | h |
054e 0b16 9f92 | |
0550 952d 5e0f | -^ |
0552 b22a 8559 | * Y|
0554 1eb1 56af | V |
0556 414c 1ee8 |AL |
0558 a6d5 54ac | T |
055a ba83 ab28 | (|
055c 06a1 5543 | UC|
055e 4488 0051 |D Q|
0560 9a1e 7743 | wC|
0562 cf96 1376 | v|
0564 b79c 0839 | 9|
0566 7d38 6a03 |}8j |
0568 bfae 3a60 | :`|
056a 71c6 8228 |q (|
056c 5599 d144 |U D|
056e 161e a0cf | |
0570 af78 54da | xT |
0572 9484 3b96 | ; |
0574 d165 d55e | e ^|
0576 e253 04ae | S |
0578 ebd5 e99d | |
057a e276 9e19 | v |
057c bbb6 a5e5 | |
057e 5aa1 b35f |Z _|
0580 3e47 ad9c |>G |
0582 5727 b98e |W' |
0584 dc8b 552f | U/|
0586 2aad 06d6 |* |
0588 7e69 a197 |~i |
058a 0fa9 abfe | |
058c d796 b345 | E|
058e 7eef 1ca9 |~ |
0590 efbe 4741 | GA|
0592 7950 1c07 |yP |
0594 688f 2884 |h ( |
0596 ad00 3d2f | =/|
0598 35ae f448 |5 H|
059a 0b21 c7b6 | ! |
059c ffa3 a69a | |
059e dbd4 e821 | !|
05a0 e2f6 519d | Q |
05a2 46b5 676e |F gn|
05a4 3096 1a58 |0 X|
05a6 33c2 9d74 |3 t|
05a8 b1a8 38e6 | 8 |
05aa d591 5422 | T"|
05ac b673 c99b | s |
05ae 40c4 e002 |@ |
05b0 9003 193a | :|
05b2 84f8 6eb3 | n |
05b4 5e3a 13d5 |^: |
05b6 97b8 50f5 | P |
05b8 2e04 018d |. |
05ba 990d 22d3 | " |
05bc 5b33 b385 |[3 |
05be 0f33 59c3 | 3Y |
05c0 54ac 5c03 |T \ |
05c2 1db2 7ee4 | ~ |
05c4 10c1 abeb | |
05c6 312a 8010 |1* |
05c8 3c25 5e38 |<%^8|
05ca 01a9 4871 | Hq|
05cc c962 efa2 | b |
05ce 4938 557a |I8Uz|
05d0 e963 cd9b | c |
05d2 3115 99e3 |1 |
05d4 7f4d 8880 | M |
05d6 0c9a ce6c | l|
05d8 4cb9 c45d |L ]|
05da 0304 17f3 | |
05dc b212 40bb | @ |
05de 872e d113 | . |
05e0 ff8a 985f | _|
05e2 2193 89e4 |! |
05e4 b761 e122 | a "|
05e6 a4ae 1b44 | D|
05e8 4c60 8062 |L` b|
05ea c0bc a012 | |
05ec 0009 f82f | /|
05ee 7c3c 9900 ||< |
05f0 c901 bb00 | |
05f2 8b38 0240 | 8 @|
05f4 0088 0686 | |
05f6 0112 0041 | A|
05f8 8048 002b | H +|
05fa 4000 8006 |@ |
05fc 9806 722c | r,|
05fe 640c fc01 |d |