|
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: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦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 0280 | | .CONST 0x0280 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00c0 | | .CONST 0x00c0 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0017 | | .CONST 0x0017 ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 199f | | Execute Package,Field_Reference,Field_Number 0x9f 000d 0129 | ) | Execute Any,Make_Visible 000e 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 0010 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated 0012 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated 0014 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 0016 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 0018 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated 001a 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated 001c 00bf | | Action Accept_Activation 001d 00e8 | | Load_Encached Character_Cache 001e 0266 | f | Execute Discrete,Bounds 001f 00e1 | | Load_Encached Boolean_Cache 0020 02a0 | | Declare_Subprogram Null_Subprogram 0021 4801 |H | Short_Literal 0x1 0022 035d | ] | Declare_Type Array,Defined 0023 00d8 | | Load_Top At_Offset_0 0024 0337 | 7 | Declare_Variable Array 0025 4801 |H | Short_Literal 0x1 0026 4821 |H! | Short_Literal 0x21 0027 00da | | Load_Top At_Offset_2 0028 01d6 | | Execute Vector,Field_Write 0029 4801 |H | Short_Literal 0x1 002a 4840 |H@ | Short_Literal 0x40 002b 00da | | Load_Top At_Offset_2 002c 01d6 | | Execute Vector,Field_Write 002d 4801 |H | Short_Literal 0x1 002e 4824 |H$ | Short_Literal 0x24 002f 00da | | Load_Top At_Offset_2 0030 01d6 | | Execute Vector,Field_Write 0031 4801 |H | Short_Literal 0x1 0032 485e |H^ | Short_Literal 0x5e 0033 00da | | Load_Top At_Offset_2 0034 01d6 | | Execute Vector,Field_Write 0035 4801 |H | Short_Literal 0x1 0036 482e |H. | Short_Literal 0x2e 0037 00da | | Load_Top At_Offset_2 0038 01d6 | | Execute Vector,Field_Write 0039 4801 |H | Short_Literal 0x1 003a 485f |H_ | Short_Literal 0x5f 003b 00da | | Load_Top At_Offset_2 003c 01d6 | | Execute Vector,Field_Write 003d 4801 |H | Short_Literal 0x1 003e 485b |H[ | Short_Literal 0x5b 003f 00da | | Load_Top At_Offset_2 0040 01d6 | | Execute Vector,Field_Write 0041 4801 |H | Short_Literal 0x1 0042 485d |H] | Short_Literal 0x5d 0043 00da | | Load_Top At_Offset_2 0044 01d6 | | Execute Vector,Field_Write 0045 4801 |H | Short_Literal 0x1 0046 483c |H< | Short_Literal 0x3c 0047 00da | | Load_Top At_Offset_2 0048 01d6 | | Execute Vector,Field_Write 0049 4801 |H | Short_Literal 0x1 004a 483e |H> | Short_Literal 0x3e 004b 00da | | Load_Top At_Offset_2 004c 01d6 | | Execute Vector,Field_Write 004d 4801 |H | Short_Literal 0x1 004e 483f |H? | Short_Literal 0x3f 004f 00da | | Load_Top At_Offset_2 0050 01d6 | | Execute Vector,Field_Write 0051 4801 |H | Short_Literal 0x1 0052 482c |H, | Short_Literal 0x2c 0053 00da | | Load_Top At_Offset_2 0054 01d6 | | Execute Vector,Field_Write 0055 4801 |H | Short_Literal 0x1 0056 4827 |H' | Short_Literal 0x27 0057 00da | | Load_Top At_Offset_2 0058 01d6 | | Execute Vector,Field_Write 0059 4801 |H | Short_Literal 0x1 005a 487e |H~ | Short_Literal 0x7e 005b 00da | | Load_Top At_Offset_2 005c 01d6 | | Execute Vector,Field_Write 005d 4801 |H | Short_Literal 0x1 005e 4860 |H` | Short_Literal 0x60 005f 00da | | Load_Top At_Offset_2 0060 01d6 | | Execute Vector,Field_Write 0061 4801 |H | Short_Literal 0x1 0062 4828 |H( | Short_Literal 0x28 0063 00da | | Load_Top At_Offset_2 0064 01d6 | | Execute Vector,Field_Write 0065 4801 |H | Short_Literal 0x1 0066 4829 |H) | Short_Literal 0x29 0067 00da | | Load_Top At_Offset_2 0068 01d6 | | Execute Vector,Field_Write 0069 4820 |H | Short_Literal 0x20 006a 4800 |H | Short_Literal 0x0 006b 4800 |H | Short_Literal 0x0 006c 00d9 | | Load_Top At_Offset_1 006d e216 | | Load 0x1,0x16 006e 01d6 | | Execute Vector,Field_Write 006f 3ffb |? | Loop_Increasing 0x6b 0070 4800 |H | Short_Literal 0x0 0071 4822 |H" | Short_Literal 0x22 0072 00da | | Load_Top At_Offset_2 0073 01d6 | | Execute Vector,Field_Write 0074 4800 |H | Short_Literal 0x0 0075 4823 |H# | Short_Literal 0x23 0076 00da | | Load_Top At_Offset_2 0077 01d6 | | Execute Vector,Field_Write 0078 4800 |H | Short_Literal 0x0 0079 4825 |H% | Short_Literal 0x25 007a 00da | | Load_Top At_Offset_2 007b 01d6 | | Execute Vector,Field_Write 007c 4800 |H | Short_Literal 0x0 007d 4826 |H& | Short_Literal 0x26 007e 00da | | Load_Top At_Offset_2 007f 01d6 | | Execute Vector,Field_Write 0080 4800 |H | Short_Literal 0x0 0081 482a |H* | Short_Literal 0x2a 0082 00da | | Load_Top At_Offset_2 0083 01d6 | | Execute Vector,Field_Write 0084 4800 |H | Short_Literal 0x0 0085 482b |H+ | Short_Literal 0x2b 0086 00da | | Load_Top At_Offset_2 0087 01d6 | | Execute Vector,Field_Write 0088 4800 |H | Short_Literal 0x0 0089 482d |H- | Short_Literal 0x2d 008a 00da | | Load_Top At_Offset_2 008b 01d6 | | Execute Vector,Field_Write 008c 483b |H; | Short_Literal 0x3b 008d 482f |H/ | Short_Literal 0x2f 008e 4800 |H | Short_Literal 0x0 008f 00d9 | | Load_Top At_Offset_1 0090 e216 | | Load 0x1,0x16 0091 01d6 | | Execute Vector,Field_Write 0092 3ffb |? | Loop_Increasing 0x8e 0093 4800 |H | Short_Literal 0x0 0094 483d |H= | Short_Literal 0x3d 0095 00da | | Load_Top At_Offset_2 0096 01d6 | | Execute Vector,Field_Write 0097 485a |HZ | Short_Literal 0x5a 0098 4841 |HA | Short_Literal 0x41 0099 4800 |H | Short_Literal 0x0 009a 00d9 | | Load_Top At_Offset_1 009b e216 | | Load 0x1,0x16 009c 01d6 | | Execute Vector,Field_Write 009d 3ffb |? | Loop_Increasing 0x99 009e 4800 |H | Short_Literal 0x0 009f 485c |H\ | Short_Literal 0x5c 00a0 00da | | Load_Top At_Offset_2 00a1 01d6 | | Execute Vector,Field_Write 00a2 487d |H} | Short_Literal 0x7d 00a3 4861 |Ha | Short_Literal 0x61 00a4 4800 |H | Short_Literal 0x0 00a5 00d9 | | Load_Top At_Offset_1 00a6 e216 | | Load 0x1,0x16 00a7 01d6 | | Execute Vector,Field_Write 00a8 3ffb |? | Loop_Increasing 0xa4 00a9 4800 |H | Short_Literal 0x0 00aa 487f |H | Short_Literal 0x7f 00ab 00da | | Load_Top At_Offset_2 00ac 01d6 | | Execute Vector,Field_Write 00ad 00d9 | | Load_Top At_Offset_1 00ae 01c3 | | Execute Vector,Check_In_Type 00af 0007 | | Action Break_Optional 00b0 1d0e | | Execute_Immediate Reference_Lex_1,0xe 00b1 00c7 | | Action Elaborate_Subprogram 00b2 1d0f | | Execute_Immediate Reference_Lex_1,0xf 00b3 00c7 | | Action Elaborate_Subprogram 00b4 029d 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call 00b6 1d10 | | Execute_Immediate Reference_Lex_1,0x10 00b7 00c7 | | Action Elaborate_Subprogram 00b8 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00b9 00c7 | | Action Elaborate_Subprogram 00ba 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00bb 00c7 | | Action Elaborate_Subprogram 00bc 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00bd 00c7 | | Action Elaborate_Subprogram 00be 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00bf 00c7 | | Action Elaborate_Subprogram 00c0 BODY_0008: 00c0 00bc | | Action Signal_Activated 00c1 00bb | | Action Signal_Completion 00c2 0000 0000 | | .BLANK 0000[0x6] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb 4801 |H | Short_Literal 0x1 00cc e5fc | | Load 0x2,-0x4 00cd e002 | | Load 0x0,0x2 00ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00cf 680e |h | Jump_Zero 0xde 00d0 4800 |H | Short_Literal 0x0 00d1 4800 |H | Short_Literal 0x0 00d2 e5fe | | Load 0x2,-0x2 00d3 e5fc | | Load 0x2,-0x4 00d4 e5ff | | Load 0x2,-0x1 00d5 e001 | | Load 0x0,0x1 00d6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00d7 e001 | | Load 0x0,0x1 00d8 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 00d9 e5fd | | Load 0x2,-0x3 00da 6803 |h | Jump_Zero 0xde 00db e001 | | Load 0x0,0x1 00dc 1b16 | | Execute Package,Field_Read,Field_Number 0x16 00dd 0257 | W | Execute Discrete,Raise 00de 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00df 0000 | | .XXX[0x1] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e3 | | .CONST 0x00e3 ; Address of begin 00e1 00e8 | | .CONST 0x00e8 ; Address of exception handler 00e2 0001 | | .CONST 0x0001 ; Number of locals 00e3 BODY_00e0: 00e3 INIT_00e0: 00e3 e003 | | Load 0x0,0x3 00e4 e004 | | Load 0x0,0x4 00e5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 00e6 c003 | | Store 0x0,0x3 00e7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00e8 TRAP_00e0: 00e8 e004 | | Load 0x0,0x4 00e9 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00ea 010f | | Execute Exception,Equal 00eb 6810 |h | Jump_Zero 0xfc 00ec e005 | | Load 0x0,0x5 00ed e003 | | Load 0x0,0x3 00ee e004 | | Load 0x0,0x4 00ef 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 00f0 c005 | | Store 0x0,0x5 00f1 4800 |H | Short_Literal 0x0 00f2 4800 |H | Short_Literal 0x0 00f3 4807 |H | Short_Literal 0x7 00f4 e005 | | Load 0x0,0x5 00f5 0092 025c | \| Action Push_String_Extended,0x25c ; "Abstract Document contains errors." 00f7 e001 | | Load 0x0,0x1 00f8 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00f9 e001 | | Load 0x0,0x1 00fa 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 00fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00fc 0100 | | Execute Exception,Raise 00fd 0000 0000 | | .XXX[0x3] 00ff 0000 | | 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 010a | | .CONST 0x010a ; Address of begin 0101 011b | | .CONST 0x011b ; Address of exception handler 0102 0002 | | .CONST 0x0002 ; Number of locals 0103 INIT_0100: 0103 4820 |H | Short_Literal 0x20 0104 00db | | Load_Top At_Offset_3 0105 e006 | | Load 0x0,0x6 0106 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0107 e006 | | Load 0x0,0x6 0108 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0109 8217 | | Call 0x1,0x17 010a BODY_0100: 010a 00d8 | | Load_Top At_Offset_0 010b 01dd | | Execute Vector,First 010c 00d9 | | Load_Top At_Offset_1 010d 01d7 | | Execute Vector,Field_Read 010e 0f21 | ! | Execute_Immediate Equal,0x21 010f 6802 |h | Jump_Zero 0x112 0110 00d8 | | Load_Top At_Offset_0 0111 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0112 482e |H. | Short_Literal 0x2e 0113 e007 | | Load 0x0,0x7 0114 e5fe | | Load 0x2,-0x2 0115 e008 | | Load 0x0,0x8 0116 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0117 01cb | | Execute Vector,Append 0118 00d9 | | Load_Top At_Offset_1 0119 01cc | | Execute Vector,Catenate 011a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 011b TRAP_0100: 011b 010e | | Execute Exception,Is_Constraint_Error 011c 6802 |h | Jump_Zero 0x11f 011d 00ea | | Load_Encached Null_String_Cache 011e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 011f 0100 | | Execute Exception,Raise 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 00da | | Load_Top At_Offset_2 0124 e009 | | Load 0x0,0x9 0125 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 0126 0260 | ` | Execute Discrete,In_Type 0127 7003 |p | Jump_Nonzero 0x12b 0128 0092 025d | ]| Action Push_String_Extended,0x25d ; "<REQT IMAGE UNKNOWN>" 012a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 012b 00da | | Load_Top At_Offset_2 012c e009 | | Load 0x0,0x9 012d 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 012e 00d9 | | Load_Top At_Offset_1 012f 00d0 | | Action Swap_Control 0130 0260 | ` | Execute Discrete,In_Type 0131 7001 |p | Jump_Nonzero 0x133 0132 0801 | | Execute_Immediate Raise,0x1 0133 e009 | | Load 0x0,0x9 0134 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0135 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0136 0000 0000 | | .XXX[0x2] 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 00da | | Load_Top At_Offset_2 013c e00a | | Load 0x0,0xa 013d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 013e 7007 |p | Jump_Nonzero 0x146 013f 00da | | Load_Top At_Offset_2 0140 e00a | | Load 0x0,0xa 0141 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0142 e5fe | | Load 0x2,-0x2 0143 027d | } | Execute Discrete,Greater 0144 6801 |h | Jump_Zero 0x146 0145 08e2 | | Execute_Immediate Raise,0xe2 0146 00da | | Load_Top At_Offset_2 0147 00d8 | | Load_Top At_Offset_0 0148 0120 | | Execute Any,Is_Value 0149 7002 |p | Jump_Nonzero 0x14c 014a 00d8 | | Load_Top At_Offset_0 014b 011e | | Execute Any,Convert 014c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 014d 0000 0000 | | .XXX[0x3] 014f 0000 | | 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0153 | S | .CONST 0x0153 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0001 | | .CONST 0x0001 ; Number of locals 0153 BODY_0150: 0153 INIT_0150: 0153 00db | | Load_Top At_Offset_3 0154 e001 | | Load 0x0,0x1 0155 1b8a | | Execute Package,Field_Read,Field_Number 0x8a 0156 e5ff | | Load 0x2,-0x1 0157 e00a | | Load 0x0,0xa 0158 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0159 8212 | | Call 0x1,0x12 015a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 015b 0000 0000 | | .BLANK 0000[0x5] 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 016c | l | .CONST 0x016c ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0004 | | .CONST 0x0004 ; Number of locals 0163 INIT_0160: 0163 e00b | | Load 0x0,0xb 0164 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0165 02c7 | | Declare_Variable Any 0166 00db | | Load_Top At_Offset_3 0167 a402 | | Store_Unchecked 0x2,0x2 0168 00e3 | | Load_Encached Natural_Cache 0169 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 016a 029f 01e3 | | Declare_Subprogram INIT_01e0,For_Call 016c BODY_0160: 016c 00cf | | Action Mark_Auxiliary 016d 7808 |x | Jump 0x176 016e 00da | | Load_Top At_Offset_2 016f 0a01 | | Execute_Immediate Plus,0x1 0170 005b | [ | Store_Top Discrete,At_Offset_3 0171 00db | | Load_Top At_Offset_3 0172 e00b | | Load 0x0,0xb 0173 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0174 c402 | | Store 0x2,0x2 0175 00c9 | | Action Pop_Auxiliary_Loop 0176 00db | | Load_Top At_Offset_3 0177 e00b | | Load 0x0,0xb 0178 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0179 6ff4 |o | Jump_Zero 0x16e 017a 00ce | | Action Pop_Auxiliary 017b 8404 | | Call 0x2,0x4 017c 0831 | 1 | Execute_Immediate Raise,0x31 017d 0000 0000 | | .XXX[0x3] 017f 0000 | | 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0192 | | .CONST 0x0192 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0005 | | .CONST 0x0005 ; Number of locals 0183 INIT_0180: 0183 00da | | Load_Top At_Offset_2 0184 01da | | Execute Vector,Bounds 0185 00e9 | | Load_Encached String_Cache 0186 035b | [ | Declare_Type Array,Constrained 0187 0337 | 7 | Declare_Variable Array 0188 00e2 | | Load_Encached Integer_Cache 0189 00d9 | | Load_Top At_Offset_1 018a 01dd | | Execute Vector,First 018b 0267 | g | Execute Discrete,Predecessor 018c 00e3 | | Load_Encached Natural_Cache 018d 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 018e 029f 020b | | Declare_Subprogram INIT_0208,For_Call 0190 029f 0253 | S| Declare_Subprogram INIT_0250,For_Call 0192 BODY_0180: 0192 00cf | | Action Mark_Auxiliary 0193 e5ff | | Load 0x2,-0x1 0194 01d9 | | Execute Vector,Reverse_Bounds 0195 0263 | c | Execute Discrete,Above_Bound 0196 703f |p? | Jump_Nonzero 0x1d6 0197 00d8 | | Load_Top At_Offset_0 0198 e5ff | | Load 0x2,-0x1 0199 01d7 | | Execute Vector,Field_Read 019a 00d8 | | Load_Top At_Offset_0 019b 0d41 | A | Execute_Immediate Less,0x41 019c 700e |p | Jump_Nonzero 0x1ab 019d 00d8 | | Load_Top At_Offset_0 019e 0c5b | [ | Execute_Immediate Greater_Equal,0x5b 019f 7006 |p | Jump_Nonzero 0x1a6 01a0 00d1 | | Pop_Control Pop_Count_1 01a1 00d8 | | Load_Top At_Offset_0 01a2 e5ff | | Load 0x2,-0x1 01a3 01d7 | | Execute Vector,Field_Read 01a4 8405 | | Call 0x2,0x5 01a5 782e |x. | Jump 0x1d4 01a6 4861 |Ha | Short_Literal 0x61 01a7 487a |Hz | Short_Literal 0x7a 01a8 0262 | b | Execute Discrete,In_Range 01a9 77f7 |w | Jump_Nonzero 0x1a1 01aa 7805 |x | Jump 0x1b0 01ab 4830 |H0 | Short_Literal 0x30 01ac 4839 |H9 | Short_Literal 0x39 01ad 0262 | b | Execute Discrete,In_Range 01ae 77f2 |w | Jump_Nonzero 0x1a1 01af 7800 |x | Jump 0x1b0 01b0 00d8 | | Load_Top At_Offset_0 01b1 e5ff | | Load 0x2,-0x1 01b2 01d7 | | Execute Vector,Field_Read 01b3 e216 | | Load 0x1,0x16 01b4 01d7 | | Execute Vector,Field_Read 01b5 6804 |h | Jump_Zero 0x1ba 01b6 00d8 | | Load_Top At_Offset_0 01b7 8404 | | Call 0x2,0x4 01b8 8405 | | Call 0x2,0x5 01b9 781a |x | Jump 0x1d4 01ba 00d8 | | Load_Top At_Offset_0 01bb e5ff | | Load 0x2,-0x1 01bc 01dd | | Execute Vector,First 01bd 027f | | Execute Discrete,Equal 01be 7005 |p | Jump_Nonzero 0x1c4 01bf 00d8 | | Load_Top At_Offset_0 01c0 e5ff | | Load 0x2,-0x1 01c1 01dc | | Execute Vector,Last 01c2 027f | | Execute Discrete,Equal 01c3 6803 |h | Jump_Zero 0x1c7 01c4 4858 |HX | Short_Literal 0x58 01c5 8405 | | Call 0x2,0x5 01c6 780d |x | Jump 0x1d4 01c7 e403 | | Load 0x2,0x3 01c8 e402 | | Load 0x2,0x2 01c9 01d7 | | Execute Vector,Field_Read 01ca 0b2e | . | Execute_Immediate Case_Compare,0x2e 01cb 7005 |p | Jump_Nonzero 0x1d1 01cc 0f5f | _ | Execute_Immediate Equal,0x5f 01cd 7004 |p | Jump_Nonzero 0x1d2 01ce 485f |H_ | Short_Literal 0x5f 01cf 8405 | | Call 0x2,0x5 01d0 7803 |x | Jump 0x1d4 01d1 00d1 | | Pop_Control Pop_Count_1 01d2 4858 |HX | Short_Literal 0x58 01d3 8405 | | Call 0x2,0x5 01d4 00c8 | | Action Pop_Auxiliary_Range 01d5 3fc1 |? | Loop_Increasing 0x197 01d6 00ce | | Action Pop_Auxiliary 01d7 00db | | Load_Top At_Offset_3 01d8 00e9 | | Load_Encached String_Cache 01d9 01c6 | | Execute Vector,Convert_To_Formal 01da 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01db 0000 0000 | | .BLANK 0000[0x5] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01eb | | .CONST 0x01eb ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0002 | | .CONST 0x0002 ; Number of locals 01e3 INIT_01e0: 01e3 4801 |H | Short_Literal 0x1 01e4 e403 | | Load 0x2,0x3 01e5 e001 | | Load 0x0,0x1 01e6 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 01e7 035b | [ | Declare_Type Array,Constrained 01e8 0337 | 7 | Declare_Variable Array 01e9 00d8 | | Load_Top At_Offset_0 01ea 1c00 | | Execute_Immediate Run_Utility,0x0 01eb BODY_01e0: 01eb e402 | | Load 0x2,0x2 01ec e00b | | Load 0x0,0xb 01ed 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 01ee c402 | | Store 0x2,0x2 01ef 00cf | | Action Mark_Auxiliary 01f0 00d9 | | Load_Top At_Offset_1 01f1 01d9 | | Execute Vector,Reverse_Bounds 01f2 0263 | c | Execute Discrete,Above_Bound 01f3 700c |p | Jump_Nonzero 0x200 01f4 e402 | | Load 0x2,0x2 01f5 e00b | | Load 0x0,0xb 01f6 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 01f7 00d9 | | Load_Top At_Offset_1 01f8 e602 | | Load 0x3,0x2 01f9 01d6 | | Execute Vector,Field_Write 01fa e402 | | Load 0x2,0x2 01fb e00b | | Load 0x0,0xb 01fc 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 01fd c402 | | Store 0x2,0x2 01fe 00c8 | | Action Pop_Auxiliary_Range 01ff 3ff4 |? | Loop_Increasing 0x1f4 0200 00ce | | Action Pop_Auxiliary 0201 00d8 | | Load_Top At_Offset_0 0202 e001 | | Load 0x0,0x1 0203 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 0204 01c6 | | Execute Vector,Convert_To_Formal 0205 00cb | | Action Pop_Block_With_Result 0206 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0207 0000 | | .XXX[0x1] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b 00da | | Load_Top At_Offset_2 020c e5ff | | Load 0x2,-0x1 020d 01d7 | | Execute Vector,Field_Read 020e 0b5f | _ | Execute_Immediate Case_Compare,0x5f 020f 7006 |p | Jump_Nonzero 0x216 0210 0f2e | . | Execute_Immediate Equal,0x2e 0211 701f |p | Jump_Nonzero 0x231 0212 00da | | Load_Top At_Offset_2 0213 e5ff | | Load 0x2,-0x1 0214 01d7 | | Execute Vector,Field_Read 0215 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0216 00d1 | | Pop_Control Pop_Count_1 0217 00da | | Load_Top At_Offset_2 0218 e5ff | | Load 0x2,-0x1 0219 01dc | | Execute Vector,Last 021a 027f | | Execute Discrete,Equal 021b 6802 |h | Jump_Zero 0x21e 021c 4858 |HX | Short_Literal 0x58 021d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 021e 00da | | Load_Top At_Offset_2 021f e5ff | | Load 0x2,-0x1 0220 01dd | | Execute Vector,First 0221 027f | | Execute Discrete,Equal 0222 6802 |h | Jump_Zero 0x225 0223 485f |H_ | Short_Literal 0x5f 0224 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0225 e403 | | Load 0x2,0x3 0226 e402 | | Load 0x2,0x2 0227 01d7 | | Execute Vector,Field_Read 0228 0b2e | . | Execute_Immediate Case_Compare,0x2e 0229 7004 |p | Jump_Nonzero 0x22e 022a 0f5f | _ | Execute_Immediate Equal,0x5f 022b 7003 |p | Jump_Nonzero 0x22f 022c 485f |H_ | Short_Literal 0x5f 022d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 022e 00d1 | | Pop_Control Pop_Count_1 022f 4858 |HX | Short_Literal 0x58 0230 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0231 00da | | Load_Top At_Offset_2 0232 e5ff | | Load 0x2,-0x1 0233 01dd | | Execute Vector,First 0234 027f | | Execute Discrete,Equal 0235 7005 |p | Jump_Nonzero 0x23b 0236 00da | | Load_Top At_Offset_2 0237 e5ff | | Load 0x2,-0x1 0238 01dc | | Execute Vector,Last 0239 027f | | Execute Discrete,Equal 023a 6802 |h | Jump_Zero 0x23d 023b 4858 |HX | Short_Literal 0x58 023c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 023d e403 | | Load 0x2,0x3 023e e402 | | Load 0x2,0x2 023f 01d7 | | Execute Vector,Field_Read 0240 0b2e | . | Execute_Immediate Case_Compare,0x2e 0241 7004 |p | Jump_Nonzero 0x246 0242 0f5f | _ | Execute_Immediate Equal,0x5f 0243 7003 |p | Jump_Nonzero 0x247 0244 482e |H. | Short_Literal 0x2e 0245 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0246 00d1 | | Pop_Control Pop_Count_1 0247 4858 |HX | Short_Literal 0x58 0248 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0249 0000 0000 | | .BLANK 0000[0x7] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0253 | S | .CONST 0x0253 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0001 | | .CONST 0x0001 ; Number of locals 0253 BODY_0250: 0253 INIT_0250: 0253 00e2 | | Load_Encached Integer_Cache 0254 e403 | | Load 0x2,0x3 0255 0268 | h | Execute Discrete,Successor 0256 c403 | | Store 0x2,0x3 0257 00da | | Load_Top At_Offset_2 0258 e403 | | Load 0x2,0x3 0259 e402 | | Load 0x2,0x2 025a 01d6 | | Execute Vector,Field_Write 025b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 025c ; -------------------------------------------------------------------------------------- 025c ; STRING TABLE 025c ; -------------------------------------------------------------------------------------- 025c 0006 | | .STRTAB 0x0006->0x025f ; "Abstract Document contains errors." 025d 0026 | & | .STRTAB 0x0026->0x0270 ; "<REQT IMAGE UNKNOWN>" 025e 0038 | 8 | .STREND 0x0038->0x027a 025f 4162 7374 |Abst| .STRTAB_STRINGS 027a 0000 0000 | | .BLANK 0000[0x6] 0280 ; -------------------------------------------------------------------------------------- 0280 ; Debug Table 0280 ; -------------------------------------------------------------------------------------- 0280 0004 0012 | | .DEBUG4 0x0004,0x0012,0xfc7e,0x0000,0x0001,0x0000 0286 22b6 1e57 |" W| .XXX[0x17a] 0288 6115 621a |a b | 028a 2244 b5b6 |"D | 028c 8960 ac18 | ` | 028e 0112 48b5 | H | 0290 ab3a 8d88 | : | 0292 5d88 b3d8 |] | 0294 999b 89e5 | | 0296 8914 6231 | b1| 0298 3582 8d89 |5 | 029a 120f 058e | | 029c 2487 6015 |$ ` | 029e 6642 f629 |fB )| 02a0 e620 9340 | @| 02a2 af5a 1465 | Z e| 02a4 db88 6064 | `d| 02a6 e0ee c5e8 | | 02a8 6dc8 e95a |m Z| 02aa 3bd5 8bb1 |; | 02ac 60ea d917 |` | 02ae 115e 3b68 | ^;h| 02b0 bd18 1b31 | 1| 02b2 8f4a 90f5 | J | 02b4 d930 adc7 | 0 | 02b6 df62 6f30 | bo0| 02b8 8bb8 0347 | G| 02ba 6191 b641 |a A| 02bc 7553 5e62 |uS^b| 02be e196 bbb7 | | 02c0 0c16 0567 | g| 02c2 dd3e 198c | > | 02c4 aad0 7ea6 | ~ | 02c6 3a75 8ea6 |:u | 02c8 4a50 7642 |JPvB| 02ca b18e aa52 | R| 02cc 57f6 3bf6 |W ; | 02ce 1d0c 5cc6 | \ | 02d0 d994 cc7d | }| 02d2 6e78 f05d |nx ]| 02d4 9bff 2878 | (x| 02d6 54ff 9a3e |T >| 02d8 34d7 5062 |4 Pb| 02da 68f6 41f7 |h A | 02dc 5015 6688 |P f | 02de b643 c424 | C $| 02e0 2865 a5d4 |(e | 02e2 38d5 92e4 |8 | 02e4 7513 5830 |u X0| 02e6 49b8 9975 |I u| 02e8 4433 2946 |D3)F| 02ea 20ad d8d7 | | 02ec d184 0c00 | | 02ee 7765 1d59 |we Y| 02f0 1a1d 908f | | 02f2 64c6 2362 |d #b| 02f4 8590 d115 | | 02f6 f39a 7245 | rE| 02f8 18b8 6645 | fE| 02fa c24f 2594 | O% | 02fc c865 35da | e5 | 02fe 9ff4 38ff | 8 | 0300 6583 1a4d |e M| 0302 4428 f865 |D( e| 0304 9a9a 4c15 | L | 0306 9548 9dee | H | 0308 5860 5197 |X`Q | 030a bf05 45da | E | 030c 58a9 9472 |X r| 030e 1187 da55 | U| 0310 1595 474d | GM| 0312 d69a 6727 | g'| 0314 255d 6676 |%]fv| 0316 31b2 7d9d |1 } | 0318 d569 5fd8 | i_ | 031a 1873 6da6 | sm | 031c 6507 f26e |e n| 031e 5596 5ea7 |U ^ | 0320 2fd7 b4b1 |/ | 0322 99b6 65ea | e | 0324 7287 d4f2 |r | 0326 7845 7459 |xEtY| 0328 60c7 5de1 |` ] | 032a 665a da5d |fZ ]| 032c c76d f964 | m d| 032e 7905 7c11 |y | | 0330 9897 d582 | | 0332 d9b8 5d9b | ] | 0334 b7d9 84da | | 0336 7695 97f1 |v | 0338 657f 5a60 |e Z`| 033a f5c5 a667 | g| 033c 3432 5176 |42Qv| 033e 9d47 64a2 | Gd | 0340 067e 359c | ~5 | 0342 bdd5 9c5a | Z| 0344 cf84 0684 | | 0346 64b4 c5bd |d | 0348 7ce2 1965 || e| 034a ab59 0ffc | Y | 034c 36da a5ac |6 | 034e 5a4e c44a |ZN J| 0350 e365 b319 | e | 0352 d614 f025 | %| 0354 dde6 aa6c | l| 0356 d772 f665 | r e| 0358 85db a2a5 | | 035a 9313 66f8 | f | 035c 1274 76d3 | tv | 035e 2f66 829c |/f | 0360 70e1 9eff |p | 0362 6539 5c60 |e9\`| 0364 7370 5505 |spU | 0366 91da 7076 | pv| 0368 d294 66b6 | f | 036a f09d e59d | | 036c f159 a79b | Y | 036e b8d5 923d | =| 0370 8b11 a27a | z| 0372 176f a566 | o f| 0374 22c2 7874 |" xt| 0376 1bb7 6700 | g | 0378 367c 94df |6| | 037a 2176 adf4 |!v | 037c 92b3 6fdf | o | 037e 6509 b617 |e | 0380 e41b ed65 | e| 0382 0f51 8676 | Q v| 0384 2c06 686e |, hn| 0386 92e8 41a0 | A | 0388 186a 86db | j | 038a 8075 d7b3 | u | 038c 716b 9f81 |qk | 038e 571e 6271 |W bq| 0390 1e5f 6bb6 | _k | 0392 446c 7127 |Dlq'| 0394 f726 b530 | & 0| 0396 8276 d41b | v | 0398 6257 51c4 |bWQ | 039a 712a 3579 |q*5y| 039c 0db5 af6a | j| 039e e01b 2225 | "%| 03a0 accd 6bd6 | k | 03a2 1749 e564 | I d| 03a4 e26b 79d0 | ky | 03a6 f9dd 19e7 | | 03a8 6a3c 98f6 |j< | 03aa 8f24 115e | $ ^| 03ac 83d8 ed23 | #| 03ae 75a8 75a4 |u u | 03b0 5f74 f5e1 |_t | 03b2 64dd eedd |d | 03b4 d4bd d089 | | 03b6 5f6d b7fa |_m | 03b8 0774 7673 | tvs| 03ba 61b6 89f5 |a | 03bc a937 cb65 | 7 e| 03be 36aa 9776 |6 v| 03c0 19dc a056 | V| 03c2 8ea5 aaa0 | | 03c4 d6f8 19de | | 03c6 cf5a e352 | Z R| 03c8 7519 de5d |u ]| 03ca ced8 6a7c | j|| 03cc 5abc 25a6 |Z % | 03ce e96a 441a | jD | 03d0 44b7 4d4e |D MN| 03d2 dda1 5dd7 | ] | 03d4 ef77 8d6d | w m| 03d6 6e5f c2a5 |n_ | 03d8 effb 6f62 | ob| 03da de96 572d | W-| 03dc 7dde 6eb3 |} n | 03de 6a15 718b |j q | 03e0 74e4 26a9 |t & | 03e2 5757 4c73 |WWLs| 03e4 9374 d53f | t ?| 03e6 79aa de5a |y Z| 03e8 72bf 1774 |r t| 03ea 3846 ad10 |8F | 03ec 5b85 0a76 |[ v| 03ee 4afd 56af |J V | 03f0 6777 737d |gws}| 03f2 0c74 03c1 | t | 03f4 aa08 69f3 | i | 03f6 e2ac c5e3 | | 03f8 0170 941d | p | 03fa e07d d20a | } | 03fc de10 dded | | 03fe 5daa 19dd |] |