|
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 - metrics - download
Length: 2048 (0x800)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0bf8df
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 03b0 | | .CONST 0x03b0 ; 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 002c | , | .CONST 0x002c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0017 | | .CONST 0x0017 ; Number of locals
000b INIT_0008:
000b 029a 0033 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0030
000d 029a 008b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0088
000f 029a 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8
0011 029a 014b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0148
0013 029a 0183 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0180
0015 029a 01cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01c8
0017 029a 0213 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0210
0019 029a 02b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02b0
001b 00bf | | Action Accept_Activation
001c 1d10 | | Execute_Immediate Reference_Lex_1,0x10
001d 00c7 | | Action Elaborate_Subprogram
001e 1d11 | | Execute_Immediate Reference_Lex_1,0x11
001f 00c7 | | Action Elaborate_Subprogram
0020 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0021 00c7 | | Action Elaborate_Subprogram
0022 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0023 00c7 | | Action Elaborate_Subprogram
0024 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0025 00c7 | | Action Elaborate_Subprogram
0026 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0027 00c7 | | Action Elaborate_Subprogram
0028 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0029 00c7 | | Action Elaborate_Subprogram
002a 1d17 | | Execute_Immediate Reference_Lex_1,0x17
002b 00c7 | | Action Elaborate_Subprogram
002c BODY_0008:
002c 00bc | | Action Signal_Activated
002d 00bb | | Action Signal_Completion
002e 0000 0000 | | .XXX[0x2]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0046 | F | .CONST 0x0046 ; Address of begin
0031 007e | ~ | .CONST 0x007e ; Address of exception handler
0032 0004 | | .CONST 0x0004 ; Number of locals
0033 INIT_0030:
0033 e002 | | Load 0x0,0x2
0034 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0035 02c7 | | Declare_Variable Any
0036 e002 | | Load 0x0,0x2
0037 180e | | Execute Package,Field_Execute,Field_Number 0xe
0038 a402 | | Store_Unchecked 0x2,0x2
0039 e002 | | Load 0x0,0x2
003a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
003b 02c7 | | Declare_Variable Any
003c 0092 02d0 | | Action Push_String_Extended,0x2d0 ; "Prefix=(Yr_Mn_Dy, Hr_Mn_Sc, Symbols), :::|---|+++|>>>|++*|!!!|***|%%%"
003e e002 | | Load 0x0,0x2
003f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0040 a403 | | Store_Unchecked 0x2,0x3
0041 e003 | | Load 0x0,0x3
0042 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0043 02c7 | | Declare_Variable Any
0044 00d8 | | Load_Top At_Offset_0
0045 1c00 | | Execute_Immediate Run_Utility,0x0
0046 BODY_0030:
0046 e5ff | | Load 0x2,-0x1
0047 01db | | Execute Vector,Length
0048 7001 |p | Jump_Nonzero 0x4a
0049 4502 |E | Exit_Subprogram 0x2
004a 00d9 | | Load_Top At_Offset_1
004b e002 | | Load 0x0,0x2
004c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
004d e20f | | Load 0x1,0xf
004e e003 | | Load 0x0,0x3
004f 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0050 e002 | | Load 0x0,0x2
0051 180e | | Execute Package,Field_Execute,Field_Number 0xe
0052 4803 |H | Short_Literal 0x3
0053 e5ff | | Load 0x2,-0x1
0054 e004 | | Load 0x0,0x4
0055 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0056 e003 | | Load 0x0,0x3
0057 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0058 e20e | | Load 0x1,0xe
0059 8005 | | Call 0x0,0x5
005a 7008 |p | Jump_Nonzero 0x63
005b 00d8 | | Load_Top At_Offset_0
005c 00ea | | Load_Encached Null_String_Cache
005d e20e | | Load 0x1,0xe
005e 4801 |H | Short_Literal 0x1
005f e003 | | Load 0x0,0x3
0060 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0061 c404 | | Store 0x2,0x4
0062 7806 |x | Jump 0x69
0063 00d8 | | Load_Top At_Offset_0
0064 00ea | | Load_Encached Null_String_Cache
0065 e20e | | Load 0x1,0xe
0066 e003 | | Load 0x0,0x3
0067 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0068 c404 | | Store 0x2,0x4
0069 00d8 | | Load_Top At_Offset_0
006a e003 | | Load 0x0,0x3
006b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
006c e002 | | Load 0x0,0x2
006d 180e | | Execute Package,Field_Execute,Field_Number 0xe
006e 4803 |H | Short_Literal 0x3
006f e5ff | | Load 0x2,-0x1
0070 e004 | | Load 0x0,0x4
0071 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0072 e003 | | Load 0x0,0x3
0073 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0074 e002 | | Load 0x0,0x2
0075 180e | | Execute Package,Field_Execute,Field_Number 0xe
0076 4803 |H | Short_Literal 0x3
0077 e5ff | | Load 0x2,-0x1
0078 e004 | | Load 0x0,0x4
0079 1813 | | Execute Package,Field_Execute,Field_Number 0x13
007a 00da | | Load_Top At_Offset_2
007b e002 | | Load 0x0,0x2
007c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
007d 4502 |E | Exit_Subprogram 0x2
007e TRAP_0030:
007e 0007 | | Action Break_Optional
007f 00db | | Load_Top At_Offset_3
0080 e002 | | Load 0x0,0x2
0081 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0082 00d8 | | Load_Top At_Offset_0
0083 0101 | | Execute Exception,Reraise
0084 0000 0000 | | .BLANK 0000[0x4]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 009e | | .CONST 0x009e ; Address of begin
0089 00de | | .CONST 0x00de ; Address of exception handler
008a 0004 | | .CONST 0x0004 ; Number of locals
008b INIT_0088:
008b e002 | | Load 0x0,0x2
008c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
008d 02c7 | | Declare_Variable Any
008e e002 | | Load 0x0,0x2
008f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0090 a402 | | Store_Unchecked 0x2,0x2
0091 e002 | | Load 0x0,0x2
0092 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0093 02c7 | | Declare_Variable Any
0094 0092 02d0 | | Action Push_String_Extended,0x2d0 ; "Prefix=(Yr_Mn_Dy, Hr_Mn_Sc, Symbols), :::|---|+++|>>>|++*|!!!|***|%%%"
0096 e002 | | Load 0x0,0x2
0097 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0098 a403 | | Store_Unchecked 0x2,0x3
0099 e003 | | Load 0x0,0x3
009a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
009b 02c7 | | Declare_Variable Any
009c 00d8 | | Load_Top At_Offset_0
009d 1c00 | | Execute_Immediate Run_Utility,0x0
009e BODY_0088:
009e e5ff | | Load 0x2,-0x1
009f 01db | | Execute Vector,Length
00a0 7003 |p | Jump_Nonzero 0xa4
00a1 e20f | | Load 0x1,0xf
00a2 8006 | | Call 0x0,0x6
00a3 4502 |E | Exit_Subprogram 0x2
00a4 00d9 | | Load_Top At_Offset_1
00a5 e002 | | Load 0x0,0x2
00a6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00a7 00d8 | | Load_Top At_Offset_0
00a8 00ea | | Load_Encached Null_String_Cache
00a9 e20f | | Load 0x1,0xf
00aa e003 | | Load 0x0,0x3
00ab 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00ac c404 | | Store 0x2,0x4
00ad 00d8 | | Load_Top At_Offset_0
00ae e003 | | Load 0x0,0x3
00af 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00b0 e002 | | Load 0x0,0x2
00b1 180e | | Execute Package,Field_Execute,Field_Number 0xe
00b2 4803 |H | Short_Literal 0x3
00b3 e5ff | | Load 0x2,-0x1
00b4 e004 | | Load 0x0,0x4
00b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b6 e003 | | Load 0x0,0x3
00b7 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
00b8 e20f | | Load 0x1,0xf
00b9 8006 | | Call 0x0,0x6
00ba 00d8 | | Load_Top At_Offset_0
00bb 00ea | | Load_Encached Null_String_Cache
00bc e20e | | Load 0x1,0xe
00bd e003 | | Load 0x0,0x3
00be 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00bf c404 | | Store 0x2,0x4
00c0 00d8 | | Load_Top At_Offset_0
00c1 e003 | | Load 0x0,0x3
00c2 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00c3 4801 |H | Short_Literal 0x1
00c4 e003 | | Load 0x0,0x3
00c5 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00c6 e002 | | Load 0x0,0x2
00c7 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c8 4803 |H | Short_Literal 0x3
00c9 e5ff | | Load 0x2,-0x1
00ca e004 | | Load 0x0,0x4
00cb 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00cc 4802 |H | Short_Literal 0x2
00cd e003 | | Load 0x0,0x3
00ce 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00cf e003 | | Load 0x0,0x3
00d0 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
00d1 4801 |H | Short_Literal 0x1
00d2 e003 | | Load 0x0,0x3
00d3 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
00d4 e002 | | Load 0x0,0x2
00d5 180e | | Execute Package,Field_Execute,Field_Number 0xe
00d6 4803 |H | Short_Literal 0x3
00d7 e5ff | | Load 0x2,-0x1
00d8 e004 | | Load 0x0,0x4
00d9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00da 00da | | Load_Top At_Offset_2
00db e002 | | Load 0x0,0x2
00dc 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00dd 4502 |E | Exit_Subprogram 0x2
00de TRAP_0088:
00de 0007 | | Action Break_Optional
00df 00db | | Load_Top At_Offset_3
00e0 e002 | | Load 0x0,0x2
00e1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00e2 00d8 | | Load_Top At_Offset_0
00e3 0101 | | Execute Exception,Reraise
00e4 0000 0000 | | .BLANK 0000[0x4]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00fe | | .CONST 0x00fe ; Address of begin
00e9 013e | > | .CONST 0x013e ; Address of exception handler
00ea 0004 | | .CONST 0x0004 ; Number of locals
00eb INIT_00e8:
00eb e002 | | Load 0x0,0x2
00ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ed 02c7 | | Declare_Variable Any
00ee e002 | | Load 0x0,0x2
00ef 180e | | Execute Package,Field_Execute,Field_Number 0xe
00f0 a402 | | Store_Unchecked 0x2,0x2
00f1 e002 | | Load 0x0,0x2
00f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f3 02c7 | | Declare_Variable Any
00f4 0092 02d0 | | Action Push_String_Extended,0x2d0 ; "Prefix=(Yr_Mn_Dy, Hr_Mn_Sc, Symbols), :::|---|+++|>>>|++*|!!!|***|%%%"
00f6 e002 | | Load 0x0,0x2
00f7 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
00f8 a403 | | Store_Unchecked 0x2,0x3
00f9 e003 | | Load 0x0,0x3
00fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fb 02c7 | | Declare_Variable Any
00fc 00d8 | | Load_Top At_Offset_0
00fd 1c00 | | Execute_Immediate Run_Utility,0x0
00fe BODY_00e8:
00fe e5ff | | Load 0x2,-0x1
00ff 01db | | Execute Vector,Length
0100 7003 |p | Jump_Nonzero 0x104
0101 e20f | | Load 0x1,0xf
0102 8006 | | Call 0x0,0x6
0103 4502 |E | Exit_Subprogram 0x2
0104 00d9 | | Load_Top At_Offset_1
0105 e002 | | Load 0x0,0x2
0106 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0107 00d8 | | Load_Top At_Offset_0
0108 00ea | | Load_Encached Null_String_Cache
0109 e20f | | Load 0x1,0xf
010a e003 | | Load 0x0,0x3
010b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
010c c404 | | Store 0x2,0x4
010d 00d8 | | Load_Top At_Offset_0
010e e003 | | Load 0x0,0x3
010f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0110 e002 | | Load 0x0,0x2
0111 180e | | Execute Package,Field_Execute,Field_Number 0xe
0112 4805 |H | Short_Literal 0x5
0113 e5ff | | Load 0x2,-0x1
0114 e004 | | Load 0x0,0x4
0115 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0116 e003 | | Load 0x0,0x3
0117 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0118 e20f | | Load 0x1,0xf
0119 8006 | | Call 0x0,0x6
011a 00d8 | | Load_Top At_Offset_0
011b 00ea | | Load_Encached Null_String_Cache
011c e20e | | Load 0x1,0xe
011d e003 | | Load 0x0,0x3
011e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
011f c404 | | Store 0x2,0x4
0120 00d8 | | Load_Top At_Offset_0
0121 e003 | | Load 0x0,0x3
0122 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0123 4801 |H | Short_Literal 0x1
0124 e003 | | Load 0x0,0x3
0125 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0126 e002 | | Load 0x0,0x2
0127 180e | | Execute Package,Field_Execute,Field_Number 0xe
0128 4805 |H | Short_Literal 0x5
0129 e5ff | | Load 0x2,-0x1
012a e004 | | Load 0x0,0x4
012b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
012c 4802 |H | Short_Literal 0x2
012d e003 | | Load 0x0,0x3
012e 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
012f e003 | | Load 0x0,0x3
0130 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0131 4801 |H | Short_Literal 0x1
0132 e003 | | Load 0x0,0x3
0133 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0134 e002 | | Load 0x0,0x2
0135 180e | | Execute Package,Field_Execute,Field_Number 0xe
0136 4805 |H | Short_Literal 0x5
0137 e5ff | | Load 0x2,-0x1
0138 e004 | | Load 0x0,0x4
0139 1813 | | Execute Package,Field_Execute,Field_Number 0x13
013a 00da | | Load_Top At_Offset_2
013b e002 | | Load 0x0,0x2
013c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
013d 4502 |E | Exit_Subprogram 0x2
013e TRAP_00e8:
013e 0007 | | Action Break_Optional
013f 00db | | Load_Top At_Offset_3
0140 e002 | | Load 0x0,0x2
0141 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0142 00d8 | | Load_Top At_Offset_0
0143 0101 | | Execute Exception,Reraise
0144 0000 0000 | | .BLANK 0000[0x4]
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 0092 02d1 | | Action Push_String_Extended,0x2d1 ; "---- Beginning Process: "
014d 00db | | Load_Top At_Offset_3
014e 01cc | | Execute Vector,Catenate
014f 0007 | | Action Break_Optional
0150 e003 | | Load 0x0,0x3
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 00d8 | | Load_Top At_Offset_0
0156 00ea | | Load_Encached Null_String_Cache
0157 e20f | | Load 0x1,0xf
0158 e003 | | Load 0x0,0x3
0159 1817 | | Execute Package,Field_Execute,Field_Number 0x17
015a c403 | | Store 0x2,0x3
015b 4802 |H | Short_Literal 0x2
015c 00d9 | | Load_Top At_Offset_1
015d e003 | | Load 0x0,0x3
015e 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
015f 00d9 | | Load_Top At_Offset_1
0160 00d9 | | Load_Top At_Offset_1
0161 e003 | | Load 0x0,0x3
0162 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0163 00d8 | | Load_Top At_Offset_0
0164 e003 | | Load 0x0,0x3
0165 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0166 c403 | | Store 0x2,0x3
0167 00d8 | | Load_Top At_Offset_0
0168 00ea | | Load_Encached Null_String_Cache
0169 e20e | | Load 0x1,0xe
016a e003 | | Load 0x0,0x3
016b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
016c c403 | | Store 0x2,0x3
016d 4802 |H | Short_Literal 0x2
016e 00d9 | | Load_Top At_Offset_1
016f e003 | | Load 0x0,0x3
0170 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0171 00d9 | | Load_Top At_Offset_1
0172 00d9 | | Load_Top At_Offset_1
0173 e003 | | Load 0x0,0x3
0174 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0175 00d8 | | Load_Top At_Offset_0
0176 e003 | | Load 0x0,0x3
0177 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0178 c403 | | Store 0x2,0x3
0179 4802 |H | Short_Literal 0x2
017a e003 | | Load 0x0,0x3
017b 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
017c 00d9 | | Load_Top At_Offset_1
017d e003 | | Load 0x0,0x3
017e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
017f 4502 |E | Exit_Subprogram 0x2
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 018d | | .CONST 0x018d ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0003 | | .CONST 0x0003 ; Number of locals
0183 INIT_0180:
0183 0092 02d2 | | Action Push_String_Extended,0x2d2 ; "%%%% Process Failure: "
0185 00db | | Load_Top At_Offset_3
0186 01cc | | Execute Vector,Catenate
0187 0007 | | Action Break_Optional
0188 e003 | | Load 0x0,0x3
0189 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018a 02c7 | | Declare_Variable Any
018b 00d8 | | Load_Top At_Offset_0
018c 1c00 | | Execute_Immediate Run_Utility,0x0
018d BODY_0180:
018d 00d8 | | Load_Top At_Offset_0
018e 00ea | | Load_Encached Null_String_Cache
018f e20f | | Load 0x1,0xf
0190 e003 | | Load 0x0,0x3
0191 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0192 c403 | | Store 0x2,0x3
0193 4801 |H | Short_Literal 0x1
0194 00d9 | | Load_Top At_Offset_1
0195 e003 | | Load 0x0,0x3
0196 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0197 00d9 | | Load_Top At_Offset_1
0198 00d9 | | Load_Top At_Offset_1
0199 e003 | | Load 0x0,0x3
019a 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
019b 4801 |H | Short_Literal 0x1
019c 00d9 | | Load_Top At_Offset_1
019d e003 | | Load 0x0,0x3
019e 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
019f 00d8 | | Load_Top At_Offset_0
01a0 e003 | | Load 0x0,0x3
01a1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01a2 c403 | | Store 0x2,0x3
01a3 00d8 | | Load_Top At_Offset_0
01a4 00ea | | Load_Encached Null_String_Cache
01a5 e20e | | Load 0x1,0xe
01a6 e003 | | Load 0x0,0x3
01a7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01a8 c403 | | Store 0x2,0x3
01a9 4801 |H | Short_Literal 0x1
01aa 00d9 | | Load_Top At_Offset_1
01ab e003 | | Load 0x0,0x3
01ac 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
01ad 00d9 | | Load_Top At_Offset_1
01ae 00d9 | | Load_Top At_Offset_1
01af e003 | | Load 0x0,0x3
01b0 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
01b1 4801 |H | Short_Literal 0x1
01b2 00d9 | | Load_Top At_Offset_1
01b3 e003 | | Load 0x0,0x3
01b4 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
01b5 00d8 | | Load_Top At_Offset_0
01b6 e003 | | Load 0x0,0x3
01b7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01b8 c403 | | Store 0x2,0x3
01b9 4801 |H | Short_Literal 0x1
01ba e003 | | Load 0x0,0x3
01bb 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
01bc 00d9 | | Load_Top At_Offset_1
01bd e003 | | Load 0x0,0x3
01be 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01bf 4801 |H | Short_Literal 0x1
01c0 e003 | | Load 0x0,0x3
01c1 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
01c2 4502 |E | Exit_Subprogram 0x2
01c3 0000 0000 | | .BLANK 0000[0x5]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d5 | | .CONST 0x01d5 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0003 | | .CONST 0x0003 ; Number of locals
01cb INIT_01c8:
01cb 0092 02d3 | | Action Push_String_Extended,0x2d3 ; "------- Beginning step: "
01cd 00db | | Load_Top At_Offset_3
01ce 01cc | | Execute Vector,Catenate
01cf 0007 | | Action Break_Optional
01d0 e003 | | Load 0x0,0x3
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 BODY_01c8:
01d5 00d8 | | Load_Top At_Offset_0
01d6 00ea | | Load_Encached Null_String_Cache
01d7 e20f | | Load 0x1,0xf
01d8 e003 | | Load 0x0,0x3
01d9 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01da c403 | | Store 0x2,0x3
01db 4801 |H | Short_Literal 0x1
01dc 00d9 | | Load_Top At_Offset_1
01dd e003 | | Load 0x0,0x3
01de 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
01df 00d9 | | Load_Top At_Offset_1
01e0 00d9 | | Load_Top At_Offset_1
01e1 e003 | | Load 0x0,0x3
01e2 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
01e3 4801 |H | Short_Literal 0x1
01e4 00d9 | | Load_Top At_Offset_1
01e5 e003 | | Load 0x0,0x3
01e6 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
01e7 00d8 | | Load_Top At_Offset_0
01e8 e003 | | Load 0x0,0x3
01e9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ea c403 | | Store 0x2,0x3
01eb 00d8 | | Load_Top At_Offset_0
01ec 00ea | | Load_Encached Null_String_Cache
01ed e20e | | Load 0x1,0xe
01ee e003 | | Load 0x0,0x3
01ef 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01f0 c403 | | Store 0x2,0x3
01f1 4801 |H | Short_Literal 0x1
01f2 00d9 | | Load_Top At_Offset_1
01f3 e003 | | Load 0x0,0x3
01f4 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
01f5 00d9 | | Load_Top At_Offset_1
01f6 00d9 | | Load_Top At_Offset_1
01f7 e003 | | Load 0x0,0x3
01f8 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
01f9 00d8 | | Load_Top At_Offset_0
01fa e003 | | Load 0x0,0x3
01fb 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01fc c403 | | Store 0x2,0x3
01fd 4801 |H | Short_Literal 0x1
01fe e003 | | Load 0x0,0x3
01ff 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0200 00d9 | | Load_Top At_Offset_1
0201 e003 | | Load 0x0,0x3
0202 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0203 00d8 | | Load_Top At_Offset_0
0204 00ea | | Load_Encached Null_String_Cache
0205 e5fe | | Load 0x2,-0x2
0206 4801 |H | Short_Literal 0x1
0207 e003 | | Load 0x0,0x3
0208 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0209 c403 | | Store 0x2,0x3
020a 00d8 | | Load_Top At_Offset_0
020b e003 | | Load 0x0,0x3
020c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
020d 00d8 | | Load_Top At_Offset_0
020e c5fd | | Store 0x2,-0x3
020f 4503 |E | Exit_Subprogram 0x3
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0226 | & | .CONST 0x0226 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0004 | | .CONST 0x0004 ; Number of locals
0213 INIT_0210:
0213 e003 | | Load 0x0,0x3
0214 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0215 02c7 | | Declare_Variable Any
0216 00d8 | | Load_Top At_Offset_0
0217 1c00 | | Execute_Immediate Run_Utility,0x0
0218 e002 | | Load 0x0,0x2
0219 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021a 02c7 | | Declare_Variable Any
021b e002 | | Load 0x0,0x2
021c 180e | | Execute Package,Field_Execute,Field_Number 0xe
021d a403 | | Store_Unchecked 0x2,0x3
021e e002 | | Load 0x0,0x2
021f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0220 02c7 | | Declare_Variable Any
0221 0092 02d4 | | Action Push_String_Extended,0x2d4 ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
0223 e002 | | Load 0x0,0x2
0224 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0225 a404 | | Store_Unchecked 0x2,0x4
0226 BODY_0210:
0226 e5fe | | Load 0x2,-0x2
0227 e003 | | Load 0x0,0x3
0228 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0229 012e | . | Execute Any,Not_Equal
022a 6823 |h# | Jump_Zero 0x24e
022b e002 | | Load 0x0,0x2
022c 180e | | Execute Package,Field_Execute,Field_Number 0xe
022d 4806 |H | Short_Literal 0x6
022e 0092 02d5 | | Action Push_String_Extended,0x2d5 ; "This procedure disturbs the io stack"
0230 e004 | | Load 0x0,0x4
0231 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0232 00cf | | Action Mark_Auxiliary
0233 4832 |H2 | Short_Literal 0x32
0234 4801 |H | Short_Literal 0x1
0235 0007 | | Action Break_Optional
0236 e003 | | Load 0x0,0x3
0237 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0238 e5fe | | Load 0x2,-0x2
0239 e003 | | Load 0x0,0x3
023a 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
023b 012f | / | Execute Any,Equal
023c 6802 |h | Jump_Zero 0x23f
023d 00d2 | | Pop_Control Pop_Count_2
023e 7802 |x | Jump 0x241
023f 00c8 | | Action Pop_Auxiliary_Range
0240 3ff5 |? | Loop_Increasing 0x236
0241 00ce | | Action Pop_Auxiliary
0242 e5fe | | Load 0x2,-0x2
0243 e003 | | Load 0x0,0x3
0244 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0245 012e | . | Execute Any,Not_Equal
0246 6807 |h | Jump_Zero 0x24e
0247 e002 | | Load 0x0,0x2
0248 180e | | Execute Package,Field_Execute,Field_Number 0xe
0249 4806 |H | Short_Literal 0x6
024a 0092 02d6 | | Action Push_String_Extended,0x2d6 ; "The io stack is corrupt"
024c e004 | | Load 0x0,0x4
024d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
024e 00d8 | | Load_Top At_Offset_0
024f e002 | | Load 0x0,0x2
0250 180e | | Execute Package,Field_Execute,Field_Number 0xe
0251 012e | . | Execute Any,Not_Equal
0252 680c |h | Jump_Zero 0x25f
0253 00d8 | | Load_Top At_Offset_0
0254 e002 | | Load 0x0,0x2
0255 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0256 00d8 | | Load_Top At_Offset_0
0257 c403 | | Store 0x2,0x3
0258 e002 | | Load 0x0,0x2
0259 180e | | Execute Package,Field_Execute,Field_Number 0xe
025a 4806 |H | Short_Literal 0x6
025b 0092 02d7 | | Action Push_String_Extended,0x2d7 ; "This procedure changes the starting profile"
025d e004 | | Load 0x0,0x4
025e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
025f e003 | | Load 0x0,0x3
0260 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0261 e5fe | | Load 0x2,-0x2
0262 e003 | | Load 0x0,0x3
0263 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0264 6804 |h | Jump_Zero 0x269
0265 e5fe | | Load 0x2,-0x2
0266 e003 | | Load 0x0,0x3
0267 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0268 c5fe | | Store 0x2,-0x2
0269 4800 |H | Short_Literal 0x0
026a 4800 |H | Short_Literal 0x0
026b 4800 |H | Short_Literal 0x0
026c 4801 |H | Short_Literal 0x1
026d 4801 |H | Short_Literal 0x1
026e 4800 |H | Short_Literal 0x0
026f 4801 |H | Short_Literal 0x1
0270 4801 |H | Short_Literal 0x1
0271 4800 |H | Short_Literal 0x0
0272 4800 |H | Short_Literal 0x0
0273 4800 |H | Short_Literal 0x0
0274 4800 |H | Short_Literal 0x0
0275 e5ff | | Load 0x2,-0x1
0276 0092 02d8 | | Action Push_String_Extended,0x2d8 ; "_Errors"
0278 01cc | | Execute Vector,Catenate
0279 e5ff | | Load 0x2,-0x1
027a e004 | | Load 0x0,0x4
027b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
027c 0092 02d9 | | Action Push_String_Extended,0x2d9 ; "<QUIET>"
027e e002 | | Load 0x0,0x2
027f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0280 e002 | | Load 0x0,0x2
0281 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0282 e20f | | Load 0x1,0xf
0283 e5ff | | Load 0x2,-0x1
0284 e007 | | Load 0x0,0x7
0285 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0286 e20e | | Load 0x1,0xe
0287 e5ff | | Load 0x2,-0x1
0288 0092 02d8 | | Action Push_String_Extended,0x2d8 ; "_Errors"
028a 01cc | | Execute Vector,Catenate
028b e007 | | Load 0x0,0x7
028c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
028d 00ea | | Load_Encached Null_String_Cache
028e e5ff | | Load 0x2,-0x1
028f 0092 02d8 | | Action Push_String_Extended,0x2d8 ; "_Errors"
0291 01cc | | Execute Vector,Catenate
0292 e007 | | Load 0x0,0x7
0293 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0294 00d9 | | Load_Top At_Offset_1
0295 e002 | | Load 0x0,0x2
0296 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0297 0092 02da | | Action Push_String_Extended,0x2da ; "<ERRORS>"
0299 0092 02db | | Action Push_String_Extended,0x2db ; "<DIRECTORIES>"
029b 4801 |H | Short_Literal 0x1
029c 0092 02dc | | Action Push_String_Extended,0x2dc ; "["
029e e5ff | | Load 0x2,-0x1
029f 01cc | | Execute Vector,Catenate
02a0 0092 02dd | | Action Push_String_Extended,0x2dd ; ","
02a2 01cc | | Execute Vector,Catenate
02a3 e5ff | | Load 0x2,-0x1
02a4 01cc | | Execute Vector,Catenate
02a5 0092 02de | | Action Push_String_Extended,0x2de ; "_Errors]"
02a7 01cc | | Execute Vector,Catenate
02a8 e008 | | Load 0x0,0x8
02a9 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02aa 4502 |E | Exit_Subprogram 0x2
02ab 0000 0000 | | .BLANK 0000[0x5]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b8 | | .CONST 0x02b8 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0002 | | .CONST 0x0002 ; Number of locals
02b3 INIT_02b0:
02b3 e003 | | Load 0x0,0x3
02b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b5 02c7 | | Declare_Variable Any
02b6 00d8 | | Load_Top At_Offset_0
02b7 1c00 | | Execute_Immediate Run_Utility,0x0
02b8 BODY_02b0:
02b8 00d8 | | Load_Top At_Offset_0
02b9 00ea | | Load_Encached Null_String_Cache
02ba e20e | | Load 0x1,0xe
02bb e003 | | Load 0x0,0x3
02bc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02bd c402 | | Store 0x2,0x2
02be 00d8 | | Load_Top At_Offset_0
02bf e003 | | Load 0x0,0x3
02c0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
02c1 e002 | | Load 0x0,0x2
02c2 180e | | Execute Package,Field_Execute,Field_Number 0xe
02c3 e5fe | | Load 0x2,-0x2
02c4 e5ff | | Load 0x2,-0x1
02c5 e004 | | Load 0x0,0x4
02c6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02c7 e003 | | Load 0x0,0x3
02c8 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
02c9 e002 | | Load 0x0,0x2
02ca 180e | | Execute Package,Field_Execute,Field_Number 0xe
02cb e5fe | | Load 0x2,-0x2
02cc e5ff | | Load 0x2,-0x1
02cd e004 | | Load 0x0,0x4
02ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02cf 4503 |E | Exit_Subprogram 0x3
02d0 ; --------------------------------------------------------------------------------------
02d0 ; STRING TABLE
02d0 ; --------------------------------------------------------------------------------------
02d0 0020 | | .STRTAB 0x0020->0x02e0 ; "Prefix=(Yr_Mn_Dy, Hr_Mn_Sc, Symbols), :::|---|+++|>>>|++*|!!!|***|%%%"
; "Prefix=(Yr_Mn_Dy, Hr_Mn_Sc, Symbols), :::|---|+++|>>>|++*|!!!|***|%%%"
; "Prefix=(Yr_Mn_Dy, Hr_Mn_Sc, Symbols), :::|---|+++|>>>|++*|!!!|***|%%%"
02d1 0063 | c | .STRTAB 0x0063->0x0302 ; "---- Beginning Process: "
02d2 0079 | y | .STRTAB 0x0079->0x030e ; "%%%% Process Failure: "
02d3 008d | | .STRTAB 0x008d->0x0319 ; "------- Beginning step: "
02d4 00a3 | | .STRTAB 0x00a3->0x0325 ; "Persevere, Prefix=(Hr_Mn_Sc, Symbols),:::|---|+++|>>>|++*|!!!|***|%%%, Activity = !Machine.Release.Current.Activity"
02d5 0114 | | .STRTAB 0x0114->0x035f ; "This procedure disturbs the io stack"
02d6 0136 | 6 | .STRTAB 0x0136->0x0371 ; "The io stack is corrupt"
02d7 014b | K | .STRTAB 0x014b->0x037c ; "This procedure changes the starting profile"
02d8 0174 | t | .STRTAB 0x0174->0x0392 ; "_Errors"
; "_Errors"
; "_Errors"
02d9 0179 | y | .STRTAB 0x0179->0x0395 ; "<QUIET>"
02da 017e | ~ | .STRTAB 0x017e->0x0399 ; "<ERRORS>"
02db 0184 | | .STRTAB 0x0184->0x039d ; "<DIRECTORIES>"
02dc 018f | | .STRTAB 0x018f->0x03a3 ; "["
02dd 018e | | .STRTAB 0x018e->0x03a4 ; ","
02de 018d | | .STRTAB 0x018d->0x03a4 ; "_Errors]"
02df 0193 | | .STREND 0x0193->0x03a8
02e0 5072 6566 |Pref| .STRTAB_STRINGS
03a9 0000 0000 | | .BLANK 0000[0x7]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; Debug Table
03b0 ; --------------------------------------------------------------------------------------
03b0 0004 0002 | | .DEBUG4 0x0004,0x0002,0x28a9,0x0000,0x0001,0x0000
03b6 0000 0000 | | .XXX[0x2e]
03b8 f700 0000 | |
03ba 0924 28a9 | $( |
03bc cac9 2a49 | *I|
03be e9c9 a8a9 | |
03c0 ca85 ca0a | |
03c2 48aa 8a8b |H |
03c4 2bea 0a49 |+ I|
03c6 29ca 88aa |) |
03c8 45ca 48aa |E H |
03ca c626 2be6 | &+ |
03cc cbea 6a08 | j |
03ce a865 caa9 | e |
03d0 c92a 8a65 | * e|
03d2 c9c8 2a89 | * |
03d4 2ac8 abea |* |
03d6 0a48 aa8a | H |
03d8 8b2b ea0a | + |
03da 4929 ca88 |I) |
03dc aa44 ea6a | D j|
03de 08a8 6001 | ` |
03e0 1366 a000 | f |
03e2 911a 8000 | |
03e4 0000 0000 | | .BLANK 0000[0x4]
03e8 007b 0000 | { | .XXX[0x18]
03ea 0005 1214 | |
03ec 54e5 6495 |T d |
03ee 24f4 e4d4 |$ |
03f0 54e5 42e4 |T B |
03f2 f424 a454 | $ T|
03f4 3545 f454 |5E T|
03f6 4495 44f5 |D D |
03f8 22e5 2455 |" $U|
03fa 6313 15f3 |c |
03fc 65f5 3504 |e 5 |
03fe 5432 e554 |T2 T|