|
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: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_f040fe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0370 | p | .CONST 0x0370 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 002e | . | .CONST 0x002e ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 000a | | .CONST 0x000a ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 001d e001 | | Load 0x0,0x1 001e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 001f e001 | | Load 0x0,0x1 0020 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0021 e002 | | Load 0x0,0x2 0022 180e | | Execute Package,Field_Execute,Field_Number 0xe 0023 e002 | | Load 0x0,0x2 0024 180e | | Execute Package,Field_Execute,Field_Number 0xe 0025 e002 | | Load 0x0,0x2 0026 180e | | Execute Package,Field_Execute,Field_Number 0xe 0027 e002 | | Load 0x0,0x2 0028 180e | | Execute Package,Field_Execute,Field_Number 0xe 0029 e001 | | Load 0x0,0x1 002a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002c e003 | | Load 0x0,0x3 002d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 002e BODY_0018: 002e e002 | | Load 0x0,0x2 002f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0030 e002 | | Load 0x0,0x2 0031 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0032 c405 | | Store 0x2,0x5 0033 e002 | | Load 0x0,0x2 0034 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0035 e002 | | Load 0x0,0x2 0036 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0037 c406 | | Store 0x2,0x6 0038 e002 | | Load 0x0,0x2 0039 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003a e002 | | Load 0x0,0x2 003b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 003c c407 | | Store 0x2,0x7 003d e002 | | Load 0x0,0x2 003e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003f e002 | | Load 0x0,0x2 0040 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0041 003b | ; | Store_Top Access,At_Offset_3 0042 e001 | | Load 0x0,0x1 0043 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0044 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0045 e001 | | Load 0x0,0x1 0046 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0047 0092 02bb | | Action Push_String_Extended,0x2bb ; "/u/pam" 0049 e001 | | Load 0x0,0x1 004a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 004b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 004c c402 | | Store 0x2,0x2 004d 005a | Z | Store_Top Discrete,At_Offset_2 004e 0092 02bc | | Action Push_String_Extended,0x2bc ; "create o1 " 0050 00da | | Load_Top At_Offset_2 0051 e001 | | Load 0x0,0x1 0052 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0053 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0054 011c | | Execute Any,Convert_Unchecked 0055 1c01 | | Execute_Immediate Run_Utility,0x1 0056 01cc | | Execute Vector,Catenate 0057 e004 | | Load 0x0,0x4 0058 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0059 e001 | | Load 0x0,0x1 005a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 005b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 005c e001 | | Load 0x0,0x1 005d 1b15 | | Execute Package,Field_Read,Field_Number 0x15 005e 0092 02bd | | Action Push_String_Extended,0x2bd ; "/u/pam/experiment" 0060 e001 | | Load 0x0,0x1 0061 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0062 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0063 c403 | | Store 0x2,0x3 0064 005a | Z | Store_Top Discrete,At_Offset_2 0065 0092 02be | | Action Push_String_Extended,0x2be ; "create o2 " 0067 00da | | Load_Top At_Offset_2 0068 e001 | | Load 0x0,0x1 0069 1b13 | | Execute Package,Field_Read,Field_Number 0x13 006a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006b 011c | | Execute Any,Convert_Unchecked 006c 1c01 | | Execute_Immediate Run_Utility,0x1 006d 01cc | | Execute Vector,Catenate 006e e004 | | Load 0x0,0x4 006f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0070 e001 | | Load 0x0,0x1 0071 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0072 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0073 e001 | | Load 0x0,0x1 0074 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0075 0092 02bf | | Action Push_String_Extended,0x2bf ; "/u/pam/experiment/test" 0077 e001 | | Load 0x0,0x1 0078 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0079 1811 | | Execute Package,Field_Execute,Field_Number 0x11 007a c404 | | Store 0x2,0x4 007b 005a | Z | Store_Top Discrete,At_Offset_2 007c 0092 02c0 | | Action Push_String_Extended,0x2c0 ; "create o3 " 007e 00da | | Load_Top At_Offset_2 007f e001 | | Load 0x0,0x1 0080 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0081 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0082 011c | | Execute Any,Convert_Unchecked 0083 1c01 | | Execute_Immediate Run_Utility,0x1 0084 01cc | | Execute Vector,Catenate 0085 e004 | | Load 0x0,0x4 0086 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0087 4801 |H | Short_Literal 0x1 0088 e004 | | Load 0x0,0x4 0089 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 008a e003 | | Load 0x0,0x3 008b 1b16 | | Execute Package,Field_Read,Field_Number 0x16 008c e402 | | Load 0x2,0x2 008d e003 | | Load 0x0,0x3 008e 180e | | Execute Package,Field_Execute,Field_Number 0xe 008f 0059 | Y | Store_Top Discrete,At_Offset_1 0090 0092 02c1 | | Action Push_String_Extended,0x2c1 ; "control o1 " 0092 00d9 | | Load_Top At_Offset_1 0093 e003 | | Load 0x0,0x3 0094 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0095 011c | | Execute Any,Convert_Unchecked 0096 1c01 | | Execute_Immediate Run_Utility,0x1 0097 01cc | | Execute Vector,Catenate 0098 e004 | | Load 0x0,0x4 0099 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 009a e003 | | Load 0x0,0x3 009b 1b16 | | Execute Package,Field_Read,Field_Number 0x16 009c e403 | | Load 0x2,0x3 009d e003 | | Load 0x0,0x3 009e 180e | | Execute Package,Field_Execute,Field_Number 0xe 009f 0059 | Y | Store_Top Discrete,At_Offset_1 00a0 0092 02c2 | | Action Push_String_Extended,0x2c2 ; "control o2 " 00a2 00d9 | | Load_Top At_Offset_1 00a3 e003 | | Load 0x0,0x3 00a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00a5 011c | | Execute Any,Convert_Unchecked 00a6 1c01 | | Execute_Immediate Run_Utility,0x1 00a7 01cc | | Execute Vector,Catenate 00a8 e004 | | Load 0x0,0x4 00a9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00aa e003 | | Load 0x0,0x3 00ab 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00ac e404 | | Load 0x2,0x4 00ad e003 | | Load 0x0,0x3 00ae 180e | | Execute Package,Field_Execute,Field_Number 0xe 00af 0059 | Y | Store_Top Discrete,At_Offset_1 00b0 0092 02c3 | | Action Push_String_Extended,0x2c3 ; "control o3 " 00b2 00d9 | | Load_Top At_Offset_1 00b3 e003 | | Load 0x0,0x3 00b4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00b5 011c | | Execute Any,Convert_Unchecked 00b6 1c01 | | Execute_Immediate Run_Utility,0x1 00b7 01cc | | Execute Vector,Catenate 00b8 e004 | | Load 0x0,0x4 00b9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00ba e003 | | Load 0x0,0x3 00bb 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00bc e404 | | Load 0x2,0x4 00bd e003 | | Load 0x0,0x3 00be 180e | | Execute Package,Field_Execute,Field_Number 0xe 00bf 0059 | Y | Store_Top Discrete,At_Offset_1 00c0 0092 02c3 | | Action Push_String_Extended,0x2c3 ; "control o3 " 00c2 00d9 | | Load_Top At_Offset_1 00c3 e003 | | Load 0x0,0x3 00c4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00c5 011c | | Execute Any,Convert_Unchecked 00c6 1c01 | | Execute_Immediate Run_Utility,0x1 00c7 01cc | | Execute Vector,Catenate 00c8 e004 | | Load 0x0,0x4 00c9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00ca 4801 |H | Short_Literal 0x1 00cb e004 | | Load 0x0,0x4 00cc 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00cd 0092 02c4 | | Action Push_String_Extended,0x2c4 ; "Is_controlled o1 = " 00cf e402 | | Load 0x2,0x2 00d0 e003 | | Load 0x0,0x3 00d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00d2 00e1 | | Load_Encached Boolean_Cache 00d3 011c | | Execute Any,Convert_Unchecked 00d4 1c01 | | Execute_Immediate Run_Utility,0x1 00d5 01cc | | Execute Vector,Catenate 00d6 e004 | | Load 0x0,0x4 00d7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00d8 0092 02c5 | | Action Push_String_Extended,0x2c5 ; "Is_controlled o2 = " 00da e403 | | Load 0x2,0x3 00db e003 | | Load 0x0,0x3 00dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00dd 00e1 | | Load_Encached Boolean_Cache 00de 011c | | Execute Any,Convert_Unchecked 00df 1c01 | | Execute_Immediate Run_Utility,0x1 00e0 01cc | | Execute Vector,Catenate 00e1 e004 | | Load 0x0,0x4 00e2 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00e3 0092 02c6 | | Action Push_String_Extended,0x2c6 ; "Is_controlled o3 = " 00e5 e404 | | Load 0x2,0x4 00e6 e003 | | Load 0x0,0x3 00e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00e8 00e1 | | Load_Encached Boolean_Cache 00e9 011c | | Execute Any,Convert_Unchecked 00ea 1c01 | | Execute_Immediate Run_Utility,0x1 00eb 01cc | | Execute Vector,Catenate 00ec e004 | | Load 0x0,0x4 00ed 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 00ee 4801 |H | Short_Literal 0x1 00ef e004 | | Load 0x0,0x4 00f0 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 00f1 e003 | | Load 0x0,0x3 00f2 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00f3 e405 | | Load 0x2,0x5 00f4 e402 | | Load 0x2,0x2 00f5 e003 | | Load 0x0,0x3 00f6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00f7 0059 | Y | Store_Top Discrete,At_Offset_1 00f8 0092 02c7 | | Action Push_String_Extended,0x2c7 ; "read o1 e1_1 " 00fa 00d9 | | Load_Top At_Offset_1 00fb e003 | | Load 0x0,0x3 00fc 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00fd 011c | | Execute Any,Convert_Unchecked 00fe 1c01 | | Execute_Immediate Run_Utility,0x1 00ff 01cc | | Execute Vector,Catenate 0100 e004 | | Load 0x0,0x4 0101 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0102 e003 | | Load 0x0,0x3 0103 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0104 e406 | | Load 0x2,0x6 0105 e402 | | Load 0x2,0x2 0106 e003 | | Load 0x0,0x3 0107 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0108 0059 | Y | Store_Top Discrete,At_Offset_1 0109 0092 02c8 | | Action Push_String_Extended,0x2c8 ; "read o1 e1_2 " 010b 00d9 | | Load_Top At_Offset_1 010c e003 | | Load 0x0,0x3 010d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 010e 011c | | Execute Any,Convert_Unchecked 010f 1c01 | | Execute_Immediate Run_Utility,0x1 0110 01cc | | Execute Vector,Catenate 0111 e004 | | Load 0x0,0x4 0112 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0113 4801 |H | Short_Literal 0x1 0114 e004 | | Load 0x0,0x4 0115 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0116 e003 | | Load 0x0,0x3 0117 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0118 e407 | | Load 0x2,0x7 0119 e403 | | Load 0x2,0x3 011a e003 | | Load 0x0,0x3 011b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 011c 0059 | Y | Store_Top Discrete,At_Offset_1 011d 0092 02c9 | | Action Push_String_Extended,0x2c9 ; "update o2 e2 " 011f 00d9 | | Load_Top At_Offset_1 0120 e003 | | Load 0x0,0x3 0121 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0122 011c | | Execute Any,Convert_Unchecked 0123 1c01 | | Execute_Immediate Run_Utility,0x1 0124 01cc | | Execute Vector,Catenate 0125 e004 | | Load 0x0,0x4 0126 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0127 e003 | | Load 0x0,0x3 0128 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0129 00db | | Load_Top At_Offset_3 012a e403 | | Load 0x2,0x3 012b e003 | | Load 0x0,0x3 012c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 012d 0059 | Y | Store_Top Discrete,At_Offset_1 012e 0092 02ca | | Action Push_String_Extended,0x2ca ; "update o2 e3 " 0130 00d9 | | Load_Top At_Offset_1 0131 e003 | | Load 0x0,0x3 0132 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0133 011c | | Execute Any,Convert_Unchecked 0134 1c01 | | Execute_Immediate Run_Utility,0x1 0135 01cc | | Execute Vector,Catenate 0136 e004 | | Load 0x0,0x4 0137 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0138 4801 |H | Short_Literal 0x1 0139 e004 | | Load 0x0,0x4 013a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 013b e003 | | Load 0x0,0x3 013c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 013d e407 | | Load 0x2,0x7 013e e403 | | Load 0x2,0x3 013f e003 | | Load 0x0,0x3 0140 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0141 0059 | Y | Store_Top Discrete,At_Offset_1 0142 0092 02cb | | Action Push_String_Extended,0x2cb ; "abandon o2 e2 " 0144 00d9 | | Load_Top At_Offset_1 0145 e003 | | Load 0x0,0x3 0146 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0147 011c | | Execute Any,Convert_Unchecked 0148 1c01 | | Execute_Immediate Run_Utility,0x1 0149 01cc | | Execute Vector,Catenate 014a e004 | | Load 0x0,0x4 014b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 014c e003 | | Load 0x0,0x3 014d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 014e 00db | | Load_Top At_Offset_3 014f e403 | | Load 0x2,0x3 0150 e003 | | Load 0x0,0x3 0151 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0152 0059 | Y | Store_Top Discrete,At_Offset_1 0153 0092 02ca | | Action Push_String_Extended,0x2ca ; "update o2 e3 " 0155 00d9 | | Load_Top At_Offset_1 0156 e003 | | Load 0x0,0x3 0157 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0158 011c | | Execute Any,Convert_Unchecked 0159 1c01 | | Execute_Immediate Run_Utility,0x1 015a 01cc | | Execute Vector,Catenate 015b e004 | | Load 0x0,0x4 015c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 015d e003 | | Load 0x0,0x3 015e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 015f 00db | | Load_Top At_Offset_3 0160 e403 | | Load 0x2,0x3 0161 e003 | | Load 0x0,0x3 0162 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0163 0059 | Y | Store_Top Discrete,At_Offset_1 0164 0092 02cc | | Action Push_String_Extended,0x2cc ; "read o2 e3 " 0166 00d9 | | Load_Top At_Offset_1 0167 e003 | | Load 0x0,0x3 0168 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0169 011c | | Execute Any,Convert_Unchecked 016a 1c01 | | Execute_Immediate Run_Utility,0x1 016b 01cc | | Execute Vector,Catenate 016c e004 | | Load 0x0,0x4 016d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 016e 4801 |H | Short_Literal 0x1 016f e004 | | Load 0x0,0x4 0170 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0171 e003 | | Load 0x0,0x3 0172 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0173 00db | | Load_Top At_Offset_3 0174 e404 | | Load 0x2,0x4 0175 e003 | | Load 0x0,0x3 0176 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0177 0059 | Y | Store_Top Discrete,At_Offset_1 0178 0092 02cd | | Action Push_String_Extended,0x2cd ; "read o3 e3 " 017a 00d9 | | Load_Top At_Offset_1 017b e003 | | Load 0x0,0x3 017c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 017d 011c | | Execute Any,Convert_Unchecked 017e 1c01 | | Execute_Immediate Run_Utility,0x1 017f 01cc | | Execute Vector,Catenate 0180 e004 | | Load 0x0,0x4 0181 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0182 e003 | | Load 0x0,0x3 0183 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0184 e404 | | Load 0x2,0x4 0185 e003 | | Load 0x0,0x3 0186 180f | | Execute Package,Field_Execute,Field_Number 0xf 0187 0059 | Y | Store_Top Discrete,At_Offset_1 0188 0092 02ce | | Action Push_String_Extended,0x2ce ; "uncontrol o3 " 018a 00d9 | | Load_Top At_Offset_1 018b e003 | | Load 0x0,0x3 018c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 018d 011c | | Execute Any,Convert_Unchecked 018e 1c01 | | Execute_Immediate Run_Utility,0x1 018f 01cc | | Execute Vector,Catenate 0190 e004 | | Load 0x0,0x4 0191 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0192 e003 | | Load 0x0,0x3 0193 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0194 00db | | Load_Top At_Offset_3 0195 e404 | | Load 0x2,0x4 0196 e003 | | Load 0x0,0x3 0197 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0198 0059 | Y | Store_Top Discrete,At_Offset_1 0199 0092 02cf | | Action Push_String_Extended,0x2cf ; "abandon o3 e3 " 019b 00d9 | | Load_Top At_Offset_1 019c e003 | | Load 0x0,0x3 019d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 019e 011c | | Execute Any,Convert_Unchecked 019f 1c01 | | Execute_Immediate Run_Utility,0x1 01a0 01cc | | Execute Vector,Catenate 01a1 e004 | | Load 0x0,0x4 01a2 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01a3 e003 | | Load 0x0,0x3 01a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01a5 e404 | | Load 0x2,0x4 01a6 e003 | | Load 0x0,0x3 01a7 180f | | Execute Package,Field_Execute,Field_Number 0xf 01a8 0059 | Y | Store_Top Discrete,At_Offset_1 01a9 0092 02ce | | Action Push_String_Extended,0x2ce ; "uncontrol o3 " 01ab 00d9 | | Load_Top At_Offset_1 01ac e003 | | Load 0x0,0x3 01ad 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01ae 011c | | Execute Any,Convert_Unchecked 01af 1c01 | | Execute_Immediate Run_Utility,0x1 01b0 01cc | | Execute Vector,Catenate 01b1 e004 | | Load 0x0,0x4 01b2 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01b3 4801 |H | Short_Literal 0x1 01b4 e004 | | Load 0x0,0x4 01b5 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 01b6 e003 | | Load 0x0,0x3 01b7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01b8 e404 | | Load 0x2,0x4 01b9 e003 | | Load 0x0,0x3 01ba 180e | | Execute Package,Field_Execute,Field_Number 0xe 01bb 0059 | Y | Store_Top Discrete,At_Offset_1 01bc 0092 02c3 | | Action Push_String_Extended,0x2c3 ; "control o3 " 01be 00d9 | | Load_Top At_Offset_1 01bf e003 | | Load 0x0,0x3 01c0 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01c1 011c | | Execute Any,Convert_Unchecked 01c2 1c01 | | Execute_Immediate Run_Utility,0x1 01c3 01cc | | Execute Vector,Catenate 01c4 e004 | | Load 0x0,0x4 01c5 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01c6 e003 | | Load 0x0,0x3 01c7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01c8 00db | | Load_Top At_Offset_3 01c9 e404 | | Load 0x2,0x4 01ca e003 | | Load 0x0,0x3 01cb 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01cc 0059 | Y | Store_Top Discrete,At_Offset_1 01cd 0092 02d0 | | Action Push_String_Extended,0x2d0 ; "update o3 e3 " 01cf 00d9 | | Load_Top At_Offset_1 01d0 e003 | | Load 0x0,0x3 01d1 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01d2 011c | | Execute Any,Convert_Unchecked 01d3 1c01 | | Execute_Immediate Run_Utility,0x1 01d4 01cc | | Execute Vector,Catenate 01d5 e004 | | Load 0x0,0x4 01d6 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01d7 e003 | | Load 0x0,0x3 01d8 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01d9 e404 | | Load 0x2,0x4 01da e003 | | Load 0x0,0x3 01db 180f | | Execute Package,Field_Execute,Field_Number 0xf 01dc 0059 | Y | Store_Top Discrete,At_Offset_1 01dd 0092 02ce | | Action Push_String_Extended,0x2ce ; "uncontrol o3 " 01df 00d9 | | Load_Top At_Offset_1 01e0 e003 | | Load 0x0,0x3 01e1 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01e2 011c | | Execute Any,Convert_Unchecked 01e3 1c01 | | Execute_Immediate Run_Utility,0x1 01e4 01cc | | Execute Vector,Catenate 01e5 e004 | | Load 0x0,0x4 01e6 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01e7 e003 | | Load 0x0,0x3 01e8 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01e9 00db | | Load_Top At_Offset_3 01ea e404 | | Load 0x2,0x4 01eb e003 | | Load 0x0,0x3 01ec 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01ed 0059 | Y | Store_Top Discrete,At_Offset_1 01ee 0092 02cf | | Action Push_String_Extended,0x2cf ; "abandon o3 e3 " 01f0 00d9 | | Load_Top At_Offset_1 01f1 e003 | | Load 0x0,0x3 01f2 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01f3 011c | | Execute Any,Convert_Unchecked 01f4 1c01 | | Execute_Immediate Run_Utility,0x1 01f5 01cc | | Execute Vector,Catenate 01f6 e004 | | Load 0x0,0x4 01f7 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 01f8 e003 | | Load 0x0,0x3 01f9 1b16 | | Execute Package,Field_Read,Field_Number 0x16 01fa e404 | | Load 0x2,0x4 01fb e003 | | Load 0x0,0x3 01fc 180f | | Execute Package,Field_Execute,Field_Number 0xf 01fd 0059 | Y | Store_Top Discrete,At_Offset_1 01fe 0092 02ce | | Action Push_String_Extended,0x2ce ; "uncontrol o3 " 0200 00d9 | | Load_Top At_Offset_1 0201 e003 | | Load 0x0,0x3 0202 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0203 011c | | Execute Any,Convert_Unchecked 0204 1c01 | | Execute_Immediate Run_Utility,0x1 0205 01cc | | Execute Vector,Catenate 0206 e004 | | Load 0x0,0x4 0207 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0208 4801 |H | Short_Literal 0x1 0209 e004 | | Load 0x0,0x4 020a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 020b e003 | | Load 0x0,0x3 020c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 020d e404 | | Load 0x2,0x4 020e e003 | | Load 0x0,0x3 020f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0210 0059 | Y | Store_Top Discrete,At_Offset_1 0211 0092 02c3 | | Action Push_String_Extended,0x2c3 ; "control o3 " 0213 00d9 | | Load_Top At_Offset_1 0214 e003 | | Load 0x0,0x3 0215 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0216 011c | | Execute Any,Convert_Unchecked 0217 1c01 | | Execute_Immediate Run_Utility,0x1 0218 01cc | | Execute Vector,Catenate 0219 e004 | | Load 0x0,0x4 021a 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 021b e003 | | Load 0x0,0x3 021c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 021d 00db | | Load_Top At_Offset_3 021e e404 | | Load 0x2,0x4 021f e003 | | Load 0x0,0x3 0220 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0221 0059 | Y | Store_Top Discrete,At_Offset_1 0222 0092 02cd | | Action Push_String_Extended,0x2cd ; "read o3 e3 " 0224 00d9 | | Load_Top At_Offset_1 0225 e003 | | Load 0x0,0x3 0226 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0227 011c | | Execute Any,Convert_Unchecked 0228 1c01 | | Execute_Immediate Run_Utility,0x1 0229 01cc | | Execute Vector,Catenate 022a e004 | | Load 0x0,0x4 022b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 022c e003 | | Load 0x0,0x3 022d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 022e 00db | | Load_Top At_Offset_3 022f e404 | | Load 0x2,0x4 0230 e003 | | Load 0x0,0x3 0231 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0232 0059 | Y | Store_Top Discrete,At_Offset_1 0233 0092 02d1 | | Action Push_String_Extended,0x2d1 ; "abandon update o3 e3 " 0235 00d9 | | Load_Top At_Offset_1 0236 e003 | | Load 0x0,0x3 0237 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0238 011c | | Execute Any,Convert_Unchecked 0239 1c01 | | Execute_Immediate Run_Utility,0x1 023a 01cc | | Execute Vector,Catenate 023b e004 | | Load 0x0,0x4 023c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 023d 4801 |H | Short_Literal 0x1 023e e004 | | Load 0x0,0x4 023f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0240 e003 | | Load 0x0,0x3 0241 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0242 00db | | Load_Top At_Offset_3 0243 e404 | | Load 0x2,0x4 0244 e003 | | Load 0x0,0x3 0245 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0246 0059 | Y | Store_Top Discrete,At_Offset_1 0247 0092 02d0 | | Action Push_String_Extended,0x2d0 ; "update o3 e3 " 0249 00d9 | | Load_Top At_Offset_1 024a e003 | | Load 0x0,0x3 024b 1b16 | | Execute Package,Field_Read,Field_Number 0x16 024c 011c | | Execute Any,Convert_Unchecked 024d 1c01 | | Execute_Immediate Run_Utility,0x1 024e 01cc | | Execute Vector,Catenate 024f e004 | | Load 0x0,0x4 0250 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0251 e003 | | Load 0x0,0x3 0252 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0253 00db | | Load_Top At_Offset_3 0254 e404 | | Load 0x2,0x4 0255 e003 | | Load 0x0,0x3 0256 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0257 0059 | Y | Store_Top Discrete,At_Offset_1 0258 0092 02d1 | | Action Push_String_Extended,0x2d1 ; "abandon update o3 e3 " 025a 00d9 | | Load_Top At_Offset_1 025b e003 | | Load 0x0,0x3 025c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 025d 011c | | Execute Any,Convert_Unchecked 025e 1c01 | | Execute_Immediate Run_Utility,0x1 025f 01cc | | Execute Vector,Catenate 0260 e004 | | Load 0x0,0x4 0261 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0262 e003 | | Load 0x0,0x3 0263 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0264 00db | | Load_Top At_Offset_3 0265 e404 | | Load 0x2,0x4 0266 e003 | | Load 0x0,0x3 0267 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0268 0059 | Y | Store_Top Discrete,At_Offset_1 0269 0092 02cf | | Action Push_String_Extended,0x2cf ; "abandon o3 e3 " 026b 00d9 | | Load_Top At_Offset_1 026c e003 | | Load 0x0,0x3 026d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 026e 011c | | Execute Any,Convert_Unchecked 026f 1c01 | | Execute_Immediate Run_Utility,0x1 0270 01cc | | Execute Vector,Catenate 0271 e004 | | Load 0x0,0x4 0272 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0273 4801 |H | Short_Literal 0x1 0274 e004 | | Load 0x0,0x4 0275 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0276 e003 | | Load 0x0,0x3 0277 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0278 00db | | Load_Top At_Offset_3 0279 e404 | | Load 0x2,0x4 027a e003 | | Load 0x0,0x3 027b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 027c 0059 | Y | Store_Top Discrete,At_Offset_1 027d 0092 02cd | | Action Push_String_Extended,0x2cd ; "read o3 e3 " 027f 00d9 | | Load_Top At_Offset_1 0280 e003 | | Load 0x0,0x3 0281 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0282 011c | | Execute Any,Convert_Unchecked 0283 1c01 | | Execute_Immediate Run_Utility,0x1 0284 01cc | | Execute Vector,Catenate 0285 e004 | | Load 0x0,0x4 0286 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0287 e003 | | Load 0x0,0x3 0288 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0289 00db | | Load_Top At_Offset_3 028a e404 | | Load 0x2,0x4 028b e003 | | Load 0x0,0x3 028c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 028d 0059 | Y | Store_Top Discrete,At_Offset_1 028e 0092 02d0 | | Action Push_String_Extended,0x2d0 ; "update o3 e3 " 0290 00d9 | | Load_Top At_Offset_1 0291 e003 | | Load 0x0,0x3 0292 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0293 011c | | Execute Any,Convert_Unchecked 0294 1c01 | | Execute_Immediate Run_Utility,0x1 0295 01cc | | Execute Vector,Catenate 0296 e004 | | Load 0x0,0x4 0297 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0298 e003 | | Load 0x0,0x3 0299 1b16 | | Execute Package,Field_Read,Field_Number 0x16 029a 00db | | Load_Top At_Offset_3 029b e404 | | Load 0x2,0x4 029c e003 | | Load 0x0,0x3 029d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 029e 0059 | Y | Store_Top Discrete,At_Offset_1 029f 0092 02cf | | Action Push_String_Extended,0x2cf ; "abandon o3 e3 " 02a1 00d9 | | Load_Top At_Offset_1 02a2 e003 | | Load 0x0,0x3 02a3 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02a4 011c | | Execute Any,Convert_Unchecked 02a5 1c01 | | Execute_Immediate Run_Utility,0x1 02a6 01cc | | Execute Vector,Catenate 02a7 e004 | | Load 0x0,0x4 02a8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 02a9 e003 | | Load 0x0,0x3 02aa 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02ab 00db | | Load_Top At_Offset_3 02ac e404 | | Load 0x2,0x4 02ad e003 | | Load 0x0,0x3 02ae 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02af 0059 | Y | Store_Top Discrete,At_Offset_1 02b0 0092 02d1 | | Action Push_String_Extended,0x2d1 ; "abandon update o3 e3 " 02b2 00d9 | | Load_Top At_Offset_1 02b3 e003 | | Load 0x0,0x3 02b4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02b5 011c | | Execute Any,Convert_Unchecked 02b6 1c01 | | Execute_Immediate Run_Utility,0x1 02b7 01cc | | Execute Vector,Catenate 02b8 e004 | | Load 0x0,0x4 02b9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 02ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02bb ; -------------------------------------------------------------------------------------- 02bb ; STRING TABLE 02bb ; -------------------------------------------------------------------------------------- 02bb 0030 | 0 | .STRTAB 0x0030->0x02d3 ; "/u/pam" 02bc 0034 | 4 | .STRTAB 0x0034->0x02d6 ; "create o1 " 02bd 003c | < | .STRTAB 0x003c->0x02db ; "/u/pam/experiment" 02be 004b | K | .STRTAB 0x004b->0x02e3 ; "create o2 " 02bf 0053 | S | .STRTAB 0x0053->0x02e8 ; "/u/pam/experiment/test" 02c0 0067 | g | .STRTAB 0x0067->0x02f3 ; "create o3 " 02c1 006f | o | .STRTAB 0x006f->0x02f8 ; "control o1 " 02c2 0078 | x | .STRTAB 0x0078->0x02fe ; "control o2 " 02c3 0081 | | .STRTAB 0x0081->0x0303 ; "control o3 " 02c4 008a | | .STRTAB 0x008a->0x0309 ; "Is_controlled o1 = " 02c5 009b | | .STRTAB 0x009b->0x0312 ; "Is_controlled o2 = " 02c6 00ac | | .STRTAB 0x00ac->0x031c ; "Is_controlled o3 = " 02c7 00bd | | .STRTAB 0x00bd->0x0325 ; "read o1 e1_1 " 02c8 00c8 | | .STRTAB 0x00c8->0x032c ; "read o1 e1_2 " 02c9 00d3 | | .STRTAB 0x00d3->0x0332 ; "update o2 e2 " 02ca 00de | | .STRTAB 0x00de->0x0339 ; "update o2 e3 " 02cb 00e9 | | .STRTAB 0x00e9->0x033f ; "abandon o2 e2 " 02cc 00f5 | | .STRTAB 0x00f5->0x0346 ; "read o2 e3 " 02cd 00fe | | .STRTAB 0x00fe->0x034c ; "read o3 e3 " 02ce 0107 | | .STRTAB 0x0107->0x0351 ; "uncontrol o3 " 02cf 0112 | | .STRTAB 0x0112->0x0358 ; "abandon o3 e3 " 02d0 011e | | .STRTAB 0x011e->0x035f ; "update o3 e3 " 02d1 0129 | ) | .STRTAB 0x0129->0x0365 ; "abandon update o3 e3 " 02d2 013c | < | .STREND 0x013c->0x0370 02d3 2f75 2f70 |/u/p| .STRTAB_STRINGS 0370 ; -------------------------------------------------------------------------------------- 0370 ; Debug Table 0370 ; -------------------------------------------------------------------------------------- 0370 0004 0001 | | .DEBUG4 0x0004,0x0001,0xa1c1,0x0000,0x0001,0x0002 0376 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000 037a 001b 037e | ~| .DBG4T 0x001b,0x037e,0x8001,0x8000 037e ; -------------------------------------------------------------------------------------- 037e ; Debug chain 037e ; -------------------------------------------------------------------------------------- 037e 0004 0053 | S| .DBGLEN 0x0004,0x0053 0380 001b 0021 | !| .DBGLNO 0x001b,0x0021,0x0029,0x002c,0x002e,0x0033,0x0038,0x003d,0x0042,0x004e,0x0059,0x0065,0x0070,0x007c,0x0087,0x008a,0x0090,0x009a,0x00a0,0x00aa,0x00b0,0x00ba,0x00c0,0x00ca,0x00cd,0x00d8,0x00e3,0x00ee,0x00f1,0x00f8,0x0102,0x0109,0x0113,0x0116,0x011d,0x0127,0x012e,0x0138,0x013b,0x0142,0x014c,0x0153,0x015d,0x0164,0x016e,0x0171,0x0178,0x0182,0x0188,0x0192,0x0199,0x01a3,0x01a9,0x01b3,0x01b6,0x01bc,0x01c6,0x01cd,0x01d7,0x01dd,0x01e7,0x01ee,0x01f8,0x01fe,0x0208,0x020b,0x0211,0x021b,0x0222,0x022c,0x0233,0x023d,0x0240,0x0247,0x0251,0x0258,0x0262,0x0269,0x0273,0x0276,0x027d,0x0287,0x028e,0x0298,0x029f,0x02a9,0x02b0 03d7 0002 0003 | | .XXX[0x4] 03d9 0004 0005 | | 03db 0000 0000 | | .BLANK 0000[0x25]