|
|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06e8fd
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0438 | 8 | .CONST 0x0438 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0041 | A | .CONST 0x0041 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0021 | ! | .CONST 0x0021 ; Number of locals
000b INIT_0008:
000b e003 | | Load 0x0,0x3
000c e004 | | Load 0x0,0x4
000d 00e1 | | Load_Encached Boolean_Cache
000e 029f 03f3 | | Declare_Subprogram For_Call,INIT_03f0
0010 4803 |H | Short_Literal 0x3
0011 032e | . | Declare_Type Record,Defined,Visible
0012 029a 004b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0048
0014 029a 005b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0058
0016 029a 006b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0068
0018 00bf | | Action Accept_Activation
0019 0092 03fe | | Action Push_String_Extended,0x3fe ; "There are no history entries for the task or tasks"
001b 0092 03ff | | Action Push_String_Extended,0x3ff ; "There are no history entries for the age specified"
001d 1d0f | | Execute_Immediate Reference_Lex_1,0xf
001e 00c7 | | Action Elaborate_Subprogram
001f 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0020 00c7 | | Action Elaborate_Subprogram
0021 029d 00ab | | Declare_Subprogram For_Outer_Call,INIT_00a8
0023 029d 00bb | | Declare_Subprogram For_Outer_Call,INIT_00b8
0025 029d 011b | | Declare_Subprogram For_Outer_Call,INIT_0118
0027 029d 017b | {| Declare_Subprogram For_Outer_Call,INIT_0178
0029 029d 0193 | | Declare_Subprogram For_Outer_Call,INIT_0190
002b 029d 01ab | | Declare_Subprogram For_Outer_Call,INIT_01a8
002d 029d 01b3 | | Declare_Subprogram For_Outer_Call,INIT_01b0
002f 029d 01db | | Declare_Subprogram For_Outer_Call,INIT_01d8
0031 029d 0203 | | Declare_Subprogram For_Outer_Call,INIT_0200
0033 029d 0273 | s| Declare_Subprogram For_Outer_Call,INIT_0270
0035 029d 02eb | | Declare_Subprogram For_Outer_Call,INIT_02e8
0037 029d 0313 | | Declare_Subprogram For_Outer_Call,INIT_0310
0039 029d 0373 | s| Declare_Subprogram For_Outer_Call,INIT_0370
003b 1d10 | | Execute_Immediate Reference_Lex_1,0x10
003c 00c7 | | Action Elaborate_Subprogram
003d 029d 03d3 | | Declare_Subprogram For_Outer_Call,INIT_03d0
003f 029d 03e3 | | Declare_Subprogram For_Outer_Call,INIT_03e0
0041 BODY_0008:
0041 00bc | | Action Signal_Activated
0042 00bb | | Action Signal_Completion
0043 0000 0000 | | .BLANK 0000[0x5]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b 00da | | Load_Top At_Offset_2
004c 0afe | | Execute_Immediate Plus,-0x2
004d 4be8 |K | Short_Literal 0x3e8
004e 026e | n | Execute Discrete,Modulo
004f 0a01 | | Execute_Immediate Plus,0x1
0050 00d8 | | Load_Top At_Offset_0
0051 e004 | | Load 0x0,0x4
0052 0260 | ` | Execute Discrete,In_Type
0053 7001 |p | Jump_Nonzero 0x55
0054 0801 | | Execute_Immediate Raise,0x1
0055 4401 |D | Exit_Subprogram With_Result,0x1
0056 0000 0000 | | .XXX[0x2]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 00da | | Load_Top At_Offset_2
005c 4be8 |K | Short_Literal 0x3e8
005d 026e | n | Execute Discrete,Modulo
005e 0a01 | | Execute_Immediate Plus,0x1
005f 00d8 | | Load_Top At_Offset_0
0060 e004 | | Load 0x0,0x4
0061 0260 | ` | Execute Discrete,In_Type
0062 7001 |p | Jump_Nonzero 0x64
0063 0801 | | Execute_Immediate Raise,0x1
0064 4401 |D | Exit_Subprogram With_Result,0x1
0065 0000 0000 | | .XXX[0x3]
0067 0000 | |
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 0072 | r | .CONST 0x0072 ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0004 | | .CONST 0x0004 ; Number of locals
006b INIT_0068:
006b e004 | | Load 0x0,0x4
006c 0007 | | Action Break_Optional
006d 00e3 | | Load_Encached Natural_Cache
006e e5fa | | Load 0x2,-0x6
006f 01db | | Execute Vector,Length
0070 00e3 | | Load_Encached Natural_Cache
0071 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0072 BODY_0068:
0072 4800 |H | Short_Literal 0x0
0073 a5fb | | Store_Unchecked 0x2,-0x5
0074 e5f9 | | Load 0x2,-0x7
0075 00e3 | | Load_Encached Natural_Cache
0076 e004 | | Load 0x0,0x4
0077 e5fe | | Load 0x2,-0x2
0078 e404 | | Load 0x2,0x4
0079 e5fd | | Load 0x2,-0x3
007a e5ff | | Load 0x2,-0x1
007b 8005 | | Call 0x0,0x5
007c e5fc | | Load 0x2,-0x4
007d 821d | | Call 0x1,0x1d
007e c402 | | Store 0x2,0x2
007f 005b | [ | Store_Top Discrete,At_Offset_3
0080 c5f9 | | Store 0x2,-0x7
0081 4802 |H | Short_Literal 0x2
0082 e5f9 | | Load 0x2,-0x7
0083 e006 | | Load 0x0,0x6
0084 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0085 6801 |h | Jump_Zero 0x87
0086 4505 |E | Exit_Subprogram 0x5
0087 00da | | Load_Top At_Offset_2
0088 7006 |p | Jump_Nonzero 0x8f
0089 e5f9 | | Load 0x2,-0x7
008a e212 | | Load 0x1,0x12
008b e006 | | Load 0x0,0x6
008c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
008d c5f9 | | Store 0x2,-0x7
008e 4505 |E | Exit_Subprogram 0x5
008f e5fe | | Load 0x2,-0x2
0090 680a |h | Jump_Zero 0x9b
0091 e5fa | | Load 0x2,-0x6
0092 00da | | Load_Top At_Offset_2
0093 e5fc | | Load 0x2,-0x4
0094 e402 | | Load 0x2,0x2
0095 e5ff | | Load 0x2,-0x1
0096 8005 | | Call 0x0,0x5
0097 821e | | Call 0x1,0x1e
0098 005b | [ | Store_Top Discrete,At_Offset_3
0099 00d1 | | Pop_Control Pop_Count_1
009a 7809 |x | Jump 0xa4
009b e5fa | | Load 0x2,-0x6
009c 00da | | Load_Top At_Offset_2
009d e5fc | | Load 0x2,-0x4
009e e402 | | Load 0x2,0x2
009f e5ff | | Load 0x2,-0x1
00a0 8005 | | Call 0x0,0x5
00a1 821f | | Call 0x1,0x1f
00a2 005b | [ | Store_Top Discrete,At_Offset_3
00a3 00d1 | | Pop_Control Pop_Count_1
00a4 00d9 | | Load_Top At_Offset_1
00a5 a5fb | | Store_Unchecked 0x2,-0x5
00a6 4505 |E | Exit_Subprogram 0x5
00a7 0000 | | .XXX[0x1]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 00da | | Load_Top At_Offset_2
00ac 8007 | | Call 0x0,0x7
00ad 7008 |p | Jump_Nonzero 0xb6
00ae 00da | | Load_Top At_Offset_2
00af e5fd | | Load 0x2,-0x3
00b0 e5fe | | Load 0x2,-0x2
00b1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00b2 01d5 | | Execute Vector,Field_Reference
00b3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00b4 027f | | Execute Discrete,Equal
00b5 4403 |D | Exit_Subprogram With_Result,0x3
00b6 4801 |H | Short_Literal 0x1
00b7 4403 |D | Exit_Subprogram With_Result,0x3
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c3 | | .CONST 0x00c3 ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0006 | | .CONST 0x0006 ; Number of locals
00bb INIT_00b8:
00bb 00db | | Load_Top At_Offset_3
00bc e004 | | Load 0x0,0x4
00bd 03f1 | | Declare_Variable Discrete,With_Value
00be 00e1 | | Load_Encached Boolean_Cache
00bf 03e9 | | Declare_Variable Discrete,Duplicate
00c0 e008 | | Load 0x0,0x8
00c1 0322 | " | Declare_Variable Record
00c2 e009 | | Load 0x0,0x9
00c3 BODY_00b8:
00c3 00cf | | Action Mark_Auxiliary
00c4 e402 | | Load 0x2,0x2
00c5 e5fd | | Load 0x2,-0x3
00c6 027f | | Execute Discrete,Equal
00c7 6803 |h | Jump_Zero 0xcb
00c8 4800 |H | Short_Literal 0x0
00c9 a5f7 | | Store_Unchecked 0x2,-0x9
00ca 4505 |E | Exit_Subprogram 0x5
00cb e402 | | Load 0x2,0x2
00cc 820e | | Call 0x1,0xe
00cd a402 | | Store_Unchecked 0x2,0x2
00ce e402 | | Load 0x2,0x2
00cf e5ff | | Load 0x2,-0x1
00d0 e5fc | | Load 0x2,-0x4
00d1 8213 | | Call 0x1,0x13
00d2 683d |h= | Jump_Zero 0x110
00d3 00e1 | | Load_Encached Boolean_Cache
00d4 00e1 | | Load_Encached Boolean_Cache
00d5 e009 | | Load 0x0,0x9
00d6 e405 | | Load 0x2,0x5
00d7 e402 | | Load 0x2,0x2
00d8 e5ff | | Load 0x2,-0x1
00d9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00da 01d5 | | Execute Vector,Field_Reference
00db 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
00dc 800a | | Call 0x0,0xa
00dd 800b | | Call 0x0,0xb
00de 00d1 | | Pop_Control Pop_Count_1
00df c406 | | Store 0x2,0x6
00e0 c403 | | Store 0x2,0x3
00e1 c404 | | Store 0x2,0x4
00e2 00d9 | | Load_Top At_Offset_1
00e3 e5fa | | Load 0x2,-0x6
00e4 027e | ~ | Execute Discrete,Not_Equal
00e5 7015 |p | Jump_Nonzero 0xfb
00e6 00da | | Load_Top At_Offset_2
00e7 e5fb | | Load 0x2,-0x5
00e8 017e | ~ | Execute Record,Not_Equal
00e9 7011 |p | Jump_Nonzero 0xfb
00ea e402 | | Load 0x2,0x2
00eb e5ff | | Load 0x2,-0x1
00ec 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00ed 01d5 | | Execute Vector,Field_Reference
00ee 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00ef e5f8 | | Load 0x2,-0x8
00f0 027f | | Execute Discrete,Equal
00f1 6809 |h | Jump_Zero 0xfb
00f2 e402 | | Load 0x2,0x2
00f3 e5ff | | Load 0x2,-0x1
00f4 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00f5 01d5 | | Execute Vector,Field_Reference
00f6 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00f7 e5f9 | | Load 0x2,-0x7
00f8 8005 | | Call 0x0,0x5
00f9 027e | ~ | Execute Discrete,Not_Equal
00fa 6815 |h | Jump_Zero 0x110
00fb 00da | | Load_Top At_Offset_2
00fc e5fb | | Load 0x2,-0x5
00fd 017d | } | Execute Record,Structure_Write
00fe 00d9 | | Load_Top At_Offset_1
00ff a5fa | | Store_Unchecked 0x2,-0x6
0100 e402 | | Load 0x2,0x2
0101 e5ff | | Load 0x2,-0x1
0102 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0103 01d5 | | Execute Vector,Field_Reference
0104 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0105 800c | | Call 0x0,0xc
0106 a5f9 | | Store_Unchecked 0x2,-0x7
0107 e402 | | Load 0x2,0x2
0108 e5ff | | Load 0x2,-0x1
0109 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
010a 01d5 | | Execute Vector,Field_Reference
010b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
010c a5f8 | | Store_Unchecked 0x2,-0x8
010d e402 | | Load 0x2,0x2
010e a5f7 | | Store_Unchecked 0x2,-0x9
010f 4505 |E | Exit_Subprogram 0x5
0110 00c9 | | Action Pop_Auxiliary_Loop
0111 7fb2 | | Jump 0xc4
0112 0000 0000 | | .BLANK 0000[0x6]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0123 | # | .CONST 0x0123 ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0006 | | .CONST 0x0006 ; Number of locals
011b INIT_0118:
011b 00db | | Load_Top At_Offset_3
011c e004 | | Load 0x0,0x4
011d 03f1 | | Declare_Variable Discrete,With_Value
011e 00e1 | | Load_Encached Boolean_Cache
011f 03e9 | | Declare_Variable Discrete,Duplicate
0120 e008 | | Load 0x0,0x8
0121 0322 | " | Declare_Variable Record
0122 e009 | | Load 0x0,0x9
0123 BODY_0118:
0123 00cf | | Action Mark_Auxiliary
0124 e402 | | Load 0x2,0x2
0125 e5fd | | Load 0x2,-0x3
0126 027f | | Execute Discrete,Equal
0127 6803 |h | Jump_Zero 0x12b
0128 4800 |H | Short_Literal 0x0
0129 a5f7 | | Store_Unchecked 0x2,-0x9
012a 4505 |E | Exit_Subprogram 0x5
012b e402 | | Load 0x2,0x2
012c 820f | | Call 0x1,0xf
012d a402 | | Store_Unchecked 0x2,0x2
012e e402 | | Load 0x2,0x2
012f e5ff | | Load 0x2,-0x1
0130 e5fc | | Load 0x2,-0x4
0131 8213 | | Call 0x1,0x13
0132 683d |h= | Jump_Zero 0x170
0133 00e1 | | Load_Encached Boolean_Cache
0134 00e1 | | Load_Encached Boolean_Cache
0135 e009 | | Load 0x0,0x9
0136 e405 | | Load 0x2,0x5
0137 e402 | | Load 0x2,0x2
0138 e5ff | | Load 0x2,-0x1
0139 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
013a 01d5 | | Execute Vector,Field_Reference
013b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
013c 800a | | Call 0x0,0xa
013d 800b | | Call 0x0,0xb
013e 00d1 | | Pop_Control Pop_Count_1
013f c406 | | Store 0x2,0x6
0140 c403 | | Store 0x2,0x3
0141 c404 | | Store 0x2,0x4
0142 00d9 | | Load_Top At_Offset_1
0143 e5fa | | Load 0x2,-0x6
0144 027e | ~ | Execute Discrete,Not_Equal
0145 7015 |p | Jump_Nonzero 0x15b
0146 00da | | Load_Top At_Offset_2
0147 e5fb | | Load 0x2,-0x5
0148 017e | ~ | Execute Record,Not_Equal
0149 7011 |p | Jump_Nonzero 0x15b
014a e402 | | Load 0x2,0x2
014b e5ff | | Load 0x2,-0x1
014c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
014d 01d5 | | Execute Vector,Field_Reference
014e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
014f e5f8 | | Load 0x2,-0x8
0150 027f | | Execute Discrete,Equal
0151 6809 |h | Jump_Zero 0x15b
0152 e402 | | Load 0x2,0x2
0153 e5ff | | Load 0x2,-0x1
0154 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0155 01d5 | | Execute Vector,Field_Reference
0156 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0157 e5f9 | | Load 0x2,-0x7
0158 8005 | | Call 0x0,0x5
0159 027e | ~ | Execute Discrete,Not_Equal
015a 6815 |h | Jump_Zero 0x170
015b 00da | | Load_Top At_Offset_2
015c e5fb | | Load 0x2,-0x5
015d 017d | } | Execute Record,Structure_Write
015e 00d9 | | Load_Top At_Offset_1
015f a5fa | | Store_Unchecked 0x2,-0x6
0160 e402 | | Load 0x2,0x2
0161 e5ff | | Load 0x2,-0x1
0162 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0163 01d5 | | Execute Vector,Field_Reference
0164 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0165 800c | | Call 0x0,0xc
0166 a5f9 | | Store_Unchecked 0x2,-0x7
0167 e402 | | Load 0x2,0x2
0168 e5ff | | Load 0x2,-0x1
0169 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
016a 01d5 | | Execute Vector,Field_Reference
016b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
016c a5f8 | | Store_Unchecked 0x2,-0x8
016d e402 | | Load 0x2,0x2
016e a5f7 | | Store_Unchecked 0x2,-0x9
016f 4505 |E | Exit_Subprogram 0x5
0170 00c9 | | Action Pop_Auxiliary_Loop
0171 7fb2 | | Jump 0x124
0172 0000 0000 | | .BLANK 0000[0x6]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017d | } | .CONST 0x017d ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e004 | | Load 0x0,0x4
017c 0007 | | Action Break_Optional
017d BODY_0178:
017d 00db | | Load_Top At_Offset_3
017e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
017f 820f | | Call 0x1,0xf
0180 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0181 00d8 | | Load_Top At_Offset_0
0182 a5fe | | Store_Unchecked 0x2,-0x2
0183 00d8 | | Load_Top At_Offset_0
0184 e5ff | | Load 0x2,-0x1
0185 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0186 027c | | | Execute Discrete,Less
0187 6803 |h | Jump_Zero 0x18b
0188 4801 |H | Short_Literal 0x1
0189 e5ff | | Load 0x2,-0x1
018a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
018b 00d8 | | Load_Top At_Offset_0
018c e5ff | | Load 0x2,-0x1
018d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
018e 4501 |E | Exit_Subprogram 0x1
018f 0000 | | .XXX[0x1]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0193 | | .CONST 0x0193 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0001 | | .CONST 0x0001 ; Number of locals
0193 BODY_0190:
0193 INIT_0190:
0193 00da | | Load_Top At_Offset_2
0194 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0195 6804 |h | Jump_Zero 0x19a
0196 00da | | Load_Top At_Offset_2
0197 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0198 820f | | Call 0x1,0xf
0199 4401 |D | Exit_Subprogram With_Result,0x1
019a 00da | | Load_Top At_Offset_2
019b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
019c 7002 |p | Jump_Nonzero 0x19f
019d 4800 |H | Short_Literal 0x0
019e 4401 |D | Exit_Subprogram With_Result,0x1
019f 4801 |H | Short_Literal 0x1
01a0 4401 |D | Exit_Subprogram With_Result,0x1
01a1 0000 0000 | | .BLANK 0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab 00da | | Load_Top At_Offset_2
01ac 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01ad 4401 |D | Exit_Subprogram With_Result,0x1
01ae 0000 0000 | | .XXX[0x2]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01bb | | .CONST 0x01bb ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0003 | | .CONST 0x0003 ; Number of locals
01b3 INIT_01b0:
01b3 00da | | Load_Top At_Offset_2
01b4 8218 | | Call 0x1,0x18
01b5 e004 | | Load 0x0,0x4
01b6 03f1 | | Declare_Variable Discrete,With_Value
01b7 00db | | Load_Top At_Offset_3
01b8 8217 | | Call 0x1,0x17
01b9 e004 | | Load 0x0,0x4
01ba 03f1 | | Declare_Variable Discrete,With_Value
01bb BODY_01b0:
01bb 00d9 | | Load_Top At_Offset_1
01bc 7002 |p | Jump_Nonzero 0x1bf
01bd 4800 |H | Short_Literal 0x0
01be 4402 |D | Exit_Subprogram With_Result,0x2
01bf 00cf | | Action Mark_Auxiliary
01c0 00da | | Load_Top At_Offset_2
01c1 e5ff | | Load 0x2,-0x1
01c2 e5fe | | Load 0x2,-0x2
01c3 8213 | | Call 0x1,0x13
01c4 6802 |h | Jump_Zero 0x1c7
01c5 00da | | Load_Top At_Offset_2
01c6 4402 |D | Exit_Subprogram With_Result,0x2
01c7 00da | | Load_Top At_Offset_2
01c8 00da | | Load_Top At_Offset_2
01c9 027f | | Execute Discrete,Equal
01ca 6802 |h | Jump_Zero 0x1cd
01cb 4800 |H | Short_Literal 0x0
01cc 4402 |D | Exit_Subprogram With_Result,0x2
01cd 00da | | Load_Top At_Offset_2
01ce 820e | | Call 0x1,0xe
01cf 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
01d0 00c9 | | Action Pop_Auxiliary_Loop
01d1 7fee | | Jump 0x1c0
01d2 0000 0000 | | .BLANK 0000[0x6]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01e3 | | .CONST 0x01e3 ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0003 | | .CONST 0x0003 ; Number of locals
01db INIT_01d8:
01db 00da | | Load_Top At_Offset_2
01dc 8217 | | Call 0x1,0x17
01dd e004 | | Load 0x0,0x4
01de 03f1 | | Declare_Variable Discrete,With_Value
01df 00db | | Load_Top At_Offset_3
01e0 8218 | | Call 0x1,0x18
01e1 e004 | | Load 0x0,0x4
01e2 03f1 | | Declare_Variable Discrete,With_Value
01e3 BODY_01d8:
01e3 00d9 | | Load_Top At_Offset_1
01e4 7002 |p | Jump_Nonzero 0x1e7
01e5 4800 |H | Short_Literal 0x0
01e6 4402 |D | Exit_Subprogram With_Result,0x2
01e7 00cf | | Action Mark_Auxiliary
01e8 00da | | Load_Top At_Offset_2
01e9 e5ff | | Load 0x2,-0x1
01ea e5fe | | Load 0x2,-0x2
01eb 8213 | | Call 0x1,0x13
01ec 6802 |h | Jump_Zero 0x1ef
01ed 00da | | Load_Top At_Offset_2
01ee 4402 |D | Exit_Subprogram With_Result,0x2
01ef 00da | | Load_Top At_Offset_2
01f0 00da | | Load_Top At_Offset_2
01f1 027f | | Execute Discrete,Equal
01f2 6802 |h | Jump_Zero 0x1f5
01f3 4800 |H | Short_Literal 0x0
01f4 4402 |D | Exit_Subprogram With_Result,0x2
01f5 00da | | Load_Top At_Offset_2
01f6 820f | | Call 0x1,0xf
01f7 0053 | S | Store_Top_Unchecked Discrete,At_Offset_3
01f8 00c9 | | Action Pop_Auxiliary_Loop
01f9 7fee | | Jump 0x1e8
01fa 0000 0000 | | .BLANK 0000[0x6]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 021a | | .CONST 0x021a ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 000a | | .CONST 0x000a ; Number of locals
0203 INIT_0200:
0203 e004 | | Load 0x0,0x4
0204 0007 | | Action Break_Optional
0205 00d8 | | Load_Top At_Offset_0
0206 0007 | | Action Break_Optional
0207 e5fe | | Load 0x2,-0x2
0208 e5ff | | Load 0x2,-0x1
0209 821a | | Call 0x1,0x1a
020a e004 | | Load 0x0,0x4
020b 03f1 | | Declare_Variable Discrete,With_Value
020c 00e3 | | Load_Encached Natural_Cache
020d 00e3 | | Load_Encached Natural_Cache
020e e008 | | Load 0x0,0x8
020f 0322 | " | Declare_Variable Record
0210 e00d | | Load 0x0,0xd
0211 00d9 | | Load_Top At_Offset_1
0212 017d | } | Execute Record,Structure_Write
0213 e009 | | Load 0x0,0x9
0214 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0215 e00e | | Load 0x0,0xe
0216 0007 | | Action Break_Optional
0217 e00f | | Load 0x0,0xf
0218 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0219 0604 | | Execute_Immediate Set_Value_Unchecked,0x4
021a BODY_0200:
021a e5fe | | Load 0x2,-0x2
021b e5ff | | Load 0x2,-0x1
021c 8219 | | Call 0x1,0x19
021d a402 | | Store_Unchecked 0x2,0x2
021e e402 | | Load 0x2,0x2
021f 7006 |p | Jump_Nonzero 0x226
0220 e5f8 | | Load 0x2,-0x8
0221 e211 | | Load 0x1,0x11
0222 e006 | | Load 0x0,0x6
0223 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0224 c5f8 | | Store 0x2,-0x8
0225 4506 |E | Exit_Subprogram 0x6
0226 4800 |H | Short_Literal 0x0
0227 a5fa | | Store_Unchecked 0x2,-0x6
0228 4800 |H | Short_Literal 0x0
0229 a5f9 | | Store_Unchecked 0x2,-0x7
022a e402 | | Load 0x2,0x2
022b a403 | | Store_Unchecked 0x2,0x3
022c 00cf | | Action Mark_Auxiliary
022d e5fd | | Load 0x2,-0x3
022e 0aff | | Execute_Immediate Plus,-0x1
022f 00d8 | | Load_Top At_Offset_0
0230 00e2 | | Load_Encached Integer_Cache
0231 0260 | ` | Execute Discrete,In_Type
0232 7001 |p | Jump_Nonzero 0x234
0233 0801 | | Execute_Immediate Raise,0x1
0234 4801 |H | Short_Literal 0x1
0235 0263 | c | Execute Discrete,Above_Bound
0236 7033 |p3 | Jump_Nonzero 0x26a
0237 e004 | | Load 0x0,0x4
0238 e40a | | Load 0x2,0xa
0239 e409 | | Load 0x2,0x9
023a e408 | | Load 0x2,0x8
023b e407 | | Load 0x2,0x7
023c e5fe | | Load 0x2,-0x2
023d e404 | | Load 0x2,0x4
023e e403 | | Load 0x2,0x3
023f e5ff | | Load 0x2,-0x1
0240 8214 | | Call 0x1,0x14
0241 00d1 | | Pop_Control Pop_Count_1
0242 c408 | | Store 0x2,0x8
0243 c409 | | Store 0x2,0x9
0244 c40a | | Store 0x2,0xa
0245 c403 | | Store 0x2,0x3
0246 e403 | | Load 0x2,0x3
0247 7020 |p | Jump_Nonzero 0x268
0248 e5fb | | Load 0x2,-0x5
0249 6801 |h | Jump_Zero 0x24b
024a 4506 |E | Exit_Subprogram 0x6
024b e5fd | | Load 0x2,-0x3
024c e5fc | | Load 0x2,-0x4
024d 027d | } | Execute Discrete,Greater
024e 6806 |h | Jump_Zero 0x255
024f e5fd | | Load 0x2,-0x3
0250 e5fc | | Load 0x2,-0x4
0251 0272 | r | Execute Discrete,Minus
0252 0a01 | | Execute_Immediate Plus,0x1
0253 c405 | | Store 0x2,0x5
0254 7802 |x | Jump 0x257
0255 4800 |H | Short_Literal 0x0
0256 a405 | | Store_Unchecked 0x2,0x5
0257 00d8 | | Load_Top At_Offset_0
0258 e405 | | Load 0x2,0x5
0259 027c | | | Execute Discrete,Less
025a 6801 |h | Jump_Zero 0x25c
025b 4506 |E | Exit_Subprogram 0x6
025c e5fd | | Load 0x2,-0x3
025d 00d9 | | Load_Top At_Offset_1
025e 0272 | r | Execute Discrete,Minus
025f 0a01 | | Execute_Immediate Plus,0x1
0260 c406 | | Store 0x2,0x6
0261 e5fc | | Load 0x2,-0x4
0262 e406 | | Load 0x2,0x6
0263 0272 | r | Execute Discrete,Minus
0264 c5f9 | | Store 0x2,-0x7
0265 e404 | | Load 0x2,0x4
0266 a5fa | | Store_Unchecked 0x2,-0x6
0267 4506 |E | Exit_Subprogram 0x6
0268 00c8 | | Action Pop_Auxiliary_Range
0269 3fcd |? | Loop_Increasing 0x237
026a 00ce | | Action Pop_Auxiliary
026b e403 | | Load 0x2,0x3
026c a5fa | | Store_Unchecked 0x2,-0x6
026d e5fc | | Load 0x2,-0x4
026e a5f9 | | Store_Unchecked 0x2,-0x7
026f 4506 |E | Exit_Subprogram 0x6
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 028a | | .CONST 0x028a ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 000a | | .CONST 0x000a ; Number of locals
0273 INIT_0270:
0273 e004 | | Load 0x0,0x4
0274 0007 | | Action Break_Optional
0275 00d8 | | Load_Top At_Offset_0
0276 0007 | | Action Break_Optional
0277 e5fe | | Load 0x2,-0x2
0278 e5ff | | Load 0x2,-0x1
0279 8219 | | Call 0x1,0x19
027a e004 | | Load 0x0,0x4
027b 03f1 | | Declare_Variable Discrete,With_Value
027c 00e3 | | Load_Encached Natural_Cache
027d 00e3 | | Load_Encached Natural_Cache
027e e008 | | Load 0x0,0x8
027f 0322 | " | Declare_Variable Record
0280 e00d | | Load 0x0,0xd
0281 00d9 | | Load_Top At_Offset_1
0282 017d | } | Execute Record,Structure_Write
0283 e009 | | Load 0x0,0x9
0284 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0285 e00e | | Load 0x0,0xe
0286 0007 | | Action Break_Optional
0287 e00f | | Load 0x0,0xf
0288 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0289 0604 | | Execute_Immediate Set_Value_Unchecked,0x4
028a BODY_0270:
028a e5fe | | Load 0x2,-0x2
028b e5ff | | Load 0x2,-0x1
028c 821a | | Call 0x1,0x1a
028d a402 | | Store_Unchecked 0x2,0x2
028e e402 | | Load 0x2,0x2
028f 7006 |p | Jump_Nonzero 0x296
0290 e5f8 | | Load 0x2,-0x8
0291 e211 | | Load 0x1,0x11
0292 e006 | | Load 0x0,0x6
0293 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0294 c5f8 | | Store 0x2,-0x8
0295 4506 |E | Exit_Subprogram 0x6
0296 4800 |H | Short_Literal 0x0
0297 a5fa | | Store_Unchecked 0x2,-0x6
0298 4800 |H | Short_Literal 0x0
0299 a5f9 | | Store_Unchecked 0x2,-0x7
029a e402 | | Load 0x2,0x2
029b a403 | | Store_Unchecked 0x2,0x3
029c 00cf | | Action Mark_Auxiliary
029d e5fd | | Load 0x2,-0x3
029e 0aff | | Execute_Immediate Plus,-0x1
029f 00d8 | | Load_Top At_Offset_0
02a0 00e2 | | Load_Encached Integer_Cache
02a1 0260 | ` | Execute Discrete,In_Type
02a2 7001 |p | Jump_Nonzero 0x2a4
02a3 0801 | | Execute_Immediate Raise,0x1
02a4 4801 |H | Short_Literal 0x1
02a5 0263 | c | Execute Discrete,Above_Bound
02a6 7039 |p9 | Jump_Nonzero 0x2e0
02a7 e004 | | Load 0x0,0x4
02a8 e40a | | Load 0x2,0xa
02a9 e409 | | Load 0x2,0x9
02aa e408 | | Load 0x2,0x8
02ab e407 | | Load 0x2,0x7
02ac e5fe | | Load 0x2,-0x2
02ad e404 | | Load 0x2,0x4
02ae e403 | | Load 0x2,0x3
02af e5ff | | Load 0x2,-0x1
02b0 8215 | | Call 0x1,0x15
02b1 00d1 | | Pop_Control Pop_Count_1
02b2 c408 | | Store 0x2,0x8
02b3 c409 | | Store 0x2,0x9
02b4 c40a | | Store 0x2,0xa
02b5 c403 | | Store 0x2,0x3
02b6 e403 | | Load 0x2,0x3
02b7 7026 |p& | Jump_Nonzero 0x2de
02b8 e5fb | | Load 0x2,-0x5
02b9 7001 |p | Jump_Nonzero 0x2bb
02ba 4506 |E | Exit_Subprogram 0x6
02bb e5fd | | Load 0x2,-0x3
02bc e5fc | | Load 0x2,-0x4
02bd 027d | } | Execute Discrete,Greater
02be 6806 |h | Jump_Zero 0x2c5
02bf e5fd | | Load 0x2,-0x3
02c0 e5fc | | Load 0x2,-0x4
02c1 0272 | r | Execute Discrete,Minus
02c2 0a01 | | Execute_Immediate Plus,0x1
02c3 c405 | | Store 0x2,0x5
02c4 7802 |x | Jump 0x2c7
02c5 4800 |H | Short_Literal 0x0
02c6 a405 | | Store_Unchecked 0x2,0x5
02c7 00d8 | | Load_Top At_Offset_0
02c8 e405 | | Load 0x2,0x5
02c9 027c | | | Execute Discrete,Less
02ca 6801 |h | Jump_Zero 0x2cc
02cb 4506 |E | Exit_Subprogram 0x6
02cc e5fc | | Load 0x2,-0x4
02cd 00d9 | | Load_Top At_Offset_1
02ce 027d | } | Execute Discrete,Greater
02cf 6805 |h | Jump_Zero 0x2d5
02d0 e5fc | | Load 0x2,-0x4
02d1 00d9 | | Load_Top At_Offset_1
02d2 0272 | r | Execute Discrete,Minus
02d3 c406 | | Store 0x2,0x6
02d4 7802 |x | Jump 0x2d7
02d5 4800 |H | Short_Literal 0x0
02d6 a406 | | Store_Unchecked 0x2,0x6
02d7 e5fc | | Load 0x2,-0x4
02d8 e406 | | Load 0x2,0x6
02d9 0272 | r | Execute Discrete,Minus
02da c5f9 | | Store 0x2,-0x7
02db e402 | | Load 0x2,0x2
02dc a5fa | | Store_Unchecked 0x2,-0x6
02dd 4506 |E | Exit_Subprogram 0x6
02de 00c8 | | Action Pop_Auxiliary_Range
02df 3fc7 |? | Loop_Increasing 0x2a7
02e0 00ce | | Action Pop_Auxiliary
02e1 e403 | | Load 0x2,0x3
02e2 a5fa | | Store_Unchecked 0x2,-0x6
02e3 e5fc | | Load 0x2,-0x4
02e4 a5f9 | | Store_Unchecked 0x2,-0x7
02e5 4506 |E | Exit_Subprogram 0x6
02e6 0000 0000 | | .XXX[0x2]
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 e5fd | | Load 0x2,-0x3
02ec 0c00 | | Execute_Immediate Greater_Equal,0x0
02ed 680d |h | Jump_Zero 0x2fb
02ee e5f8 | | Load 0x2,-0x8
02ef 00e3 | | Load_Encached Natural_Cache
02f0 e004 | | Load 0x0,0x4
02f1 e5fb | | Load 0x2,-0x5
02f2 e5fc | | Load 0x2,-0x4
02f3 e5fd | | Load 0x2,-0x3
02f4 e5fe | | Load 0x2,-0x2
02f5 e5ff | | Load 0x2,-0x1
02f6 821b | | Call 0x1,0x1b
02f7 c5fa | | Store 0x2,-0x6
02f8 c5f9 | | Store 0x2,-0x7
02f9 c5f8 | | Store 0x2,-0x8
02fa 4506 |E | Exit_Subprogram 0x6
02fb e5f8 | | Load 0x2,-0x8
02fc 00e3 | | Load_Encached Natural_Cache
02fd e004 | | Load 0x0,0x4
02fe e5fb | | Load 0x2,-0x5
02ff e5fc | | Load 0x2,-0x4
0300 e5fd | | Load 0x2,-0x3
0301 0274 | t | Execute Discrete,Absolute_Value
0302 e5fe | | Load 0x2,-0x2
0303 e5ff | | Load 0x2,-0x1
0304 821c | | Call 0x1,0x1c
0305 c5fa | | Store 0x2,-0x6
0306 c5f9 | | Store 0x2,-0x7
0307 c5f8 | | Store 0x2,-0x8
0308 4506 |E | Exit_Subprogram 0x6
0309 0000 0000 | | .BLANK 0000[0x7]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0334 | 4 | .CONST 0x0334 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0009 | | .CONST 0x0009 ; Number of locals
0313 INIT_0310:
0313 00db | | Load_Top At_Offset_3
0314 e004 | | Load 0x0,0x4
0315 03f1 | | Declare_Variable Discrete,With_Value
0316 e5fd | | Load 0x2,-0x3
0317 8217 | | Call 0x1,0x17
0318 e004 | | Load 0x0,0x4
0319 03f1 | | Declare_Variable Discrete,With_Value
031a 00e1 | | Load_Encached Boolean_Cache
031b 03e9 | | Declare_Variable Discrete,Duplicate
031c e008 | | Load 0x0,0x8
031d 0322 | " | Declare_Variable Record
031e e00d | | Load 0x0,0xd
031f 00d9 | | Load_Top At_Offset_1
0320 017d | } | Execute Record,Structure_Write
0321 e009 | | Load 0x0,0x9
0322 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0323 e5fe | | Load 0x2,-0x2
0324 e5fd | | Load 0x2,-0x3
0325 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0326 01d5 | | Execute Vector,Field_Reference
0327 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0328 e00f | | Load 0x0,0xf
0329 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032a 03f1 | | Declare_Variable Discrete,With_Value
032b e5fe | | Load 0x2,-0x2
032c e5fd | | Load 0x2,-0x3
032d 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
032e 01d5 | | Execute Vector,Field_Reference
032f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0330 800c | | Call 0x0,0xc
0331 e010 | | Load 0x0,0x10
0332 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
0333 03f1 | | Declare_Variable Discrete,With_Value
0334 BODY_0310:
0334 00e1 | | Load_Encached Boolean_Cache
0335 00e1 | | Load_Encached Boolean_Cache
0336 e009 | | Load 0x0,0x9
0337 e406 | | Load 0x2,0x6
0338 e5fe | | Load 0x2,-0x2
0339 e5fd | | Load 0x2,-0x3
033a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
033b 01d5 | | Execute Vector,Field_Reference
033c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
033d 800a | | Call 0x0,0xa
033e 800b | | Call 0x0,0xb
033f 00d1 | | Pop_Control Pop_Count_1
0340 c407 | | Store 0x2,0x7
0341 c404 | | Store 0x2,0x4
0342 c405 | | Store 0x2,0x5
0343 00cf | | Action Mark_Auxiliary
0344 e5fc | | Load 0x2,-0x4
0345 4801 |H | Short_Literal 0x1
0346 0263 | c | Execute Discrete,Above_Bound
0347 7021 |p! | Jump_Nonzero 0x369
0348 e402 | | Load 0x2,0x2
0349 e5fd | | Load 0x2,-0x3
034a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
034b 01d5 | | Execute Vector,Field_Reference
034c e5fb | | Load 0x2,-0x5
034d 01dd | | Execute Vector,First
034e 00da | | Load_Top At_Offset_2
034f 0273 | s | Execute Discrete,Plus
0350 0aff | | Execute_Immediate Plus,-0x1
0351 e5fb | | Load 0x2,-0x5
0352 01d6 | | Execute Vector,Field_Write
0353 e004 | | Load 0x0,0x4
0354 e408 | | Load 0x2,0x8
0355 e409 | | Load 0x2,0x9
0356 e407 | | Load 0x2,0x7
0357 e406 | | Load 0x2,0x6
0358 e5ff | | Load 0x2,-0x1
0359 e403 | | Load 0x2,0x3
035a e402 | | Load 0x2,0x2
035b e5fd | | Load 0x2,-0x3
035c 8214 | | Call 0x1,0x14
035d 00d1 | | Pop_Control Pop_Count_1
035e c407 | | Store 0x2,0x7
035f c409 | | Store 0x2,0x9
0360 c408 | | Store 0x2,0x8
0361 c402 | | Store 0x2,0x2
0362 e402 | | Load 0x2,0x2
0363 7003 |p | Jump_Nonzero 0x367
0364 00d8 | | Load_Top At_Offset_0
0365 a5fc | | Store_Unchecked 0x2,-0x4
0366 4504 |E | Exit_Subprogram 0x4
0367 00c8 | | Action Pop_Auxiliary_Range
0368 3fdf |? | Loop_Increasing 0x348
0369 4504 |E | Exit_Subprogram 0x4
036a 0000 0000 | | .BLANK 0000[0x6]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0394 | | .CONST 0x0394 ; Address of begin
0371 0004 | | .CONST 0x0004 ; Address of exception handler
0372 0009 | | .CONST 0x0009 ; Number of locals
0373 INIT_0370:
0373 00db | | Load_Top At_Offset_3
0374 e004 | | Load 0x0,0x4
0375 03f1 | | Declare_Variable Discrete,With_Value
0376 e5fd | | Load 0x2,-0x3
0377 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0378 e004 | | Load 0x0,0x4
0379 03f1 | | Declare_Variable Discrete,With_Value
037a 00e1 | | Load_Encached Boolean_Cache
037b 03e9 | | Declare_Variable Discrete,Duplicate
037c e008 | | Load 0x0,0x8
037d 0322 | " | Declare_Variable Record
037e e00d | | Load 0x0,0xd
037f 00d9 | | Load_Top At_Offset_1
0380 017d | } | Execute Record,Structure_Write
0381 e009 | | Load 0x0,0x9
0382 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0383 e5fe | | Load 0x2,-0x2
0384 e5fd | | Load 0x2,-0x3
0385 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0386 01d5 | | Execute Vector,Field_Reference
0387 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0388 800c | | Call 0x0,0xc
0389 e010 | | Load 0x0,0x10
038a 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
038b 03f1 | | Declare_Variable Discrete,With_Value
038c e5fe | | Load 0x2,-0x2
038d e5fd | | Load 0x2,-0x3
038e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
038f 01d5 | | Execute Vector,Field_Reference
0390 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0391 e00f | | Load 0x0,0xf
0392 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0393 03f1 | | Declare_Variable Discrete,With_Value
0394 BODY_0370:
0394 00e1 | | Load_Encached Boolean_Cache
0395 00e1 | | Load_Encached Boolean_Cache
0396 e009 | | Load 0x0,0x9
0397 e406 | | Load 0x2,0x6
0398 e5fe | | Load 0x2,-0x2
0399 e5fd | | Load 0x2,-0x3
039a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
039b 01d5 | | Execute Vector,Field_Reference
039c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
039d 800a | | Call 0x0,0xa
039e 800b | | Call 0x0,0xb
039f 00d1 | | Pop_Control Pop_Count_1
03a0 c407 | | Store 0x2,0x7
03a1 c404 | | Store 0x2,0x4
03a2 c405 | | Store 0x2,0x5
03a3 00cf | | Action Mark_Auxiliary
03a4 e5fc | | Load 0x2,-0x4
03a5 4801 |H | Short_Literal 0x1
03a6 0263 | c | Execute Discrete,Above_Bound
03a7 7021 |p! | Jump_Nonzero 0x3c9
03a8 e402 | | Load 0x2,0x2
03a9 e5fd | | Load 0x2,-0x3
03aa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03ab 01d5 | | Execute Vector,Field_Reference
03ac e5fb | | Load 0x2,-0x5
03ad 01dd | | Execute Vector,First
03ae 00da | | Load_Top At_Offset_2
03af 0273 | s | Execute Discrete,Plus
03b0 0aff | | Execute_Immediate Plus,-0x1
03b1 e5fb | | Load 0x2,-0x5
03b2 01d6 | | Execute Vector,Field_Write
03b3 e004 | | Load 0x0,0x4
03b4 e409 | | Load 0x2,0x9
03b5 e408 | | Load 0x2,0x8
03b6 e407 | | Load 0x2,0x7
03b7 e406 | | Load 0x2,0x6
03b8 e5ff | | Load 0x2,-0x1
03b9 e403 | | Load 0x2,0x3
03ba e402 | | Load 0x2,0x2
03bb e5fd | | Load 0x2,-0x3
03bc 8215 | | Call 0x1,0x15
03bd 00d1 | | Pop_Control Pop_Count_1
03be c407 | | Store 0x2,0x7
03bf c408 | | Store 0x2,0x8
03c0 c409 | | Store 0x2,0x9
03c1 c402 | | Store 0x2,0x2
03c2 e402 | | Load 0x2,0x2
03c3 7003 |p | Jump_Nonzero 0x3c7
03c4 00d8 | | Load_Top At_Offset_0
03c5 a5fc | | Store_Unchecked 0x2,-0x4
03c6 4504 |E | Exit_Subprogram 0x4
03c7 00c8 | | Action Pop_Auxiliary_Range
03c8 3fdf |? | Loop_Increasing 0x3a8
03c9 4504 |E | Exit_Subprogram 0x4
03ca 0000 0000 | | .BLANK 0000[0x6]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d5 | | .CONST 0x03d5 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0002 | | .CONST 0x0002 ; Number of locals
03d3 INIT_03d0:
03d3 e004 | | Load 0x0,0x4
03d4 0007 | | Action Break_Optional
03d5 BODY_03d0:
03d5 e004 | | Load 0x0,0x4
03d6 e5fe | | Load 0x2,-0x2
03d7 8216 | | Call 0x1,0x16
03d8 00d1 | | Pop_Control Pop_Count_1
03d9 0059 | Y | Store_Top Discrete,At_Offset_1
03da 00db | | Load_Top At_Offset_3
03db 00d9 | | Load_Top At_Offset_1
03dc e5fe | | Load 0x2,-0x2
03dd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03de 01d6 | | Execute Vector,Field_Write
03df 4502 |E | Exit_Subprogram 0x2
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 4800 |H | Short_Literal 0x0
03e4 00db | | Load_Top At_Offset_3
03e5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03e6 4800 |H | Short_Literal 0x0
03e7 00db | | Load_Top At_Offset_3
03e8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
03e9 4501 |E | Exit_Subprogram 0x1
03ea 0000 0000 | | .BLANK 0000[0x6]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 4601 |F | Jump_Case 0x1
03f4 7801 |x | Jump 0x3f6 ; case 0x0
03f5 7804 |x | Jump 0x3fa ; case 0x1
03f6 00da | | Load_Top At_Offset_2
03f7 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03f8 1c00 | | Execute_Immediate Run_Utility,0x0
03f9 4302 |C | Exit_Subprogram From_Utility,0x2
03fa 00da | | Load_Top At_Offset_2
03fb 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03fc 1c01 | | Execute_Immediate Run_Utility,0x1
03fd 4302 |C | Exit_Subprogram From_Utility,0x2
03fe ; --------------------------------------------------------------------------------------
03fe ; STRING TABLE
03fe ; --------------------------------------------------------------------------------------
03fe 0006 | | .STRTAB 0x0006->0x0401 ; "There are no history entries for the task or tasks"
03ff 0036 | 6 | .STRTAB 0x0036->0x041a ; "There are no history entries for the age specified"
0400 0066 | f | .STREND 0x0066->0x0433
0401 5468 6572 |Ther| .STRTAB_STRINGS
0433 0000 0000 | | .BLANK 0000[0x5]
0438 ; --------------------------------------------------------------------------------------
0438 ; Debug Table
0438 ; --------------------------------------------------------------------------------------
0438 0004 0009 | | .DEBUG4 0x0004,0x0009,0x12a9,0x0000,0x0001,0x0000
043e 0000 13b2 | | .XXX[0xa]
0440 0001 0404 | |
0442 0800 0280 | |
0444 0000 0008 | |
0446 0000 0008 | |
0448 0000 0000 | | .BLANK 0000[0x7]
044f 00ff 0001 | | .XXX[0x11]
0451 0404 0000 | |
0453 0016 001d | |
0455 a009 0000 | |
0457 13b2 0001 | |
0459 0404 0800 | |
045b 0280 0000 | |
045d 0010 0000 | |
045f 0010 | |
0460 0000 0000 | | .BLANK 0000[0x7]
0467 ffff 0000 | | .XXX[0x5]
0469 0000 0000 | |
046b 0076 | v |
046c 0000 0000 | | .BLANK 0000[0x4]
0470 000c 2cfd | , | .XXX[0x36]
0472 8800 0780 | |
0474 0000 0018 | |
0476 0000 0018 | |
0478 0001 0804 | |
047a 0800 05ec | |
047c 000c 2cfd | , |
047e 0000 007f | |
0480 003d b280 | = |
0482 4041 f080 |@A |
0484 0000 01b4 | |
0486 7180 8004 |q |
0488 0002 0000 | |
048a 0000 3046 | 0F|
048c 0000 1000 | |
048e 0000 4801 | H |
0490 4000 0000 |@ |
0492 4000 0010 |@ |
0494 0000 0088 | |
0496 0000 0000 | |
0498 4000 0002 |@ |
049a 9000 0040 | @|
049c 30fc 5000 |0 P |
049e 0040 30fc | @0 |
04a0 9000 0040 | @|
04a2 30fc d000 |0 |
04a4 0040 30fd | @0 |
04a6 0000 0000 | | .BLANK 0000[0x12]
04b8 00c0 0007 | | .XXX[0x25]
04ba b7d0 0808 | |
04bc 3e60 0000 |>` |
04be 0036 8970 | 6 p|
04c0 1000 8000 | |
04c2 4000 0000 |@ |
04c4 0610 8000 | |
04c6 0200 0000 | |
04c8 0d00 2800 | ( |
04ca 0000 0800 | |
04cc 0002 0000 | |
04ce 0011 0000 | |
04d0 0000 0800 | |
04d2 0000 5200 | R |
04d4 0008 061f | |
04d6 b200 0008 | |
04d8 061f ba00 | |
04da 0008 061f | |
04dc c000 | |
04dd 0000 0000 | | .BLANK 0000[0x5]
04e2 0200 0008 | | .XXX[0xa]
04e4 061f ca00 | |
04e6 0008 061f | |
04e8 aa00 0008 | |
04ea 061f d000 | |
04ec 0000 0000 | | .BLANK 0000[0x5]
04f1 0008 0000 | | .XXX[0x3]
04f3 e6f0 | |
04f4 0000 0000 | | .BLANK 0000[0xd]
0501 0020 0500 | | .XXX[0xc]
0503 0000 0000 | |
0505 0000 4000 | @ |
0507 0002 2000 | |
0509 0000 0100 | |
050b 0000 0a00 | |
050d 0000 0000 | | .BLANK 0000[0x2d]
053a 0004 00a0 | | .XXX[0xc]
053c 0000 0000 | |
053e 0000 0800 | |
0540 0000 4400 | D |
0542 0000 0020 | |
0544 0000 0140 | @|
0546 0000 0000 | | .BLANK 0000[0x2e]
0574 8014 0000 | | .XXX[0xb]
0576 0000 0000 | |
0578 0100 0000 | |
057a 0880 0000 | |
057c 0004 0000 | |
057e 0028 | ( |
057f 0000 0000 | | .BLANK 0000[0x2e]
05ad 1002 8000 | | .XXX[0xb]
05af 0000 0000 | |
05b1 0020 0000 | |
05b3 0110 0000 | |
05b5 0000 8000 | |
05b7 0005 | |
05b8 0000 0000 | | .BLANK 0000[0x48]