|
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: 8192 (0x2000)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_29d0d7
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0f08 | | .CONST 0x0f08 ; 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 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 011b | | .CONST 0x011b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 003e | > | .CONST 0x003e ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4802 |H | Short_Literal 0x2
000d 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 4800 |H | Short_Literal 0x0
0011 4802 |H | Short_Literal 0x2
0012 029f 014b | K| Declare_Subprogram INIT_0148,For_Call
0014 03fe | | Declare_Type Discrete,Defined,Visible
0015 4800 |H | Short_Literal 0x0
0016 4802 |H | Short_Literal 0x2
0017 029f 0173 | s| Declare_Subprogram INIT_0170,For_Call
0019 03fe | | Declare_Type Discrete,Defined,Visible
001a 4800 |H | Short_Literal 0x0
001b 4815 |H | Short_Literal 0x15
001c 029f 019b | | Declare_Subprogram INIT_0198,For_Call
001e 03fe | | Declare_Type Discrete,Defined,Visible
001f 4800 |H | Short_Literal 0x0
0020 480f |H | Short_Literal 0xf
0021 00da | | Load_Top At_Offset_2
0022 03f9 | | Declare_Type Discrete,Constrained,Visible
0023 4811 |H | Short_Literal 0x11
0024 4815 |H | Short_Literal 0x15
0025 00db | | Load_Top At_Offset_3
0026 03f9 | | Declare_Type Discrete,Constrained,Visible
0027 4800 |H | Short_Literal 0x0
0028 4bff |K | Short_Literal 0x3ff
0029 e002 | | Load 0x0,0x2
002a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
002b 02a0 | | Declare_Subprogram Null_Subprogram
002c 4801 |H | Short_Literal 0x1
002d 035e | ^ | Declare_Type Array,Defined,Visible
002e 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated
0030 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated
0032 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
0034 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated
0036 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
0038 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated
003a 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated
003c 029a 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call,Visible,Unelaborated
003e 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated
0040 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated
0042 029a 048b | | Declare_Subprogram INIT_0488,For_Outer_Call,Visible,Unelaborated
0044 029a 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call,Visible,Unelaborated
0046 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated
0048 029a 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call,Visible,Unelaborated
004a 029a 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call,Visible,Unelaborated
004c 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated
004e 029a 05a3 | | Declare_Subprogram INIT_05a0,For_Outer_Call,Visible,Unelaborated
0050 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated
0052 4818 |H | Short_Literal 0x18
0053 03cd | | Declare_Type Access,Incomplete,Visible,Accesses_Protected
0054 00bf | | Action Accept_Activation
0055 e003 | | Load 0x0,0x3
0056 e004 | | Load 0x0,0x4
0057 e005 | | Load 0x0,0x5
0058 e006 | | Load 0x0,0x6
0059 e007 | | Load 0x0,0x7
005a 02a0 | | Declare_Subprogram Null_Subprogram
005b 4805 |H | Short_Literal 0x5
005c 032d | - | Declare_Type Record,Defined
005d 00d8 | | Load_Top At_Offset_0
005e 02a0 | | Declare_Subprogram Null_Subprogram
005f 00db | | Load_Top At_Offset_3
0060 03c7 | | Complete_Type Access,By_Defining
0061 e213 | | Load 0x1,0x13
0062 00e2 | | Load_Encached Integer_Cache
0063 00e2 | | Load_Encached Integer_Cache
0064 00e2 | | Load_Encached Integer_Cache
0065 00e2 | | Load_Encached Integer_Cache
0066 00e2 | | Load_Encached Integer_Cache
0067 02a0 | | Declare_Subprogram Null_Subprogram
0068 4806 |H | Short_Literal 0x6
0069 032d | - | Declare_Type Record,Defined
006a 4800 |H | Short_Literal 0x0
006b 4802 |H | Short_Literal 0x2
006c 029f 0613 | | Declare_Subprogram INIT_0610,For_Call
006e 03fd | | Declare_Type Discrete,Defined
006f 4800 |H | Short_Literal 0x0
0070 4805 |H | Short_Literal 0x5
0071 e002 | | Load 0x0,0x2
0072 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0073 02a0 | | Declare_Subprogram Null_Subprogram
0074 4801 |H | Short_Literal 0x1
0075 035d | ] | Declare_Type Array,Defined
0076 00d8 | | Load_Top At_Offset_0
0077 0337 | 7 | Declare_Variable Array
0078 00d8 | | Load_Top At_Offset_0
0079 0335 | 5 | Declare_Variable Array,Duplicate
007a 00cd | | Action Spare6_Action
007b 4845 |HE | Short_Literal 0x45
007c 4800 |H | Short_Literal 0x0
007d 00da | | Load_Top At_Offset_2
007e 01d6 | | Execute Vector,Field_Write
007f 484e |HN | Short_Literal 0x4e
0080 4801 |H | Short_Literal 0x1
0081 00da | | Load_Top At_Offset_2
0082 01d6 | | Execute Vector,Field_Write
0083 4841 |HA | Short_Literal 0x41
0084 4802 |H | Short_Literal 0x2
0085 00da | | Load_Top At_Offset_2
0086 01d6 | | Execute Vector,Field_Write
0087 4842 |HB | Short_Literal 0x42
0088 4803 |H | Short_Literal 0x3
0089 00da | | Load_Top At_Offset_2
008a 01d6 | | Execute Vector,Field_Write
008b 484c |HL | Short_Literal 0x4c
008c 4804 |H | Short_Literal 0x4
008d 00da | | Load_Top At_Offset_2
008e 01d6 | | Execute Vector,Field_Write
008f 4845 |HE | Short_Literal 0x45
0090 4805 |H | Short_Literal 0x5
0091 00da | | Load_Top At_Offset_2
0092 01d6 | | Execute Vector,Field_Write
0093 00d9 | | Load_Top At_Offset_1
0094 01d4 | | Execute Vector,Structure_Write
0095 00d9 | | Load_Top At_Offset_1
0096 0337 | 7 | Declare_Variable Array
0097 00d8 | | Load_Top At_Offset_0
0098 0335 | 5 | Declare_Variable Array,Duplicate
0099 00cd | | Action Spare6_Action
009a 4855 |HU | Short_Literal 0x55
009b 4800 |H | Short_Literal 0x0
009c 00da | | Load_Top At_Offset_2
009d 01d6 | | Execute Vector,Field_Write
009e 484e |HN | Short_Literal 0x4e
009f 4801 |H | Short_Literal 0x1
00a0 00da | | Load_Top At_Offset_2
00a1 01d6 | | Execute Vector,Field_Write
00a2 4841 |HA | Short_Literal 0x41
00a3 4802 |H | Short_Literal 0x2
00a4 00da | | Load_Top At_Offset_2
00a5 01d6 | | Execute Vector,Field_Write
00a6 4842 |HB | Short_Literal 0x42
00a7 4803 |H | Short_Literal 0x3
00a8 00da | | Load_Top At_Offset_2
00a9 01d6 | | Execute Vector,Field_Write
00aa 484c |HL | Short_Literal 0x4c
00ab 4804 |H | Short_Literal 0x4
00ac 00da | | Load_Top At_Offset_2
00ad 01d6 | | Execute Vector,Field_Write
00ae 4845 |HE | Short_Literal 0x45
00af 4805 |H | Short_Literal 0x5
00b0 00da | | Load_Top At_Offset_2
00b1 01d6 | | Execute Vector,Field_Write
00b2 00d9 | | Load_Top At_Offset_1
00b3 01d4 | | Execute Vector,Structure_Write
00b4 00da | | Load_Top At_Offset_2
00b5 0337 | 7 | Declare_Variable Array
00b6 00d8 | | Load_Top At_Offset_0
00b7 0335 | 5 | Declare_Variable Array,Duplicate
00b8 00cd | | Action Spare6_Action
00b9 484f |HO | Short_Literal 0x4f
00ba 4800 |H | Short_Literal 0x0
00bb 00da | | Load_Top At_Offset_2
00bc 01d6 | | Execute Vector,Field_Write
00bd 484e |HN | Short_Literal 0x4e
00be 4801 |H | Short_Literal 0x1
00bf 00da | | Load_Top At_Offset_2
00c0 01d6 | | Execute Vector,Field_Write
00c1 4843 |HC | Short_Literal 0x43
00c2 4802 |H | Short_Literal 0x2
00c3 00da | | Load_Top At_Offset_2
00c4 01d6 | | Execute Vector,Field_Write
00c5 4845 |HE | Short_Literal 0x45
00c6 4803 |H | Short_Literal 0x3
00c7 00da | | Load_Top At_Offset_2
00c8 01d6 | | Execute Vector,Field_Write
00c9 4820 |H | Short_Literal 0x20
00ca 4804 |H | Short_Literal 0x4
00cb 00da | | Load_Top At_Offset_2
00cc 01d6 | | Execute Vector,Field_Write
00cd 4820 |H | Short_Literal 0x20
00ce 4805 |H | Short_Literal 0x5
00cf 00da | | Load_Top At_Offset_2
00d0 01d6 | | Execute Vector,Field_Write
00d1 00d9 | | Load_Top At_Offset_1
00d2 01d4 | | Execute Vector,Structure_Write
00d3 0092 0c45 | E| Action Push_String_Extended,0xc45 ; "DFS_RELEASE"
00d5 0092 0c46 | F| Action Push_String_Extended,0xc46 ; "R1000_DUMP1"
00d7 0092 0c47 | G| Action Push_String_Extended,0xc47 ; "AUTOBOOT_AFTER_CRASH"
00d9 e002 | | Load 0x0,0x2
00da 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00db 0620 | | Execute_Immediate Set_Value_Unchecked,0x20
00dc e002 | | Load 0x0,0x2
00dd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00de 067e | ~ | Execute_Immediate Set_Value_Unchecked,0x7e
00df 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00e0 00c7 | | Action Elaborate_Subprogram
00e1 1d15 | | Execute_Immediate Reference_Lex_1,0x15
00e2 00c7 | | Action Elaborate_Subprogram
00e3 029d 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call
00e5 029d 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call
00e7 1d16 | | Execute_Immediate Reference_Lex_1,0x16
00e8 00c7 | | Action Elaborate_Subprogram
00e9 029d 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call
00eb 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00ec 00c7 | | Action Elaborate_Subprogram
00ed 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00ee 00c7 | | Action Elaborate_Subprogram
00ef 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00f0 00c7 | | Action Elaborate_Subprogram
00f1 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00f2 00c7 | | Action Elaborate_Subprogram
00f3 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00f4 00c7 | | Action Elaborate_Subprogram
00f5 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00f6 00c7 | | Action Elaborate_Subprogram
00f7 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00f8 00c7 | | Action Elaborate_Subprogram
00f9 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00fa 00c7 | | Action Elaborate_Subprogram
00fb 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00fc 00c7 | | Action Elaborate_Subprogram
00fd 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00fe 00c7 | | Action Elaborate_Subprogram
00ff 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0100 00c7 | | Action Elaborate_Subprogram
0101 029d 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call
0103 029d 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call
0105 029d 0703 | | Declare_Subprogram INIT_0700,For_Outer_Call
0107 029d 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call
0109 029d 0773 | s| Declare_Subprogram INIT_0770,For_Outer_Call
010b 029d 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call
010d 029d 07c3 | | Declare_Subprogram INIT_07c0,For_Outer_Call
010f 029d 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call
0111 029d 08cb | | Declare_Subprogram INIT_08c8,For_Outer_Call
0113 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0114 00c7 | | Action Elaborate_Subprogram
0115 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0116 00c7 | | Action Elaborate_Subprogram
0117 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0118 00c7 | | Action Elaborate_Subprogram
0119 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
011a 00c7 | | Action Elaborate_Subprogram
011b BODY_0008:
011b 00bc | | Action Signal_Activated
011c 00bb | | Action Signal_Completion
011d 0000 0000 | | .XXX[0x3]
011f 0000 | |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 4607 |F | Jump_Case 0x8
0124 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0125 7807 |x | Jump 0x12d ; case 0x1
0126 780a |x | Jump 0x131 ; case 0x2
0127 780e |x | Jump 0x136 ; case 0x3
0128 7811 |x | Jump 0x13a ; case 0x4
0129 7812 |x | Jump 0x13c ; case 0x5
012a 7813 |x | Jump 0x13e ; case 0x6
012b 7816 |x | Jump 0x142 ; case 0x7
012c 4302 |C | .XXX[0x1]
012d 00da | | Load_Top At_Offset_2
012e 0091 0c23 | #| Action Push_String_Extended_Indexed,0xc23 ; "IGNORE_ERRORS"
0130 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0131 00db | | Load_Top At_Offset_3
0132 00db | | Load_Top At_Offset_3
0133 00e0 | | Load_Encached Standard_Cache
0134 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0135 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0136 00da | | Load_Top At_Offset_2
0137 00e0 | | Load_Encached Standard_Cache
0138 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0139 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
013a 00db | | Load_Top At_Offset_3
013b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
013c 00db | | Load_Top At_Offset_3
013d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
013e e20d | | Load 0x1,0xd
013f 00dc | | Load_Top At_Offset_4
0140 0267 | g | Execute Discrete,Predecessor
0141 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0142 e20d | | Load 0x1,0xd
0143 00dc | | Load_Top At_Offset_4
0144 0268 | h | Execute Discrete,Successor
0145 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0146 0000 0000 | | .XXX[0x2]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 4607 |F | Jump_Case 0x8
014c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
014d 7807 |x | Jump 0x155 ; case 0x1
014e 780a |x | Jump 0x159 ; case 0x2
014f 780e |x | Jump 0x15e ; case 0x3
0150 7811 |x | Jump 0x162 ; case 0x4
0151 7812 |x | Jump 0x164 ; case 0x5
0152 7813 |x | Jump 0x166 ; case 0x6
0153 7816 |x | Jump 0x16a ; case 0x7
0154 4302 |C | .XXX[0x1]
0155 00da | | Load_Top At_Offset_2
0156 0091 0c26 | &| Action Push_String_Extended_Indexed,0xc26 ; "MUST_EXIST"
0158 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0159 00db | | Load_Top At_Offset_3
015a 00db | | Load_Top At_Offset_3
015b 00e0 | | Load_Encached Standard_Cache
015c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
015d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
015e 00da | | Load_Top At_Offset_2
015f 00e0 | | Load_Encached Standard_Cache
0160 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0161 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0162 00db | | Load_Top At_Offset_3
0163 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0164 00db | | Load_Top At_Offset_3
0165 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0166 e20e | | Load 0x1,0xe
0167 00dc | | Load_Top At_Offset_4
0168 0267 | g | Execute Discrete,Predecessor
0169 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
016a e20e | | Load 0x1,0xe
016b 00dc | | Load_Top At_Offset_4
016c 0268 | h | Execute Discrete,Successor
016d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
016e 0000 0000 | | .XXX[0x2]
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 4607 |F | Jump_Case 0x8
0174 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0175 7807 |x | Jump 0x17d ; case 0x1
0176 780a |x | Jump 0x181 ; case 0x2
0177 780e |x | Jump 0x186 ; case 0x3
0178 7811 |x | Jump 0x18a ; case 0x4
0179 7812 |x | Jump 0x18c ; case 0x5
017a 7813 |x | Jump 0x18e ; case 0x6
017b 7816 |x | Jump 0x192 ; case 0x7
017c 4302 |C | .XXX[0x1]
017d 00da | | Load_Top At_Offset_2
017e 0091 0c29 | )| Action Push_String_Extended_Indexed,0xc29 ; "CLOSE"
0180 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0181 00db | | Load_Top At_Offset_3
0182 00db | | Load_Top At_Offset_3
0183 00e0 | | Load_Encached Standard_Cache
0184 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0185 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0186 00da | | Load_Top At_Offset_2
0187 00e0 | | Load_Encached Standard_Cache
0188 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0189 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
018a 00db | | Load_Top At_Offset_3
018b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
018c 00db | | Load_Top At_Offset_3
018d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
018e e20f | | Load 0x1,0xf
018f 00dc | | Load_Top At_Offset_4
0190 0267 | g | Execute Discrete,Predecessor
0191 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0192 e20f | | Load 0x1,0xf
0193 00dc | | Load_Top At_Offset_4
0194 0268 | h | Execute Discrete,Successor
0195 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0196 0000 0000 | | .XXX[0x2]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 4607 |F | Jump_Case 0x8
019c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
019d 7807 |x | Jump 0x1a5 ; case 0x1
019e 780a |x | Jump 0x1a9 ; case 0x2
019f 780e |x | Jump 0x1ae ; case 0x3
01a0 7811 |x | Jump 0x1b2 ; case 0x4
01a1 7812 |x | Jump 0x1b4 ; case 0x5
01a2 7813 |x | Jump 0x1b6 ; case 0x6
01a3 7816 |x | Jump 0x1ba ; case 0x7
01a4 4302 |C | .XXX[0x1]
01a5 00da | | Load_Top At_Offset_2
01a6 0091 0c2c | ,| Action Push_String_Extended_Indexed,0xc2c ; "FS_OK"
01a8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01a9 00db | | Load_Top At_Offset_3
01aa 00db | | Load_Top At_Offset_3
01ab 00e0 | | Load_Encached Standard_Cache
01ac 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01ae 00da | | Load_Top At_Offset_2
01af 00e0 | | Load_Encached Standard_Cache
01b0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01b1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01b2 00db | | Load_Top At_Offset_3
01b3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b4 00db | | Load_Top At_Offset_3
01b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01b6 e210 | | Load 0x1,0x10
01b7 00dc | | Load_Top At_Offset_4
01b8 0267 | g | Execute Discrete,Predecessor
01b9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01ba e210 | | Load 0x1,0x10
01bb 00dc | | Load_Top At_Offset_4
01bc 0268 | h | Execute Discrete,Successor
01bd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01be 0000 0000 | | .XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01cb | | .CONST 0x01cb ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0003 | | .CONST 0x0003 ; Number of locals
01c3 INIT_01c0:
01c3 e008 | | Load 0x0,0x8
01c4 0007 | | Action Break_Optional
01c5 4850 |HP | Short_Literal 0x50
01c6 e009 | | Load 0x0,0x9
01c7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01c8 1c08 | | Execute_Immediate Run_Utility,0x8
01c9 00d8 | | Load_Top At_Offset_0
01ca 1c00 | | Execute_Immediate Run_Utility,0x0
01cb BODY_01c0:
01cb 00d8 | | Load_Top At_Offset_0
01cc e5ff | | Load 0x2,-0x1
01cd e009 | | Load 0x0,0x9
01ce 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01cf 00d1 | | Pop_Control Pop_Count_1
01d0 e226 | & | Load 0x1,0x26
01d1 03bc | | Declare_Variable Access,By_Allocation
01d2 a5fb | | Store_Unchecked 0x2,-0x5
01d3 e008 | | Load 0x0,0x8
01d4 03bc | | Declare_Variable Access,By_Allocation
01d5 003a | : | Store_Top Access,At_Offset_2
01d6 00d9 | | Load_Top At_Offset_1
01d7 e5fa | | Load 0x2,-0x6
01d8 e5fd | | Load 0x2,-0x3
01d9 e5fc | | Load 0x2,-0x4
01da e5fe | | Load 0x2,-0x2
01db e403 | | Load 0x2,0x3
01dc 800a | | Call 0x0,0xa
01dd c5fa | | Store 0x2,-0x6
01de 003a | : | Store_Top Access,At_Offset_2
01df e5fa | | Load 0x2,-0x6
01e0 6801 |h | Jump_Zero 0x1e2
01e1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01e2 00cf | | Action Mark_Auxiliary
01e3 481e |H | Short_Literal 0x1e
01e4 4801 |H | Short_Literal 0x1
01e5 0007 | | Action Break_Optional
01e6 00d8 | | Load_Top At_Offset_0
01e7 e402 | | Load 0x2,0x2
01e8 0227 | ' | Execute Access,All_Reference
01e9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01ea 01d7 | | Execute Vector,Field_Read
01eb 00d9 | | Load_Top At_Offset_1
01ec e5fb | | Load 0x2,-0x5
01ed 0227 | ' | Execute Access,All_Reference
01ee 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01ef 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01f0 01d6 | | Execute Vector,Field_Write
01f1 00c8 | | Action Pop_Auxiliary_Range
01f2 3ff3 |? | Loop_Increasing 0x1e6
01f3 00ce | | Action Pop_Auxiliary
01f4 00d9 | | Load_Top At_Offset_1
01f5 0227 | ' | Execute Access,All_Reference
01f6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01f7 e5fb | | Load 0x2,-0x5
01f8 0227 | ' | Execute Access,All_Reference
01f9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01fa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01fb 00d9 | | Load_Top At_Offset_1
01fc 0227 | ' | Execute Access,All_Reference
01fd 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
01fe e5fb | | Load 0x2,-0x5
01ff 0227 | ' | Execute Access,All_Reference
0200 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0201 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0202 4800 |H | Short_Literal 0x0
0203 e5fb | | Load 0x2,-0x5
0204 0227 | ' | Execute Access,All_Reference
0205 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0206 4800 |H | Short_Literal 0x0
0207 e5fb | | Load 0x2,-0x5
0208 0227 | ' | Execute Access,All_Reference
0209 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
020a e5fb | | Load 0x2,-0x5
020b 0227 | ' | Execute Access,All_Reference
020c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
020d 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
020e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
020f e5fb | | Load 0x2,-0x5
0210 0227 | ' | Execute Access,All_Reference
0211 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0212 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0213 0000 0000 | | .BLANK 0000[0x5]
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 00db | | Load_Top At_Offset_3
021c 0227 | ' | Execute Access,All_Reference
021d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
021e e5fe | | Load 0x2,-0x2
021f 0227 | ' | Execute Access,All_Reference
0220 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0221 027c | | | Execute Discrete,Less
0222 681a |h | Jump_Zero 0x23d
0223 e5fc | | Load 0x2,-0x4
0224 e5fd | | Load 0x2,-0x3
0225 e5ff | | Load 0x2,-0x1
0226 e5fe | | Load 0x2,-0x2
0227 0227 | ' | Execute Access,All_Reference
0228 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0229 e5fe | | Load 0x2,-0x2
022a 0227 | ' | Execute Access,All_Reference
022b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
022c e5fe | | Load 0x2,-0x2
022d 0227 | ' | Execute Access,All_Reference
022e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
022f e5fe | | Load 0x2,-0x2
0230 0227 | ' | Execute Access,All_Reference
0231 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0232 800b | | Call 0x0,0xb
0233 00d1 | | Pop_Control Pop_Count_1
0234 c5fc | | Store 0x2,-0x4
0235 00db | | Load_Top At_Offset_3
0236 0227 | ' | Execute Access,All_Reference
0237 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0238 0a01 | | Execute_Immediate Plus,0x1
0239 e5fe | | Load 0x2,-0x2
023a 0227 | ' | Execute Access,All_Reference
023b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
023c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
023d 4809 |H | Short_Literal 0x9
023e a5fc | | Store_Unchecked 0x2,-0x4
023f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024b | K | .CONST 0x024b ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0003 | | .CONST 0x0003 ; Number of locals
0243 INIT_0240:
0243 e210 | | Load 0x1,0x10
0244 0007 | | Action Break_Optional
0245 4850 |HP | Short_Literal 0x50
0246 e009 | | Load 0x0,0x9
0247 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0248 1c08 | | Execute_Immediate Run_Utility,0x8
0249 00d8 | | Load_Top At_Offset_0
024a 1c00 | | Execute_Immediate Run_Utility,0x0
024b BODY_0240:
024b 00d9 | | Load_Top At_Offset_1
024c 4800 |H | Short_Literal 0x0
024d e5fd | | Load 0x2,-0x3
024e e5fe | | Load 0x2,-0x2
024f e5ff | | Load 0x2,-0x1
0250 8234 | 4 | Call 0x1,0x34
0251 005a | Z | Store_Top Discrete,At_Offset_2
0252 00d9 | | Load_Top At_Offset_1
0253 4615 |F | Jump_Case 0x16
0254 7829 |x) | Jump 0x27e ; case 0x0
0255 7828 |x( | Jump 0x27e ; case 0x1
0256 7827 |x' | Jump 0x27e ; case 0x2
0257 7826 |x& | Jump 0x27e ; case 0x3
0258 7825 |x% | Jump 0x27e ; case 0x4
0259 7824 |x$ | Jump 0x27e ; case 0x5
025a 7823 |x# | Jump 0x27e ; case 0x6
025b 7822 |x" | Jump 0x27e ; case 0x7
025c 7821 |x! | Jump 0x27e ; case 0x8
025d 7820 |x | Jump 0x27e ; case 0x9
025e 781f |x | Jump 0x27e ; case 0xa
025f 781e |x | Jump 0x27e ; case 0xb
0260 781d |x | Jump 0x27e ; case 0xc
0261 781c |x | Jump 0x27e ; case 0xd
0262 781b |x | Jump 0x27e ; case 0xe
0263 781a |x | Jump 0x27e ; case 0xf
0264 7819 |x | Jump 0x27e ; case 0x10
0265 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; case 0x11
0266 780d |x | Jump 0x274 ; case 0x12
0267 7811 |x | Jump 0x279 ; case 0x13
0268 7806 |x | Jump 0x26f ; case 0x14
0269 7800 |x | Jump 0x26a ; case 0x15
026a 0092 0c48 | H| Action Push_String_Extended,0xc48 ; "Error accessing environment file"
026c e00c | | Load 0x0,0xc
026d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
026e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
026f 0092 0c49 | I| Action Push_String_Extended,0xc49 ; "Environment file already open"
0271 e00c | | Load 0x0,0xc
0272 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0273 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0274 0092 0c4a | J| Action Push_String_Extended,0xc4a ; "Invalid environment file name"
0276 e00c | | Load 0x0,0xc
0277 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0278 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0279 0092 0c4b | K| Action Push_String_Extended,0xc4b ; "Environment file already exists, not overwritten"
027b e00c | | Load 0x0,0xc
027c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
027d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
027e 00d8 | | Load_Top At_Offset_0
027f 00da | | Load_Top At_Offset_2
0280 00d8 | | Load_Top At_Offset_0
0281 e211 | | Load 0x1,0x11
0282 0260 | ` | Execute Discrete,In_Type
0283 7001 |p | Jump_Nonzero 0x285
0284 0801 | | Execute_Immediate Raise,0x1
0285 800d | | Call 0x0,0xd
0286 00d1 | | Pop_Control Pop_Count_1
0287 00d8 | | Load_Top At_Offset_0
0288 e009 | | Load 0x0,0x9
0289 1813 | | Execute Package,Field_Execute,Field_Number 0x13
028a e00c | | Load 0x0,0xc
028b 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
028c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
028d 0000 0000 | | .XXX[0x3]
028f 0000 | |
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 e5fc | | Load 0x2,-0x4
0294 4801 |H | Short_Literal 0x1
0295 e5fd | | Load 0x2,-0x3
0296 e5fe | | Load 0x2,-0x2
0297 e5ff | | Load 0x2,-0x1
0298 8234 | 4 | Call 0x1,0x34
0299 c5fc | | Store 0x2,-0x4
029a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
029b 0000 0000 | | .BLANK 0000[0x5]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02b9 | | .CONST 0x02b9 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0009 | | .CONST 0x0009 ; Number of locals
02a3 INIT_02a0:
02a3 e226 | & | Load 0x1,0x26
02a4 0007 | | Action Break_Optional
02a5 e213 | | Load 0x1,0x13
02a6 0337 | 7 | Declare_Variable Array
02a7 00e2 | | Load_Encached Integer_Cache
02a8 e00e | | Load 0x0,0xe
02a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02aa 02c7 | | Declare_Variable Any
02ab 00d8 | | Load_Top At_Offset_0
02ac 1c00 | | Execute_Immediate Run_Utility,0x0
02ad e211 | | Load 0x1,0x11
02ae 0007 | | Action Break_Optional
02af e210 | | Load 0x1,0x10
02b0 0007 | | Action Break_Optional
02b1 4850 |HP | Short_Literal 0x50
02b2 e009 | | Load 0x0,0x9
02b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02b4 1c08 | | Execute_Immediate Run_Utility,0x8
02b5 00d8 | | Load_Top At_Offset_0
02b6 1c00 | | Execute_Immediate Run_Utility,0x0
02b7 029f 099b | | Declare_Subprogram INIT_0998,For_Call
02b9 BODY_02a0:
02b9 00db | | Load_Top At_Offset_3
02ba e402 | | Load 0x2,0x2
02bb 4801 |H | Short_Literal 0x1
02bc 4800 |H | Short_Literal 0x0
02bd 4800 |H | Short_Literal 0x0
02be e5ff | | Load 0x2,-0x1
02bf 8214 | | Call 0x1,0x14
02c0 c402 | | Store 0x2,0x2
02c1 c406 | | Store 0x2,0x6
02c2 00db | | Load_Top At_Offset_3
02c3 7002 |p | Jump_Nonzero 0x2c6
02c4 8409 | | Call 0x2,0x9
02c5 7802 |x | Jump 0x2c8
02c6 00db | | Load_Top At_Offset_3
02c7 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
02c8 00da | | Load_Top At_Offset_2
02c9 0e10 | | Execute_Immediate Not_Equal,0x10
02ca 680e |h | Jump_Zero 0x2d9
02cb 00d9 | | Load_Top At_Offset_1
02cc 00db | | Load_Top At_Offset_3
02cd 00d8 | | Load_Top At_Offset_0
02ce e211 | | Load 0x1,0x11
02cf 0260 | ` | Execute Discrete,In_Type
02d0 7001 |p | Jump_Nonzero 0x2d2
02d1 0801 | | Execute_Immediate Raise,0x1
02d2 800d | | Call 0x0,0xd
02d3 00d1 | | Pop_Control Pop_Count_1
02d4 00d9 | | Load_Top At_Offset_1
02d5 e009 | | Load 0x0,0x9
02d6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02d7 e00c | | Load 0x0,0xc
02d8 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
02d9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02da 0000 0000 | | .BLANK 0000[0x6]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3 | | .CONST 0x02e3 ; Address of begin
02e1 0004 | | .CONST 0x0004 ; Address of exception handler
02e2 0001 | | .CONST 0x0001 ; Number of locals
02e3 BODY_02e0:
02e3 INIT_02e0:
02e3 00db | | Load_Top At_Offset_3
02e4 00db | | Load_Top At_Offset_3
02e5 800f | | Call 0x0,0xf
02e6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02e7 0000 | | .XXX[0x1]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 00da | | Load_Top At_Offset_2
02ec 0227 | ' | Execute Access,All_Reference
02ed 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02ee a5fe | | Store_Unchecked 0x2,-0x2
02ef 00da | | Load_Top At_Offset_2
02f0 0227 | ' | Execute Access,All_Reference
02f1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02f2 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
02f3 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
02f4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02f5 a5fd | | Store_Unchecked 0x2,-0x3
02f6 00da | | Load_Top At_Offset_2
02f7 0227 | ' | Execute Access,All_Reference
02f8 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02f9 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
02fa 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
02fb 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02fc a5fc | | Store_Unchecked 0x2,-0x4
02fd 00da | | Load_Top At_Offset_2
02fe 0227 | ' | Execute Access,All_Reference
02ff 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0300 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0301 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0302 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0303 a5fb | | Store_Unchecked 0x2,-0x5
0304 00da | | Load_Top At_Offset_2
0305 0227 | ' | Execute Access,All_Reference
0306 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0307 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0308 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0309 e5fa | | Load 0x2,-0x6
030a 017d | } | Execute Record,Structure_Write
030b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
030c 0000 0000 | | .BLANK 0000[0x4]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0319 | | .CONST 0x0319 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0002 | | .CONST 0x0002 ; Number of locals
0313 INIT_0310:
0313 481e |H | Short_Literal 0x1e
0314 e009 | | Load 0x0,0x9
0315 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0316 1c08 | | Execute_Immediate Run_Utility,0x8
0317 00d8 | | Load_Top At_Offset_0
0318 1c00 | | Execute_Immediate Run_Utility,0x0
0319 BODY_0310:
0319 00d8 | | Load_Top At_Offset_0
031a e5fd | | Load 0x2,-0x3
031b e009 | | Load 0x0,0x9
031c 1810 | | Execute Package,Field_Execute,Field_Number 0x10
031d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
031e 0000 0000 | | .XXX[0x2]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0340 | @ | .CONST 0x0340 ; Address of begin
0321 042e | . | .CONST 0x042e ; Address of exception handler
0322 000b | | .CONST 0x000b ; Number of locals
0323 INIT_0320:
0323 e010 | | Load 0x0,0x10
0324 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0325 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0326 02c7 | | Declare_Variable Any
0327 00d8 | | Load_Top At_Offset_0
0328 1c00 | | Execute_Immediate Run_Utility,0x0
0329 e213 | | Load 0x1,0x13
032a 0337 | 7 | Declare_Variable Array
032b 00e2 | | Load_Encached Integer_Cache
032c e00e | | Load 0x0,0xe
032d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032e 02c7 | | Declare_Variable Any
032f 00d8 | | Load_Top At_Offset_0
0330 1c00 | | Execute_Immediate Run_Utility,0x0
0331 e010 | | Load 0x0,0x10
0332 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0333 e211 | | Load 0x1,0x11
0334 0007 | | Action Break_Optional
0335 e010 | | Load 0x0,0x10
0336 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0337 02c7 | | Declare_Variable Any
0338 00d8 | | Load_Top At_Offset_0
0339 1c00 | | Execute_Immediate Run_Utility,0x0
033a 00e2 | | Load_Encached Integer_Cache
033b e010 | | Load 0x0,0x10
033c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
033d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
033e e226 | & | Load 0x1,0x26
033f 0007 | | Action Break_Optional
0340 BODY_0320:
0340 e010 | | Load 0x0,0x10
0341 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0342 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0343 e408 | | Load 0x2,0x8
0344 0120 | | Execute Any,Is_Value
0345 6803 |h | Jump_Zero 0x349
0346 e010 | | Load 0x0,0x10
0347 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0348 7801 |x | Jump 0x34a
0349 e408 | | Load 0x2,0x8
034a 6105 |a | Indirect_Literal Discrete,0x450,{0x00000000, 0x00004000}
034b e011 | | Load 0x0,0x11
034c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
034d e012 | | Load 0x0,0x12
034e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
034f e010 | | Load 0x0,0x10
0350 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0351 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0352 e5fe | | Load 0x2,-0x2
0353 e010 | | Load 0x0,0x10
0354 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0355 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0356 c408 | | Store 0x2,0x8
0357 005a | Z | Store_Top Discrete,At_Offset_2
0358 00d9 | | Load_Top At_Offset_1
0359 6807 |h | Jump_Zero 0x361
035a 4815 |H | Short_Literal 0x15
035b a5fd | | Store_Unchecked 0x2,-0x3
035c 0092 0c4c | L| Action Push_String_Extended,0xc4c ; "Error accessing environment file information"
035e e00c | | Load 0x0,0xc
035f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0360 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0361 e010 | | Load 0x0,0x10
0362 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0363 e402 | | Load 0x2,0x2
0364 0120 | | Execute Any,Is_Value
0365 6804 |h | Jump_Zero 0x36a
0366 e010 | | Load 0x0,0x10
0367 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0368 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0369 7801 |x | Jump 0x36b
036a e402 | | Load 0x2,0x2
036b 60e4 |` | Indirect_Literal Discrete,0x450,{0x00000000, 0x00004000}
036c e011 | | Load 0x0,0x11
036d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
036e 4800 |H | Short_Literal 0x0
036f e408 | | Load 0x2,0x8
0370 e010 | | Load 0x0,0x10
0371 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0372 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0373 c402 | | Store 0x2,0x2
0374 c406 | | Store 0x2,0x6
0375 e406 | | Load 0x2,0x6
0376 6807 |h | Jump_Zero 0x37e
0377 4815 |H | Short_Literal 0x15
0378 a5fd | | Store_Unchecked 0x2,-0x3
0379 0092 0c4c | L| Action Push_String_Extended,0xc4c ; "Error accessing environment file information"
037b e00c | | Load 0x0,0xc
037c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
037d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
037e e402 | | Load 0x2,0x2
037f e010 | | Load 0x0,0x10
0380 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0381 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0382 4f7a |Oz | Short_Literal -0x86
0383 0273 | s | Execute Discrete,Plus
0384 60c7 |` | Indirect_Literal Discrete,0x44c,{0x00000000, 0x00001fff}
0385 0273 | s | Execute Discrete,Plus
0386 09f3 | | Execute_Immediate Binary_Scale,-0xd
0387 00d8 | | Load_Top At_Offset_0
0388 00e2 | | Load_Encached Integer_Cache
0389 0260 | ` | Execute Discrete,In_Type
038a 7001 |p | Jump_Nonzero 0x38c
038b 0801 | | Execute_Immediate Raise,0x1
038c 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
038d e405 | | Load 0x2,0x5
038e e011 | | Load 0x0,0x11
038f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0390 e010 | | Load 0x0,0x10
0391 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0392 00ea | | Load_Encached Null_String_Cache
0393 e5fe | | Load 0x2,-0x2
0394 4800 |H | Short_Literal 0x0
0395 e00e | | Load 0x0,0xe
0396 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0397 c405 | | Store 0x2,0x5
0398 e407 | | Load 0x2,0x7
0399 00d9 | | Load_Top At_Offset_1
039a 4801 |H | Short_Literal 0x1
039b e409 | | Load 0x2,0x9
039c 4802 |H | Short_Literal 0x2
039d e5ff | | Load 0x2,-0x1
039e 8214 | | Call 0x1,0x14
039f 003a | : | Store_Top Access,At_Offset_2
03a0 c407 | | Store 0x2,0x7
03a1 e407 | | Load 0x2,0x7
03a2 7088 |p | Jump_Nonzero 0x42b
03a3 4811 |H | Short_Literal 0x11
03a4 a5fd | | Store_Unchecked 0x2,-0x3
03a5 00cf | | Action Mark_Auxiliary
03a6 787a |xz | Jump 0x421
03a7 4bff |K | Short_Literal 0x3ff
03a8 a409 | | Store_Unchecked 0x2,0x9
03a9 00e3 | | Load_Encached Natural_Cache
03aa e403 | | Load 0x2,0x3
03ab 00d8 | | Load_Top At_Offset_0
03ac 01da | | Execute Vector,Bounds
03ad e002 | | Load 0x0,0x2
03ae 1b12 | | Execute Package,Field_Read,Field_Number 0x12
03af 0334 | 4 | Declare_Variable Array,With_Constraint
03b0 00d0 | | Action Swap_Control
03b1 00d8 | | Load_Top At_Offset_0
03b2 01dd | | Execute Vector,First
03b3 00da | | Load_Top At_Offset_2
03b4 01dd | | Execute Vector,First
03b5 0272 | r | Execute Discrete,Minus
03b6 00da | | Load_Top At_Offset_2
03b7 01d9 | | Execute Vector,Reverse_Bounds
03b8 0263 | c | Execute Discrete,Above_Bound
03b9 700a |p | Jump_Nonzero 0x3c4
03ba 00d8 | | Load_Top At_Offset_0
03bb 00db | | Load_Top At_Offset_3
03bc 0273 | s | Execute Discrete,Plus
03bd e40f | | Load 0x2,0xf
03be 01d7 | | Execute Vector,Field_Read
03bf 00d9 | | Load_Top At_Offset_1
03c0 e40e | | Load 0x2,0xe
03c1 01d5 | | Execute Vector,Field_Reference
03c2 0118 | | Execute Any,Write_Unchecked
03c3 3ff6 |? | Loop_Increasing 0x3ba
03c4 00d2 | | Pop_Control Pop_Count_2
03c5 e405 | | Load 0x2,0x5
03c6 e00e | | Load 0x0,0xe
03c7 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
03c8 00d8 | | Load_Top At_Offset_0
03c9 01db | | Execute Vector,Length
03ca e213 | | Load 0x1,0x13
03cb 01db | | Execute Vector,Length
03cc 027f | | Execute Discrete,Equal
03cd 7001 |p | Jump_Nonzero 0x3cf
03ce 08e0 | | Execute_Immediate Raise,0xe0
03cf e213 | | Load 0x1,0x13
03d0 0337 | 7 | Declare_Variable Array
03d1 00d0 | | Action Swap_Control
03d2 00d8 | | Load_Top At_Offset_0
03d3 01dd | | Execute Vector,First
03d4 00da | | Load_Top At_Offset_2
03d5 01dd | | Execute Vector,First
03d6 0272 | r | Execute Discrete,Minus
03d7 00da | | Load_Top At_Offset_2
03d8 01d9 | | Execute Vector,Reverse_Bounds
03d9 0263 | c | Execute Discrete,Above_Bound
03da 700a |p | Jump_Nonzero 0x3e5
03db 00d8 | | Load_Top At_Offset_0
03dc 00db | | Load_Top At_Offset_3
03dd 0273 | s | Execute Discrete,Plus
03de e40f | | Load 0x2,0xf
03df 01d7 | | Execute Vector,Field_Read
03e0 00d9 | | Load_Top At_Offset_1
03e1 e40e | | Load 0x2,0xe
03e2 01d5 | | Execute Vector,Field_Reference
03e3 0118 | | Execute Any,Write_Unchecked
03e4 3ff6 |? | Loop_Increasing 0x3db
03e5 00d2 | | Pop_Control Pop_Count_2
03e6 e403 | | Load 0x2,0x3
03e7 01d4 | | Execute Vector,Structure_Write
03e8 c409 | | Store 0x2,0x9
03e9 00db | | Load_Top At_Offset_3
03ea 4bff |K | Short_Literal 0x3ff
03eb 027c | | | Execute Discrete,Less
03ec 6812 |h | Jump_Zero 0x3ff
03ed 00cf | | Action Mark_Auxiliary
03ee 4bff |K | Short_Literal 0x3ff
03ef e409 | | Load 0x2,0x9
03f0 0a01 | | Execute_Immediate Plus,0x1
03f1 00d8 | | Load_Top At_Offset_0
03f2 00e2 | | Load_Encached Integer_Cache
03f3 0260 | ` | Execute Discrete,In_Type
03f4 7001 |p | Jump_Nonzero 0x3f6
03f5 0801 | | Execute_Immediate Raise,0x1
03f6 0263 | c | Execute Discrete,Above_Bound
03f7 7006 |p | Jump_Nonzero 0x3fe
03f8 4800 |H | Short_Literal 0x0
03f9 00d9 | | Load_Top At_Offset_1
03fa e403 | | Load 0x2,0x3
03fb 01d6 | | Execute Vector,Field_Write
03fc 00c8 | | Action Pop_Auxiliary_Range
03fd 3ffa |? | Loop_Increasing 0x3f8
03fe 00ce | | Action Pop_Auxiliary
03ff e407 | | Load 0x2,0x7
0400 e403 | | Load 0x2,0x3
0401 4801 |H | Short_Literal 0x1
0402 e40b | | Load 0x2,0xb
0403 0227 | ' | Execute Access,All_Reference
0404 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0405 e40b | | Load 0x2,0xb
0406 0227 | ' | Execute Access,All_Reference
0407 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0408 e40b | | Load 0x2,0xb
0409 0227 | ' | Execute Access,All_Reference
040a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
040b e40b | | Load 0x2,0xb
040c 0227 | ' | Execute Access,All_Reference
040d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
040e 8013 | | Call 0x0,0x13
040f c407 | | Store 0x2,0x7
0410 00d9 | | Load_Top At_Offset_1
0411 0227 | ' | Execute Access,All_Reference
0412 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0413 0a01 | | Execute_Immediate Plus,0x1
0414 00da | | Load_Top At_Offset_2
0415 0227 | ' | Execute Access,All_Reference
0416 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0417 e407 | | Load 0x2,0x7
0418 6807 |h | Jump_Zero 0x420
0419 e407 | | Load 0x2,0x7
041a a5fd | | Store_Unchecked 0x2,-0x3
041b e405 | | Load 0x2,0x5
041c e00e | | Load 0x0,0xe
041d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
041e c405 | | Store 0x2,0x5
041f 7805 |x | Jump 0x425
0420 00c9 | | Action Pop_Auxiliary_Loop
0421 e405 | | Load 0x2,0x5
0422 e00e | | Load 0x0,0xe
0423 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0424 6f82 |o | Jump_Zero 0x3a7
0425 00ce | | Action Pop_Auxiliary
0426 e405 | | Load 0x2,0x5
0427 e00e | | Load 0x0,0xe
0428 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0429 c405 | | Store 0x2,0x5
042a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
042b e407 | | Load 0x2,0x7
042c a5fd | | Store_Unchecked 0x2,-0x3
042d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
042e TRAP_0320:
042e 00d8 | | Load_Top At_Offset_0
042f 0107 | | Execute Exception,Get_Name
0430 4900 |I | Short_Literal 0x100
0431 490f |I | Short_Literal 0x10f
0432 0262 | b | Execute Discrete,In_Range
0433 6803 |h | Jump_Zero 0x437
0434 4814 |H | Short_Literal 0x14
0435 a5fd | | Store_Unchecked 0x2,-0x3
0436 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0437 00d8 | | Load_Top At_Offset_0
0438 0107 | | Execute Exception,Get_Name
0439 4920 |I | Short_Literal 0x120
043a 492f |I/ | Short_Literal 0x12f
043b 0262 | b | Execute Discrete,In_Range
043c 6803 |h | Jump_Zero 0x440
043d 4812 |H | Short_Literal 0x12
043e a5fd | | Store_Unchecked 0x2,-0x3
043f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0440 00d8 | | Load_Top At_Offset_0
0441 0107 | | Execute Exception,Get_Name
0442 4930 |I0 | Short_Literal 0x130
0443 493f |I? | Short_Literal 0x13f
0444 0262 | b | Execute Discrete,In_Range
0445 6803 |h | Jump_Zero 0x449
0446 4815 |H | Short_Literal 0x15
0447 a5fd | | Store_Unchecked 0x2,-0x3
0448 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0449 0100 | | Execute Exception,Raise
044a 0000 0000 | | .XXX[0x2]
044c 0000 0000 | | .LITERAL {0x00000000, 0x00001fff}
0450 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0454 0000 0000 | | .BLANK 0000[0x4]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 0466 | f | .CONST 0x0466 ; Address of begin
0459 0004 | | .CONST 0x0004 ; Address of exception handler
045a 0002 | | .CONST 0x0002 ; Number of locals
045b INIT_0458:
045b 00db | | Load_Top At_Offset_3
045c 0227 | ' | Execute Access,All_Reference
045d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
045e 0aff | | Execute_Immediate Plus,-0x1
045f 00d8 | | Load_Top At_Offset_0
0460 e004 | | Load 0x0,0x4
0461 0260 | ` | Execute Discrete,In_Type
0462 7001 |p | Jump_Nonzero 0x464
0463 0801 | | Execute_Immediate Raise,0x1
0464 e004 | | Load 0x0,0x4
0465 03f1 | | Declare_Variable Discrete,With_Value
0466 BODY_0458:
0466 e5fb | | Load 0x2,-0x5
0467 e5fd | | Load 0x2,-0x3
0468 e5ff | | Load 0x2,-0x1
0469 e5fe | | Load 0x2,-0x2
046a 0227 | ' | Execute Access,All_Reference
046b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
046c e5fe | | Load 0x2,-0x2
046d 0227 | ' | Execute Access,All_Reference
046e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
046f e402 | | Load 0x2,0x2
0470 e5fe | | Load 0x2,-0x2
0471 0227 | ' | Execute Access,All_Reference
0472 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0473 800b | | Call 0x0,0xb
0474 00d1 | | Pop_Control Pop_Count_1
0475 c5fb | | Store 0x2,-0x5
0476 4bff |K | Short_Literal 0x3ff
0477 a5fc | | Store_Unchecked 0x2,-0x4
0478 00cf | | Action Mark_Auxiliary
0479 4800 |H | Short_Literal 0x0
047a 4bff |K | Short_Literal 0x3ff
047b 0007 | | Action Break_Optional
047c 00d8 | | Load_Top At_Offset_0
047d e5fd | | Load 0x2,-0x3
047e 01d7 | | Execute Vector,Field_Read
047f 6804 |h | Jump_Zero 0x484
0480 00d8 | | Load_Top At_Offset_0
0481 a5fc | | Store_Unchecked 0x2,-0x4
0482 00d2 | | Pop_Control Pop_Count_2
0483 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0484 00c8 | | Action Pop_Auxiliary_Range
0485 37f6 |7 | Loop_Decreasing 0x47c
0486 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0487 0000 | | .XXX[0x1]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 049d | | .CONST 0x049d ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0009 | | .CONST 0x0009 ; Number of locals
048b INIT_0488:
048b e226 | & | Load 0x1,0x26
048c 0007 | | Action Break_Optional
048d e213 | | Load 0x1,0x13
048e 0337 | 7 | Declare_Variable Array
048f 00e2 | | Load_Encached Integer_Cache
0490 00e2 | | Load_Encached Integer_Cache
0491 e211 | | Load 0x1,0x11
0492 0007 | | Action Break_Optional
0493 e210 | | Load 0x1,0x10
0494 0007 | | Action Break_Optional
0495 4850 |HP | Short_Literal 0x50
0496 e009 | | Load 0x0,0x9
0497 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0498 1c08 | | Execute_Immediate Run_Utility,0x8
0499 00d8 | | Load_Top At_Offset_0
049a 1c00 | | Execute_Immediate Run_Utility,0x0
049b 029f 0a13 | | Declare_Subprogram INIT_0a10,For_Call
049d BODY_0488:
049d 00db | | Load_Top At_Offset_3
049e e402 | | Load 0x2,0x2
049f 4801 |H | Short_Literal 0x1
04a0 4800 |H | Short_Literal 0x0
04a1 4800 |H | Short_Literal 0x0
04a2 e22e | . | Load 0x1,0x2e
04a3 8214 | | Call 0x1,0x14
04a4 c402 | | Store 0x2,0x2
04a5 c406 | | Store 0x2,0x6
04a6 00db | | Load_Top At_Offset_3
04a7 7002 |p | Jump_Nonzero 0x4aa
04a8 8409 | | Call 0x2,0x9
04a9 7802 |x | Jump 0x4ac
04aa 00db | | Load_Top At_Offset_3
04ab 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
04ac 00da | | Load_Top At_Offset_2
04ad 0e10 | | Execute_Immediate Not_Equal,0x10
04ae 680e |h | Jump_Zero 0x4bd
04af 00d9 | | Load_Top At_Offset_1
04b0 00db | | Load_Top At_Offset_3
04b1 00d8 | | Load_Top At_Offset_0
04b2 e211 | | Load 0x1,0x11
04b3 0260 | ` | Execute Discrete,In_Type
04b4 7001 |p | Jump_Nonzero 0x4b6
04b5 0801 | | Execute_Immediate Raise,0x1
04b6 800d | | Call 0x0,0xd
04b7 00d1 | | Pop_Control Pop_Count_1
04b8 00d9 | | Load_Top At_Offset_1
04b9 e009 | | Load 0x0,0x9
04ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13
04bb e00c | | Load 0x0,0xc
04bc 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
04bd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04be 0000 0000 | | .XXX[0x2]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04d4 | | .CONST 0x04d4 ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0008 | | .CONST 0x0008 ; Number of locals
04c3 INIT_04c0:
04c3 e226 | & | Load 0x1,0x26
04c4 0007 | | Action Break_Optional
04c5 e213 | | Load 0x1,0x13
04c6 0337 | 7 | Declare_Variable Array
04c7 00e2 | | Load_Encached Integer_Cache
04c8 e211 | | Load 0x1,0x11
04c9 0007 | | Action Break_Optional
04ca e210 | | Load 0x1,0x10
04cb 0007 | | Action Break_Optional
04cc 4850 |HP | Short_Literal 0x50
04cd e009 | | Load 0x0,0x9
04ce 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04cf 1c08 | | Execute_Immediate Run_Utility,0x8
04d0 00d8 | | Load_Top At_Offset_0
04d1 1c00 | | Execute_Immediate Run_Utility,0x0
04d2 029f 0ac3 | | Declare_Subprogram INIT_0ac0,For_Call
04d4 BODY_04c0:
04d4 00db | | Load_Top At_Offset_3
04d5 e402 | | Load 0x2,0x2
04d6 4801 |H | Short_Literal 0x1
04d7 4800 |H | Short_Literal 0x0
04d8 4800 |H | Short_Literal 0x0
04d9 e22e | . | Load 0x1,0x2e
04da 8214 | | Call 0x1,0x14
04db c402 | | Store 0x2,0x2
04dc c405 | | Store 0x2,0x5
04dd 00db | | Load_Top At_Offset_3
04de 7002 |p | Jump_Nonzero 0x4e1
04df 8408 | | Call 0x2,0x8
04e0 7802 |x | Jump 0x4e3
04e1 00db | | Load_Top At_Offset_3
04e2 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
04e3 00da | | Load_Top At_Offset_2
04e4 0e10 | | Execute_Immediate Not_Equal,0x10
04e5 6803 |h | Jump_Zero 0x4e9
04e6 0092 0c4d | M| Action Push_String_Extended,0xc4d ; "DFS *** unable to get revision ***"
04e8 00ca | | Action Exit_Nullary_Function
04e9 0831 | 1 | Execute_Immediate Raise,0x31
04ea 0000 0000 | | .BLANK 0000[0x6]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f5 | | .CONST 0x04f5 ; Address of begin
04f1 04f8 | | .CONST 0x04f8 ; Address of exception handler
04f2 0002 | | .CONST 0x0002 ; Number of locals
04f3 INIT_04f0:
04f3 029f 0b13 | | Declare_Subprogram INIT_0b10,For_Call
04f5 BODY_04f0:
04f5 8221 | ! | Call 0x1,0x21
04f6 8402 | | Call 0x2,0x2
04f7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04f8 TRAP_04f0:
04f8 0007 | | Action Break_Optional
04f9 00ea | | Load_Encached Null_String_Cache
04fa 8402 | | Call 0x2,0x2
04fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04fc 0000 0000 | | .BLANK 0000[0x4]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0516 | | .CONST 0x0516 ; Address of begin
0501 0004 | | .CONST 0x0004 ; Address of exception handler
0502 000a | | .CONST 0x000a ; Number of locals
0503 INIT_0500:
0503 e226 | & | Load 0x1,0x26
0504 0007 | | Action Break_Optional
0505 e213 | | Load 0x1,0x13
0506 0337 | 7 | Declare_Variable Array
0507 00e2 | | Load_Encached Integer_Cache
0508 03e9 | | Declare_Variable Discrete,Duplicate
0509 03e9 | | Declare_Variable Discrete,Duplicate
050a e211 | | Load 0x1,0x11
050b 0007 | | Action Break_Optional
050c e210 | | Load 0x1,0x10
050d 0007 | | Action Break_Optional
050e 4850 |HP | Short_Literal 0x50
050f e009 | | Load 0x0,0x9
0510 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0511 1c08 | | Execute_Immediate Run_Utility,0x8
0512 00d8 | | Load_Top At_Offset_0
0513 1c00 | | Execute_Immediate Run_Utility,0x0
0514 029f 0b23 | #| Declare_Subprogram INIT_0b20,For_Call
0516 BODY_0500:
0516 00db | | Load_Top At_Offset_3
0517 e402 | | Load 0x2,0x2
0518 4801 |H | Short_Literal 0x1
0519 4800 |H | Short_Literal 0x0
051a 4800 |H | Short_Literal 0x0
051b e22f | / | Load 0x1,0x2f
051c 8214 | | Call 0x1,0x14
051d c402 | | Store 0x2,0x2
051e c407 | | Store 0x2,0x7
051f 00db | | Load_Top At_Offset_3
0520 7002 |p | Jump_Nonzero 0x523
0521 840a | | Call 0x2,0xa
0522 7802 |x | Jump 0x525
0523 00db | | Load_Top At_Offset_3
0524 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0525 00da | | Load_Top At_Offset_2
0526 0e10 | | Execute_Immediate Not_Equal,0x10
0527 6802 |h | Jump_Zero 0x52a
0528 00ea | | Load_Encached Null_String_Cache
0529 00ca | | Action Exit_Nullary_Function
052a 0831 | 1 | Execute_Immediate Raise,0x31
052b 0000 0000 | | .BLANK 0000[0x5]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0539 | 9 | .CONST 0x0539 ; Address of begin
0531 0004 | | .CONST 0x0004 ; Address of exception handler
0532 0005 | | .CONST 0x0005 ; Number of locals
0533 INIT_0530:
0533 00e1 | | Load_Encached Boolean_Cache
0534 e229 | ) | Load 0x1,0x29
0535 0007 | | Action Break_Optional
0536 00d8 | | Load_Top At_Offset_0
0537 0007 | | Action Break_Optional
0538 00e2 | | Load_Encached Integer_Cache
0539 BODY_0530:
0539 e5ff | | Load 0x2,-0x1
053a 6803 |h | Jump_Zero 0x53e
053b 4800 |H | Short_Literal 0x0
053c 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
053d 7802 |x | Jump 0x540
053e 4801 |H | Short_Literal 0x1
053f 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0540 00e2 | | Load_Encached Integer_Cache
0541 e229 | ) | Load 0x1,0x29
0542 00e1 | | Load_Encached Boolean_Cache
0543 823c | < | Call 0x1,0x3c
0544 c402 | | Store 0x2,0x2
0545 005b | [ | Store_Top Discrete,At_Offset_3
0546 0059 | Y | Store_Top Discrete,At_Offset_1
0547 00db | | Load_Top At_Offset_3
0548 6803 |h | Jump_Zero 0x54c
0549 00da | | Load_Top At_Offset_2
054a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
054b 7804 |x | Jump 0x550
054c 00da | | Load_Top At_Offset_2
054d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
054e 4807 |H | Short_Literal 0x7
054f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0550 00e1 | | Load_Encached Boolean_Cache
0551 00d9 | | Load_Top At_Offset_1
0552 00db | | Load_Top At_Offset_3
0553 823e | > | Call 0x1,0x3e
0554 c402 | | Store 0x2,0x2
0555 00db | | Load_Top At_Offset_3
0556 7008 |p | Jump_Nonzero 0x55f
0557 0092 0c4e | N| Action Push_String_Extended,0xc4e ; " problem encounter attempting to update values"
0559 e00c | | Load 0x0,0xc
055a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
055b 0092 0c4f | O| Action Push_String_Extended,0xc4f ; " use Reboot_On_Failure_Settings to check current settings"
055d e00c | | Load 0x0,0xc
055e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
055f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0567 | g | .CONST 0x0567 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0004 | | .CONST 0x0004 ; Number of locals
0563 INIT_0560:
0563 00e1 | | Load_Encached Boolean_Cache
0564 e229 | ) | Load 0x1,0x29
0565 0007 | | Action Break_Optional
0566 00e2 | | Load_Encached Integer_Cache
0567 BODY_0560:
0567 e5ff | | Load 0x2,-0x1
0568 0d00 | | Execute_Immediate Less,0x0
0569 e5ff | | Load 0x2,-0x1
056a 0c64 | d | Execute_Immediate Greater_Equal,0x64
056b 0278 | x | Execute Discrete,Or
056c 680c |h | Jump_Zero 0x579
056d 0092 0c50 | P| Action Push_String_Extended,0xc50 ; " specified value of "
056f e5ff | | Load 0x2,-0x1
0570 00e0 | | Load_Encached Standard_Cache
0571 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0572 01cc | | Execute Vector,Catenate
0573 0092 0c51 | Q| Action Push_String_Extended,0xc51 ; " is outside the legal range (0 - 99)"
0575 01cc | | Execute Vector,Catenate
0576 e00c | | Load 0x0,0xc
0577 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0578 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0579 00e2 | | Load_Encached Integer_Cache
057a e229 | ) | Load 0x1,0x29
057b 00e1 | | Load_Encached Boolean_Cache
057c 823c | < | Call 0x1,0x3c
057d c402 | | Store 0x2,0x2
057e 005b | [ | Store_Top Discrete,At_Offset_3
057f 0059 | Y | Store_Top Discrete,At_Offset_1
0580 00da | | Load_Top At_Offset_2
0581 6803 |h | Jump_Zero 0x585
0582 e5ff | | Load 0x2,-0x1
0583 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0584 7804 |x | Jump 0x589
0585 4801 |H | Short_Literal 0x1
0586 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0587 e5ff | | Load 0x2,-0x1
0588 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0589 00e1 | | Load_Encached Boolean_Cache
058a 00d9 | | Load_Top At_Offset_1
058b 00db | | Load_Top At_Offset_3
058c 823e | > | Call 0x1,0x3e
058d 005b | [ | Store_Top Discrete,At_Offset_3
058e 00da | | Load_Top At_Offset_2
058f 7008 |p | Jump_Nonzero 0x598
0590 0092 0c4e | N| Action Push_String_Extended,0xc4e ; " problem encounter attempting to update values"
0592 e00c | | Load 0x0,0xc
0593 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0594 0092 0c4f | O| Action Push_String_Extended,0xc4f ; " use Reboot_On_Failure_Settings to check current settings"
0596 e00c | | Load 0x0,0xc
0597 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0598 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0599 0000 0000 | | .BLANK 0000[0x7]
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05a7 | | .CONST 0x05a7 ; Address of begin
05a1 0004 | | .CONST 0x0004 ; Address of exception handler
05a2 0004 | | .CONST 0x0004 ; Number of locals
05a3 INIT_05a0:
05a3 e229 | ) | Load 0x1,0x29
05a4 0007 | | Action Break_Optional
05a5 00e2 | | Load_Encached Integer_Cache
05a6 00e1 | | Load_Encached Boolean_Cache
05a7 BODY_05a0:
05a7 00e2 | | Load_Encached Integer_Cache
05a8 e229 | ) | Load 0x1,0x29
05a9 00e1 | | Load_Encached Boolean_Cache
05aa 823c | < | Call 0x1,0x3c
05ab 005b | [ | Store_Top Discrete,At_Offset_3
05ac c402 | | Store 0x2,0x2
05ad 005a | Z | Store_Top Discrete,At_Offset_2
05ae 00d8 | | Load_Top At_Offset_0
05af 6813 |h | Jump_Zero 0x5c3
05b0 00da | | Load_Top At_Offset_2
05b1 7008 |p | Jump_Nonzero 0x5ba
05b2 4802 |H | Short_Literal 0x2
05b3 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
05b4 00e1 | | Load_Encached Boolean_Cache
05b5 00da | | Load_Top At_Offset_2
05b6 e402 | | Load 0x2,0x2
05b7 823e | > | Call 0x1,0x3e
05b8 0059 | Y | Store_Top Discrete,At_Offset_1
05b9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05ba 0092 0c52 | R| Action Push_String_Extended,0xc52 ; "Reboot on failure is currently disabled"
05bc e00c | | Load 0x0,0xc
05bd 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05be 0092 0c53 | S| Action Push_String_Extended,0xc53 ; "Can only quiesce when Reboot on failure is enabled"
05c0 e00c | | Load 0x0,0xc
05c1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05c2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05c3 0092 0c54 | T| Action Push_String_Extended,0xc54 ; " problem encountered attempting to get current values"
05c5 e00c | | Load 0x0,0xc
05c6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05c7 0092 0c55 | U| Action Push_String_Extended,0xc55 ; " values will need to be set"
05c9 e00c | | Load 0x0,0xc
05ca 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05cc 0000 0000 | | .BLANK 0000[0x4]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d7 | | .CONST 0x05d7 ; Address of begin
05d1 0004 | | .CONST 0x0004 ; Address of exception handler
05d2 0004 | | .CONST 0x0004 ; Number of locals
05d3 INIT_05d0:
05d3 00e1 | | Load_Encached Boolean_Cache
05d4 e229 | ) | Load 0x1,0x29
05d5 0007 | | Action Break_Optional
05d6 00e2 | | Load_Encached Integer_Cache
05d7 BODY_05d0:
05d7 00e2 | | Load_Encached Integer_Cache
05d8 e229 | ) | Load 0x1,0x29
05d9 00e1 | | Load_Encached Boolean_Cache
05da 823c | < | Call 0x1,0x3c
05db c402 | | Store 0x2,0x2
05dc 005b | [ | Store_Top Discrete,At_Offset_3
05dd 0059 | Y | Store_Top Discrete,At_Offset_1
05de 00da | | Load_Top At_Offset_2
05df 6820 |h | Jump_Zero 0x600
05e0 0092 0c56 | V| Action Push_String_Extended,0xc56 ; " The current value for the reboot interval is "
05e2 00d9 | | Load_Top At_Offset_1
05e3 00e0 | | Load_Encached Standard_Cache
05e4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05e5 01cc | | Execute Vector,Catenate
05e6 e00c | | Load 0x0,0xc
05e7 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05e8 0092 0c57 | W| Action Push_String_Extended,0xc57 ; " The reboot feature is currently: "
05ea e00c | | Load 0x0,0xc
05eb 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
05ec 00d9 | | Load_Top At_Offset_1
05ed 4602 |F | Jump_Case 0x3
05ee 7807 |x | Jump 0x5f6 ; case 0x0
05ef 780b |x | Jump 0x5fb ; case 0x1
05f0 7800 |x | Jump 0x5f1 ; case 0x2
05f1 0092 0c58 | X| Action Push_String_Extended,0xc58 ; "QUIESCED"
05f3 e00c | | Load 0x0,0xc
05f4 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05f6 0092 0c59 | Y| Action Push_String_Extended,0xc59 ; "ENABLED"
05f8 e00c | | Load 0x0,0xc
05f9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05fa 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05fb 0092 0c43 | C| Action Push_String_Extended,0xc43 ; "DISABLED"
05fd e00c | | Load 0x0,0xc
05fe 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
05ff 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0600 0092 0c54 | T| Action Push_String_Extended,0xc54 ; " problem encountered attempting to get current values"
0602 e00c | | Load 0x0,0xc
0603 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0604 0092 0c55 | U| Action Push_String_Extended,0xc55 ; " values will need to be set"
0606 e00c | | Load 0x0,0xc
0607 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0608 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0609 0000 0000 | | .BLANK 0000[0x7]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0613 | | .CONST 0x0613 ; Address of begin
0611 0004 | | .CONST 0x0004 ; Address of exception handler
0612 0001 | | .CONST 0x0001 ; Number of locals
0613 BODY_0610:
0613 INIT_0610:
0613 4607 |F | Jump_Case 0x8
0614 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0615 7807 |x | Jump 0x61d ; case 0x1
0616 780a |x | Jump 0x621 ; case 0x2
0617 780e |x | Jump 0x626 ; case 0x3
0618 7811 |x | Jump 0x62a ; case 0x4
0619 7812 |x | Jump 0x62c ; case 0x5
061a 7813 |x | Jump 0x62e ; case 0x6
061b 7816 |x | Jump 0x632 ; case 0x7
061c 4302 |C | .XXX[0x1]
061d 00da | | Load_Top At_Offset_2
061e 0091 0c42 | B| Action Push_String_Extended_Indexed,0xc42 ; "ACTIVE"
0620 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0621 00db | | Load_Top At_Offset_3
0622 00db | | Load_Top At_Offset_3
0623 00e0 | | Load_Encached Standard_Cache
0624 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0625 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0626 00da | | Load_Top At_Offset_2
0627 00e0 | | Load_Encached Standard_Cache
0628 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0629 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
062a 00db | | Load_Top At_Offset_3
062b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
062c 00db | | Load_Top At_Offset_3
062d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
062e e229 | ) | Load 0x1,0x29
062f 00dc | | Load_Top At_Offset_4
0630 0267 | g | Execute Discrete,Predecessor
0631 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0632 e229 | ) | Load 0x1,0x29
0633 00dc | | Load_Top At_Offset_4
0634 0268 | h | Execute Discrete,Successor
0635 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0636 0000 0000 | | .XXX[0x2]
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 0640 | @ | .CONST 0x0640 ; Address of begin
0639 0651 | Q | .CONST 0x0651 ; Address of exception handler
063a 0002 | | .CONST 0x0002 ; Number of locals
063b INIT_0638:
063b e00e | | Load 0x0,0xe
063c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
063d 02c7 | | Declare_Variable Any
063e 00d8 | | Load_Top At_Offset_0
063f 1c00 | | Execute_Immediate Run_Utility,0x0
0640 BODY_0638:
0640 00d8 | | Load_Top At_Offset_0
0641 e011 | | Load 0x0,0x11
0642 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0643 e010 | | Load 0x0,0x10
0644 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0645 00ea | | Load_Encached Null_String_Cache
0646 e5ff | | Load 0x2,-0x1
0647 4801 |H | Short_Literal 0x1
0648 e00e | | Load 0x0,0xe
0649 1814 | | Execute Package,Field_Execute,Field_Number 0x14
064a c402 | | Store 0x2,0x2
064b 00d8 | | Load_Top At_Offset_0
064c e00e | | Load 0x0,0xe
064d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
064e c402 | | Store 0x2,0x2
064f 4800 |H | Short_Literal 0x0
0650 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0651 TRAP_0638:
0651 00d8 | | Load_Top At_Offset_0
0652 0107 | | Execute Exception,Get_Name
0653 4900 |I | Short_Literal 0x100
0654 490f |I | Short_Literal 0x10f
0655 0262 | b | Execute Discrete,In_Range
0656 6802 |h | Jump_Zero 0x659
0657 4801 |H | Short_Literal 0x1
0658 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0659 00d8 | | Load_Top At_Offset_0
065a 0107 | | Execute Exception,Get_Name
065b 4920 |I | Short_Literal 0x120
065c 492f |I/ | Short_Literal 0x12f
065d 0262 | b | Execute Discrete,In_Range
065e 6802 |h | Jump_Zero 0x661
065f 4800 |H | Short_Literal 0x0
0660 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0661 00d8 | | Load_Top At_Offset_0
0662 0107 | | Execute Exception,Get_Name
0663 4930 |I0 | Short_Literal 0x130
0664 493f |I? | Short_Literal 0x13f
0665 0262 | b | Execute Discrete,In_Range
0666 6802 |h | Jump_Zero 0x669
0667 4801 |H | Short_Literal 0x1
0668 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0669 0100 | | Execute Exception,Raise
066a 0000 0000 | | .BLANK 0000[0x6]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0680 | | .CONST 0x0680 ; Address of begin
0671 0690 | | .CONST 0x0690 ; Address of exception handler
0672 0007 | | .CONST 0x0007 ; Number of locals
0673 INIT_0670:
0673 e226 | & | Load 0x1,0x26
0674 0007 | | Action Break_Optional
0675 e213 | | Load 0x1,0x13
0676 0337 | 7 | Declare_Variable Array
0677 00e2 | | Load_Encached Integer_Cache
0678 e00e | | Load 0x0,0xe
0679 1b0d | | Execute Package,Field_Read,Field_Number 0xd
067a 02c7 | | Declare_Variable Any
067b 00d8 | | Load_Top At_Offset_0
067c 1c00 | | Execute_Immediate Run_Utility,0x0
067d e211 | | Load 0x1,0x11
067e 029f 0b9b | | Declare_Subprogram INIT_0b98,For_Call
0680 BODY_0670:
0680 00d9 | | Load_Top At_Offset_1
0681 e402 | | Load 0x2,0x2
0682 4801 |H | Short_Literal 0x1
0683 4800 |H | Short_Literal 0x0
0684 4800 |H | Short_Literal 0x0
0685 e5ff | | Load 0x2,-0x1
0686 8214 | | Call 0x1,0x14
0687 c402 | | Store 0x2,0x2
0688 005a | Z | Store_Top Discrete,At_Offset_2
0689 00d9 | | Load_Top At_Offset_1
068a 7002 |p | Jump_Nonzero 0x68d
068b 8407 | | Call 0x2,0x7
068c 4505 |E | Exit_Suprogram New_Top_Offset 0x5
068d 00d9 | | Load_Top At_Offset_1
068e a5fb | | Store_Unchecked 0x2,-0x5
068f 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0690 TRAP_0670:
0690 00d8 | | Load_Top At_Offset_0
0691 0107 | | Execute Exception,Get_Name
0692 4900 |I | Short_Literal 0x100
0693 490f |I | Short_Literal 0x10f
0694 0262 | b | Execute Discrete,In_Range
0695 6803 |h | Jump_Zero 0x699
0696 4814 |H | Short_Literal 0x14
0697 a5fb | | Store_Unchecked 0x2,-0x5
0698 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0699 00d8 | | Load_Top At_Offset_0
069a 0107 | | Execute Exception,Get_Name
069b 4920 |I | Short_Literal 0x120
069c 492f |I/ | Short_Literal 0x12f
069d 0262 | b | Execute Discrete,In_Range
069e 6803 |h | Jump_Zero 0x6a2
069f 4812 |H | Short_Literal 0x12
06a0 a5fb | | Store_Unchecked 0x2,-0x5
06a1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
06a2 00d8 | | Load_Top At_Offset_0
06a3 0107 | | Execute Exception,Get_Name
06a4 4930 |I0 | Short_Literal 0x130
06a5 493f |I? | Short_Literal 0x13f
06a6 0262 | b | Execute Discrete,In_Range
06a7 6803 |h | Jump_Zero 0x6ab
06a8 4815 |H | Short_Literal 0x15
06a9 a5fb | | Store_Unchecked 0x2,-0x5
06aa 4505 |E | Exit_Suprogram New_Top_Offset 0x5
06ab 0100 | | Execute Exception,Raise
06ac 0000 0000 | | .BLANK 0000[0x4]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06b3 | | .CONST 0x06b3 ; Address of begin
06b1 0004 | | .CONST 0x0004 ; Address of exception handler
06b2 0001 | | .CONST 0x0001 ; Number of locals
06b3 BODY_06b0:
06b3 INIT_06b0:
06b3 00da | | Load_Top At_Offset_2
06b4 e014 | | Load 0x0,0x14
06b5 180d | | Execute Package,Field_Execute,Field_Number 0xd
06b6 e00c | | Load 0x0,0xc
06b7 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
06b8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06b9 0000 0000 | | .BLANK 0000[0x7]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3 | | .CONST 0x06c3 ; Address of begin
06c1 0004 | | .CONST 0x0004 ; Address of exception handler
06c2 0001 | | .CONST 0x0001 ; Number of locals
06c3 BODY_06c0:
06c3 INIT_06c0:
06c3 00da | | Load_Top At_Offset_2
06c4 0d30 | 0 | Execute_Immediate Less,0x30
06c5 00db | | Load_Top At_Offset_3
06c6 0c3a | : | Execute_Immediate Greater_Equal,0x3a
06c7 0278 | x | Execute Discrete,Or
06c8 0f00 | | Execute_Immediate Equal,0x0
06c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06ca 0000 0000 | | .BLANK 0000[0x6]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d5 | | .CONST 0x06d5 ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 0002 | | .CONST 0x0002 ; Number of locals
06d3 INIT_06d0:
06d3 00e2 | | Load_Encached Integer_Cache
06d4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06d5 BODY_06d0:
06d5 4800 |H | Short_Literal 0x0
06d6 a5fe | | Store_Unchecked 0x2,-0x2
06d7 4800 |H | Short_Literal 0x0
06d8 a5fd | | Store_Unchecked 0x2,-0x3
06d9 00cf | | Action Mark_Auxiliary
06da e5ff | | Load 0x2,-0x1
06db 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
06dc e5ff | | Load 0x2,-0x1
06dd 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
06de 0263 | c | Execute Discrete,Above_Bound
06df 701f |p | Jump_Nonzero 0x6ff
06e0 00d8 | | Load_Top At_Offset_0
06e1 e5ff | | Load 0x2,-0x1
06e2 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
06e3 01d7 | | Execute Vector,Field_Read
06e4 8236 | 6 | Call 0x1,0x36
06e5 680b |h | Jump_Zero 0x6f1
06e6 00db | | Load_Top At_Offset_3
06e7 480a |H | Short_Literal 0xa
06e8 0271 | q | Execute Discrete,Times
06e9 00d9 | | Load_Top At_Offset_1
06ea e5ff | | Load 0x2,-0x1
06eb 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
06ec 01d7 | | Execute Vector,Field_Read
06ed 0ad0 | | Execute_Immediate Plus,-0x30
06ee 0273 | s | Execute Discrete,Plus
06ef c402 | | Store 0x2,0x2
06f0 7808 |x | Jump 0x6f9
06f1 00d8 | | Load_Top At_Offset_0
06f2 e5ff | | Load 0x2,-0x1
06f3 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
06f4 027f | | Execute Discrete,Equal
06f5 6801 |h | Jump_Zero 0x6f7
06f6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06f7 00d2 | | Pop_Control Pop_Count_2
06f8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
06f9 00db | | Load_Top At_Offset_3
06fa a5fe | | Store_Unchecked 0x2,-0x2
06fb 4801 |H | Short_Literal 0x1
06fc a5fd | | Store_Unchecked 0x2,-0x3
06fd 00c8 | | Action Pop_Auxiliary_Range
06fe 3fe1 |? | Loop_Increasing 0x6e0
06ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0706 | | .CONST 0x0706 ; Address of begin
0701 0004 | | .CONST 0x0004 ; Address of exception handler
0702 0003 | | .CONST 0x0003 ; Number of locals
0703 INIT_0700:
0703 00e1 | | Load_Encached Boolean_Cache
0704 00e2 | | Load_Encached Integer_Cache
0705 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0706 BODY_0700:
0706 4801 |H | Short_Literal 0x1
0707 a5fe | | Store_Unchecked 0x2,-0x2
0708 4801 |H | Short_Literal 0x1
0709 a5fd | | Store_Unchecked 0x2,-0x3
070a e5ff | | Load 0x2,-0x1
070b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
070c e5ff | | Load 0x2,-0x1
070d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
070e 0272 | r | Execute Discrete,Minus
070f 0c06 | | Execute_Immediate Greater_Equal,0x6
0710 6854 |hT | Jump_Zero 0x765
0711 00cf | | Action Mark_Auxiliary
0712 e5ff | | Load 0x2,-0x1
0713 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0714 0a05 | | Execute_Immediate Plus,0x5
0715 00d8 | | Load_Top At_Offset_0
0716 00e2 | | Load_Encached Integer_Cache
0717 0260 | ` | Execute Discrete,In_Type
0718 7001 |p | Jump_Nonzero 0x71a
0719 0801 | | Execute_Immediate Raise,0x1
071a e5ff | | Load 0x2,-0x1
071b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
071c 0263 | c | Execute Discrete,Above_Bound
071d 7012 |p | Jump_Nonzero 0x730
071e 00d8 | | Load_Top At_Offset_0
071f e5ff | | Load 0x2,-0x1
0720 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0721 01d7 | | Execute Vector,Field_Read
0722 e403 | | Load 0x2,0x3
0723 e22b | + | Load 0x1,0x2b
0724 01d7 | | Execute Vector,Field_Read
0725 027e | ~ | Execute Discrete,Not_Equal
0726 6804 |h | Jump_Zero 0x72b
0727 4800 |H | Short_Literal 0x0
0728 a402 | | Store_Unchecked 0x2,0x2
0729 00d2 | | Pop_Control Pop_Count_2
072a 7805 |x | Jump 0x730
072b 00db | | Load_Top At_Offset_3
072c 0a01 | | Execute_Immediate Plus,0x1
072d c403 | | Store 0x2,0x3
072e 00c8 | | Action Pop_Auxiliary_Range
072f 3fee |? | Loop_Increasing 0x71e
0730 00ce | | Action Pop_Auxiliary
0731 00d9 | | Load_Top At_Offset_1
0732 6803 |h | Jump_Zero 0x736
0733 4800 |H | Short_Literal 0x0
0734 a5fe | | Store_Unchecked 0x2,-0x2
0735 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0736 e5ff | | Load 0x2,-0x1
0737 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0738 e5ff | | Load 0x2,-0x1
0739 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
073a 0272 | r | Execute Discrete,Minus
073b 0c04 | | Execute_Immediate Greater_Equal,0x4
073c 6828 |h( | Jump_Zero 0x765
073d 4800 |H | Short_Literal 0x0
073e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
073f 4801 |H | Short_Literal 0x1
0740 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0741 00cf | | Action Mark_Auxiliary
0742 e5ff | | Load 0x2,-0x1
0743 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0744 0a03 | | Execute_Immediate Plus,0x3
0745 00d8 | | Load_Top At_Offset_0
0746 00e2 | | Load_Encached Integer_Cache
0747 0260 | ` | Execute Discrete,In_Type
0748 7001 |p | Jump_Nonzero 0x74a
0749 0801 | | Execute_Immediate Raise,0x1
074a e5ff | | Load 0x2,-0x1
074b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
074c 0263 | c | Execute Discrete,Above_Bound
074d 7012 |p | Jump_Nonzero 0x760
074e 00d8 | | Load_Top At_Offset_0
074f e5ff | | Load 0x2,-0x1
0750 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0751 01d7 | | Execute Vector,Field_Read
0752 e403 | | Load 0x2,0x3
0753 e22d | - | Load 0x1,0x2d
0754 01d7 | | Execute Vector,Field_Read
0755 027e | ~ | Execute Discrete,Not_Equal
0756 6804 |h | Jump_Zero 0x75b
0757 4800 |H | Short_Literal 0x0
0758 a402 | | Store_Unchecked 0x2,0x2
0759 00d2 | | Pop_Control Pop_Count_2
075a 7805 |x | Jump 0x760
075b 00db | | Load_Top At_Offset_3
075c 0a01 | | Execute_Immediate Plus,0x1
075d c403 | | Store 0x2,0x3
075e 00c8 | | Action Pop_Auxiliary_Range
075f 3fee |? | Loop_Increasing 0x74e
0760 00ce | | Action Pop_Auxiliary
0761 00d9 | | Load_Top At_Offset_1
0762 6802 |h | Jump_Zero 0x765
0763 4802 |H | Short_Literal 0x2
0764 a5fe | | Store_Unchecked 0x2,-0x2
0765 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0766 0000 0000 | | .XXX[0x2]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b | k | .CONST 0x076b ; Address of begin
0769 0004 | | .CONST 0x0004 ; Address of exception handler
076a 0001 | | .CONST 0x0001 ; Number of locals
076b BODY_0768:
076b INIT_0768:
076b 00da | | Load_Top At_Offset_2
076c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
076d 4bff |K | Short_Literal 0x3ff
076e 027d | } | Execute Discrete,Greater
076f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 0779 | y | .CONST 0x0779 ; Address of begin
0771 0004 | | .CONST 0x0004 ; Address of exception handler
0772 0003 | | .CONST 0x0003 ; Number of locals
0773 INIT_0770:
0773 00da | | Load_Top At_Offset_2
0774 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0775 00e2 | | Load_Encached Integer_Cache
0776 03f1 | | Declare_Variable Discrete,With_Value
0777 00e1 | | Load_Encached Boolean_Cache
0778 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0779 BODY_0770:
0779 e5ff | | Load 0x2,-0x1
077a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
077b a5fe | | Store_Unchecked 0x2,-0x2
077c 00cf | | Action Mark_Auxiliary
077d 7815 |x | Jump 0x793
077e 00da | | Load_Top At_Offset_2
077f e5ff | | Load 0x2,-0x1
0780 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0781 01d7 | | Execute Vector,Field_Read
0782 0f0a | | Execute_Immediate Equal,0xa
0783 6807 |h | Jump_Zero 0x78b
0784 00da | | Load_Top At_Offset_2
0785 a5fd | | Store_Unchecked 0x2,-0x3
0786 00da | | Load_Top At_Offset_2
0787 0a01 | | Execute_Immediate Plus,0x1
0788 e5ff | | Load 0x2,-0x1
0789 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
078a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
078b 00da | | Load_Top At_Offset_2
078c 0a01 | | Execute_Immediate Plus,0x1
078d 005b | [ | Store_Top Discrete,At_Offset_3
078e 00da | | Load_Top At_Offset_2
078f 4bff |K | Short_Literal 0x3ff
0790 027d | } | Execute Discrete,Greater
0791 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0792 00c9 | | Action Pop_Auxiliary_Loop
0793 00d9 | | Load_Top At_Offset_1
0794 6fe9 |o | Jump_Zero 0x77e
0795 00ce | | Action Pop_Auxiliary
0796 00d9 | | Load_Top At_Offset_1
0797 0aff | | Execute_Immediate Plus,-0x1
0798 c5fd | | Store 0x2,-0x3
0799 00d9 | | Load_Top At_Offset_1
079a e5ff | | Load 0x2,-0x1
079b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
079c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
079d 0000 0000 | | .XXX[0x3]
079f 0000 | |
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a5 | | .CONST 0x07a5 ; Address of begin
07a1 0004 | | .CONST 0x0004 ; Address of exception handler
07a2 0003 | | .CONST 0x0003 ; Number of locals
07a3 INIT_07a0:
07a3 00e2 | | Load_Encached Integer_Cache
07a4 03e9 | | Declare_Variable Discrete,Duplicate
07a5 BODY_07a0:
07a5 00e2 | | Load_Encached Integer_Cache
07a6 00e2 | | Load_Encached Integer_Cache
07a7 e5ff | | Load 0x2,-0x1
07a8 823a | : | Call 0x1,0x3a
07a9 00d1 | | Pop_Control Pop_Count_1
07aa 005b | [ | Store_Top Discrete,At_Offset_3
07ab 0059 | Y | Store_Top Discrete,At_Offset_1
07ac 00d9 | | Load_Top At_Offset_1
07ad e5ff | | Load 0x2,-0x1
07ae 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
07af 00d8 | | Load_Top At_Offset_0
07b0 e5ff | | Load 0x2,-0x1
07b1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
07b2 00e2 | | Load_Encached Integer_Cache
07b3 00e2 | | Load_Encached Integer_Cache
07b4 e5ff | | Load 0x2,-0x1
07b5 823a | : | Call 0x1,0x3a
07b6 00d1 | | Pop_Control Pop_Count_1
07b7 005b | [ | Store_Top Discrete,At_Offset_3
07b8 0059 | Y | Store_Top Discrete,At_Offset_1
07b9 00d9 | | Load_Top At_Offset_1
07ba e5ff | | Load 0x2,-0x1
07bb 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
07bc 00d8 | | Load_Top At_Offset_0
07bd e5ff | | Load 0x2,-0x1
07be 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
07bf 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07c0 ; --------------------------------------------------------------------------------------
07c0 ; SUBPROGRAM
07c0 ; --------------------------------------------------------------------------------------
07c0 07d3 | | .CONST 0x07d3 ; Address of begin
07c1 0004 | | .CONST 0x0004 ; Address of exception handler
07c2 000a | | .CONST 0x000a ; Number of locals
07c3 INIT_07c0:
07c3 e20e | | Load 0x1,0xe
07c4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
07c5 00e2 | | Load_Encached Integer_Cache
07c6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
07c7 e20d | | Load 0x1,0xd
07c8 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
07c9 e226 | & | Load 0x1,0x26
07ca 0007 | | Action Break_Optional
07cb e211 | | Load 0x1,0x11
07cc 0007 | | Action Break_Optional
07cd 00e1 | | Load_Encached Boolean_Cache
07ce e229 | ) | Load 0x1,0x29
07cf 0007 | | Action Break_Optional
07d0 00e2 | | Load_Encached Integer_Cache
07d1 e228 | ( | Load 0x1,0x28
07d2 0322 | " | Declare_Variable Record
07d3 BODY_07c0:
07d3 4800 |H | Short_Literal 0x0
07d4 00d9 | | Load_Top At_Offset_1
07d5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
07d6 4800 |H | Short_Literal 0x0
07d7 00d9 | | Load_Top At_Offset_1
07d8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
07d9 4800 |H | Short_Literal 0x0
07da 00d9 | | Load_Top At_Offset_1
07db 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
07dc 4800 |H | Short_Literal 0x0
07dd 00d9 | | Load_Top At_Offset_1
07de 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
07df 4800 |H | Short_Literal 0x0
07e0 00d9 | | Load_Top At_Offset_1
07e1 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
07e2 e406 | | Load 0x2,0x6
07e3 e405 | | Load 0x2,0x5
07e4 e404 | | Load 0x2,0x4
07e5 e403 | | Load 0x2,0x3
07e6 e402 | | Load 0x2,0x2
07e7 e230 | 0 | Load 0x1,0x30
07e8 8214 | | Call 0x1,0x14
07e9 c405 | | Store 0x2,0x5
07ea c406 | | Store 0x2,0x6
07eb e406 | | Load 0x2,0x6
07ec 7036 |p6 | Jump_Nonzero 0x823
07ed e406 | | Load 0x2,0x6
07ee 00d9 | | Load_Top At_Offset_1
07ef 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07f0 e405 | | Load 0x2,0x5
07f1 e404 | | Load 0x2,0x4
07f2 8215 | | Call 0x1,0x15
07f3 c405 | | Store 0x2,0x5
07f4 00d1 | | Pop_Control Pop_Count_1
07f5 c406 | | Store 0x2,0x6
07f6 e406 | | Load 0x2,0x6
07f7 7024 |p$ | Jump_Nonzero 0x81c
07f8 4800 |H | Short_Literal 0x0
07f9 00d9 | | Load_Top At_Offset_1
07fa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
07fb 00d8 | | Load_Top At_Offset_0
07fc 823b | ; | Call 0x1,0x3b
07fd 00d1 | | Pop_Control Pop_Count_1
07fe 00e1 | | Load_Encached Boolean_Cache
07ff e229 | ) | Load 0x1,0x29
0800 00da | | Load_Top At_Offset_2
0801 8238 | 8 | Call 0x1,0x38
0802 c408 | | Store 0x2,0x8
0803 c407 | | Store 0x2,0x7
0804 00db | | Load_Top At_Offset_3
0805 6806 |h | Jump_Zero 0x80c
0806 00e1 | | Load_Encached Boolean_Cache
0807 00e2 | | Load_Encached Integer_Cache
0808 00da | | Load_Top At_Offset_2
0809 8237 | 7 | Call 0x1,0x37
080a 005b | [ | Store_Top Discrete,At_Offset_3
080b c407 | | Store 0x2,0x7
080c 00db | | Load_Top At_Offset_3
080d 6807 |h | Jump_Zero 0x815
080e 4801 |H | Short_Literal 0x1
080f a5ff | | Store_Unchecked 0x2,-0x1
0810 00da | | Load_Top At_Offset_2
0811 a5fe | | Store_Unchecked 0x2,-0x2
0812 00d9 | | Load_Top At_Offset_1
0813 a5fd | | Store_Unchecked 0x2,-0x3
0814 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0815 4800 |H | Short_Literal 0x0
0816 a5ff | | Store_Unchecked 0x2,-0x1
0817 4801 |H | Short_Literal 0x1
0818 a5fe | | Store_Unchecked 0x2,-0x2
0819 4807 |H | Short_Literal 0x7
081a a5fd | | Store_Unchecked 0x2,-0x3
081b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
081c 4800 |H | Short_Literal 0x0
081d a5ff | | Store_Unchecked 0x2,-0x1
081e 4801 |H | Short_Literal 0x1
081f a5fe | | Store_Unchecked 0x2,-0x2
0820 4807 |H | Short_Literal 0x7
0821 a5fd | | Store_Unchecked 0x2,-0x3
0822 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0823 4800 |H | Short_Literal 0x0
0824 a5ff | | Store_Unchecked 0x2,-0x1
0825 4801 |H | Short_Literal 0x1
0826 a5fe | | Store_Unchecked 0x2,-0x2
0827 4807 |H | Short_Literal 0x7
0828 a5fd | | Store_Unchecked 0x2,-0x3
0829 4501 |E | Exit_Suprogram New_Top_Offset 0x1
082a 0000 0000 | | .BLANK 0000[0x6]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 083c | < | .CONST 0x083c ; Address of begin
0831 0004 | | .CONST 0x0004 ; Address of exception handler
0832 0006 | | .CONST 0x0006 ; Number of locals
0833 INIT_0830:
0833 0092 0c5a | Z| Action Push_String_Extended,0xc5a ; "XXXXXX automatic rebooting after a crash."
0835 0092 0c5b | [| Action Push_String_Extended,0xc5b ; " day(s) or more since last crash will allow an automatic reboot."
0837 0092 0c5c | \| Action Push_String_Extended,0xc5c ; "Note that the system truncates any fraction of a day since the last crash"
0839 0092 0c5d | ]| Action Push_String_Extended,0xc5d ; "before comparing it to the minimum number of days specified here."
083b 00e2 | | Load_Encached Integer_Cache
083c BODY_0830:
083c 00cf | | Action Mark_Auxiliary
083d 4bff |K | Short_Literal 0x3ff
083e 4800 |H | Short_Literal 0x0
083f 0007 | | Action Break_Optional
0840 4800 |H | Short_Literal 0x0
0841 00d9 | | Load_Top At_Offset_1
0842 e5ff | | Load 0x2,-0x1
0843 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0844 01d6 | | Execute Vector,Field_Write
0845 00c8 | | Action Pop_Auxiliary_Range
0846 3ff9 |? | Loop_Increasing 0x840
0847 00ce | | Action Pop_Auxiliary
0848 4800 |H | Short_Literal 0x0
0849 e5ff | | Load 0x2,-0x1
084a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
084b 4800 |H | Short_Literal 0x0
084c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
084d 00d8 | | Load_Top At_Offset_0
084e e5ff | | Load 0x2,-0x1
084f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0850 00cf | | Action Mark_Auxiliary
0851 4830 |H0 | Short_Literal 0x30
0852 4801 |H | Short_Literal 0x1
0853 0007 | | Action Break_Optional
0854 00d8 | | Load_Top At_Offset_0
0855 e402 | | Load 0x2,0x2
0856 01d7 | | Execute Vector,Field_Read
0857 e406 | | Load 0x2,0x6
0858 e5ff | | Load 0x2,-0x1
0859 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
085a 01d6 | | Execute Vector,Field_Write
085b 00db | | Load_Top At_Offset_3
085c 0a01 | | Execute_Immediate Plus,0x1
085d c406 | | Store 0x2,0x6
085e 00c8 | | Action Pop_Auxiliary_Range
085f 3ff4 |? | Loop_Increasing 0x854
0860 00ce | | Action Pop_Auxiliary
0861 00d8 | | Load_Top At_Offset_0
0862 e5ff | | Load 0x2,-0x1
0863 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0864 480a |H | Short_Literal 0xa
0865 00d9 | | Load_Top At_Offset_1
0866 e5ff | | Load 0x2,-0x1
0867 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0868 01d6 | | Execute Vector,Field_Write
0869 00d8 | | Load_Top At_Offset_0
086a 0a01 | | Execute_Immediate Plus,0x1
086b 0059 | Y | Store_Top Discrete,At_Offset_1
086c 00d8 | | Load_Top At_Offset_0
086d e5ff | | Load 0x2,-0x1
086e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
086f 00cf | | Action Mark_Auxiliary
0870 4844 |HD | Short_Literal 0x44
0871 4801 |H | Short_Literal 0x1
0872 0007 | | Action Break_Optional
0873 00d8 | | Load_Top At_Offset_0
0874 e403 | | Load 0x2,0x3
0875 01d7 | | Execute Vector,Field_Read
0876 e406 | | Load 0x2,0x6
0877 e5ff | | Load 0x2,-0x1
0878 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0879 01d6 | | Execute Vector,Field_Write
087a 00db | | Load_Top At_Offset_3
087b 0a01 | | Execute_Immediate Plus,0x1
087c c406 | | Store 0x2,0x6
087d 00c8 | | Action Pop_Auxiliary_Range
087e 3ff4 |? | Loop_Increasing 0x873
087f 00ce | | Action Pop_Auxiliary
0880 00d8 | | Load_Top At_Offset_0
0881 e5ff | | Load 0x2,-0x1
0882 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0883 480a |H | Short_Literal 0xa
0884 00d9 | | Load_Top At_Offset_1
0885 e5ff | | Load 0x2,-0x1
0886 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0887 01d6 | | Execute Vector,Field_Write
0888 00d8 | | Load_Top At_Offset_0
0889 0a01 | | Execute_Immediate Plus,0x1
088a 0059 | Y | Store_Top Discrete,At_Offset_1
088b 480a |H | Short_Literal 0xa
088c 00d9 | | Load_Top At_Offset_1
088d e5ff | | Load 0x2,-0x1
088e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
088f 01d6 | | Execute Vector,Field_Write
0890 00d8 | | Load_Top At_Offset_0
0891 0a01 | | Execute_Immediate Plus,0x1
0892 0059 | Y | Store_Top Discrete,At_Offset_1
0893 00cf | | Action Mark_Auxiliary
0894 4849 |HI | Short_Literal 0x49
0895 4801 |H | Short_Literal 0x1
0896 0007 | | Action Break_Optional
0897 00d8 | | Load_Top At_Offset_0
0898 e404 | | Load 0x2,0x4
0899 01d7 | | Execute Vector,Field_Read
089a e406 | | Load 0x2,0x6
089b e5ff | | Load 0x2,-0x1
089c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
089d 01d6 | | Execute Vector,Field_Write
089e 00db | | Load_Top At_Offset_3
089f 0a01 | | Execute_Immediate Plus,0x1
08a0 c406 | | Store 0x2,0x6
08a1 00c8 | | Action Pop_Auxiliary_Range
08a2 3ff4 |? | Loop_Increasing 0x897
08a3 00ce | | Action Pop_Auxiliary
08a4 480a |H | Short_Literal 0xa
08a5 00d9 | | Load_Top At_Offset_1
08a6 e5ff | | Load 0x2,-0x1
08a7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
08a8 01d6 | | Execute Vector,Field_Write
08a9 00d8 | | Load_Top At_Offset_0
08aa 0a01 | | Execute_Immediate Plus,0x1
08ab 0059 | Y | Store_Top Discrete,At_Offset_1
08ac 00cf | | Action Mark_Auxiliary
08ad 4841 |HA | Short_Literal 0x41
08ae 4801 |H | Short_Literal 0x1
08af 0007 | | Action Break_Optional
08b0 00d8 | | Load_Top At_Offset_0
08b1 e405 | | Load 0x2,0x5
08b2 01d7 | | Execute Vector,Field_Read
08b3 e406 | | Load 0x2,0x6
08b4 e5ff | | Load 0x2,-0x1
08b5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
08b6 01d6 | | Execute Vector,Field_Write
08b7 00db | | Load_Top At_Offset_3
08b8 0a01 | | Execute_Immediate Plus,0x1
08b9 c406 | | Store 0x2,0x6
08ba 00c8 | | Action Pop_Auxiliary_Range
08bb 3ff4 |? | Loop_Increasing 0x8b0
08bc 00ce | | Action Pop_Auxiliary
08bd 480a |H | Short_Literal 0xa
08be 00d9 | | Load_Top At_Offset_1
08bf e5ff | | Load 0x2,-0x1
08c0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
08c1 01d6 | | Execute Vector,Field_Write
08c2 00d8 | | Load_Top At_Offset_0
08c3 0a01 | | Execute_Immediate Plus,0x1
08c4 0059 | Y | Store_Top Discrete,At_Offset_1
08c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
08c6 0000 0000 | | .XXX[0x2]
08c8 ; --------------------------------------------------------------------------------------
08c8 ; SUBPROGRAM
08c8 ; --------------------------------------------------------------------------------------
08c8 08dc | | .CONST 0x08dc ; Address of begin
08c9 0004 | | .CONST 0x0004 ; Address of exception handler
08ca 000a | | .CONST 0x000a ; Number of locals
08cb INIT_08c8:
08cb e228 | ( | Load 0x1,0x28
08cc 0322 | " | Declare_Variable Record
08cd e20e | | Load 0x1,0xe
08ce 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
08cf 00e2 | | Load_Encached Integer_Cache
08d0 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
08d1 e20d | | Load 0x1,0xd
08d2 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
08d3 e226 | & | Load 0x1,0x26
08d4 0007 | | Action Break_Optional
08d5 e211 | | Load 0x1,0x11
08d6 0007 | | Action Break_Optional
08d7 00e2 | | Load_Encached Integer_Cache
08d8 e5fe | | Load 0x2,-0x2
08d9 00e2 | | Load_Encached Integer_Cache
08da 03f1 | | Declare_Variable Discrete,With_Value
08db 00e2 | | Load_Encached Integer_Cache
08dc BODY_08c8:
08dc e402 | | Load 0x2,0x2
08dd 823d | = | Call 0x1,0x3d
08de 00d1 | | Pop_Control Pop_Count_1
08df e402 | | Load 0x2,0x2
08e0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
08e1 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
08e2 e5ff | | Load 0x2,-0x1
08e3 4602 |F | Jump_Case 0x3
08e4 7814 |x | Jump 0x8f9 ; case 0x0
08e5 7825 |x% | Jump 0x90b ; case 0x1
08e6 7800 |x | Jump 0x8e7 ; case 0x2
08e7 00cf | | Action Mark_Auxiliary
08e8 4805 |H | Short_Literal 0x5
08e9 4800 |H | Short_Literal 0x0
08ea 0007 | | Action Break_Optional
08eb 00d8 | | Load_Top At_Offset_0
08ec e22d | - | Load 0x1,0x2d
08ed 01d7 | | Execute Vector,Field_Read
08ee e408 | | Load 0x2,0x8
08ef e402 | | Load 0x2,0x2
08f0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
08f1 01d6 | | Execute Vector,Field_Write
08f2 e408 | | Load 0x2,0x8
08f3 0a01 | | Execute_Immediate Plus,0x1
08f4 c408 | | Store 0x2,0x8
08f5 00c8 | | Action Pop_Auxiliary_Range
08f6 3ff4 |? | Loop_Increasing 0x8eb
08f7 00ce | | Action Pop_Auxiliary
08f8 7823 |x# | Jump 0x91c
08f9 00cf | | Action Mark_Auxiliary
08fa 4805 |H | Short_Literal 0x5
08fb 4800 |H | Short_Literal 0x0
08fc 0007 | | Action Break_Optional
08fd 00d8 | | Load_Top At_Offset_0
08fe e22b | + | Load 0x1,0x2b
08ff 01d7 | | Execute Vector,Field_Read
0900 e408 | | Load 0x2,0x8
0901 e402 | | Load 0x2,0x2
0902 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0903 01d6 | | Execute Vector,Field_Write
0904 e408 | | Load 0x2,0x8
0905 0a01 | | Execute_Immediate Plus,0x1
0906 c408 | | Store 0x2,0x8
0907 00c8 | | Action Pop_Auxiliary_Range
0908 3ff4 |? | Loop_Increasing 0x8fd
0909 00ce | | Action Pop_Auxiliary
090a 7811 |x | Jump 0x91c
090b 00cf | | Action Mark_Auxiliary
090c 4805 |H | Short_Literal 0x5
090d 4800 |H | Short_Literal 0x0
090e 0007 | | Action Break_Optional
090f 00d8 | | Load_Top At_Offset_0
0910 e22c | , | Load 0x1,0x2c
0911 01d7 | | Execute Vector,Field_Read
0912 e408 | | Load 0x2,0x8
0913 e402 | | Load 0x2,0x2
0914 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0915 01d6 | | Execute Vector,Field_Write
0916 e408 | | Load 0x2,0x8
0917 0a01 | | Execute_Immediate Plus,0x1
0918 c408 | | Store 0x2,0x8
0919 00c8 | | Action Pop_Auxiliary_Range
091a 3ff4 |? | Loop_Increasing 0x90f
091b 00ce | | Action Pop_Auxiliary
091c e402 | | Load 0x2,0x2
091d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
091e 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
091f 00d9 | | Load_Top At_Offset_1
0920 0c64 | d | Execute_Immediate Greater_Equal,0x64
0921 6817 |h | Jump_Zero 0x939
0922 00d9 | | Load_Top At_Offset_1
0923 4864 |Hd | Short_Literal 0x64
0924 0270 | p | Execute Discrete,Divide
0925 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0926 00d9 | | Load_Top At_Offset_1
0927 4864 |Hd | Short_Literal 0x64
0928 026e | n | Execute Discrete,Modulo
0929 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
092a 00d8 | | Load_Top At_Offset_0
092b 00d8 | | Load_Top At_Offset_0
092c e002 | | Load 0x0,0x2
092d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
092e 0260 | ` | Execute Discrete,In_Type
092f 7001 |p | Jump_Nonzero 0x931
0930 0801 | | Execute_Immediate Raise,0x1
0931 0a30 | 0 | Execute_Immediate Plus,0x30
0932 00db | | Load_Top At_Offset_3
0933 e402 | | Load 0x2,0x2
0934 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0935 01d6 | | Execute Vector,Field_Write
0936 00da | | Load_Top At_Offset_2
0937 0a01 | | Execute_Immediate Plus,0x1
0938 005b | [ | Store_Top Discrete,At_Offset_3
0939 00d9 | | Load_Top At_Offset_1
093a 0c0a | | Execute_Immediate Greater_Equal,0xa
093b 6817 |h | Jump_Zero 0x953
093c 00d9 | | Load_Top At_Offset_1
093d 480a |H | Short_Literal 0xa
093e 0270 | p | Execute Discrete,Divide
093f 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0940 00d9 | | Load_Top At_Offset_1
0941 480a |H | Short_Literal 0xa
0942 026e | n | Execute Discrete,Modulo
0943 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0944 00d8 | | Load_Top At_Offset_0
0945 00d8 | | Load_Top At_Offset_0
0946 e002 | | Load 0x0,0x2
0947 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0948 0260 | ` | Execute Discrete,In_Type
0949 7001 |p | Jump_Nonzero 0x94b
094a 0801 | | Execute_Immediate Raise,0x1
094b 0a30 | 0 | Execute_Immediate Plus,0x30
094c 00db | | Load_Top At_Offset_3
094d e402 | | Load 0x2,0x2
094e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
094f 01d6 | | Execute Vector,Field_Write
0950 00da | | Load_Top At_Offset_2
0951 0a01 | | Execute_Immediate Plus,0x1
0952 005b | [ | Store_Top Discrete,At_Offset_3
0953 00d9 | | Load_Top At_Offset_1
0954 00d8 | | Load_Top At_Offset_0
0955 e002 | | Load 0x0,0x2
0956 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0957 0260 | ` | Execute Discrete,In_Type
0958 7001 |p | Jump_Nonzero 0x95a
0959 0801 | | Execute_Immediate Raise,0x1
095a 0a30 | 0 | Execute_Immediate Plus,0x30
095b 00db | | Load_Top At_Offset_3
095c e402 | | Load 0x2,0x2
095d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
095e 01d6 | | Execute Vector,Field_Write
095f 4820 |H | Short_Literal 0x20
0960 00db | | Load_Top At_Offset_3
0961 0a01 | | Execute_Immediate Plus,0x1
0962 e402 | | Load 0x2,0x2
0963 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0964 01d6 | | Execute Vector,Field_Write
0965 00db | | Load_Top At_Offset_3
0966 e406 | | Load 0x2,0x6
0967 e405 | | Load 0x2,0x5
0968 e404 | | Load 0x2,0x4
0969 e403 | | Load 0x2,0x3
096a e230 | 0 | Load 0x1,0x30
096b 8214 | | Call 0x1,0x14
096c c406 | | Store 0x2,0x6
096d c407 | | Store 0x2,0x7
096e 00db | | Load_Top At_Offset_3
096f 7015 |p | Jump_Nonzero 0x985
0970 00db | | Load_Top At_Offset_3
0971 e402 | | Load 0x2,0x2
0972 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0973 4801 |H | Short_Literal 0x1
0974 e406 | | Load 0x2,0x6
0975 0227 | ' | Execute Access,All_Reference
0976 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0977 e406 | | Load 0x2,0x6
0978 0227 | ' | Execute Access,All_Reference
0979 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
097a e406 | | Load 0x2,0x6
097b 0227 | ' | Execute Access,All_Reference
097c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
097d e406 | | Load 0x2,0x6
097e 0227 | ' | Execute Access,All_Reference
097f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0980 8013 | | Call 0x0,0x13
0981 c407 | | Store 0x2,0x7
0982 4801 |H | Short_Literal 0x1
0983 a5fd | | Store_Unchecked 0x2,-0x3
0984 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0985 4800 |H | Short_Literal 0x0
0986 a5fd | | Store_Unchecked 0x2,-0x3
0987 0092 0c5e | ^| Action Push_String_Extended,0xc5e ; "COULD NOT SET - "
0989 e407 | | Load 0x2,0x7
098a e210 | | Load 0x1,0x10
098b 011c | | Execute Any,Convert_Unchecked
098c 1c01 | | Execute_Immediate Run_Utility,0x1
098d 01cc | | Execute Vector,Catenate
098e e00c | | Load 0x0,0xc
098f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0990 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0991 0000 0000 | | .BLANK 0000[0x7]
0998 ; --------------------------------------------------------------------------------------
0998 ; SUBPROGRAM
0998 ; --------------------------------------------------------------------------------------
0998 099b | | .CONST 0x099b ; Address of begin
0999 0004 | | .CONST 0x0004 ; Address of exception handler
099a 0001 | | .CONST 0x0001 ; Number of locals
099b BODY_0998:
099b INIT_0998:
099b 4810 |H | Short_Literal 0x10
099c a407 | | Store_Unchecked 0x2,0x7
099d 00cf | | Action Mark_Auxiliary
099e e402 | | Load 0x2,0x2
099f 0227 | ' | Execute Access,All_Reference
09a0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
09a1 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
09a2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
09a3 0aff | | Execute_Immediate Plus,-0x1
09a4 4801 |H | Short_Literal 0x1
09a5 0263 | c | Execute Discrete,Above_Bound
09a6 702d |p- | Jump_Nonzero 0x9d4
09a7 e406 | | Load 0x2,0x6
09a8 e403 | | Load 0x2,0x3
09a9 e402 | | Load 0x2,0x2
09aa 4801 |H | Short_Literal 0x1
09ab 8215 | | Call 0x1,0x15
09ac c402 | | Store 0x2,0x2
09ad 00d1 | | Pop_Control Pop_Count_1
09ae c406 | | Store 0x2,0x6
09af e406 | | Load 0x2,0x6
09b0 701d |p | Jump_Nonzero 0x9ce
09b1 e403 | | Load 0x2,0x3
09b2 00d8 | | Load_Top At_Offset_0
09b3 01da | | Execute Vector,Bounds
09b4 e002 | | Load 0x0,0x2
09b5 1b12 | | Execute Package,Field_Read,Field_Number 0x12
09b6 0334 | 4 | Declare_Variable Array,With_Constraint
09b7 00d0 | | Action Swap_Control
09b8 00d8 | | Load_Top At_Offset_0
09b9 01dd | | Execute Vector,First
09ba 00da | | Load_Top At_Offset_2
09bb 01dd | | Execute Vector,First
09bc 0272 | r | Execute Discrete,Minus
09bd 00da | | Load_Top At_Offset_2
09be 01d9 | | Execute Vector,Reverse_Bounds
09bf 0263 | c | Execute Discrete,Above_Bound
09c0 700a |p | Jump_Nonzero 0x9cb
09c1 00d8 | | Load_Top At_Offset_0
09c2 00db | | Load_Top At_Offset_3
09c3 0273 | s | Execute Discrete,Plus
09c4 e606 | | Load 0x3,0x6
09c5 01d7 | | Execute Vector,Field_Read
09c6 00d9 | | Load_Top At_Offset_1
09c7 e605 | | Load 0x3,0x5
09c8 01d5 | | Execute Vector,Field_Reference
09c9 0118 | | Execute Any,Write_Unchecked
09ca 3ff6 |? | Loop_Increasing 0x9c1
09cb 00d2 | | Pop_Control Pop_Count_2
09cc 8235 | 5 | Call 0x1,0x35
09cd 7804 |x | Jump 0x9d2
09ce e406 | | Load 0x2,0x6
09cf a407 | | Store_Unchecked 0x2,0x7
09d0 00d2 | | Pop_Control Pop_Count_2
09d1 7802 |x | Jump 0x9d4
09d2 00c8 | | Action Pop_Auxiliary_Range
09d3 3fd3 |? | Loop_Increasing 0x9a7
09d4 00ce | | Action Pop_Auxiliary
09d5 e407 | | Load 0x2,0x7
09d6 0f10 | | Execute_Immediate Equal,0x10
09d7 6836 |h6 | Jump_Zero 0xa0e
09d8 e406 | | Load 0x2,0x6
09d9 e403 | | Load 0x2,0x3
09da e402 | | Load 0x2,0x2
09db 4801 |H | Short_Literal 0x1
09dc 8215 | | Call 0x1,0x15
09dd c402 | | Store 0x2,0x2
09de 00d1 | | Pop_Control Pop_Count_1
09df c406 | | Store 0x2,0x6
09e0 00cf | | Action Mark_Auxiliary
09e1 4800 |H | Short_Literal 0x0
09e2 4bff |K | Short_Literal 0x3ff
09e3 0007 | | Action Break_Optional
09e4 00d8 | | Load_Top At_Offset_0
09e5 e403 | | Load 0x2,0x3
09e6 01d7 | | Execute Vector,Field_Read
09e7 6804 |h | Jump_Zero 0x9ec
09e8 00d8 | | Load_Top At_Offset_0
09e9 a404 | | Store_Unchecked 0x2,0x4
09ea 00d2 | | Pop_Control Pop_Count_2
09eb 7802 |x | Jump 0x9ee
09ec 00c8 | | Action Pop_Auxiliary_Range
09ed 37f6 |7 | Loop_Decreasing 0x9e4
09ee 00ce | | Action Pop_Auxiliary
09ef 4800 |H | Short_Literal 0x0
09f0 e404 | | Load 0x2,0x4
09f1 e403 | | Load 0x2,0x3
09f2 01cf | | Execute Vector,Slice_Read
09f3 00d8 | | Load_Top At_Offset_0
09f4 01da | | Execute Vector,Bounds
09f5 e002 | | Load 0x0,0x2
09f6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
09f7 0334 | 4 | Declare_Variable Array,With_Constraint
09f8 00d0 | | Action Swap_Control
09f9 00d8 | | Load_Top At_Offset_0
09fa 01dd | | Execute Vector,First
09fb 00da | | Load_Top At_Offset_2
09fc 01dd | | Execute Vector,First
09fd 0272 | r | Execute Discrete,Minus
09fe 00da | | Load_Top At_Offset_2
09ff 01d9 | | Execute Vector,Reverse_Bounds
0a00 0263 | c | Execute Discrete,Above_Bound
0a01 700a |p | Jump_Nonzero 0xa0c
0a02 00d8 | | Load_Top At_Offset_0
0a03 00db | | Load_Top At_Offset_3
0a04 0273 | s | Execute Discrete,Plus
0a05 e603 | | Load 0x3,0x3
0a06 01d7 | | Execute Vector,Field_Read
0a07 00d9 | | Load_Top At_Offset_1
0a08 e602 | | Load 0x3,0x2
0a09 01d5 | | Execute Vector,Field_Reference
0a0a 0118 | | Execute Any,Write_Unchecked
0a0b 3ff6 |? | Loop_Increasing 0xa02
0a0c 00d2 | | Pop_Control Pop_Count_2
0a0d 8235 | 5 | Call 0x1,0x35
0a0e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0a0f 0000 | | .XXX[0x1]
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a13 | | .CONST 0x0a13 ; Address of begin
0a11 0004 | | .CONST 0x0004 ; Address of exception handler
0a12 0001 | | .CONST 0x0001 ; Number of locals
0a13 BODY_0a10:
0a13 INIT_0a10:
0a13 4810 |H | Short_Literal 0x10
0a14 a407 | | Store_Unchecked 0x2,0x7
0a15 00cf | | Action Mark_Auxiliary
0a16 e402 | | Load 0x2,0x2
0a17 0227 | ' | Execute Access,All_Reference
0a18 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0a19 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0a1a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0a1b 0aff | | Execute_Immediate Plus,-0x1
0a1c 4801 |H | Short_Literal 0x1
0a1d 0263 | c | Execute Discrete,Above_Bound
0a1e 7066 |pf | Jump_Nonzero 0xa85
0a1f e406 | | Load 0x2,0x6
0a20 e403 | | Load 0x2,0x3
0a21 e402 | | Load 0x2,0x2
0a22 4801 |H | Short_Literal 0x1
0a23 8215 | | Call 0x1,0x15
0a24 c402 | | Store 0x2,0x2
0a25 00d1 | | Pop_Control Pop_Count_1
0a26 c406 | | Store 0x2,0x6
0a27 e406 | | Load 0x2,0x6
0a28 7056 |pV | Jump_Nonzero 0xa7f
0a29 e5ff | | Load 0x2,-0x1
0a2a 7037 |p7 | Jump_Nonzero 0xa62
0a2b 00cf | | Action Mark_Auxiliary
0a2c 4bfe |K | Short_Literal 0x3fe
0a2d 4802 |H | Short_Literal 0x2
0a2e 0007 | | Action Break_Optional
0a2f 00d8 | | Load_Top At_Offset_0
0a30 e403 | | Load 0x2,0x3
0a31 01d7 | | Execute Vector,Field_Read
0a32 0f0a | | Execute_Immediate Equal,0xa
0a33 680b |h | Jump_Zero 0xa3f
0a34 00d8 | | Load_Top At_Offset_0
0a35 0a01 | | Execute_Immediate Plus,0x1
0a36 e403 | | Load 0x2,0x3
0a37 01d7 | | Execute Vector,Field_Read
0a38 0f0a | | Execute_Immediate Equal,0xa
0a39 6805 |h | Jump_Zero 0xa3f
0a3a 00d8 | | Load_Top At_Offset_0
0a3b 0aff | | Execute_Immediate Plus,-0x1
0a3c a404 | | Store_Unchecked 0x2,0x4
0a3d 00d2 | | Pop_Control Pop_Count_2
0a3e 7802 |x | Jump 0xa41
0a3f 00c8 | | Action Pop_Auxiliary_Range
0a40 3fee |? | Loop_Increasing 0xa2f
0a41 00ce | | Action Pop_Auxiliary
0a42 4800 |H | Short_Literal 0x0
0a43 e404 | | Load 0x2,0x4
0a44 e403 | | Load 0x2,0x3
0a45 01cf | | Execute Vector,Slice_Read
0a46 00d8 | | Load_Top At_Offset_0
0a47 01da | | Execute Vector,Bounds
0a48 e002 | | Load 0x0,0x2
0a49 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0a4a 0334 | 4 | Declare_Variable Array,With_Constraint
0a4b 00d0 | | Action Swap_Control
0a4c 00d8 | | Load_Top At_Offset_0
0a4d 01dd | | Execute Vector,First
0a4e 00da | | Load_Top At_Offset_2
0a4f 01dd | | Execute Vector,First
0a50 0272 | r | Execute Discrete,Minus
0a51 00da | | Load_Top At_Offset_2
0a52 01d9 | | Execute Vector,Reverse_Bounds
0a53 0263 | c | Execute Discrete,Above_Bound
0a54 700a |p | Jump_Nonzero 0xa5f
0a55 00d8 | | Load_Top At_Offset_0
0a56 00db | | Load_Top At_Offset_3
0a57 0273 | s | Execute Discrete,Plus
0a58 e606 | | Load 0x3,0x6
0a59 01d7 | | Execute Vector,Field_Read
0a5a 00d9 | | Load_Top At_Offset_1
0a5b e605 | | Load 0x3,0x5
0a5c 01d5 | | Execute Vector,Field_Reference
0a5d 0118 | | Execute Any,Write_Unchecked
0a5e 3ff6 |? | Loop_Increasing 0xa55
0a5f 00d2 | | Pop_Control Pop_Count_2
0a60 8235 | 5 | Call 0x1,0x35
0a61 7821 |x! | Jump 0xa83
0a62 e403 | | Load 0x2,0x3
0a63 00d8 | | Load_Top At_Offset_0
0a64 01da | | Execute Vector,Bounds
0a65 e002 | | Load 0x0,0x2
0a66 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0a67 0334 | 4 | Declare_Variable Array,With_Constraint
0a68 00d0 | | Action Swap_Control
0a69 00d8 | | Load_Top At_Offset_0
0a6a 01dd | | Execute Vector,First
0a6b 00da | | Load_Top At_Offset_2
0a6c 01dd | | Execute Vector,First
0a6d 0272 | r | Execute Discrete,Minus
0a6e 00da | | Load_Top At_Offset_2
0a6f 01d9 | | Execute Vector,Reverse_Bounds
0a70 0263 | c | Execute Discrete,Above_Bound
0a71 700a |p | Jump_Nonzero 0xa7c
0a72 00d8 | | Load_Top At_Offset_0
0a73 00db | | Load_Top At_Offset_3
0a74 0273 | s | Execute Discrete,Plus
0a75 e606 | | Load 0x3,0x6
0a76 01d7 | | Execute Vector,Field_Read
0a77 00d9 | | Load_Top At_Offset_1
0a78 e605 | | Load 0x3,0x5
0a79 01d5 | | Execute Vector,Field_Reference
0a7a 0118 | | Execute Any,Write_Unchecked
0a7b 3ff6 |? | Loop_Increasing 0xa72
0a7c 00d2 | | Pop_Control Pop_Count_2
0a7d 8235 | 5 | Call 0x1,0x35
0a7e 7804 |x | Jump 0xa83
0a7f e406 | | Load 0x2,0x6
0a80 a407 | | Store_Unchecked 0x2,0x7
0a81 00d2 | | Pop_Control Pop_Count_2
0a82 7802 |x | Jump 0xa85
0a83 00c8 | | Action Pop_Auxiliary_Range
0a84 3f9a |? | Loop_Increasing 0xa1f
0a85 00ce | | Action Pop_Auxiliary
0a86 e407 | | Load 0x2,0x7
0a87 0f10 | | Execute_Immediate Equal,0x10
0a88 6836 |h6 | Jump_Zero 0xabf
0a89 e406 | | Load 0x2,0x6
0a8a e403 | | Load 0x2,0x3
0a8b e402 | | Load 0x2,0x2
0a8c 4801 |H | Short_Literal 0x1
0a8d 8215 | | Call 0x1,0x15
0a8e c402 | | Store 0x2,0x2
0a8f 00d1 | | Pop_Control Pop_Count_1
0a90 c406 | | Store 0x2,0x6
0a91 00cf | | Action Mark_Auxiliary
0a92 4800 |H | Short_Literal 0x0
0a93 4bff |K | Short_Literal 0x3ff
0a94 0007 | | Action Break_Optional
0a95 00d8 | | Load_Top At_Offset_0
0a96 e403 | | Load 0x2,0x3
0a97 01d7 | | Execute Vector,Field_Read
0a98 6804 |h | Jump_Zero 0xa9d
0a99 00d8 | | Load_Top At_Offset_0
0a9a a405 | | Store_Unchecked 0x2,0x5
0a9b 00d2 | | Pop_Control Pop_Count_2
0a9c 7802 |x | Jump 0xa9f
0a9d 00c8 | | Action Pop_Auxiliary_Range
0a9e 37f6 |7 | Loop_Decreasing 0xa95
0a9f 00ce | | Action Pop_Auxiliary
0aa0 4800 |H | Short_Literal 0x0
0aa1 e405 | | Load 0x2,0x5
0aa2 e403 | | Load 0x2,0x3
0aa3 01cf | | Execute Vector,Slice_Read
0aa4 00d8 | | Load_Top At_Offset_0
0aa5 01da | | Execute Vector,Bounds
0aa6 e002 | | Load 0x0,0x2
0aa7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0aa8 0334 | 4 | Declare_Variable Array,With_Constraint
0aa9 00d0 | | Action Swap_Control
0aaa 00d8 | | Load_Top At_Offset_0
0aab 01dd | | Execute Vector,First
0aac 00da | | Load_Top At_Offset_2
0aad 01dd | | Execute Vector,First
0aae 0272 | r | Execute Discrete,Minus
0aaf 00da | | Load_Top At_Offset_2
0ab0 01d9 | | Execute Vector,Reverse_Bounds
0ab1 0263 | c | Execute Discrete,Above_Bound
0ab2 700a |p | Jump_Nonzero 0xabd
0ab3 00d8 | | Load_Top At_Offset_0
0ab4 00db | | Load_Top At_Offset_3
0ab5 0273 | s | Execute Discrete,Plus
0ab6 e603 | | Load 0x3,0x3
0ab7 01d7 | | Execute Vector,Field_Read
0ab8 00d9 | | Load_Top At_Offset_1
0ab9 e602 | | Load 0x3,0x2
0aba 01d5 | | Execute Vector,Field_Reference
0abb 0118 | | Execute Any,Write_Unchecked
0abc 3ff6 |? | Loop_Increasing 0xab3
0abd 00d2 | | Pop_Control Pop_Count_2
0abe 8235 | 5 | Call 0x1,0x35
0abf 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; SUBPROGRAM
0ac0 ; --------------------------------------------------------------------------------------
0ac0 0ac3 | | .CONST 0x0ac3 ; Address of begin
0ac1 0004 | | .CONST 0x0004 ; Address of exception handler
0ac2 0001 | | .CONST 0x0001 ; Number of locals
0ac3 BODY_0ac0:
0ac3 INIT_0ac0:
0ac3 4810 |H | Short_Literal 0x10
0ac4 a406 | | Store_Unchecked 0x2,0x6
0ac5 e405 | | Load 0x2,0x5
0ac6 e403 | | Load 0x2,0x3
0ac7 e402 | | Load 0x2,0x2
0ac8 4801 |H | Short_Literal 0x1
0ac9 8215 | | Call 0x1,0x15
0aca c402 | | Store 0x2,0x2
0acb 00d1 | | Pop_Control Pop_Count_1
0acc c405 | | Store 0x2,0x5
0acd e405 | | Load 0x2,0x5
0ace 703b |p; | Jump_Nonzero 0xb0a
0acf 4bff |K | Short_Literal 0x3ff
0ad0 a404 | | Store_Unchecked 0x2,0x4
0ad1 00cf | | Action Mark_Auxiliary
0ad2 4bfe |K | Short_Literal 0x3fe
0ad3 4802 |H | Short_Literal 0x2
0ad4 0007 | | Action Break_Optional
0ad5 00d8 | | Load_Top At_Offset_0
0ad6 e403 | | Load 0x2,0x3
0ad7 01d7 | | Execute Vector,Field_Read
0ad8 0f0a | | Execute_Immediate Equal,0xa
0ad9 680b |h | Jump_Zero 0xae5
0ada 00d8 | | Load_Top At_Offset_0
0adb 0a01 | | Execute_Immediate Plus,0x1
0adc e403 | | Load 0x2,0x3
0add 01d7 | | Execute Vector,Field_Read
0ade 0f0a | | Execute_Immediate Equal,0xa
0adf 6805 |h | Jump_Zero 0xae5
0ae0 00d8 | | Load_Top At_Offset_0
0ae1 0aff | | Execute_Immediate Plus,-0x1
0ae2 a404 | | Store_Unchecked 0x2,0x4
0ae3 00d2 | | Pop_Control Pop_Count_2
0ae4 7802 |x | Jump 0xae7
0ae5 00c8 | | Action Pop_Auxiliary_Range
0ae6 3fee |? | Loop_Increasing 0xad5
0ae7 00ce | | Action Pop_Auxiliary
0ae8 4800 |H | Short_Literal 0x0
0ae9 e404 | | Load 0x2,0x4
0aea e403 | | Load 0x2,0x3
0aeb 01cf | | Execute Vector,Slice_Read
0aec 00d8 | | Load_Top At_Offset_0
0aed 01da | | Execute Vector,Bounds
0aee e002 | | Load 0x0,0x2
0aef 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0af0 0334 | 4 | Declare_Variable Array,With_Constraint
0af1 00d0 | | Action Swap_Control
0af2 00d8 | | Load_Top At_Offset_0
0af3 01dd | | Execute Vector,First
0af4 00da | | Load_Top At_Offset_2
0af5 01dd | | Execute Vector,First
0af6 0272 | r | Execute Discrete,Minus
0af7 00da | | Load_Top At_Offset_2
0af8 01d9 | | Execute Vector,Reverse_Bounds
0af9 0263 | c | Execute Discrete,Above_Bound
0afa 700a |p | Jump_Nonzero 0xb05
0afb 00d8 | | Load_Top At_Offset_0
0afc 00db | | Load_Top At_Offset_3
0afd 0273 | s | Execute Discrete,Plus
0afe e603 | | Load 0x3,0x3
0aff 01d7 | | Execute Vector,Field_Read
0b00 00d9 | | Load_Top At_Offset_1
0b01 e602 | | Load 0x3,0x2
0b02 01d5 | | Execute Vector,Field_Reference
0b03 0118 | | Execute Any,Write_Unchecked
0b04 3ff6 |? | Loop_Increasing 0xafb
0b05 00d2 | | Pop_Control Pop_Count_2
0b06 e014 | | Load 0x0,0x14
0b07 180d | | Execute Package,Field_Execute,Field_Number 0xd
0b08 00cb | | Action Pop_Block_With_Result
0b09 00ca | | Action Exit_Nullary_Function
0b0a e405 | | Load 0x2,0x5
0b0b a406 | | Store_Unchecked 0x2,0x6
0b0c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b0d 0000 0000 | | .XXX[0x3]
0b0f 0000 | |
0b10 ; --------------------------------------------------------------------------------------
0b10 ; SUBPROGRAM
0b10 ; --------------------------------------------------------------------------------------
0b10 0b13 | | .CONST 0x0b13 ; Address of begin
0b11 0004 | | .CONST 0x0004 ; Address of exception handler
0b12 0001 | | .CONST 0x0001 ; Number of locals
0b13 BODY_0b10:
0b13 INIT_0b10:
0b13 00da | | Load_Top At_Offset_2
0b14 01db | | Execute Vector,Length
0b15 7005 |p | Jump_Nonzero 0xb1b
0b16 0092 0c5f | _| Action Push_String_Extended,0xc5f ; "*** Could not get kernel version ***"
0b18 e00c | | Load 0x0,0xc
0b19 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0b1a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0b1b 00da | | Load_Top At_Offset_2
0b1c e00c | | Load 0x0,0xc
0b1d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0b1e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0b1f 0000 | | .XXX[0x1]
0b20 ; --------------------------------------------------------------------------------------
0b20 ; SUBPROGRAM
0b20 ; --------------------------------------------------------------------------------------
0b20 0b23 | # | .CONST 0x0b23 ; Address of begin
0b21 0004 | | .CONST 0x0004 ; Address of exception handler
0b22 0001 | | .CONST 0x0001 ; Number of locals
0b23 BODY_0b20:
0b23 INIT_0b20:
0b23 4810 |H | Short_Literal 0x10
0b24 a408 | | Store_Unchecked 0x2,0x8
0b25 e407 | | Load 0x2,0x7
0b26 e403 | | Load 0x2,0x3
0b27 e402 | | Load 0x2,0x2
0b28 4801 |H | Short_Literal 0x1
0b29 8215 | | Call 0x1,0x15
0b2a c402 | | Store 0x2,0x2
0b2b 00d1 | | Pop_Control Pop_Count_1
0b2c c407 | | Store 0x2,0x7
0b2d e407 | | Load 0x2,0x7
0b2e 7065 |pe | Jump_Nonzero 0xb94
0b2f e407 | | Load 0x2,0x7
0b30 e403 | | Load 0x2,0x3
0b31 e402 | | Load 0x2,0x2
0b32 4801 |H | Short_Literal 0x1
0b33 8215 | | Call 0x1,0x15
0b34 c402 | | Store 0x2,0x2
0b35 00d1 | | Pop_Control Pop_Count_1
0b36 c407 | | Store 0x2,0x7
0b37 e407 | | Load 0x2,0x7
0b38 7039 |p9 | Jump_Nonzero 0xb72
0b39 4801 |H | Short_Literal 0x1
0b3a a404 | | Store_Unchecked 0x2,0x4
0b3b 4800 |H | Short_Literal 0x0
0b3c a406 | | Store_Unchecked 0x2,0x6
0b3d 00cf | | Action Mark_Auxiliary
0b3e 4bfc |K | Short_Literal 0x3fc
0b3f 4801 |H | Short_Literal 0x1
0b40 0007 | | Action Break_Optional
0b41 00d8 | | Load_Top At_Offset_0
0b42 e403 | | Load 0x2,0x3
0b43 01d7 | | Execute Vector,Field_Read
0b44 0f40 | @ | Execute_Immediate Equal,0x40
0b45 6829 |h) | Jump_Zero 0xb6f
0b46 00d8 | | Load_Top At_Offset_0
0b47 0a01 | | Execute_Immediate Plus,0x1
0b48 e403 | | Load 0x2,0x3
0b49 01d7 | | Execute Vector,Field_Read
0b4a 0f28 | ( | Execute_Immediate Equal,0x28
0b4b 6823 |h# | Jump_Zero 0xb6f
0b4c 00d8 | | Load_Top At_Offset_0
0b4d 0a02 | | Execute_Immediate Plus,0x2
0b4e e403 | | Load 0x2,0x3
0b4f 01d7 | | Execute Vector,Field_Read
0b50 0f23 | # | Execute_Immediate Equal,0x23
0b51 681d |h | Jump_Zero 0xb6f
0b52 00d8 | | Load_Top At_Offset_0
0b53 0a03 | | Execute_Immediate Plus,0x3
0b54 e403 | | Load 0x2,0x3
0b55 01d7 | | Execute Vector,Field_Read
0b56 0f29 | ) | Execute_Immediate Equal,0x29
0b57 6817 |h | Jump_Zero 0xb6f
0b58 00d8 | | Load_Top At_Offset_0
0b59 0a04 | | Execute_Immediate Plus,0x4
0b5a a405 | | Store_Unchecked 0x2,0x5
0b5b 00cf | | Action Mark_Auxiliary
0b5c 4bff |K | Short_Literal 0x3ff
0b5d e405 | | Load 0x2,0x5
0b5e 0263 | c | Execute Discrete,Above_Bound
0b5f 700e |p | Jump_Nonzero 0xb6e
0b60 00d8 | | Load_Top At_Offset_0
0b61 e403 | | Load 0x2,0x3
0b62 01d7 | | Execute Vector,Field_Read
0b63 0f5c | \ | Execute_Immediate Equal,0x5c
0b64 6807 |h | Jump_Zero 0xb6c
0b65 e405 | | Load 0x2,0x5
0b66 a404 | | Store_Unchecked 0x2,0x4
0b67 00d8 | | Load_Top At_Offset_0
0b68 0aff | | Execute_Immediate Plus,-0x1
0b69 c406 | | Store 0x2,0x6
0b6a 00d2 | | Pop_Control Pop_Count_2
0b6b 7802 |x | Jump 0xb6e
0b6c 00c8 | | Action Pop_Auxiliary_Range
0b6d 3ff2 |? | Loop_Increasing 0xb60
0b6e 00ce | | Action Pop_Auxiliary
0b6f 00c8 | | Action Pop_Auxiliary_Range
0b70 3fd0 |? | Loop_Increasing 0xb41
0b71 00ce | | Action Pop_Auxiliary
0b72 e404 | | Load 0x2,0x4
0b73 e406 | | Load 0x2,0x6
0b74 e403 | | Load 0x2,0x3
0b75 01cf | | Execute Vector,Slice_Read
0b76 00d8 | | Load_Top At_Offset_0
0b77 01da | | Execute Vector,Bounds
0b78 e002 | | Load 0x0,0x2
0b79 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0b7a 0334 | 4 | Declare_Variable Array,With_Constraint
0b7b 00d0 | | Action Swap_Control
0b7c 00d8 | | Load_Top At_Offset_0
0b7d 01dd | | Execute Vector,First
0b7e 00da | | Load_Top At_Offset_2
0b7f 01dd | | Execute Vector,First
0b80 0272 | r | Execute Discrete,Minus
0b81 00da | | Load_Top At_Offset_2
0b82 01d9 | | Execute Vector,Reverse_Bounds
0b83 0263 | c | Execute Discrete,Above_Bound
0b84 700a |p | Jump_Nonzero 0xb8f
0b85 00d8 | | Load_Top At_Offset_0
0b86 00db | | Load_Top At_Offset_3
0b87 0273 | s | Execute Discrete,Plus
0b88 e603 | | Load 0x3,0x3
0b89 01d7 | | Execute Vector,Field_Read
0b8a 00d9 | | Load_Top At_Offset_1
0b8b e602 | | Load 0x3,0x2
0b8c 01d5 | | Execute Vector,Field_Reference
0b8d 0118 | | Execute Any,Write_Unchecked
0b8e 3ff6 |? | Loop_Increasing 0xb85
0b8f 00d2 | | Pop_Control Pop_Count_2
0b90 e014 | | Load 0x0,0x14
0b91 180d | | Execute Package,Field_Execute,Field_Number 0xd
0b92 00cb | | Action Pop_Block_With_Result
0b93 00ca | | Action Exit_Nullary_Function
0b94 e407 | | Load 0x2,0x7
0b95 a408 | | Store_Unchecked 0x2,0x8
0b96 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b97 0000 | | .XXX[0x1]
0b98 ; --------------------------------------------------------------------------------------
0b98 ; SUBPROGRAM
0b98 ; --------------------------------------------------------------------------------------
0b98 0b9b | | .CONST 0x0b9b ; Address of begin
0b99 0004 | | .CONST 0x0004 ; Address of exception handler
0b9a 0001 | | .CONST 0x0001 ; Number of locals
0b9b BODY_0b98:
0b9b INIT_0b98:
0b9b e5fd | | Load 0x2,-0x3
0b9c 7006 |p | Jump_Nonzero 0xba3
0b9d e5fe | | Load 0x2,-0x2
0b9e 8233 | 3 | Call 0x1,0x33
0b9f 6803 |h | Jump_Zero 0xba3
0ba0 4813 |H | Short_Literal 0x13
0ba1 a5fb | | Store_Unchecked 0x2,-0x5
0ba2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ba3 e405 | | Load 0x2,0x5
0ba4 e011 | | Load 0x0,0x11
0ba5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0ba6 e010 | | Load 0x0,0x10
0ba7 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0ba8 e010 | | Load 0x0,0x10
0ba9 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0baa 00ea | | Load_Encached Null_String_Cache
0bab e5fe | | Load 0x2,-0x2
0bac 4801 |H | Short_Literal 0x1
0bad e00e | | Load 0x0,0xe
0bae 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0baf c405 | | Store 0x2,0x5
0bb0 4811 |H | Short_Literal 0x11
0bb1 a5fb | | Store_Unchecked 0x2,-0x5
0bb2 00cf | | Action Mark_Auxiliary
0bb3 e402 | | Load 0x2,0x2
0bb4 0227 | ' | Execute Access,All_Reference
0bb5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0bb6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0bb7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0bb8 0aff | | Execute_Immediate Plus,-0x1
0bb9 4801 |H | Short_Literal 0x1
0bba 0263 | c | Execute Discrete,Above_Bound
0bbb 702f |p/ | Jump_Nonzero 0xbeb
0bbc e406 | | Load 0x2,0x6
0bbd e403 | | Load 0x2,0x3
0bbe e402 | | Load 0x2,0x2
0bbf 4801 |H | Short_Literal 0x1
0bc0 8215 | | Call 0x1,0x15
0bc1 c402 | | Store 0x2,0x2
0bc2 00d1 | | Pop_Control Pop_Count_1
0bc3 c406 | | Store 0x2,0x6
0bc4 e406 | | Load 0x2,0x6
0bc5 701f |p | Jump_Nonzero 0xbe5
0bc6 e403 | | Load 0x2,0x3
0bc7 00d8 | | Load_Top At_Offset_0
0bc8 01da | | Execute Vector,Bounds
0bc9 e002 | | Load 0x0,0x2
0bca 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0bcb 0334 | 4 | Declare_Variable Array,With_Constraint
0bcc 00d0 | | Action Swap_Control
0bcd 00d8 | | Load_Top At_Offset_0
0bce 01dd | | Execute Vector,First
0bcf 00da | | Load_Top At_Offset_2
0bd0 01dd | | Execute Vector,First
0bd1 0272 | r | Execute Discrete,Minus
0bd2 00da | | Load_Top At_Offset_2
0bd3 01d9 | | Execute Vector,Reverse_Bounds
0bd4 0263 | c | Execute Discrete,Above_Bound
0bd5 700a |p | Jump_Nonzero 0xbe0
0bd6 00d8 | | Load_Top At_Offset_0
0bd7 00db | | Load_Top At_Offset_3
0bd8 0273 | s | Execute Discrete,Plus
0bd9 e606 | | Load 0x3,0x6
0bda 01d7 | | Execute Vector,Field_Read
0bdb 00d9 | | Load_Top At_Offset_1
0bdc e605 | | Load 0x3,0x5
0bdd 01d5 | | Execute Vector,Field_Reference
0bde 0118 | | Execute Any,Write_Unchecked
0bdf 3ff6 |? | Loop_Increasing 0xbd6
0be0 00d2 | | Pop_Control Pop_Count_2
0be1 e405 | | Load 0x2,0x5
0be2 e00e | | Load 0x0,0xe
0be3 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0be4 7804 |x | Jump 0xbe9
0be5 e406 | | Load 0x2,0x6
0be6 a5fb | | Store_Unchecked 0x2,-0x5
0be7 00d2 | | Pop_Control Pop_Count_2
0be8 7802 |x | Jump 0xbeb
0be9 00c8 | | Action Pop_Auxiliary_Range
0bea 3fd1 |? | Loop_Increasing 0xbbc
0beb 00ce | | Action Pop_Auxiliary
0bec e406 | | Load 0x2,0x6
0bed 7030 |p0 | Jump_Nonzero 0xc1e
0bee e406 | | Load 0x2,0x6
0bef e404 | | Load 0x2,0x4
0bf0 e403 | | Load 0x2,0x3
0bf1 e402 | | Load 0x2,0x2
0bf2 4801 |H | Short_Literal 0x1
0bf3 821d | | Call 0x1,0x1d
0bf4 c402 | | Store 0x2,0x2
0bf5 00d1 | | Pop_Control Pop_Count_1
0bf6 c404 | | Store 0x2,0x4
0bf7 c406 | | Store 0x2,0x6
0bf8 e406 | | Load 0x2,0x6
0bf9 7022 |p" | Jump_Nonzero 0xc1c
0bfa 4800 |H | Short_Literal 0x0
0bfb e404 | | Load 0x2,0x4
0bfc e403 | | Load 0x2,0x3
0bfd 01cf | | Execute Vector,Slice_Read
0bfe 00d8 | | Load_Top At_Offset_0
0bff 01da | | Execute Vector,Bounds
0c00 e002 | | Load 0x0,0x2
0c01 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0c02 0334 | 4 | Declare_Variable Array,With_Constraint
0c03 00d0 | | Action Swap_Control
0c04 00d8 | | Load_Top At_Offset_0
0c05 01dd | | Execute Vector,First
0c06 00da | | Load_Top At_Offset_2
0c07 01dd | | Execute Vector,First
0c08 0272 | r | Execute Discrete,Minus
0c09 00da | | Load_Top At_Offset_2
0c0a 01d9 | | Execute Vector,Reverse_Bounds
0c0b 0263 | c | Execute Discrete,Above_Bound
0c0c 700a |p | Jump_Nonzero 0xc17
0c0d 00d8 | | Load_Top At_Offset_0
0c0e 00db | | Load_Top At_Offset_3
0c0f 0273 | s | Execute Discrete,Plus
0c10 e603 | | Load 0x3,0x3
0c11 01d7 | | Execute Vector,Field_Read
0c12 00d9 | | Load_Top At_Offset_1
0c13 e602 | | Load 0x3,0x2
0c14 01d5 | | Execute Vector,Field_Reference
0c15 0118 | | Execute Any,Write_Unchecked
0c16 3ff6 |? | Loop_Increasing 0xc0d
0c17 00d2 | | Pop_Control Pop_Count_2
0c18 e405 | | Load 0x2,0x5
0c19 e00e | | Load 0x0,0xe
0c1a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0c1b 7802 |x | Jump 0xc1e
0c1c e406 | | Load 0x2,0x6
0c1d a5fb | | Store_Unchecked 0x2,-0x5
0c1e e405 | | Load 0x2,0x5
0c1f e00e | | Load 0x0,0xe
0c20 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0c21 c405 | | Store 0x2,0x5
0c22 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c23 ; --------------------------------------------------------------------------------------
0c23 ; STRING TABLE
0c23 ; --------------------------------------------------------------------------------------
0c23 007c | | | .STRTAB 0x007c->0x0c61 ; "IGNORE_ERRORS"
0c24 0087 | | .STRTAB 0x0087->0x0c67 ; "REPORT_ERRORS"
0c25 0092 | | .STRTAB 0x0092->0x0c6e ; "DIE_ON_ERRORS"
0c26 009d | | .STRTAB 0x009d->0x0c74 ; "MUST_EXIST"
0c27 00a5 | | .STRTAB 0x00a5->0x0c79 ; "NEED_NOT_EXIST"
0c28 00b1 | | .STRTAB 0x00b1->0x0c80 ; "MUST_NOT_EXIST"
0c29 00bd | | .STRTAB 0x00bd->0x0c87 ; "CLOSE"
0c2a 00c0 | | .STRTAB 0x00c0->0x0c8a ; "RENAME"
0c2b 00c4 | | .STRTAB 0x00c4->0x0c8d ; "DELETE"
0c2c 00c8 | | .STRTAB 0x00c8->0x0c90 ; "FS_OK"
0c2d 00cb | | .STRTAB 0x00cb->0x0c92 ; "BAD_FILENAME"
0c2e 00d5 | | .STRTAB 0x00d5->0x0c98 ; "FILE_DOES_NOT_EXIST"
0c2f 00e6 | | .STRTAB 0x00e6->0x0ca2 ; "FILE_IS_NOT_OPEN"
0c30 00f4 | | .STRTAB 0x00f4->0x0caa ; "DISK_FULL"
0c31 00fb | | .STRTAB 0x00fb->0x0cae ; "DIRECTORY_FULL"
0c32 0107 | | .STRTAB 0x0107->0x0cb5 ; "FILE_ALLREADY_EXISTS"
0c33 0119 | | .STRTAB 0x0119->0x0cbf ; "CANT_RENAME"
0c34 0122 | " | .STRTAB 0x0122->0x0cc5 ; "CANT_DELETE"
0c35 012b | + | .STRTAB 0x012b->0x0cca ; "PAGE_ERROR"
0c36 0133 | 3 | .STRTAB 0x0133->0x0ccf ; "SLICE_ERROR"
0c37 013c | < | .STRTAB 0x013c->0x0cd5 ; "BAD_ADDRESS"
0c38 0145 | E | .STRTAB 0x0145->0x0cda ; "DISK_ERROR"
0c39 014d | M | .STRTAB 0x014d->0x0cdf ; "NO_LABELS"
0c3a 0154 | T | .STRTAB 0x0154->0x0ce4 ; "NO_DOS"
0c3b 0158 | X | .STRTAB 0x0158->0x0ce7 ; "NO_DISK"
0c3c 015d | ] | .STRTAB 0x015d->0x0cea ; "DFS_OK"
0c3d 0161 | a | .STRTAB 0x0161->0x0ced ; "ENV_OK"
0c3e 0165 | e | .STRTAB 0x0165->0x0cf0 ; "ENV_NAME_ERROR"
0c3f 0171 | q | .STRTAB 0x0171->0x0cf7 ; "ENV_ALREADY_EXISTS"
0c40 0181 | | .STRTAB 0x0181->0x0d00 ; "ENV_STATUS_ERROR"
0c41 018f | | .STRTAB 0x018f->0x0d08 ; "ENV_USE_ERROR"
0c42 019a | | .STRTAB 0x019a->0x0d0f ; "ACTIVE"
0c43 019e | | .STRTAB 0x019e->0x0d12 ; "DISABLED"
0c44 01a4 | | .STRTAB 0x01a4->0x0d16 ; "ONCE"
0c45 01a6 | | .STRTAB 0x01a6->0x0d18 ; "DFS_RELEASE"
0c46 01af | | .STRTAB 0x01af->0x0d1d ; "R1000_DUMP1"
0c47 01b8 | | .STRTAB 0x01b8->0x0d23 ; "AUTOBOOT_AFTER_CRASH"
0c48 01ca | | .STRTAB 0x01ca->0x0d2d ; "Error accessing environment file"
0c49 01e8 | | .STRTAB 0x01e8->0x0d3d ; "Environment file already open"
0c4a 0203 | | .STRTAB 0x0203->0x0d4b ; "Invalid environment file name"
0c4b 021e | | .STRTAB 0x021e->0x0d5a ; "Environment file already exists, not overwritten"
0c4c 024c | L | .STRTAB 0x024c->0x0d72 ; "Error accessing environment file information"
0c4d 0276 | v | .STRTAB 0x0276->0x0d88 ; "DFS *** unable to get revision ***"
0c4e 0296 | | .STRTAB 0x0296->0x0d99 ; " problem encounter attempting to update values"
0c4f 02c2 | | .STRTAB 0x02c2->0x0db0 ; " use Reboot_On_Failure_Settings to check current settings"
0c50 02f9 | | .STRTAB 0x02f9->0x0dcc ; " specified value of "
0c51 030b | | .STRTAB 0x030b->0x0dd6 ; " is outside the legal range (0 - 99)"
0c52 032d | - | .STRTAB 0x032d->0x0de8 ; "Reboot on failure is currently disabled"
0c53 0352 | R | .STRTAB 0x0352->0x0dfc ; "Can only quiesce when Reboot on failure is enabled"
0c54 0382 | | .STRTAB 0x0382->0x0e15 ; " problem encountered attempting to get current values"
0c55 03b5 | | .STRTAB 0x03b5->0x0e2f ; " values will need to be set"
0c56 03ce | | .STRTAB 0x03ce->0x0e3d ; " The current value for the reboot interval is "
0c57 03fa | | .STRTAB 0x03fa->0x0e54 ; " The reboot feature is currently: "
0c58 041a | | .STRTAB 0x041a->0x0e65 ; "QUIESCED"
0c59 0420 | | .STRTAB 0x0420->0x0e69 ; "ENABLED"
0c5a 0425 | % | .STRTAB 0x0425->0x0e6c ; "XXXXXX automatic rebooting after a crash."
0c5b 0453 | S | .STRTAB 0x0453->0x0e84 ; " day(s) or more since last crash will allow an automatic reboot."
0c5c 0495 | | .STRTAB 0x0495->0x0ea6 ; "Note that the system truncates any fraction of a day since the last crash"
0c5d 04dc | | .STRTAB 0x04dc->0x0ecb ; "before comparing it to the minimum number of days specified here."
0c5e 051b | | .STRTAB 0x051b->0x0eeb ; "COULD NOT SET - "
0c5f 0529 | ) | .STRTAB 0x0529->0x0ef3 ; "*** Could not get kernel version ***"
0c60 054b | K | .STREND 0x054b->0x0f05
0c61 4947 4e4f |IGNO| .STRTAB_STRINGS
0f06 0000 0000 | | .XXX[0x2]
0f08 ; --------------------------------------------------------------------------------------
0f08 ; Debug Table
0f08 ; --------------------------------------------------------------------------------------
0f08 0004 0012 | | .DEBUG4 0x0004,0x0012,0x3f25,0x0000,0x0001,0x0000
0f0e 0671 7800 | qx | .XXX[0x2]
0f10 0000 0000 | | .BLANK 0000[0x1d]
0f2d 0110 cd90 | | .XXX[0x1c]
0f2f 4000 4e6c |@ Nl|
0f31 a400 0040 | @|
0f33 0300 0358 | X|
0f35 0000 000b | |
0f37 2100 0008 |! |
0f39 0000 000c | |
0f3b 00a0 0000 | |
0f3d 0020 0000 | |
0f3f 0800 0000 | |
0f41 4400 0000 |D |
0f43 0020 0000 | |
0f45 0148 0000 | H |
0f47 40e8 a2a0 |@ |
0f49 0000 0000 | | .BLANK 0000[0x1d]
0f66 0022 19b2 | " | .XXX[0x1c]
0f68 1000 09cf | |
0f6a f480 0008 | |
0f6c 0060 006b | ` k|
0f6e 0000 0005 | |
0f70 dc00 0001 | |
0f72 0000 0001 | |
0f74 8014 0000 | |
0f76 0004 0000 | |
0f78 0100 0000 | |
0f7a 0880 0000 | |
0f7c 0004 0000 | |
0f7e 0029 0000 | ) |
0f80 081b 24b0 | $ |
0f82 0000 0000 | | .BLANK 0000[0x1d]
0f9f 0004 4336 | C6| .XXX[0x1c]
0fa1 4400 0139 |D 9|
0fa3 b290 0001 | |
0fa5 000c 000d | |
0fa7 6000 0000 |` |
0fa9 1f8c 0000 | |
0fab 2000 0000 | |
0fad 3002 8000 |0 |
0faf 0000 8000 | |
0fb1 0020 0000 | |
0fb3 0110 0000 | |
0fb5 0000 8000 | |
0fb7 0005 2000 | |
0fb9 0103 93f0 | |
0fbb 0000 0000 | | .BLANK 0000[0x45]