|
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: 4096 (0x1000)
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 0680 | | .CONST 0x0680 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00e1 | | .CONST 0x00e1 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 003e | > | .CONST 0x003e ; Number of locals
000b INIT_0008:
000b 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
000d 00e2 | | Load_Encached Integer_Cache
000e 0129 | ) | Execute Any,Make_Visible
000f 00e2 | | Load_Encached Integer_Cache
0010 0129 | ) | Execute Any,Make_Visible
0011 00e2 | | Load_Encached Integer_Cache
0012 0129 | ) | Execute Any,Make_Visible
0013 00e2 | | Load_Encached Integer_Cache
0014 0129 | ) | Execute Any,Make_Visible
0015 00e2 | | Load_Encached Integer_Cache
0016 0129 | ) | Execute Any,Make_Visible
0017 00e2 | | Load_Encached Integer_Cache
0018 0129 | ) | Execute Any,Make_Visible
0019 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated
001b 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
001d 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
001f 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated
0021 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
0023 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated
0025 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated
0027 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated
0029 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated
002b 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
002d 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated
002f 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0031 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
0033 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
0035 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated
0037 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated
0039 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated
003b 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
003d e002 | | Load 0x0,0x2
003e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
003f e003 | | Load 0x0,0x3
0040 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0041 0129 | ) | Execute Any,Make_Visible
0042 00e9 | | Load_Encached String_Cache
0043 02a0 | | Declare_Subprogram Null_Subprogram
0044 03ae | | Declare_Type Heap_Access,Defined,Visible
0045 e004 | | Load 0x0,0x4
0046 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0047 00e3 | | Load_Encached Natural_Cache
0048 00e1 | | Load_Encached Boolean_Cache
0049 00e1 | | Load_Encached Boolean_Cache
004a 02a0 | | Declare_Subprogram Null_Subprogram
004b 4804 |H | Short_Literal 0x4
004c 032e | . | Declare_Type Record,Defined,Visible
004d e004 | | Load 0x0,0x4
004e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
004f 00e7 | | Load_Encached Duration_Cache
0050 e227 | ' | Load 0x1,0x27
0051 00d8 | | Load_Top At_Offset_0
0052 02a0 | | Declare_Subprogram Null_Subprogram
0053 4804 |H | Short_Literal 0x4
0054 032e | . | Declare_Type Record,Defined,Visible
0055 4800 |H | Short_Literal 0x0
0056 4803 |H | Short_Literal 0x3
0057 029f 0213 | | Declare_Subprogram INIT_0210,For_Call
0059 03fe | | Declare_Type Discrete,Defined,Visible
005a e004 | | Load 0x0,0x4
005b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
005c e227 | ' | Load 0x1,0x27
005d e22a | * | Load 0x1,0x2a
005e 02a0 | | Declare_Subprogram Null_Subprogram
005f 4803 |H | Short_Literal 0x3
0060 032e | . | Declare_Type Record,Defined,Visible
0061 4800 |H | Short_Literal 0x0
0062 4804 |H | Short_Literal 0x4
0063 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call
0065 03fe | | Declare_Type Discrete,Defined,Visible
0066 e004 | | Load 0x0,0x4
0067 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0068 e227 | ' | Load 0x1,0x27
0069 e22c | , | Load 0x1,0x2c
006a 02a0 | | Declare_Subprogram Null_Subprogram
006b 4803 |H | Short_Literal 0x3
006c 032e | . | Declare_Type Record,Defined,Visible
006d e004 | | Load 0x0,0x4
006e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
006f 4828 |H( | Short_Literal 0x28
0070 e005 | | Load 0x0,0x5
0071 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0072 1c07 | | Execute_Immediate Run_Utility,0x7
0073 0129 | ) | Execute Any,Make_Visible
0074 00e7 | | Load_Encached Duration_Cache
0075 00e3 | | Load_Encached Natural_Cache
0076 00e3 | | Load_Encached Natural_Cache
0077 e227 | ' | Load 0x1,0x27
0078 029f 0543 | C| Declare_Subprogram INIT_0540,For_Call
007a 4806 |H | Short_Literal 0x6
007b 032e | . | Declare_Type Record,Defined,Visible
007c e004 | | Load 0x0,0x4
007d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
007e 4828 |H( | Short_Literal 0x28
007f e005 | | Load 0x0,0x5
0080 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0081 1c07 | | Execute_Immediate Run_Utility,0x7
0082 0129 | ) | Execute Any,Make_Visible
0083 e004 | | Load 0x0,0x4
0084 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0085 e004 | | Load 0x0,0x4
0086 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0087 4814 |H | Short_Literal 0x14
0088 e005 | | Load 0x0,0x5
0089 1b0e | | Execute Package,Field_Read,Field_Number 0xe
008a 1c07 | | Execute_Immediate Run_Utility,0x7
008b 0129 | ) | Execute Any,Make_Visible
008c 029f 055b | [| Declare_Subprogram INIT_0558,For_Call
008e 4805 |H | Short_Literal 0x5
008f 032e | . | Declare_Type Record,Defined,Visible
0090 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated
0092 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
0094 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
0096 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated
0098 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated
009a 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated
009c 00bf | | Action Accept_Activation
009d 00e3 | | Load_Encached Natural_Cache
009e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
009f 00e1 | | Load_Encached Boolean_Cache
00a0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00a1 00e1 | | Load_Encached Boolean_Cache
00a2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00a3 00e1 | | Load_Encached Boolean_Cache
00a4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00a5 00e1 | | Load_Encached Boolean_Cache
00a6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00a7 00e3 | | Load_Encached Natural_Cache
00a8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00a9 029d 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call
00ab 029d 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call
00ad 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call
00af 1d0d | | Execute_Immediate Reference_Lex_1,0xd
00b0 00c7 | | Action Elaborate_Subprogram
00b1 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00b2 00c7 | | Action Elaborate_Subprogram
00b3 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00b4 00c7 | | Action Elaborate_Subprogram
00b5 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00b6 00c7 | | Action Elaborate_Subprogram
00b7 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00b8 00c7 | | Action Elaborate_Subprogram
00b9 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00ba 00c7 | | Action Elaborate_Subprogram
00bb 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00bc 00c7 | | Action Elaborate_Subprogram
00bd 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00be 00c7 | | Action Elaborate_Subprogram
00bf 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00c0 00c7 | | Action Elaborate_Subprogram
00c1 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00c2 00c7 | | Action Elaborate_Subprogram
00c3 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00c4 00c7 | | Action Elaborate_Subprogram
00c5 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00c6 00c7 | | Action Elaborate_Subprogram
00c7 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00c8 00c7 | | Action Elaborate_Subprogram
00c9 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00ca 00c7 | | Action Elaborate_Subprogram
00cb 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00cc 00c7 | | Action Elaborate_Subprogram
00cd 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00ce 00c7 | | Action Elaborate_Subprogram
00cf 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00d0 00c7 | | Action Elaborate_Subprogram
00d1 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00d2 00c7 | | Action Elaborate_Subprogram
00d3 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00d4 00c7 | | Action Elaborate_Subprogram
00d5 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
00d6 00c7 | | Action Elaborate_Subprogram
00d7 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
00d8 00c7 | | Action Elaborate_Subprogram
00d9 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
00da 00c7 | | Action Elaborate_Subprogram
00db 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
00dc 00c7 | | Action Elaborate_Subprogram
00dd 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
00de 00c7 | | Action Elaborate_Subprogram
00df 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
00e0 00c7 | | Action Elaborate_Subprogram
00e1 BODY_0008:
00e1 00bc | | Action Signal_Activated
00e2 00bb | | Action Signal_Completion
00e3 0000 0000 | | .BLANK 0000[0x5]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 011f | | .CONST 0x011f ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 000f | | .CONST 0x000f ; Number of locals
00eb INIT_00e8:
00eb e004 | | Load 0x0,0x4
00ec 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00ed 0322 | " | Declare_Variable Record
00ee e004 | | Load 0x0,0x4
00ef 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00f0 0322 | " | Declare_Variable Record
00f1 e004 | | Load 0x0,0x4
00f2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00f3 0322 | " | Declare_Variable Record
00f4 e004 | | Load 0x0,0x4
00f5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00f6 e404 | | Load 0x2,0x4
00f7 017d | } | Execute Record,Structure_Write
00f8 e006 | | Load 0x0,0x6
00f9 0007 | | Action Break_Optional
00fa e007 | | Load 0x0,0x7
00fb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00fc 02c7 | | Declare_Variable Any
00fd 00d8 | | Load_Top At_Offset_0
00fe 1c00 | | Execute_Immediate Run_Utility,0x0
00ff e004 | | Load 0x0,0x4
0100 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0101 0322 | " | Declare_Variable Record
0102 e004 | | Load 0x0,0x4
0103 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0104 e407 | | Load 0x2,0x7
0105 017d | } | Execute Record,Structure_Write
0106 e004 | | Load 0x0,0x4
0107 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0108 0322 | " | Declare_Variable Record
0109 e004 | | Load 0x0,0x4
010a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
010b e408 | | Load 0x2,0x8
010c 017d | } | Execute Record,Structure_Write
010d e004 | | Load 0x0,0x4
010e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
010f 0322 | " | Declare_Variable Record
0110 e004 | | Load 0x0,0x4
0111 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0112 e409 | | Load 0x2,0x9
0113 017d | } | Execute Record,Structure_Write
0114 00e7 | | Load_Encached Duration_Cache
0115 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0116 e008 | | Load 0x0,0x8
0117 0007 | | Action Break_Optional
0118 00e1 | | Load_Encached Boolean_Cache
0119 029f 0303 | | Declare_Subprogram INIT_0300,For_Call
011b 029f 032b | +| Declare_Subprogram INIT_0328,For_Call
011d 029f 0353 | S| Declare_Subprogram INIT_0350,For_Call
011f BODY_00e8:
011f 840d | | Call 0x2,0xd
0120 840e | | Call 0x2,0xe
0121 e5fd | | Load 0x2,-0x3
0122 e403 | | Load 0x2,0x3
0123 e004 | | Load 0x0,0x4
0124 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0125 e402 | | Load 0x2,0x2
0126 e004 | | Load 0x0,0x4
0127 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0128 8009 | | Call 0x0,0x9
0129 e406 | | Load 0x2,0x6
012a e006 | | Load 0x0,0x6
012b 800a | | Call 0x0,0xa
012c c405 | | Store 0x2,0x5
012d c406 | | Store 0x2,0x6
012e 800b | | Call 0x0,0xb
012f 800c | | Call 0x0,0xc
0130 800d | | Call 0x0,0xd
0131 800e | | Call 0x0,0xe
0132 800f | | Call 0x0,0xf
0133 8010 | | Call 0x0,0x10
0134 00cf | | Action Mark_Auxiliary
0135 7807 |x | Jump 0x13d
0136 840f | | Call 0x2,0xf
0137 e406 | | Load 0x2,0x6
0138 e405 | | Load 0x2,0x5
0139 8011 | | Call 0x0,0x11
013a c405 | | Store 0x2,0x5
013b c406 | | Store 0x2,0x6
013c 00c9 | | Action Pop_Auxiliary_Loop
013d e405 | | Load 0x2,0x5
013e 8012 | | Call 0x0,0x12
013f 6ff6 |o | Jump_Zero 0x136
0140 00ce | | Action Pop_Auxiliary
0141 e407 | | Load 0x2,0x7
0142 e004 | | Load 0x0,0x4
0143 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0144 e408 | | Load 0x2,0x8
0145 e013 | | Load 0x0,0x13
0146 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0147 e014 | | Load 0x0,0x14
0148 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0149 a5fc | | Store_Unchecked 0x2,-0x4
014a e5fb | | Load 0x2,-0x5
014b e007 | | Load 0x0,0x7
014c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
014d c5fb | | Store 0x2,-0x5
014e 8015 | | Call 0x0,0x15
014f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 00e2 | | Load_Encached Integer_Cache
0154 8016 | | Call 0x0,0x16
0155 c5ff | | Store 0x2,-0x1
0156 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0157 0000 | | .XXX[0x1]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b 00e2 | | Load_Encached Integer_Cache
015c 8017 | | Call 0x0,0x17
015d c5ff | | Store 0x2,-0x1
015e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
015f 0000 | | .XXX[0x1]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 00e2 | | Load_Encached Integer_Cache
0164 8018 | | Call 0x0,0x18
0165 c5ff | | Store 0x2,-0x1
0166 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0167 0000 | | .XXX[0x1]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 00e2 | | Load_Encached Integer_Cache
016c 8019 | | Call 0x0,0x19
016d c5ff | | Store 0x2,-0x1
016e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
016f 0000 | | .XXX[0x1]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 00e2 | | Load_Encached Integer_Cache
0174 801a | | Call 0x0,0x1a
0175 c5ff | | Store 0x2,-0x1
0176 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0177 0000 | | .XXX[0x1]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b | { | .CONST 0x017b ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0001 | | .CONST 0x0001 ; Number of locals
017b BODY_0178:
017b INIT_0178:
017b 00e2 | | Load_Encached Integer_Cache
017c 801b | | Call 0x0,0x1b
017d c5ff | | Store 0x2,-0x1
017e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
017f 0000 | | .XXX[0x1]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0183 | | .CONST 0x0183 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0001 | | .CONST 0x0001 ; Number of locals
0183 BODY_0180:
0183 INIT_0180:
0183 e5ff | | Load 0x2,-0x1
0184 00e2 | | Load_Encached Integer_Cache
0185 025e | ^ | Execute Discrete,Convert
0186 801c | | Call 0x0,0x1c
0187 c5ff | | Store 0x2,-0x1
0188 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0189 0000 0000 | | .BLANK 0000[0x7]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 e5ff | | Load 0x2,-0x1
0194 00e2 | | Load_Encached Integer_Cache
0195 025e | ^ | Execute Discrete,Convert
0196 801d | | Call 0x0,0x1d
0197 c5ff | | Store 0x2,-0x1
0198 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0199 0000 0000 | | .BLANK 0000[0x7]
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 e5ff | | Load 0x2,-0x1
01a4 00e2 | | Load_Encached Integer_Cache
01a5 025e | ^ | Execute Discrete,Convert
01a6 801e | | Call 0x0,0x1e
01a7 c5ff | | Store 0x2,-0x1
01a8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01a9 0000 0000 | | .BLANK 0000[0x7]
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 e5ff | | Load 0x2,-0x1
01b4 00e2 | | Load_Encached Integer_Cache
01b5 025e | ^ | Execute Discrete,Convert
01b6 801f | | Call 0x0,0x1f
01b7 c5ff | | Store 0x2,-0x1
01b8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01b9 0000 0000 | | .BLANK 0000[0x7]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 e5ff | | Load 0x2,-0x1
01c4 00e2 | | Load_Encached Integer_Cache
01c5 025e | ^ | Execute Discrete,Convert
01c6 8020 | | Call 0x0,0x20
01c7 c5ff | | Store 0x2,-0x1
01c8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01c9 0000 0000 | | .BLANK 0000[0x7]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 e5ff | | Load 0x2,-0x1
01d4 00e2 | | Load_Encached Integer_Cache
01d5 025e | ^ | Execute Discrete,Convert
01d6 8021 | ! | Call 0x0,0x21
01d7 c5ff | | Store 0x2,-0x1
01d8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01d9 0000 0000 | | .BLANK 0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 e5ff | | Load 0x2,-0x1
01e4 8022 | " | Call 0x0,0x22
01e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e6 0000 0000 | | .XXX[0x2]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb e5ff | | Load 0x2,-0x1
01ec 8023 | # | Call 0x0,0x23
01ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01ee 0000 0000 | | .XXX[0x2]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3 | | .CONST 0x01f3 ; Address of begin
01f1 0004 | | .CONST 0x0004 ; Address of exception handler
01f2 0001 | | .CONST 0x0001 ; Number of locals
01f3 BODY_01f0:
01f3 INIT_01f0:
01f3 e5ff | | Load 0x2,-0x1
01f4 8024 | $ | Call 0x0,0x24
01f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01f6 0000 0000 | | .XXX[0x2]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb e5ff | | Load 0x2,-0x1
01fc 8025 | % | Call 0x0,0x25
01fd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01fe 0000 0000 | | .XXX[0x2]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 e5ff | | Load 0x2,-0x1
0204 8026 | & | Call 0x0,0x26
0205 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0206 0000 0000 | | .XXX[0x2]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b e5ff | | Load 0x2,-0x1
020c 8027 | ' | Call 0x0,0x27
020d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
020e 0000 0000 | | .XXX[0x2]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213 | | .CONST 0x0213 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0001 | | .CONST 0x0001 ; Number of locals
0213 BODY_0210:
0213 INIT_0210:
0213 4607 |F | Jump_Case 0x8
0214 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0215 7807 |x | Jump 0x21d ; case 0x1
0216 780a |x | Jump 0x221 ; case 0x2
0217 780e |x | Jump 0x226 ; case 0x3
0218 7811 |x | Jump 0x22a ; case 0x4
0219 7812 |x | Jump 0x22c ; case 0x5
021a 7813 |x | Jump 0x22e ; case 0x6
021b 7816 |x | Jump 0x232 ; case 0x7
021c 4302 |C | .XXX[0x1]
021d 00da | | Load_Top At_Offset_2
021e 0091 0572 | r| Action Push_String_Extended_Indexed,0x572 ; "USER_OPERATION"
0220 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0221 00db | | Load_Top At_Offset_3
0222 00db | | Load_Top At_Offset_3
0223 00e0 | | Load_Encached Standard_Cache
0224 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0225 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0226 00da | | Load_Top At_Offset_2
0227 00e0 | | Load_Encached Standard_Cache
0228 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0229 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
022a 00db | | Load_Top At_Offset_3
022b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
022c 00db | | Load_Top At_Offset_3
022d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
022e e22a | * | Load 0x1,0x2a
022f 00dc | | Load_Top At_Offset_4
0230 0267 | g | Execute Discrete,Predecessor
0231 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0232 e22a | * | Load 0x1,0x2a
0233 00dc | | Load_Top At_Offset_4
0234 0268 | h | Execute Discrete,Successor
0235 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0236 0000 0000 | | .XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b | ; | .CONST 0x023b ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0001 | | .CONST 0x0001 ; Number of locals
023b BODY_0238:
023b INIT_0238:
023b 4607 |F | Jump_Case 0x8
023c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
023d 7807 |x | Jump 0x245 ; case 0x1
023e 780a |x | Jump 0x249 ; case 0x2
023f 780e |x | Jump 0x24e ; case 0x3
0240 7811 |x | Jump 0x252 ; case 0x4
0241 7812 |x | Jump 0x254 ; case 0x5
0242 7813 |x | Jump 0x256 ; case 0x6
0243 7816 |x | Jump 0x25a ; case 0x7
0244 4302 |C | .XXX[0x1]
0245 00da | | Load_Top At_Offset_2
0246 0091 0576 | v| Action Push_String_Extended_Indexed,0x576 ; "DISK"
0248 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0249 00db | | Load_Top At_Offset_3
024a 00db | | Load_Top At_Offset_3
024b 00e0 | | Load_Encached Standard_Cache
024c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
024d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
024e 00da | | Load_Top At_Offset_2
024f 00e0 | | Load_Encached Standard_Cache
0250 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0251 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0252 00db | | Load_Top At_Offset_3
0253 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0254 00db | | Load_Top At_Offset_3
0255 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0256 e22c | , | Load 0x1,0x2c
0257 00dc | | Load_Top At_Offset_4
0258 0267 | g | Execute Discrete,Predecessor
0259 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
025a e22c | , | Load 0x1,0x2c
025b 00dc | | Load_Top At_Offset_4
025c 0268 | h | Execute Discrete,Successor
025d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
025e 0000 0000 | | .XXX[0x2]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0263 | c | .CONST 0x0263 ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 0001 | | .CONST 0x0001 ; Number of locals
0263 BODY_0260:
0263 INIT_0260:
0263 e5ff | | Load 0x2,-0x1
0264 8028 | ( | Call 0x0,0x28
0265 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0266 0000 0000 | | .XXX[0x2]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b e5ff | | Load 0x2,-0x1
026c 8029 | ) | Call 0x0,0x29
026d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
026e 0000 0000 | | .XXX[0x2]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 e5ff | | Load 0x2,-0x1
0274 802a | * | Call 0x0,0x2a
0275 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0276 0000 0000 | | .XXX[0x2]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b e5ff | | Load 0x2,-0x1
027c 802b | + | Call 0x0,0x2b
027d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
027e 0000 0000 | | .XXX[0x2]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 e5ff | | Load 0x2,-0x1
0284 802c | , | Call 0x0,0x2c
0285 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0286 0000 0000 | | .XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b | | .CONST 0x028b ; Address of begin
0289 0004 | | .CONST 0x0004 ; Address of exception handler
028a 0001 | | .CONST 0x0001 ; Number of locals
028b BODY_0288:
028b INIT_0288:
028b e5ff | | Load 0x2,-0x1
028c 802d | - | Call 0x0,0x2d
028d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
028e 0000 0000 | | .XXX[0x2]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0299 | | .CONST 0x0299 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0002 | | .CONST 0x0002 ; Number of locals
0293 INIT_0290:
0293 e004 | | Load 0x0,0x4
0294 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0295 0322 | " | Declare_Variable Record
0296 e5ff | | Load 0x2,-0x1
0297 e402 | | Load 0x2,0x2
0298 017d | } | Execute Record,Structure_Write
0299 BODY_0290:
0299 4800 |H | Short_Literal 0x0
029a e402 | | Load 0x2,0x2
029b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
029c 4800 |H | Short_Literal 0x0
029d e402 | | Load 0x2,0x2
029e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
029f 00d8 | | Load_Top At_Offset_0
02a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02a1 0000 0000 | | .BLANK 0000[0x7]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab | | .CONST 0x02ab ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0001 | | .CONST 0x0001 ; Number of locals
02ab BODY_02a8:
02ab INIT_02a8:
02ab e5fe | | Load 0x2,-0x2
02ac e004 | | Load 0x0,0x4
02ad 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02ae e5ff | | Load 0x2,-0x1
02af e004 | | Load 0x0,0x4
02b0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02b1 e014 | | Load 0x0,0x14
02b2 181d | | Execute Package,Field_Execute,Field_Number 0x1d
02b3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02b4 0000 0000 | | .BLANK 0000[0x4]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bd | | .CONST 0x02bd ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0003 | | .CONST 0x0003 ; Number of locals
02bb INIT_02b8:
02bb 00e2 | | Load_Encached Integer_Cache
02bc 03e9 | | Declare_Variable Discrete,Duplicate
02bd BODY_02b8:
02bd 4800 |H | Short_Literal 0x0
02be e5ff | | Load 0x2,-0x1
02bf e5fe | | Load 0x2,-0x2
02c0 e02e | . | Load 0x0,0x2e
02c1 181d | | Execute Package,Field_Execute,Field_Number 0x1d
02c2 a402 | | Store_Unchecked 0x2,0x2
02c3 e402 | | Load 0x2,0x2
02c4 0c01 | | Execute_Immediate Greater_Equal,0x1
02c5 6835 |h5 | Jump_Zero 0x2fb
02c6 e402 | | Load 0x2,0x2
02c7 0a01 | | Execute_Immediate Plus,0x1
02c8 c403 | | Store 0x2,0x3
02c9 00cf | | Action Mark_Auxiliary
02ca 7817 |x | Jump 0x2e2
02cb e403 | | Load 0x2,0x3
02cc e5ff | | Load 0x2,-0x1
02cd 01d7 | | Execute Vector,Field_Read
02ce 00d8 | | Load_Top At_Offset_0
02cf 0d20 | | Execute_Immediate Less,0x20
02d0 700b |p | Jump_Nonzero 0x2dc
02d1 00d8 | | Load_Top At_Offset_0
02d2 0c2d | - | Execute_Immediate Greater_Equal,0x2d
02d3 7005 |p | Jump_Nonzero 0x2d9
02d4 4821 |H! | Short_Literal 0x21
02d5 482b |H+ | Short_Literal 0x2b
02d6 0262 | b | Execute Discrete,In_Range
02d7 7005 |p | Jump_Nonzero 0x2dd
02d8 780e |x | Jump 0x2e7
02d9 0f3b | ; | Execute_Immediate Equal,0x3b
02da 700c |p | Jump_Nonzero 0x2e7
02db 7801 |x | Jump 0x2dd
02dc 00d1 | | Pop_Control Pop_Count_1
02dd e403 | | Load 0x2,0x3
02de 0a01 | | Execute_Immediate Plus,0x1
02df c403 | | Store 0x2,0x3
02e0 7800 |x | Jump 0x2e1
02e1 00c9 | | Action Pop_Auxiliary_Loop
02e2 e403 | | Load 0x2,0x3
02e3 e5ff | | Load 0x2,-0x1
02e4 01dc | | Execute Vector,Last
02e5 027a | z | Execute Discrete,Less_Equal
02e6 77e4 |w | Jump_Nonzero 0x2cb
02e7 00ce | | Action Pop_Auxiliary
02e8 e402 | | Load 0x2,0x2
02e9 e5fe | | Load 0x2,-0x2
02ea 01db | | Execute Vector,Length
02eb 0273 | s | Execute Discrete,Plus
02ec 00d8 | | Load_Top At_Offset_0
02ed 00e2 | | Load_Encached Integer_Cache
02ee 0260 | ` | Execute Discrete,In_Type
02ef 7001 |p | Jump_Nonzero 0x2f1
02f0 0801 | | Execute_Immediate Raise,0x1
02f1 e403 | | Load 0x2,0x3
02f2 0aff | | Execute_Immediate Plus,-0x1
02f3 00d8 | | Load_Top At_Offset_0
02f4 00e2 | | Load_Encached Integer_Cache
02f5 0260 | ` | Execute Discrete,In_Type
02f6 7001 |p | Jump_Nonzero 0x2f8
02f7 0801 | | Execute_Immediate Raise,0x1
02f8 e5ff | | Load 0x2,-0x1
02f9 01cf | | Execute Vector,Slice_Read
02fa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02fb 00ea | | Load_Encached Null_String_Cache
02fc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02fd 0000 0000 | | .XXX[0x3]
02ff 0000 | |
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303 | | .CONST 0x0303 ; Address of begin
0301 030b | | .CONST 0x030b ; Address of exception handler
0302 0001 | | .CONST 0x0001 ; Number of locals
0303 BODY_0300:
0303 INIT_0300:
0303 e5ff | | Load 0x2,-0x1
0304 e004 | | Load 0x0,0x4
0305 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0306 e402 | | Load 0x2,0x2
0307 017d | } | Execute Record,Structure_Write
0308 4800 |H | Short_Literal 0x0
0309 a40c | | Store_Unchecked 0x2,0xc
030a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
030b TRAP_0300:
030b 0007 | | Action Break_Optional
030c e004 | | Load 0x0,0x4
030d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
030e e402 | | Load 0x2,0x2
030f 017d | } | Execute Record,Structure_Write
0310 4801 |H | Short_Literal 0x1
0311 a40c | | Store_Unchecked 0x2,0xc
0312 e5ff | | Load 0x2,-0x1
0313 01db | | Execute Vector,Length
0314 6810 |h | Jump_Zero 0x325
0315 e02f | / | Load 0x0,0x2f
0316 180e | | Execute Package,Field_Execute,Field_Number 0xe
0317 4807 |H | Short_Literal 0x7
0318 0092 057b | {| Action Push_String_Extended,0x57b ; "Start time illegal: "
031a e5ff | | Load 0x2,-0x1
031b 01cc | | Execute Vector,Catenate
031c e030 | 0 | Load 0x0,0x30
031d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
031e e02f | / | Load 0x0,0x2f
031f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0320 4807 |H | Short_Literal 0x7
0321 0092 057c | || Action Push_String_Extended,0x57c ; "Processing will start from earliest information"
0323 e030 | 0 | Load 0x0,0x30
0324 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0325 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0326 0000 0000 | | .XXX[0x2]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b | + | .CONST 0x032b ; Address of begin
0329 0331 | 1 | .CONST 0x0331 ; Address of exception handler
032a 0001 | | .CONST 0x0001 ; Number of locals
032b BODY_0328:
032b INIT_0328:
032b e5fe | | Load 0x2,-0x2
032c e004 | | Load 0x0,0x4
032d 1820 | | Execute Package,Field_Execute,Field_Number 0x20
032e e403 | | Load 0x2,0x3
032f 017d | } | Execute Record,Structure_Write
0330 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0331 TRAP_0328:
0331 0007 | | Action Break_Optional
0332 e004 | | Load 0x0,0x4
0333 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0334 e403 | | Load 0x2,0x3
0335 017d | } | Execute Record,Structure_Write
0336 e5fe | | Load 0x2,-0x2
0337 01db | | Execute Vector,Length
0338 6810 |h | Jump_Zero 0x349
0339 e02f | / | Load 0x0,0x2f
033a 180e | | Execute Package,Field_Execute,Field_Number 0xe
033b 4807 |H | Short_Literal 0x7
033c 0092 057d | }| Action Push_String_Extended,0x57d ; "End time illegal: "
033e e5fe | | Load 0x2,-0x2
033f 01cc | | Execute Vector,Catenate
0340 e030 | 0 | Load 0x0,0x30
0341 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0342 e02f | / | Load 0x0,0x2f
0343 180e | | Execute Package,Field_Execute,Field_Number 0xe
0344 4807 |H | Short_Literal 0x7
0345 0092 057e | ~| Action Push_String_Extended,0x57e ; "Processing will end at current time"
0347 e030 | 0 | Load 0x0,0x30
0348 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0349 4501 |E | Exit_Suprogram New_Top_Offset 0x1
034a 0000 0000 | | .BLANK 0000[0x6]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0355 | U | .CONST 0x0355 ; Address of begin
0351 04f9 | | .CONST 0x04f9 ; Address of exception handler
0352 0002 | | .CONST 0x0002 ; Number of locals
0353 INIT_0350:
0353 029f 052b | +| Declare_Subprogram INIT_0528,For_Call
0355 BODY_0350:
0355 e40c | | Load 0x2,0xc
0356 7015 |p | Jump_Nonzero 0x36c
0357 e402 | | Load 0x2,0x2
0358 e405 | | Load 0x2,0x5
0359 8031 | 1 | Call 0x0,0x31
035a 823d | = | Call 0x1,0x3d
035b 7010 |p | Jump_Nonzero 0x36c
035c 4801 |H | Short_Literal 0x1
035d a40c | | Store_Unchecked 0x2,0xc
035e e004 | | Load 0x0,0x4
035f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0360 e408 | | Load 0x2,0x8
0361 017d | } | Execute Record,Structure_Write
0362 8032 | 2 | Call 0x0,0x32
0363 8033 | 3 | Call 0x0,0x33
0364 8034 | 4 | Call 0x0,0x34
0365 8035 | 5 | Call 0x0,0x35
0366 8036 | 6 | Call 0x0,0x36
0367 8037 | 7 | Call 0x0,0x37
0368 e402 | | Load 0x2,0x2
0369 823c | < | Call 0x1,0x3c
036a e404 | | Load 0x2,0x4
036b 017d | } | Execute Record,Structure_Write
036c e405 | | Load 0x2,0x5
036d 8038 | 8 | Call 0x0,0x38
036e e405 | | Load 0x2,0x5
036f 8039 | 9 | Call 0x0,0x39
0370 803a | : | Call 0x0,0x3a
0371 a40b | | Store_Unchecked 0x2,0xb
0372 e40b | | Load 0x2,0xb
0373 4624 |F$ | Jump_Case 0x25
0374 783d |x= | Jump 0x3b2 ; case 0x0
0375 7844 |xD | Jump 0x3ba ; case 0x1
0376 7865 |xe | Jump 0x3dc ; case 0x2
0377 7821 |x! | Jump 0x399 ; case 0x3
0378 7895 |x | Jump 0x40e ; case 0x4
0379 7873 |xs | Jump 0x3ed ; case 0x5
037a 7876 |xv | Jump 0x3f1 ; case 0x6
037b 7903 |y | Jump 0x47f ; case 0x7
037c 790a |y | Jump 0x487 ; case 0x8
037d 789d |x | Jump 0x41b ; case 0x9
037e 78a6 |x | Jump 0x425 ; case 0xa
037f 7819 |x | Jump 0x399 ; case 0xb
0380 78ae |x | Jump 0x42f ; case 0xc
0381 78b5 |x | Jump 0x437 ; case 0xd
0382 78bc |x | Jump 0x43f ; case 0xe
0383 78c3 |x | Jump 0x447 ; case 0xf
0384 78ca |x | Jump 0x44f ; case 0x10
0385 78d1 |x | Jump 0x457 ; case 0x11
0386 78d8 |x | Jump 0x45f ; case 0x12
0387 78df |x | Jump 0x467 ; case 0x13
0388 78e6 |x | Jump 0x46f ; case 0x14
0389 78ed |x | Jump 0x477 ; case 0x15
038a 7904 |y | Jump 0x48f ; case 0x16
038b 790b |y | Jump 0x497 ; case 0x17
038c 7912 |y | Jump 0x49f ; case 0x18
038d 7919 |y | Jump 0x4a7 ; case 0x19
038e 7869 |xi | Jump 0x3f8 ; case 0x1a
038f 7875 |xu | Jump 0x405 ; case 0x1b
0390 786d |xm | Jump 0x3fe ; case 0x1c
0391 787a |xz | Jump 0x40c ; case 0x1d
0392 791c |y | Jump 0x4af ; case 0x1e
0393 791f |y | Jump 0x4b3 ; case 0x1f
0394 792c |y, | Jump 0x4c1 ; case 0x20
0395 786f |xo | Jump 0x405 ; case 0x21
0396 7877 |xw | Jump 0x40e ; case 0x22
0397 7876 |xv | Jump 0x40e ; case 0x23
0398 7800 |x | Jump 0x399 ; case 0x24
0399 e405 | | Load 0x2,0x5
039a 803b | ; | Call 0x0,0x3b
039b 0092 057f | | Action Push_String_Extended,0x57f ; "!!!"
039d 01df | | Execute Vector,Equal
039e 7006 |p | Jump_Nonzero 0x3a5
039f e405 | | Load 0x2,0x5
03a0 803b | ; | Call 0x0,0x3b
03a1 0092 0580 | | Action Push_String_Extended,0x580 ; "***"
03a3 01df | | Execute Vector,Equal
03a4 6924 |i$ | Jump_Zero 0x4c9
03a5 e40b | | Load 0x2,0xb
03a6 e405 | | Load 0x2,0x5
03a7 803c | < | Call 0x0,0x3c
03a8 e405 | | Load 0x2,0x5
03a9 8038 | 8 | Call 0x0,0x38
03aa e405 | | Load 0x2,0x5
03ab 8039 | 9 | Call 0x0,0x39
03ac e405 | | Load 0x2,0x5
03ad 803b | ; | Call 0x0,0x3b
03ae e405 | | Load 0x2,0x5
03af 8031 | 1 | Call 0x0,0x31
03b0 803d | = | Call 0x0,0x3d
03b1 7917 |y | Jump 0x4c9
03b2 4801 |H | Short_Literal 0x1
03b3 a239 | 9 | Store_Unchecked 0x1,0x39
03b4 e408 | | Load 0x2,0x8
03b5 e409 | | Load 0x2,0x9
03b6 017d | } | Execute Record,Structure_Write
03b7 4800 |H | Short_Literal 0x0
03b8 a236 | 6 | Store_Unchecked 0x1,0x36
03b9 790f |y | Jump 0x4c9
03ba 4801 |H | Short_Literal 0x1
03bb e405 | | Load 0x2,0x5
03bc 803c | < | Call 0x0,0x3c
03bd 0092 0581 | | Action Push_String_Extended,0x581 ; "\x22!Machine"
03bf e02e | . | Load 0x0,0x2e
03c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03c1 6907 |i | Jump_Zero 0x4c9
03c2 4801 |H | Short_Literal 0x1
03c3 a23a | : | Store_Unchecked 0x1,0x3a
03c4 e40c | | Load 0x2,0xc
03c5 6903 |i | Jump_Zero 0x4c9
03c6 e409 | | Load 0x2,0x9
03c7 e004 | | Load 0x0,0x4
03c8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03c9 700b |p | Jump_Nonzero 0x3d5
03ca e409 | | Load 0x2,0x9
03cb e004 | | Load 0x0,0x4
03cc 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03cd e405 | | Load 0x2,0x5
03ce 8031 | 1 | Call 0x0,0x31
03cf e004 | | Load 0x0,0x4
03d0 1817 | | Execute Package,Field_Execute,Field_Number 0x17
03d1 e014 | | Load 0x0,0x14
03d2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
03d3 a40a | | Store_Unchecked 0x2,0xa
03d4 7802 |x | Jump 0x3d7
03d5 4800 |H | Short_Literal 0x0
03d6 a40a | | Store_Unchecked 0x2,0xa
03d7 e40a | | Load 0x2,0xa
03d8 e405 | | Load 0x2,0x5
03d9 8031 | 1 | Call 0x0,0x31
03da 803e | > | Call 0x0,0x3e
03db 78ed |x | Jump 0x4c9
03dc e408 | | Load 0x2,0x8
03dd e004 | | Load 0x0,0x4
03de 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03df 6808 |h | Jump_Zero 0x3e8
03e0 e405 | | Load 0x2,0x5
03e1 8031 | 1 | Call 0x0,0x31
03e2 e407 | | Load 0x2,0x7
03e3 017d | } | Execute Record,Structure_Write
03e4 e407 | | Load 0x2,0x7
03e5 823c | < | Call 0x1,0x3c
03e6 e404 | | Load 0x2,0x4
03e7 017d | } | Execute Record,Structure_Write
03e8 e405 | | Load 0x2,0x5
03e9 8031 | 1 | Call 0x0,0x31
03ea e408 | | Load 0x2,0x8
03eb 017d | } | Execute Record,Structure_Write
03ec 78dc |x | Jump 0x4c9
03ed e236 | 6 | Load 0x1,0x36
03ee 0a01 | | Execute_Immediate Plus,0x1
03ef c236 | 6 | Store 0x1,0x36
03f0 78d8 |x | Jump 0x4c9
03f1 e236 | 6 | Load 0x1,0x36
03f2 0c01 | | Execute_Immediate Greater_Equal,0x1
03f3 68d5 |h | Jump_Zero 0x4c9
03f4 e236 | 6 | Load 0x1,0x36
03f5 0aff | | Execute_Immediate Plus,-0x1
03f6 c236 | 6 | Store 0x1,0x36
03f7 78d1 |x | Jump 0x4c9
03f8 e405 | | Load 0x2,0x5
03f9 803c | < | Call 0x0,0x3c
03fa e405 | | Load 0x2,0x5
03fb 8038 | 8 | Call 0x0,0x38
03fc 803f | ? | Call 0x0,0x3f
03fd 78cb |x | Jump 0x4c9
03fe e405 | | Load 0x2,0x5
03ff 803c | < | Call 0x0,0x3c
0400 0092 0582 | | Action Push_String_Extended,0x582 ; " "
0402 01cc | | Execute Vector,Catenate
0403 8040 | @ | Call 0x0,0x40
0404 78c4 |x | Jump 0x4c9
0405 e40b | | Load 0x2,0xb
0406 e405 | | Load 0x2,0x5
0407 803c | < | Call 0x0,0x3c
0408 e405 | | Load 0x2,0x5
0409 8038 | 8 | Call 0x0,0x38
040a 8041 | A | Call 0x0,0x41
040b 78bd |x | Jump 0x4c9
040c 8042 | B | Call 0x0,0x42
040d 78bb |x | Jump 0x4c9
040e e40b | | Load 0x2,0xb
040f e405 | | Load 0x2,0x5
0410 803c | < | Call 0x0,0x3c
0411 e405 | | Load 0x2,0x5
0412 8038 | 8 | Call 0x0,0x38
0413 e405 | | Load 0x2,0x5
0414 8039 | 9 | Call 0x0,0x39
0415 e405 | | Load 0x2,0x5
0416 803b | ; | Call 0x0,0x3b
0417 e405 | | Load 0x2,0x5
0418 8031 | 1 | Call 0x0,0x31
0419 803d | = | Call 0x0,0x3d
041a 78ae |x | Jump 0x4c9
041b 4801 |H | Short_Literal 0x1
041c a237 | 7 | Store_Unchecked 0x1,0x37
041d e405 | | Load 0x2,0x5
041e 803c | < | Call 0x0,0x3c
041f 0092 0583 | | Action Push_String_Extended,0x583 ; "Disk"
0421 e405 | | Load 0x2,0x5
0422 8031 | 1 | Call 0x0,0x31
0423 8043 | C | Call 0x0,0x43
0424 78a4 |x | Jump 0x4c9
0425 4801 |H | Short_Literal 0x1
0426 a238 | 8 | Store_Unchecked 0x1,0x38
0427 e405 | | Load 0x2,0x5
0428 803c | < | Call 0x0,0x3c
0429 0092 0583 | | Action Push_String_Extended,0x583 ; "Disk"
042b e405 | | Load 0x2,0x5
042c 8031 | 1 | Call 0x0,0x31
042d 8044 | D | Call 0x0,0x44
042e 789a |x | Jump 0x4c9
042f e405 | | Load 0x2,0x5
0430 803c | < | Call 0x0,0x3c
0431 0092 0584 | | Action Push_String_Extended,0x584 ; "File"
0433 e405 | | Load 0x2,0x5
0434 8031 | 1 | Call 0x0,0x31
0435 8043 | C | Call 0x0,0x43
0436 7892 |x | Jump 0x4c9
0437 e405 | | Load 0x2,0x5
0438 803c | < | Call 0x0,0x3c
0439 0092 0584 | | Action Push_String_Extended,0x584 ; "File"
043b e405 | | Load 0x2,0x5
043c 8031 | 1 | Call 0x0,0x31
043d 8044 | D | Call 0x0,0x44
043e 788a |x | Jump 0x4c9
043f e405 | | Load 0x2,0x5
0440 803c | < | Call 0x0,0x3c
0441 0092 0585 | | Action Push_String_Extended,0x585 ; "Ada"
0443 e405 | | Load 0x2,0x5
0444 8031 | 1 | Call 0x0,0x31
0445 8043 | C | Call 0x0,0x43
0446 7882 |x | Jump 0x4c9
0447 e405 | | Load 0x2,0x5
0448 803c | < | Call 0x0,0x3c
0449 0092 0585 | | Action Push_String_Extended,0x585 ; "Ada"
044b e405 | | Load 0x2,0x5
044c 8031 | 1 | Call 0x0,0x31
044d 8044 | D | Call 0x0,0x44
044e 787a |xz | Jump 0x4c9
044f e405 | | Load 0x2,0x5
0450 803c | < | Call 0x0,0x3c
0451 0092 0586 | | Action Push_String_Extended,0x586 ; "Action"
0453 e405 | | Load 0x2,0x5
0454 8031 | 1 | Call 0x0,0x31
0455 8043 | C | Call 0x0,0x43
0456 7872 |xr | Jump 0x4c9
0457 e405 | | Load 0x2,0x5
0458 803c | < | Call 0x0,0x3c
0459 0092 0586 | | Action Push_String_Extended,0x586 ; "Action"
045b e405 | | Load 0x2,0x5
045c 8031 | 1 | Call 0x0,0x31
045d 8044 | D | Call 0x0,0x44
045e 786a |xj | Jump 0x4c9
045f e405 | | Load 0x2,0x5
0460 803c | < | Call 0x0,0x3c
0461 0092 0587 | | Action Push_String_Extended,0x587 ; "Code_Segment"
0463 e405 | | Load 0x2,0x5
0464 8031 | 1 | Call 0x0,0x31
0465 8043 | C | Call 0x0,0x43
0466 7862 |xb | Jump 0x4c9
0467 e405 | | Load 0x2,0x5
0468 803c | < | Call 0x0,0x3c
0469 0092 0587 | | Action Push_String_Extended,0x587 ; "Code_Segment"
046b e405 | | Load 0x2,0x5
046c 8031 | 1 | Call 0x0,0x31
046d 8044 | D | Call 0x0,0x44
046e 785a |xZ | Jump 0x4c9
046f e405 | | Load 0x2,0x5
0470 803c | < | Call 0x0,0x3c
0471 0092 0588 | | Action Push_String_Extended,0x588 ; "Directory"
0473 e405 | | Load 0x2,0x5
0474 8031 | 1 | Call 0x0,0x31
0475 8043 | C | Call 0x0,0x43
0476 7852 |xR | Jump 0x4c9
0477 e405 | | Load 0x2,0x5
0478 803c | < | Call 0x0,0x3c
0479 0092 0588 | | Action Push_String_Extended,0x588 ; "Directory"
047b e405 | | Load 0x2,0x5
047c 8031 | 1 | Call 0x0,0x31
047d 8044 | D | Call 0x0,0x44
047e 784a |xJ | Jump 0x4c9
047f e405 | | Load 0x2,0x5
0480 803c | < | Call 0x0,0x3c
0481 0092 0589 | | Action Push_String_Extended,0x589 ; "Ddb"
0483 e405 | | Load 0x2,0x5
0484 8031 | 1 | Call 0x0,0x31
0485 8043 | C | Call 0x0,0x43
0486 7842 |xB | Jump 0x4c9
0487 e405 | | Load 0x2,0x5
0488 803c | < | Call 0x0,0x3c
0489 0092 0589 | | Action Push_String_Extended,0x589 ; "Ddb"
048b e405 | | Load 0x2,0x5
048c 8031 | 1 | Call 0x0,0x31
048d 8044 | D | Call 0x0,0x44
048e 783a |x: | Jump 0x4c9
048f e405 | | Load 0x2,0x5
0490 803c | < | Call 0x0,0x3c
0491 0092 058a | | Action Push_String_Extended,0x58a ; "Memory"
0493 e405 | | Load 0x2,0x5
0494 8031 | 1 | Call 0x0,0x31
0495 8045 | E | Call 0x0,0x45
0496 7832 |x2 | Jump 0x4c9
0497 e405 | | Load 0x2,0x5
0498 803c | < | Call 0x0,0x3c
0499 0092 058b | | Action Push_String_Extended,0x58b ; "Ethernet"
049b e405 | | Load 0x2,0x5
049c 8031 | 1 | Call 0x0,0x31
049d 8045 | E | Call 0x0,0x45
049e 782a |x* | Jump 0x4c9
049f e405 | | Load 0x2,0x5
04a0 803c | < | Call 0x0,0x3c
04a1 0092 058c | | Action Push_String_Extended,0x58c ; "Tape"
04a3 e405 | | Load 0x2,0x5
04a4 8031 | 1 | Call 0x0,0x31
04a5 8045 | E | Call 0x0,0x45
04a6 7822 |x" | Jump 0x4c9
04a7 e405 | | Load 0x2,0x5
04a8 803c | < | Call 0x0,0x3c
04a9 0092 0583 | | Action Push_String_Extended,0x583 ; "Disk"
04ab e405 | | Load 0x2,0x5
04ac 8031 | 1 | Call 0x0,0x31
04ad 8045 | E | Call 0x0,0x45
04ae 781a |x | Jump 0x4c9
04af e405 | | Load 0x2,0x5
04b0 8031 | 1 | Call 0x0,0x31
04b1 8046 | F | Call 0x0,0x46
04b2 7816 |x | Jump 0x4c9
04b3 0092 058d | | Action Push_String_Extended,0x58d ; "Density="
04b5 e405 | | Load 0x2,0x5
04b6 803c | < | Call 0x0,0x3c
04b7 823e | > | Call 0x1,0x3e
04b8 0092 058e | | Action Push_String_Extended,0x58e ; "Volume_Id="
04ba e405 | | Load 0x2,0x5
04bb 803c | < | Call 0x0,0x3c
04bc 823e | > | Call 0x1,0x3e
04bd e405 | | Load 0x2,0x5
04be 8031 | 1 | Call 0x0,0x31
04bf 8047 | G | Call 0x0,0x47
04c0 7808 |x | Jump 0x4c9
04c1 0092 058e | | Action Push_String_Extended,0x58e ; "Volume_Id="
04c3 e405 | | Load 0x2,0x5
04c4 803c | < | Call 0x0,0x3c
04c5 823e | > | Call 0x1,0x3e
04c6 e405 | | Load 0x2,0x5
04c7 8031 | 1 | Call 0x0,0x31
04c8 8048 | H | Call 0x0,0x48
04c9 e404 | | Load 0x2,0x4
04ca e004 | | Load 0x0,0x4
04cb 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04cc 701a |p | Jump_Nonzero 0x4e7
04cd e404 | | Load 0x2,0x4
04ce e004 | | Load 0x0,0x4
04cf 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04d0 e405 | | Load 0x2,0x5
04d1 8031 | 1 | Call 0x0,0x31
04d2 e004 | | Load 0x0,0x4
04d3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04d4 e014 | | Load 0x0,0x14
04d5 181f | | Execute Package,Field_Execute,Field_Number 0x1f
04d6 6810 |h | Jump_Zero 0x4e7
04d7 e23a | : | Load 0x1,0x3a
04d8 e239 | 9 | Load 0x1,0x39
04d9 e238 | 8 | Load 0x1,0x38
04da e237 | 7 | Load 0x1,0x37
04db e404 | | Load 0x2,0x4
04dc e405 | | Load 0x2,0x5
04dd 8031 | 1 | Call 0x0,0x31
04de e408 | | Load 0x2,0x8
04df e236 | 6 | Load 0x1,0x36
04e0 e40c | | Load 0x2,0xc
04e1 8049 | I | Call 0x0,0x49
04e2 00d1 | | Pop_Control Pop_Count_1
04e3 c237 | 7 | Store 0x1,0x37
04e4 c238 | 8 | Store 0x1,0x38
04e5 c239 | 9 | Store 0x1,0x39
04e6 c23a | : | Store 0x1,0x3a
04e7 e403 | | Load 0x2,0x3
04e8 e004 | | Load 0x0,0x4
04e9 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04ea 700d |p | Jump_Nonzero 0x4f8
04eb e403 | | Load 0x2,0x3
04ec e004 | | Load 0x0,0x4
04ed 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04ee e405 | | Load 0x2,0x5
04ef 8031 | 1 | Call 0x0,0x31
04f0 e004 | | Load 0x0,0x4
04f1 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04f2 e014 | | Load 0x0,0x14
04f3 181f | | Execute Package,Field_Execute,Field_Number 0x1f
04f4 6803 |h | Jump_Zero 0x4f8
04f5 00cc | | Action Pop_Block
04f6 00a7 0140 | @| Action Jump_Extended,0x140
04f8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04f9 TRAP_0350:
04f9 010b | | Execute Exception,Is_Storage_Error
04fa 681b |h | Jump_Zero 0x516
04fb e02f | / | Load 0x0,0x2f
04fc 180e | | Execute Package,Field_Execute,Field_Number 0xe
04fd 4808 |H | Short_Literal 0x8
04fe 0092 058f | | Action Push_String_Extended,0x58f ; "Exception"
0500 4800 |H | Short_Literal 0x0
0501 4801 |H | Short_Literal 0x1
0502 e04a | J | Load 0x0,0x4a
0503 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0504 01cc | | Execute Vector,Catenate
0505 0092 0590 | | Action Push_String_Extended,0x590 ; " processing error log entry. Report aborted. Try again with fewer log files"
0507 01cc | | Execute Vector,Catenate
0508 804b | K | Call 0x0,0x4b
0509 e5fb | | Load 0x2,-0x5
050a 4803 |H | Short_Literal 0x3
050b 4800 |H | Short_Literal 0x0
050c 4801 |H | Short_Literal 0x1
050d e04a | J | Load 0x0,0x4a
050e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
050f 0092 058f | | Action Push_String_Extended,0x58f ; "Exception"
0511 e007 | | Load 0x0,0x7
0512 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0513 c5fb | | Store 0x2,-0x5
0514 00cc | | Action Pop_Block
0515 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0516 e02f | / | Load 0x0,0x2f
0517 180e | | Execute Package,Field_Execute,Field_Number 0xe
0518 4806 |H | Short_Literal 0x6
0519 0092 0591 | | Action Push_String_Extended,0x591 ; "Exception "
051b 4800 |H | Short_Literal 0x0
051c 4801 |H | Short_Literal 0x1
051d e04a | J | Load 0x0,0x4a
051e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
051f 01cc | | Execute Vector,Catenate
0520 0092 0592 | | Action Push_String_Extended,0x592 ; " processing error log entry. Unknown effect on report"
0522 01cc | | Execute Vector,Catenate
0523 804b | K | Call 0x0,0x4b
0524 8602 | | Call 0x3,0x2
0525 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0526 0000 0000 | | .XXX[0x2]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b | + | .CONST 0x052b ; Address of begin
0529 053e | > | .CONST 0x053e ; Address of exception handler
052a 0001 | | .CONST 0x0001 ; Number of locals
052b BODY_0528:
052b INIT_0528:
052b e02f | / | Load 0x0,0x2f
052c 180e | | Execute Package,Field_Execute,Field_Number 0xe
052d 4802 |H | Short_Literal 0x2
052e 0092 0593 | | Action Push_String_Extended,0x593 ; "Log file: "
0530 e405 | | Load 0x2,0x5
0531 804c | L | Call 0x0,0x4c
0532 01cc | | Execute Vector,Catenate
0533 804b | K | Call 0x0,0x4b
0534 e02f | / | Load 0x0,0x2f
0535 180e | | Execute Package,Field_Execute,Field_Number 0xe
0536 4802 |H | Short_Literal 0x2
0537 0092 0594 | | Action Push_String_Extended,0x594 ; "Log entry: "
0539 e405 | | Load 0x2,0x5
053a 804d | M | Call 0x0,0x4d
053b 01cc | | Execute Vector,Catenate
053c 804b | K | Call 0x0,0x4b
053d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
053e TRAP_0528:
053e 0007 | | Action Break_Optional
053f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0543 | C | .CONST 0x0543 ; Address of begin
0541 0004 | | .CONST 0x0004 ; Address of exception handler
0542 0001 | | .CONST 0x0001 ; Number of locals
0543 BODY_0540:
0543 INIT_0540:
0543 4601 |F | Jump_Case 0x2
0544 7801 |x | Jump 0x546 ; case 0x0
0545 7807 |x | Jump 0x54d ; case 0x1
0546 e5ff | | Load 0x2,-0x1
0547 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0548 0125 | % | Execute Any,Set_Constraint
0549 e5ff | | Load 0x2,-0x1
054a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
054b 1c00 | | Execute_Immediate Run_Utility,0x0
054c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
054d e5ff | | Load 0x2,-0x1
054e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
054f 0125 | % | Execute Any,Set_Constraint
0550 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0551 0000 0000 | | .BLANK 0000[0x7]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 055b | [ | .CONST 0x055b ; Address of begin
0559 0004 | | .CONST 0x0004 ; Address of exception handler
055a 0001 | | .CONST 0x0001 ; Number of locals
055b BODY_0558:
055b INIT_0558:
055b 4601 |F | Jump_Case 0x2
055c 7801 |x | Jump 0x55e ; case 0x0
055d 780d |x | Jump 0x56b ; case 0x1
055e e5ff | | Load 0x2,-0x1
055f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0560 0125 | % | Execute Any,Set_Constraint
0561 e5ff | | Load 0x2,-0x1
0562 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0563 1c00 | | Execute_Immediate Run_Utility,0x0
0564 e5ff | | Load 0x2,-0x1
0565 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0566 0125 | % | Execute Any,Set_Constraint
0567 e5ff | | Load 0x2,-0x1
0568 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0569 1c00 | | Execute_Immediate Run_Utility,0x0
056a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
056b e5ff | | Load 0x2,-0x1
056c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
056d 0125 | % | Execute Any,Set_Constraint
056e e5ff | | Load 0x2,-0x1
056f 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0570 0125 | % | Execute Any,Set_Constraint
0571 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0572 ; --------------------------------------------------------------------------------------
0572 ; STRING TABLE
0572 ; --------------------------------------------------------------------------------------
0572 0048 | H | .STRTAB 0x0048->0x0596 ; "USER_OPERATION"
0573 0054 | T | .STRTAB 0x0054->0x059d ; "EXCEPTION_COND"
0574 0060 | ` | .STRTAB 0x0060->0x05a4 ; "SYSTEM_BOOT"
0575 0069 | i | .STRTAB 0x0069->0x05a9 ; "OTHER_EVENT"
0576 0072 | r | .STRTAB 0x0072->0x05af ; "DISK"
0577 0074 | t | .STRTAB 0x0074->0x05b1 ; "TAPE"
0578 0076 | v | .STRTAB 0x0076->0x05b3 ; "ETHERNET"
0579 007c | | | .STRTAB 0x007c->0x05b7 ; "MEMORY"
057a 0080 | | .STRTAB 0x0080->0x05ba ; "OTHER_DEVICE"
057b 008a | | .STRTAB 0x008a->0x05c0 ; "Start time illegal: "
057c 009c | | .STRTAB 0x009c->0x05ca ; "Processing will start from earliest information"
057d 00c9 | | .STRTAB 0x00c9->0x05e1 ; "End time illegal: "
057e 00d9 | | .STRTAB 0x00d9->0x05ea ; "Processing will end at current time"
057f 00fa | | .STRTAB 0x00fa->0x05fc ; "!!!"
0580 00fb | | .STRTAB 0x00fb->0x05fd ; "***"
0581 00fc | | .STRTAB 0x00fc->0x05ff ; "\x22!Machine"
0582 0103 | | .STRTAB 0x0103->0x0603 ; " "
0583 0102 | | .STRTAB 0x0102->0x0604 ; "Disk"
0584 0104 | | .STRTAB 0x0104->0x0606 ; "File"
0585 0106 | | .STRTAB 0x0106->0x0608 ; "Ada"
0586 0107 | | .STRTAB 0x0107->0x0609 ; "Action"
0587 010b | | .STRTAB 0x010b->0x060c ; "Code_Segment"
0588 0115 | | .STRTAB 0x0115->0x0612 ; "Directory"
0589 011c | | .STRTAB 0x011c->0x0617 ; "Ddb"
058a 011d | | .STRTAB 0x011d->0x0618 ; "Memory"
058b 0121 | ! | .STRTAB 0x0121->0x061b ; "Ethernet"
058c 0127 | ' | .STRTAB 0x0127->0x061f ; "Tape"
058d 0129 | ) | .STRTAB 0x0129->0x0621 ; "Density="
058e 012f | / | .STRTAB 0x012f->0x0625 ; "Volume_Id="
058f 0137 | 7 | .STRTAB 0x0137->0x062a ; "Exception"
0590 013e | > | .STRTAB 0x013e->0x062f ; " processing error log entry. Report aborted. Try again with fewer log files"
0591 0189 | | .STRTAB 0x0189->0x0655 ; "Exception "
0592 0191 | | .STRTAB 0x0191->0x065a ; " processing error log entry. Unknown effect on report"
0593 01c5 | | .STRTAB 0x01c5->0x0675 ; "Log file: "
0594 01cd | | .STRTAB 0x01cd->0x067a ; "Log entry: "
0595 01d6 | | .STREND 0x01d6->0x0680
0596 5553 4552 |USER| .STRTAB_STRINGS
0680 ; --------------------------------------------------------------------------------------
0680 ; Debug Table
0680 ; --------------------------------------------------------------------------------------
0680 0004 0011 | | .DEBUG4 0x0004,0x0011,0x9c82,0x0000,0x0001,0x0000
0686 0000 0000 | | .BLANK 0000[0x17a]