|
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_03c0fe
└─⟦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 04e0 | | .CONST 0x04e0 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0074 | t | .CONST 0x0074 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0027 | ' | .CONST 0x0027 ; Number of locals
000b INIT_0008:
000b 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
000d 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated
000f 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated
0011 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
0013 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
0015 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
0017 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated
0019 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
001b 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
001d 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated
001f 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated
0021 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated
0023 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
0025 00bf | | Action Accept_Activation
0026 00e3 | | Load_Encached Natural_Cache
0027 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0028 00e7 | | Load_Encached Duration_Cache
0029 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
002a 00e7 | | Load_Encached Duration_Cache
002b 00e7 | | Load_Encached Duration_Cache
002c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
002d 00e7 | | Load_Encached Duration_Cache
002e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
002f 00e3 | | Load_Encached Natural_Cache
0030 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0031 481e |H | Short_Literal 0x1e
0032 e002 | | Load 0x0,0x2
0033 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0034 1c08 | | Execute_Immediate Run_Utility,0x8
0035 00d8 | | Load_Top At_Offset_0
0036 1c00 | | Execute_Immediate Run_Utility,0x0
0037 4be8 |K | Short_Literal 0x3e8
0038 e002 | | Load 0x0,0x2
0039 1b0e | | Execute Package,Field_Read,Field_Number 0xe
003a 1c08 | | Execute_Immediate Run_Utility,0x8
003b 00d8 | | Load_Top At_Offset_0
003c 1c00 | | Execute_Immediate Run_Utility,0x0
003d 029b 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Unelaborated
003f e003 | | Load 0x0,0x3
0040 e004 | | Load 0x0,0x4
0041 4861 |Ha | Short_Literal 0x61
0042 00e4 | | Load_Encached Positive_Cache
0043 e005 | | Load 0x0,0x5
0044 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0045 e006 | | Load 0x0,0x6
0046 0387 | | Declare_Variable Package
0047 00d8 | | Load_Top At_Offset_0
0048 020f | | Execute Module,Activate
0049 00d8 | | Load_Top At_Offset_0
004a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
004b e007 | | Load 0x0,0x7
004c e008 | | Load 0x0,0x8
004d 4804 |H | Short_Literal 0x4
004e 0092 0389 | | Action Push_String_Extended,0x389 ; " "
0050 e009 | | Load 0x0,0x9
0051 0387 | | Declare_Variable Package
0052 00d8 | | Load_Top At_Offset_0
0053 020f | | Execute Module,Activate
0054 029d 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call
0056 029d 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call
0058 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0059 00c7 | | Action Elaborate_Subprogram
005a 1d10 | | Execute_Immediate Reference_Lex_1,0x10
005b 00c7 | | Action Elaborate_Subprogram
005c 1d11 | | Execute_Immediate Reference_Lex_1,0x11
005d 00c7 | | Action Elaborate_Subprogram
005e 1d12 | | Execute_Immediate Reference_Lex_1,0x12
005f 00c7 | | Action Elaborate_Subprogram
0060 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0061 00c7 | | Action Elaborate_Subprogram
0062 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0063 00c7 | | Action Elaborate_Subprogram
0064 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0065 00c7 | | Action Elaborate_Subprogram
0066 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0067 00c7 | | Action Elaborate_Subprogram
0068 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0069 00c7 | | Action Elaborate_Subprogram
006a 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
006b 00c7 | | Action Elaborate_Subprogram
006c 1d16 | | Execute_Immediate Reference_Lex_1,0x16
006d 00c7 | | Action Elaborate_Subprogram
006e 1d17 | | Execute_Immediate Reference_Lex_1,0x17
006f 00c7 | | Action Elaborate_Subprogram
0070 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0071 00c7 | | Action Elaborate_Subprogram
0072 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0073 00c7 | | Action Elaborate_Subprogram
0074 BODY_0008:
0074 820d | | Call 0x1,0xd
0075 00bc | | Action Signal_Activated
0076 00bb | | Action Signal_Completion
0077 0000 | | .XXX[0x1]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b e223 | # | Load 0x1,0x23
007c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
007d 4861 |Ha | Short_Literal 0x61
007e e223 | # | Load 0x1,0x23
007f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0080 c224 | $ | Store 0x1,0x24
0081 820e | | Call 0x1,0xe
0082 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0083 0000 0000 | | .BLANK 0000[0x5]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 4800 |H | Short_Literal 0x0
008c a21a | | Store_Unchecked 0x1,0x1a
008d 4800 |H | Short_Literal 0x0
008e a21b | | Store_Unchecked 0x1,0x1b
008f 4800 |H | Short_Literal 0x0
0090 a21d | | Store_Unchecked 0x1,0x1d
0091 4800 |H | Short_Literal 0x0
0092 a21e | | Store_Unchecked 0x1,0x1e
0093 4801 |H | Short_Literal 0x1
0094 a21f | | Store_Unchecked 0x1,0x1f
0095 e220 | | Load 0x1,0x20
0096 4820 |H | Short_Literal 0x20
0097 4800 |H | Short_Literal 0x0
0098 e002 | | Load 0x0,0x2
0099 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
009a 00d1 | | Pop_Control Pop_Count_1
009b e221 | ! | Load 0x1,0x21
009c 4820 |H | Short_Literal 0x20
009d 4800 |H | Short_Literal 0x0
009e e002 | | Load 0x0,0x2
009f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00a0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00a1 0000 0000 | | .BLANK 0000[0x7]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00c3 | | .CONST 0x00c3 ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0002 | | .CONST 0x0002 ; Number of locals
00ab INIT_00a8:
00ab e005 | | Load 0x0,0x5
00ac 0322 | " | Declare_Variable Record
00ad e5ff | | Load 0x2,-0x1
00ae e402 | | Load 0x2,0x2
00af 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00b0 e5fe | | Load 0x2,-0x2
00b1 e402 | | Load 0x2,0x2
00b2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00b3 e220 | | Load 0x1,0x20
00b4 e002 | | Load 0x0,0x2
00b5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b6 e00a | | Load 0x0,0xa
00b7 e00b | | Load 0x0,0xb
00b8 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
00b9 e402 | | Load 0x2,0x2
00ba 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00bb e221 | ! | Load 0x1,0x21
00bc e002 | | Load 0x0,0x2
00bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00be e00a | | Load 0x0,0xa
00bf e00b | | Load 0x0,0xb
00c0 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
00c1 e402 | | Load 0x2,0x2
00c2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00c3 BODY_00a8:
00c3 e224 | $ | Load 0x1,0x24
00c4 4800 |H | Short_Literal 0x0
00c5 e402 | | Load 0x2,0x2
00c6 e21f | | Load 0x1,0x1f
00c7 00d8 | | Load_Top At_Offset_0
00c8 00e4 | | Load_Encached Positive_Cache
00c9 0260 | ` | Execute Discrete,In_Type
00ca 7001 |p | Jump_Nonzero 0xcc
00cb 0801 | | Execute_Immediate Raise,0x1
00cc e223 | # | Load 0x1,0x23
00cd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00ce c224 | $ | Store 0x1,0x24
00cf e21f | | Load 0x1,0x1f
00d0 0a01 | | Execute_Immediate Plus,0x1
00d1 c21f | | Store 0x1,0x1f
00d2 e21a | | Load 0x1,0x1a
00d3 0a01 | | Execute_Immediate Plus,0x1
00d4 c21a | | Store 0x1,0x1a
00d5 e21b | | Load 0x1,0x1b
00d6 e5fe | | Load 0x2,-0x2
00d7 0273 | s | Execute Discrete,Plus
00d8 c21b | | Store 0x1,0x1b
00d9 e220 | | Load 0x1,0x20
00da 4820 |H | Short_Literal 0x20
00db 4800 |H | Short_Literal 0x0
00dc e002 | | Load 0x0,0x2
00dd 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00de 00d1 | | Pop_Control Pop_Count_1
00df e221 | ! | Load 0x1,0x21
00e0 4820 |H | Short_Literal 0x20
00e1 4800 |H | Short_Literal 0x0
00e2 e002 | | Load 0x0,0x2
00e3 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00e4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00e5 0000 0000 | | .XXX[0x3]
00e7 0000 | |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb e220 | | Load 0x1,0x20
00ec e002 | | Load 0x0,0x2
00ed 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00ee 6806 |h | Jump_Zero 0xf5
00ef e221 | ! | Load 0x1,0x21
00f0 4820 |H | Short_Literal 0x20
00f1 4800 |H | Short_Literal 0x0
00f2 e002 | | Load 0x0,0x2
00f3 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00f4 00d1 | | Pop_Control Pop_Count_1
00f5 e220 | | Load 0x1,0x20
00f6 e5ff | | Load 0x2,-0x1
00f7 e002 | | Load 0x0,0x2
00f8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00f9 00d1 | | Pop_Control Pop_Count_1
00fa e221 | ! | Load 0x1,0x21
00fb e5fe | | Load 0x2,-0x2
00fc 0092 0389 | | Action Push_String_Extended,0x389 ; " "
00fe 01cc | | Execute Vector,Catenate
00ff e002 | | Load 0x0,0x2
0100 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0101 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0102 0000 0000 | | .BLANK 0000[0x6]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b e221 | ! | Load 0x1,0x21
010c e002 | | Load 0x0,0x2
010d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
010e e5ff | | Load 0x2,-0x1
010f 01db | | Execute Vector,Length
0110 0273 | s | Execute Discrete,Plus
0111 e221 | ! | Load 0x1,0x21
0112 e002 | | Load 0x0,0x2
0113 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0114 027a | z | Execute Discrete,Less_Equal
0115 6809 |h | Jump_Zero 0x11f
0116 e221 | ! | Load 0x1,0x21
0117 e5ff | | Load 0x2,-0x1
0118 0092 0389 | | Action Push_String_Extended,0x389 ; " "
011a 01cc | | Execute Vector,Catenate
011b e002 | | Load 0x0,0x2
011c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
011d 00d1 | | Pop_Control Pop_Count_1
011e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
011f e00c | | Load 0x0,0xc
0120 180e | | Execute Package,Field_Execute,Field_Number 0xe
0121 4807 |H | Short_Literal 0x7
0122 0092 038a | | Action Push_String_Extended,0x38a ; "Crash/Shutdown explanation too long: "
0124 e5ff | | Load 0x2,-0x1
0125 01cc | | Execute Vector,Catenate
0126 e00d | | Load 0x0,0xd
0127 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0128 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0129 0000 0000 | | .BLANK 0000[0x7]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 013b | ; | .CONST 0x013b ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0004 | | .CONST 0x0004 ; Number of locals
0133 INIT_0130:
0133 e005 | | Load 0x0,0x5
0134 0322 | " | Declare_Variable Record
0135 00e1 | | Load_Encached Boolean_Cache
0136 0093 0000 | | push_full_address 0x0
0138 6063 |`c | Indirect_Literal Discrete,0x19c,{0x80000000, 0x00010000}
0139 0273 | s | Execute Discrete,Plus
013a 0007 | | Action Break_Optional
013b BODY_0130:
013b e21f | | Load 0x1,0x1f
013c 0c02 | | Execute_Immediate Greater_Equal,0x2
013d 685c |h\ | Jump_Zero 0x19a
013e 00e1 | | Load_Encached Boolean_Cache
013f e402 | | Load 0x2,0x2
0140 e21f | | Load 0x1,0x1f
0141 0aff | | Execute_Immediate Plus,-0x1
0142 00d8 | | Load_Top At_Offset_0
0143 00e4 | | Load_Encached Positive_Cache
0144 0260 | ` | Execute Discrete,In_Type
0145 7001 |p | Jump_Nonzero 0x147
0146 0801 | | Execute_Immediate Raise,0x1
0147 e224 | $ | Load 0x1,0x24
0148 e223 | # | Load 0x1,0x23
0149 1816 | | Execute Package,Field_Execute,Field_Number 0x16
014a 00d1 | | Pop_Control Pop_Count_1
014b c403 | | Store 0x2,0x3
014c e403 | | Load 0x2,0x3
014d 7002 |p | Jump_Nonzero 0x150
014e 00d8 | | Load_Top At_Offset_0
014f 0257 | W | Execute Discrete,Raise
0150 e5fd | | Load 0x2,-0x3
0151 0f1b | | Execute_Immediate Equal,0x1b
0152 6824 |h$ | Jump_Zero 0x177
0153 e402 | | Load 0x2,0x2
0154 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0155 6805 |h | Jump_Zero 0x15b
0156 e402 | | Load 0x2,0x2
0157 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0158 0217 | | Execute Heap_Access,All_Reference
0159 01db | | Execute Vector,Length
015a 7007 |p | Jump_Nonzero 0x162
015b e5ff | | Load 0x2,-0x1
015c e00a | | Load 0x0,0xa
015d e00b | | Load 0x0,0xb
015e 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
015f e402 | | Load 0x2,0x2
0160 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0161 7815 |x | Jump 0x177
0162 4801 |H | Short_Literal 0x1
0163 e402 | | Load 0x2,0x2
0164 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0165 0217 | | Execute Heap_Access,All_Reference
0166 e5ff | | Load 0x2,-0x1
0167 e00e | | Load 0x0,0xe
0168 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0169 700d |p | Jump_Nonzero 0x177
016a e402 | | Load 0x2,0x2
016b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
016c 0217 | | Execute Heap_Access,All_Reference
016d 0092 038b | | Action Push_String_Extended,0x38b ; "; "
016f 01cc | | Execute Vector,Catenate
0170 e5ff | | Load 0x2,-0x1
0171 01cc | | Execute Vector,Catenate
0172 e00a | | Load 0x0,0xa
0173 e00b | | Load 0x0,0xb
0174 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0175 e402 | | Load 0x2,0x2
0176 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0177 e402 | | Load 0x2,0x2
0178 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0179 7007 |p | Jump_Nonzero 0x181
017a e5fe | | Load 0x2,-0x2
017b e00a | | Load 0x0,0xa
017c e00b | | Load 0x0,0xb
017d 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
017e e402 | | Load 0x2,0x2
017f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0180 780c |x | Jump 0x18d
0181 4820 |H | Short_Literal 0x20
0182 e402 | | Load 0x2,0x2
0183 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0184 0217 | | Execute Heap_Access,All_Reference
0185 01cb | | Execute Vector,Append
0186 e5fe | | Load 0x2,-0x2
0187 01cc | | Execute Vector,Catenate
0188 e00a | | Load 0x0,0xa
0189 e00b | | Load 0x0,0xb
018a 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
018b e402 | | Load 0x2,0x2
018c 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
018d e224 | $ | Load 0x1,0x24
018e 4800 |H | Short_Literal 0x0
018f e402 | | Load 0x2,0x2
0190 e21f | | Load 0x1,0x1f
0191 0aff | | Execute_Immediate Plus,-0x1
0192 00d8 | | Load_Top At_Offset_0
0193 00e4 | | Load_Encached Positive_Cache
0194 0260 | ` | Execute Discrete,In_Type
0195 7001 |p | Jump_Nonzero 0x197
0196 0801 | | Execute_Immediate Raise,0x1
0197 e223 | # | Load 0x1,0x23
0198 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0199 c224 | $ | Store 0x1,0x24
019a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
019b 0000 | | .XXX[0x1]
019c 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3 | | .CONST 0x01a3 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 0001 | | .CONST 0x0001 ; Number of locals
01a3 BODY_01a0:
01a3 INIT_01a0:
01a3 e220 | | Load 0x1,0x20
01a4 4820 |H | Short_Literal 0x20
01a5 4800 |H | Short_Literal 0x0
01a6 e002 | | Load 0x0,0x2
01a7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
01a8 00d1 | | Pop_Control Pop_Count_1
01a9 e221 | ! | Load 0x1,0x21
01aa 4820 |H | Short_Literal 0x20
01ab 4800 |H | Short_Literal 0x0
01ac e002 | | Load 0x0,0x2
01ad 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
01ae 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01af 0000 | | .XXX[0x1]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 4802 |H | Short_Literal 0x2
01b4 e00f | | Load 0x0,0xf
01b5 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
01b6 0092 038c | | Action Push_String_Extended,0x38c ; "System Outages"
01b8 e00f | | Load 0x0,0xf
01b9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01ba 4802 |H | Short_Literal 0x2
01bb e00f | | Load 0x0,0xf
01bc 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
01bd 0092 038d | | Action Push_String_Extended,0x38d ; "Each system outage is listed, including the length"
01bf e00f | | Load 0x0,0xf
01c0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01c1 0092 038e | | Action Push_String_Extended,0x38e ; "of the outage measured from the last successful"
01c3 e00f | | Load 0x0,0xf
01c4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01c5 0092 038f | | Action Push_String_Extended,0x38f ; "snapshot to the elaboration of the environment."
01c7 e00f | | Load 0x0,0xf
01c8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01c9 0092 0390 | | Action Push_String_Extended,0x390 ; "The entered cause or system diagnosed cause and any"
01cb e00f | | Load 0x0,0xf
01cc 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01cd 0092 0391 | | Action Push_String_Extended,0x391 ; "comments entered in Shutdown or Explain_Crash are shown."
01cf e00f | | Load 0x0,0xf
01d0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
01d1 4802 |H | Short_Literal 0x2
01d2 e00f | | Load 0x0,0xf
01d3 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
01d4 4802 |H | Short_Literal 0x2
01d5 0092 0392 | | Action Push_String_Extended,0x392 ; "Time"
01d7 e225 | % | Load 0x1,0x25
01d8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01d9 4802 |H | Short_Literal 0x2
01da 0092 0393 | | Action Push_String_Extended,0x393 ; "Length"
01dc e225 | % | Load 0x1,0x25
01dd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01de 4802 |H | Short_Literal 0x2
01df 0092 0394 | | Action Push_String_Extended,0x394 ; "Cause"
01e1 e225 | % | Load 0x1,0x25
01e2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01e3 4800 |H | Short_Literal 0x0
01e4 0092 0395 | | Action Push_String_Extended,0x395 ; "Comments"
01e6 e225 | % | Load 0x1,0x25
01e7 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01e8 00cf | | Action Mark_Auxiliary
01e9 e21f | | Load 0x1,0x1f
01ea 0aff | | Execute_Immediate Plus,-0x1
01eb 4801 |H | Short_Literal 0x1
01ec 0263 | c | Execute Discrete,Above_Bound
01ed 7007 |p | Jump_Nonzero 0x1f5
01ee 00d8 | | Load_Top At_Offset_0
01ef e224 | $ | Load 0x1,0x24
01f0 e223 | # | Load 0x1,0x23
01f1 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01f2 8227 | ' | Call 0x1,0x27
01f3 00c8 | | Action Pop_Auxiliary_Range
01f4 3ff9 |? | Loop_Increasing 0x1ee
01f5 00ce | | Action Pop_Auxiliary
01f6 e00f | | Load 0x0,0xf
01f7 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
01f8 e225 | % | Load 0x1,0x25
01f9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01fa e5ff | | Load 0x2,-0x1
01fb 8215 | | Call 0x1,0x15
01fc 0092 0396 | | Action Push_String_Extended,0x396 ; "\x0c"
01fe e00f | | Load 0x0,0xf
01ff 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0200 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0201 0000 0000 | | .BLANK 0000[0x7]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020d | | .CONST 0x020d ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0002 | | .CONST 0x0002 ; Number of locals
020b INIT_0208:
020b 029f 02a3 | | Declare_Subprogram INIT_02a0,For_Call
020d BODY_0208:
020d 4802 |H | Short_Literal 0x2
020e e00f | | Load 0x0,0xf
020f 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0210 0092 0397 | | Action Push_String_Extended,0x397 ; "System Availability Statistics"
0212 e00f | | Load 0x0,0xf
0213 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0214 8402 | | Call 0x2,0x2
0215 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0216 0000 0000 | | .XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 4801 |H | Short_Literal 0x1
021c a5ff | | Store_Unchecked 0x2,-0x1
021d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
021e 0000 0000 | | .XXX[0x2]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 e5ff | | Load 0x2,-0x1
0224 0a01 | | Execute_Immediate Plus,0x1
0225 c5ff | | Store 0x2,-0x1
0226 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0227 0000 | | .XXX[0x1]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b e5ff | | Load 0x2,-0x1
022c e21f | | Load 0x1,0x1f
022d 027b | { | Execute Discrete,Greater_Equal
022e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 e5ff | | Load 0x2,-0x1
0234 00d8 | | Load_Top At_Offset_0
0235 00e4 | | Load_Encached Positive_Cache
0236 0260 | ` | Execute Discrete,In_Type
0237 7001 |p | Jump_Nonzero 0x239
0238 0801 | | Execute_Immediate Raise,0x1
0239 e224 | $ | Load 0x1,0x24
023a e223 | # | Load 0x1,0x23
023b 1815 | | Execute Package,Field_Execute,Field_Number 0x15
023c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
023d 0000 0000 | | .XXX[0x3]
023f 0000 | |
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 e5ff | | Load 0x2,-0x1
0244 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0245 0000 0000 | | .XXX[0x3]
0247 0000 | |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b e5ff | | Load 0x2,-0x1
024c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
024d 7003 |p | Jump_Nonzero 0x251
024e 4801 |H | Short_Literal 0x1
024f a5fe | | Store_Unchecked 0x2,-0x2
0250 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0251 e5ff | | Load 0x2,-0x1
0252 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0253 0217 | | Execute Heap_Access,All_Reference
0254 01db | | Execute Vector,Length
0255 7003 |p | Jump_Nonzero 0x259
0256 4801 |H | Short_Literal 0x1
0257 a5fe | | Store_Unchecked 0x2,-0x2
0258 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0259 4801 |H | Short_Literal 0x1
025a e5ff | | Load 0x2,-0x1
025b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
025c 0217 | | Execute Heap_Access,All_Reference
025d 0092 0398 | | Action Push_String_Extended,0x398 ; "cops"
025f e00e | | Load 0x0,0xe
0260 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0261 6803 |h | Jump_Zero 0x265
0262 4801 |H | Short_Literal 0x1
0263 a5fe | | Store_Unchecked 0x2,-0x2
0264 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0265 4800 |H | Short_Literal 0x0
0266 a5fe | | Store_Unchecked 0x2,-0x2
0267 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026e | n | .CONST 0x026e ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0003 | | .CONST 0x0003 ; Number of locals
026b INIT_0268:
026b 00e1 | | Load_Encached Boolean_Cache
026c 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call
026e BODY_0268:
026e 00e1 | | Load_Encached Boolean_Cache
026f e5ff | | Load 0x2,-0x1
0270 8226 | & | Call 0x1,0x26
0271 c402 | | Store 0x2,0x2
0272 e402 | | Load 0x2,0x2
0273 6806 |h | Jump_Zero 0x27a
0274 e21e | | Load 0x1,0x1e
0275 e5ff | | Load 0x2,-0x1
0276 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0277 0273 | s | Execute Discrete,Plus
0278 c21e | | Store 0x1,0x1e
0279 7805 |x | Jump 0x27f
027a e21d | | Load 0x1,0x1d
027b e5ff | | Load 0x2,-0x1
027c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
027d 0273 | s | Execute Discrete,Plus
027e c21d | | Store 0x1,0x1d
027f e5ff | | Load 0x2,-0x1
0280 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0281 8010 | | Call 0x0,0x10
0282 e225 | % | Load 0x1,0x25
0283 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0284 e5ff | | Load 0x2,-0x1
0285 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0286 8011 | | Call 0x0,0x11
0287 e225 | % | Load 0x1,0x25
0288 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0289 e5ff | | Load 0x2,-0x1
028a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
028b 0217 | | Execute Heap_Access,All_Reference
028c 01db | | Execute Vector,Length
028d 7005 |p | Jump_Nonzero 0x293
028e 0092 0399 | | Action Push_String_Extended,0x399 ; "None"
0290 e225 | % | Load 0x1,0x25
0291 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0292 7805 |x | Jump 0x298
0293 e5ff | | Load 0x2,-0x1
0294 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0295 0217 | | Execute Heap_Access,All_Reference
0296 e225 | % | Load 0x1,0x25
0297 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0298 e5ff | | Load 0x2,-0x1
0299 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
029a 0217 | | Execute Heap_Access,All_Reference
029b 8403 | | Call 0x2,0x3
029c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
029d 0000 0000 | | .XXX[0x3]
029f 0000 | |
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02b0 | | .CONST 0x02b0 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0003 | | .CONST 0x0003 ; Number of locals
02a3 INIT_02a0:
02a3 e012 | | Load 0x0,0x12
02a4 e013 | | Load 0x0,0x13
02a5 00e6 | | Load_Encached Float_Cache
02a6 e00f | | Load 0x0,0xf
02a7 1b79 | y | Execute Package,Field_Read,Field_Number 0x79
02a8 0387 | | Declare_Variable Package
02a9 00d8 | | Load_Top At_Offset_0
02aa 020f | | Execute Module,Activate
02ab 4801 |H | Short_Literal 0x1
02ac 4806 |H | Short_Literal 0x6
02ad 00e9 | | Load_Encached String_Cache
02ae 035b | [ | Declare_Type Array,Constrained
02af 0337 | 7 | Declare_Variable Array
02b0 BODY_02a0:
02b0 0092 039a | | Action Push_String_Extended,0x39a ; "Total Outages = "
02b2 e21a | | Load 0x1,0x1a
02b3 00e0 | | Load_Encached Standard_Cache
02b4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02b5 01cc | | Execute Vector,Catenate
02b6 e00f | | Load 0x0,0xf
02b7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02b8 0092 039b | | Action Push_String_Extended,0x39b ; "Total Downtime = "
02ba e21b | | Load 0x1,0x1b
02bb 8011 | | Call 0x0,0x11
02bc 01cc | | Execute Vector,Catenate
02bd e00f | | Load 0x0,0xf
02be 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02bf 0092 039c | | Action Push_String_Extended,0x39c ; "Total report time = "
02c1 e5ff | | Load 0x2,-0x1
02c2 8011 | | Call 0x0,0x11
02c3 01cc | | Execute Vector,Catenate
02c4 e00f | | Load 0x0,0xf
02c5 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02c6 0092 039d | | Action Push_String_Extended,0x39d ; "Downtime due to system problems = "
02c8 e21d | | Load 0x1,0x1d
02c9 8011 | | Call 0x0,0x11
02ca 01cc | | Execute Vector,Catenate
02cb e00f | | Load 0x0,0xf
02cc 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02cd 0092 039e | | Action Push_String_Extended,0x39e ; "Downtime due to planned operations = "
02cf e21e | | Load 0x1,0x1e
02d0 8011 | | Call 0x0,0x11
02d1 01cc | | Execute Vector,Catenate
02d2 e00f | | Load 0x0,0xf
02d3 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02d4 e5ff | | Load 0x2,-0x1
02d5 6837 |h7 | Jump_Zero 0x30d
02d6 00d8 | | Load_Top At_Offset_0
02d7 4800 |H | Short_Literal 0x0
02d8 4800 |H | Short_Literal 0x0
02d9 583e |X> | Indirect_Literal Float,0x318,100.0
02da 5839 |X9 | Indirect_Literal Float,0x314,1.0
02db e21b | | Load 0x1,0x1b
02dc 0237 | 7 | Execute Float,Convert_From_Discrete
02dd 5832 |X2 | Indirect_Literal Float,0x310,3.0517578125e-05
02de 023b | ; | Execute Float,Times
02df e5ff | | Load 0x2,-0x1
02e0 0237 | 7 | Execute Float,Convert_From_Discrete
02e1 582e |X. | Indirect_Literal Float,0x310,3.0517578125e-05
02e2 023b | ; | Execute Float,Times
02e3 023a | : | Execute Float,Divide
02e4 023c | < | Execute Float,Minus
02e5 023b | ; | Execute Float,Times
02e6 e602 | | Load 0x3,0x2
02e7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02e8 00d1 | | Pop_Control Pop_Count_1
02e9 0092 039f | | Action Push_String_Extended,0x39f ; "Total up time fraction = "
02eb e603 | | Load 0x3,0x3
02ec 01cc | | Execute Vector,Catenate
02ed e00f | | Load 0x0,0xf
02ee 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02ef 00d8 | | Load_Top At_Offset_0
02f0 4800 |H | Short_Literal 0x0
02f1 4800 |H | Short_Literal 0x0
02f2 5825 |X% | Indirect_Literal Float,0x318,100.0
02f3 5820 |X | Indirect_Literal Float,0x314,1.0
02f4 e21d | | Load 0x1,0x1d
02f5 0237 | 7 | Execute Float,Convert_From_Discrete
02f6 5819 |X | Indirect_Literal Float,0x310,3.0517578125e-05
02f7 023b | ; | Execute Float,Times
02f8 e5ff | | Load 0x2,-0x1
02f9 0237 | 7 | Execute Float,Convert_From_Discrete
02fa 5815 |X | Indirect_Literal Float,0x310,3.0517578125e-05
02fb 023b | ; | Execute Float,Times
02fc 023a | : | Execute Float,Divide
02fd 00d8 | | Load_Top At_Offset_0
02fe 00e6 | | Load_Encached Float_Cache
02ff 0234 | 4 | Execute Float,In_Type
0300 7001 |p | Jump_Nonzero 0x302
0301 0801 | | Execute_Immediate Raise,0x1
0302 023c | < | Execute Float,Minus
0303 023b | ; | Execute Float,Times
0304 e602 | | Load 0x3,0x2
0305 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0306 00d1 | | Pop_Control Pop_Count_1
0307 0092 03a0 | | Action Push_String_Extended,0x3a0 ; "System availability fraction = "
0309 e603 | | Load 0x3,0x3
030a 01cc | | Execute Vector,Catenate
030b e00f | | Load 0x0,0xf
030c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
030d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
030e 0000 0000 | | .XXX[0x2]
0310 3f00 0000 |? | .DBL 3.0517578125e-05
0312 0000 0000 | |
0314 3ff0 0000 |? | .DBL 1.0
0316 0000 0000 | |
0318 4059 0000 |@Y | .DBL 100.0
031a 0000 0000 | |
031c 0000 0000 | | .BLANK 0000[0x4]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0336 | 6 | .CONST 0x0336 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0006 | | .CONST 0x0006 ; Number of locals
0323 INIT_0320:
0323 e7ff | | Load 0x3,-0x1
0324 01da | | Execute Vector,Bounds
0325 00e9 | | Load_Encached String_Cache
0326 035b | [ | Declare_Type Array,Constrained
0327 0337 | 7 | Declare_Variable Array
0328 e7ff | | Load 0x3,-0x1
0329 e602 | | Load 0x3,0x2
032a 01d4 | | Execute Vector,Structure_Write
032b 00d8 | | Load_Top At_Offset_0
032c 01dd | | Execute Vector,First
032d 00e2 | | Load_Encached Integer_Cache
032e 03f1 | | Declare_Variable Discrete,With_Value
032f e602 | | Load 0x3,0x2
0330 01dc | | Execute Vector,Last
0331 00e2 | | Load_Encached Integer_Cache
0332 03f1 | | Declare_Variable Discrete,With_Value
0333 00e3 | | Load_Encached Natural_Cache
0334 00e3 | | Load_Encached Natural_Cache
0335 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0336 BODY_0320:
0336 00cf | | Action Mark_Auxiliary
0337 e602 | | Load 0x3,0x2
0338 01d9 | | Execute Vector,Reverse_Bounds
0339 0263 | c | Execute Discrete,Above_Bound
033a 700b |p | Jump_Nonzero 0x346
033b 00d8 | | Load_Top At_Offset_0
033c e602 | | Load 0x3,0x2
033d 01d7 | | Execute Vector,Field_Read
033e 0f0a | | Execute_Immediate Equal,0xa
033f 6804 |h | Jump_Zero 0x344
0340 4820 |H | Short_Literal 0x20
0341 e609 | | Load 0x3,0x9
0342 e602 | | Load 0x3,0x2
0343 01d6 | | Execute Vector,Field_Write
0344 00c8 | | Action Pop_Auxiliary_Range
0345 3ff5 |? | Loop_Increasing 0x33b
0346 00c9 | | Action Pop_Auxiliary_Loop
0347 e604 | | Load 0x3,0x4
0348 e603 | | Load 0x3,0x3
0349 0272 | r | Execute Discrete,Minus
034a 0d23 | # | Execute_Immediate Less,0x23
034b 6803 |h | Jump_Zero 0x34f
034c e604 | | Load 0x3,0x4
034d c605 | | Store 0x3,0x5
034e 7815 |x | Jump 0x364
034f 4800 |H | Short_Literal 0x0
0350 e603 | | Load 0x3,0x3
0351 00d8 | | Load_Top At_Offset_0
0352 0a22 | " | Execute_Immediate Plus,0x22
0353 00d8 | | Load_Top At_Offset_0
0354 00e2 | | Load_Encached Integer_Cache
0355 0260 | ` | Execute Discrete,In_Type
0356 7001 |p | Jump_Nonzero 0x358
0357 0801 | | Execute_Immediate Raise,0x1
0358 e602 | | Load 0x3,0x2
0359 01cf | | Execute Vector,Slice_Read
035a 0092 0389 | | Action Push_String_Extended,0x389 ; " "
035c e00e | | Load 0x0,0xe
035d 181f | | Execute Package,Field_Execute,Field_Number 0x1f
035e a605 | | Store_Unchecked 0x3,0x5
035f e605 | | Load 0x3,0x5
0360 7003 |p | Jump_Nonzero 0x364
0361 e603 | | Load 0x3,0x3
0362 0a22 | " | Execute_Immediate Plus,0x22
0363 c605 | | Store 0x3,0x5
0364 e603 | | Load 0x3,0x3
0365 e605 | | Load 0x3,0x5
0366 e602 | | Load 0x3,0x2
0367 01cf | | Execute Vector,Slice_Read
0368 e225 | % | Load 0x1,0x25
0369 1813 | | Execute Package,Field_Execute,Field_Number 0x13
036a e605 | | Load 0x3,0x5
036b e604 | | Load 0x3,0x4
036c 027c | | | Execute Discrete,Less
036d 681a |h | Jump_Zero 0x388
036e 00ea | | Load_Encached Null_String_Cache
036f e225 | % | Load 0x1,0x25
0370 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0371 00ea | | Load_Encached Null_String_Cache
0372 e225 | % | Load 0x1,0x25
0373 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0374 00ea | | Load_Encached Null_String_Cache
0375 e225 | % | Load 0x1,0x25
0376 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0377 7800 |x | Jump 0x378
0378 e606 | | Load 0x3,0x6
0379 0a01 | | Execute_Immediate Plus,0x1
037a c606 | | Store 0x3,0x6
037b e606 | | Load 0x3,0x6
037c 0c10 | | Execute_Immediate Greater_Equal,0x10
037d 6805 |h | Jump_Zero 0x383
037e 0092 03a1 | | Action Push_String_Extended,0x3a1 ; "..."
0380 e225 | % | Load 0x1,0x25
0381 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0382 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0383 e605 | | Load 0x3,0x5
0384 0a01 | | Execute_Immediate Plus,0x1
0385 c603 | | Store 0x3,0x3
0386 00c9 | | Action Pop_Auxiliary_Loop
0387 7fbf | | Jump 0x347
0388 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0389 ; --------------------------------------------------------------------------------------
0389 ; STRING TABLE
0389 ; --------------------------------------------------------------------------------------
0389 0034 | 4 | .STRTAB 0x0034->0x03a3 ; " "
038a 0033 | 3 | .STRTAB 0x0033->0x03a3 ; "Crash/Shutdown explanation too long: "
038b 0056 | V | .STRTAB 0x0056->0x03b6 ; "; "
038c 0056 | V | .STRTAB 0x0056->0x03b7 ; "System Outages"
038d 0062 | b | .STRTAB 0x0062->0x03be ; "Each system outage is listed, including the length"
038e 0092 | | .STRTAB 0x0092->0x03d7 ; "of the outage measured from the last successful"
038f 00bf | | .STRTAB 0x00bf->0x03ee ; "snapshot to the elaboration of the environment."
0390 00ec | | .STRTAB 0x00ec->0x0406 ; "The entered cause or system diagnosed cause and any"
0391 011d | | .STRTAB 0x011d->0x041f ; "comments entered in Shutdown or Explain_Crash are shown."
0392 0153 | S | .STRTAB 0x0153->0x043b ; "Time"
0393 0155 | U | .STRTAB 0x0155->0x043d ; "Length"
0394 0159 | Y | .STRTAB 0x0159->0x0440 ; "Cause"
0395 015c | \ | .STRTAB 0x015c->0x0443 ; "Comments"
0396 0162 | b | .STRTAB 0x0162->0x0447 ; "\x0c"
0397 0161 | a | .STRTAB 0x0161->0x0447 ; "System Availability Statistics"
0398 017d | } | .STRTAB 0x017d->0x0456 ; "cops"
0399 017f | | .STRTAB 0x017f->0x0458 ; "None"
039a 0181 | | .STRTAB 0x0181->0x045a ; "Total Outages = "
039b 01a4 | | .STRTAB 0x01a4->0x046d ; "Total Downtime = "
039c 01c7 | | .STRTAB 0x01c7->0x047f ; "Total report time = "
039d 01ea | | .STRTAB 0x01ea->0x0492 ; "Downtime due to system problems = "
039e 020d | | .STRTAB 0x020d->0x04a4 ; "Downtime due to planned operations = "
039f 0230 | 0 | .STRTAB 0x0230->0x04b7 ; "Total up time fraction = "
03a0 0253 | S | .STRTAB 0x0253->0x04c9 ; "System availability fraction = "
03a1 0276 | v | .STRTAB 0x0276->0x04dc ; "..."
03a2 0277 | w | .STREND 0x0277->0x04dd
03a3 2043 7261 | Cra| .STRTAB_STRINGS
04de 0000 0000 | | .XXX[0x2]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; Debug Table
04e0 ; --------------------------------------------------------------------------------------
04e0 0004 0011 | | .DEBUG4 0x0004,0x0011,0x9c8a,0x0000,0x0001,0x0000
04e6 0000 0000 | | .BLANK 0000[0x11a]