|
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_779ce4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 03d0 | | .CONST 0x03d0 ; 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 0093 | | .CONST 0x0093 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 002d | - | .CONST 0x002d ; Number of locals 000b INIT_0008: 000b 00da | | Load_Top At_Offset_2 000c 00da | | Load_Top At_Offset_2 000d 029f 0373 | s| Declare_Subprogram INIT_0370,For_Call 000f 4802 |H | Short_Literal 0x2 0010 032e | . | Declare_Type Record,Defined,Visible 0011 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 0013 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 0015 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated 0017 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated 0019 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated 001b 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated 001d 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 001f 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated 0021 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated 0023 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 0025 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 0027 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated 0029 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated 002b 0093 0000 | | push_full_address 0x0 002d 6092 |` | Indirect_Literal Discrete,0xc0,{0x80000000, 0x00010000} 002e 0273 | s | Execute Discrete,Plus 002f e20d | | Load 0x1,0xd 0030 608b |` | Indirect_Literal Discrete,0xbc,{0x00000000, 0x0000ffff} 0031 0279 | y | Execute Discrete,And 0032 0273 | s | Execute Discrete,Plus 0033 0129 | ) | Execute Any,Make_Visible 0034 0093 0000 | | push_full_address 0x0 0036 6081 |` | Indirect_Literal Discrete,0xb8,{0x80000000, 0x00020000} 0037 0273 | s | Execute Discrete,Plus 0038 e20d | | Load 0x1,0xd 0039 6082 |` | Indirect_Literal Discrete,0xbc,{0x00000000, 0x0000ffff} 003a 0279 | y | Execute Discrete,And 003b 0273 | s | Execute Discrete,Plus 003c 0129 | ) | Execute Any,Make_Visible 003d 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 003f 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated 0041 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 0043 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated 0045 4818 |H | Short_Literal 0x18 0046 03cd | | Declare_Type Access,Incomplete,Visible,Accesses_Protected 0047 e212 | | Load 0x1,0x12 0048 00d9 | | Load_Top At_Offset_1 0049 029f 0363 | c| Declare_Subprogram INIT_0360,For_Call 004b 4802 |H | Short_Literal 0x2 004c 032e | . | Declare_Type Record,Defined,Visible 004d 00d8 | | Load_Top At_Offset_0 004e 02a0 | | Declare_Subprogram Null_Subprogram 004f 00db | | Load_Top At_Offset_3 0050 03c7 | | Complete_Type Access,By_Defining 0051 4801 |H | Short_Literal 0x1 0052 0359 | Y | Declare_Type Array,Incomplete,Visible 0053 00d8 | | Load_Top At_Offset_0 0054 02a0 | | Declare_Subprogram Null_Subprogram 0055 4818 |H | Short_Literal 0x18 0056 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 0057 00d8 | | Load_Top At_Offset_0 0058 00e3 | | Load_Encached Natural_Cache 0059 e226 | & | Load 0x1,0x26 005a 00e1 | | Load_Encached Boolean_Cache 005b 02a0 | | Declare_Subprogram Null_Subprogram 005c 4804 |H | Short_Literal 0x4 005d 032e | . | Declare_Type Record,Defined,Visible 005e 00bf | | Action Accept_Activation 005f 4800 |H | Short_Literal 0x0 0060 e20e | | Load 0x1,0xe 0061 0aff | | Execute_Immediate Plus,-0x1 0062 00e2 | | Load_Encached Integer_Cache 0063 03f8 | | Declare_Type Discrete,Constrained 0064 4800 |H | Short_Literal 0x0 0065 00d9 | | Load_Top At_Offset_1 0066 0269 | i | Execute Discrete,Last 0067 e226 | & | Load 0x1,0x26 0068 02a0 | | Declare_Subprogram Null_Subprogram 0069 e228 | ( | Load 0x1,0x28 006a 0343 | C | Complete_Type Array,By_Defining 006b 00da | | Load_Top At_Offset_2 006c 03c4 | | Complete_Type Access,By_Component_Completion 006d 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call 006f 029d 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call 0071 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0072 00c7 | | Action Elaborate_Subprogram 0073 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0074 00c7 | | Action Elaborate_Subprogram 0075 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0076 00c7 | | Action Elaborate_Subprogram 0077 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0078 00c7 | | Action Elaborate_Subprogram 0079 1d17 | | Execute_Immediate Reference_Lex_1,0x17 007a 00c7 | | Action Elaborate_Subprogram 007b 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 007c 00c7 | | Action Elaborate_Subprogram 007d 1d18 | | Execute_Immediate Reference_Lex_1,0x18 007e 00c7 | | Action Elaborate_Subprogram 007f 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0080 00c7 | | Action Elaborate_Subprogram 0081 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0082 00c7 | | Action Elaborate_Subprogram 0083 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0084 00c7 | | Action Elaborate_Subprogram 0085 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0086 00c7 | | Action Elaborate_Subprogram 0087 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0088 00c7 | | Action Elaborate_Subprogram 0089 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 008a 00c7 | | Action Elaborate_Subprogram 008b 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 008c 00c7 | | Action Elaborate_Subprogram 008d 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 008e 00c7 | | Action Elaborate_Subprogram 008f 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0090 00c7 | | Action Elaborate_Subprogram 0091 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0092 00c7 | | Action Elaborate_Subprogram 0093 BODY_0008: 0093 00bc | | Action Signal_Activated 0094 00bb | | Action Signal_Completion 0095 0000 0000 | | .XXX[0x3] 0097 0000 | | 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 00a6 | | .CONST 0x00a6 ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0002 | | .CONST 0x0002 ; Number of locals 009b INIT_0098: 009b 00db | | Load_Top At_Offset_3 009c e20f | | Load 0x1,0xf 009d 0119 | | Execute Any,Check_In_Formal_Type 009e e5fe | | Load 0x2,-0x2 009f e20f | | Load 0x1,0xf 00a0 0119 | | Execute Any,Check_In_Formal_Type 00a1 822d | - | Call 0x1,0x2d 00a2 e5ff | | Load 0x2,-0x1 00a3 0227 | ' | Execute Access,All_Reference 00a4 01d7 | | Execute Vector,Field_Read 00a5 822c | , | Call 0x1,0x2c 00a6 BODY_0098: 00a6 00d8 | | Load_Top At_Offset_0 00a7 680c |h | Jump_Zero 0xb4 00a8 00d8 | | Load_Top At_Offset_0 00a9 0227 | ' | Execute Access,All_Reference 00aa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 00ab 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00ac 00d8 | | Load_Top At_Offset_0 00ad 0120 | | Execute Any,Is_Value 00ae 7002 |p | Jump_Nonzero 0xb1 00af 00d8 | | Load_Top At_Offset_0 00b0 011e | | Execute Any,Convert 00b1 e210 | | Load 0x1,0x10 00b2 0119 | | Execute Any,Check_In_Formal_Type 00b3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00b4 e220 | | Load 0x1,0x20 00b5 0257 | W | Execute Discrete,Raise 00b6 0000 0000 | | .XXX[0x2] 00b8 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 00bc 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 00c0 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 00c4 0000 0000 | | .BLANK 0000[0x4] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00d6 | | .CONST 0x00d6 ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0002 | | .CONST 0x0002 ; Number of locals 00cb INIT_00c8: 00cb 00db | | Load_Top At_Offset_3 00cc e20f | | Load 0x1,0xf 00cd 0119 | | Execute Any,Check_In_Formal_Type 00ce e5fe | | Load 0x2,-0x2 00cf e20f | | Load 0x1,0xf 00d0 0119 | | Execute Any,Check_In_Formal_Type 00d1 822d | - | Call 0x1,0x2d 00d2 e5ff | | Load 0x2,-0x1 00d3 0227 | ' | Execute Access,All_Reference 00d4 01d7 | | Execute Vector,Field_Read 00d5 822c | , | Call 0x1,0x2c 00d6 BODY_00c8: 00d6 00d8 | | Load_Top At_Offset_0 00d7 6808 |h | Jump_Zero 0xe0 00d8 00d8 | | Load_Top At_Offset_0 00d9 0227 | ' | Execute Access,All_Reference 00da 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 00db 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00dc c5fd | | Store 0x2,-0x3 00dd 4801 |H | Short_Literal 0x1 00de a5fc | | Store_Unchecked 0x2,-0x4 00df 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00e0 4800 |H | Short_Literal 0x0 00e1 a5fc | | Store_Unchecked 0x2,-0x4 00e2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00e3 0000 0000 | | .BLANK 0000[0x5] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00f6 | | .CONST 0x00f6 ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0002 | | .CONST 0x0002 ; Number of locals 00eb INIT_00e8: 00eb 00db | | Load_Top At_Offset_3 00ec e20f | | Load 0x1,0xf 00ed 0119 | | Execute Any,Check_In_Formal_Type 00ee e5fe | | Load 0x2,-0x2 00ef e20f | | Load 0x1,0xf 00f0 0119 | | Execute Any,Check_In_Formal_Type 00f1 822d | - | Call 0x1,0x2d 00f2 e5ff | | Load 0x2,-0x1 00f3 0227 | ' | Execute Access,All_Reference 00f4 01d7 | | Execute Vector,Field_Read 00f5 822c | , | Call 0x1,0x2c 00f6 BODY_00e8: 00f6 00d8 | | Load_Top At_Offset_0 00f7 6808 |h | Jump_Zero 0x100 00f8 00d8 | | Load_Top At_Offset_0 00f9 0227 | ' | Execute Access,All_Reference 00fa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 00fb e5fd | | Load 0x2,-0x3 00fc 017d | } | Execute Record,Structure_Write 00fd 4801 |H | Short_Literal 0x1 00fe a5fc | | Store_Unchecked 0x2,-0x4 00ff 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0100 4800 |H | Short_Literal 0x0 0101 a5fc | | Store_Unchecked 0x2,-0x4 0102 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0103 0000 0000 | | .BLANK 0000[0x5] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 0119 | | .CONST 0x0119 ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0004 | | .CONST 0x0004 ; Number of locals 010b INIT_0108: 010b 00da | | Load_Top At_Offset_2 010c e20f | | Load 0x1,0xf 010d 0119 | | Execute Any,Check_In_Formal_Type 010e 822d | - | Call 0x1,0x2d 010f e5fc | | Load 0x2,-0x4 0110 0227 | ' | Execute Access,All_Reference 0111 01d5 | | Execute Vector,Field_Reference 0112 0007 | | Action Break_Optional 0113 00db | | Load_Top At_Offset_3 0114 e20f | | Load 0x1,0xf 0115 0119 | | Execute Any,Check_In_Formal_Type 0116 00d9 | | Load_Top At_Offset_1 0117 822c | , | Call 0x1,0x2c 0118 00e1 | | Load_Encached Boolean_Cache 0119 BODY_0108: 0119 00d9 | | Load_Top At_Offset_1 011a 7017 |p | Jump_Nonzero 0x132 011b e227 | ' | Load 0x1,0x27 011c 0322 | " | Declare_Variable Record 011d 00d8 | | Load_Top At_Offset_0 011e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 011f e5ff | | Load 0x2,-0x1 0120 e212 | | Load 0x1,0x12 0121 3000 |0 | Execute Record,Field_Type,Field_Number 0x0 0122 0119 | | Execute Any,Check_In_Formal_Type 0123 00d9 | | Load_Top At_Offset_1 0124 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0125 e5fe | | Load 0x2,-0x2 0126 e212 | | Load 0x1,0x12 0127 3001 |0 | Execute Record,Field_Type,Field_Number 0x1 0128 0119 | | Execute Any,Check_In_Formal_Type 0129 00d0 | | Action Swap_Control 012a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 012b 00db | | Load_Top At_Offset_3 012c 00d9 | | Load_Top At_Offset_1 012d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 012e e226 | & | Load 0x1,0x26 012f 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0130 a402 | | Store_Unchecked 0x2,0x2 0131 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0132 e5fd | | Load 0x2,-0x3 0133 6802 |h | Jump_Zero 0x136 0134 e221 | ! | Load 0x1,0x21 0135 0257 | W | Execute Discrete,Raise 0136 e5fe | | Load 0x2,-0x2 0137 00da | | Load_Top At_Offset_2 0138 0227 | ' | Execute Access,All_Reference 0139 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 013a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 013b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 013c 0000 0000 | | .BLANK 0000[0x4] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 014e | N | .CONST 0x014e ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0004 | | .CONST 0x0004 ; Number of locals 0143 INIT_0140: 0143 00da | | Load_Top At_Offset_2 0144 e20f | | Load 0x1,0xf 0145 0119 | | Execute Any,Check_In_Formal_Type 0146 822d | - | Call 0x1,0x2d 0147 e5fe | | Load 0x2,-0x2 0148 0227 | ' | Execute Access,All_Reference 0149 01d5 | | Execute Vector,Field_Reference 014a 0007 | | Action Break_Optional 014b 00d8 | | Load_Top At_Offset_0 014c 0007 | | Action Break_Optional 014d e226 | & | Load 0x1,0x26 014e BODY_0140: 014e 00cf | | Action Mark_Auxiliary 014f 781c |x | Jump 0x16c 0150 00da | | Load_Top At_Offset_2 0151 0227 | ' | Execute Access,All_Reference 0152 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0153 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0154 e5ff | | Load 0x2,-0x1 0155 012f | / | Execute Any,Equal 0156 680e |h | Jump_Zero 0x165 0157 00d9 | | Load_Top At_Offset_1 0158 6807 |h | Jump_Zero 0x160 0159 00da | | Load_Top At_Offset_2 015a 0227 | ' | Execute Access,All_Reference 015b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 015c 00da | | Load_Top At_Offset_2 015d 0227 | ' | Execute Access,All_Reference 015e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 015f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0160 00da | | Load_Top At_Offset_2 0161 0227 | ' | Execute Access,All_Reference 0162 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0163 a402 | | Store_Unchecked 0x2,0x2 0164 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0165 00da | | Load_Top At_Offset_2 0166 003a | : | Store_Top Access,At_Offset_2 0167 00da | | Load_Top At_Offset_2 0168 0227 | ' | Execute Access,All_Reference 0169 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 016a 003b | ; | Store_Top Access,At_Offset_3 016b 00c9 | | Action Pop_Auxiliary_Loop 016c 00da | | Load_Top At_Offset_2 016d 77e2 |w | Jump_Nonzero 0x150 016e 00ce | | Action Pop_Auxiliary 016f e220 | | Load 0x1,0x20 0170 0257 | W | Execute Discrete,Raise 0171 0000 0000 | | .BLANK 0000[0x7] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017b | { | .CONST 0x017b ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0001 | | .CONST 0x0001 ; Number of locals 017b BODY_0178: 017b INIT_0178: 017b e229 | ) | Load 0x1,0x29 017c 03bc | | Declare_Variable Access,By_Allocation 017d a5fe | | Store_Unchecked 0x2,-0x2 017e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 017f 0000 | | .XXX[0x1] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0185 | | .CONST 0x0185 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0002 | | .CONST 0x0002 ; Number of locals 0183 INIT_0180: 0183 e22a | * | Load 0x1,0x2a 0184 0322 | " | Declare_Variable Record 0185 BODY_0180: 0185 00cf | | Action Mark_Auxiliary 0186 e22b | + | Load 0x1,0x2b 0187 0269 | i | Execute Discrete,Last 0188 4800 |H | Short_Literal 0x0 0189 0263 | c | Execute Discrete,Above_Bound 018a 7009 |p | Jump_Nonzero 0x194 018b 00d8 | | Load_Top At_Offset_0 018c e5ff | | Load 0x2,-0x1 018d 0227 | ' | Execute Access,All_Reference 018e 01d7 | | Execute Vector,Field_Read 018f 6802 |h | Jump_Zero 0x192 0190 4800 |H | Short_Literal 0x0 0191 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0192 00c8 | | Action Pop_Auxiliary_Range 0193 3ff7 |? | Loop_Increasing 0x18b 0194 00ce | | Action Pop_Auxiliary 0195 4801 |H | Short_Literal 0x1 0196 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0197 0000 | | .XXX[0x1] 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 00cf | | Action Mark_Auxiliary 019c e22b | + | Load 0x1,0x2b 019d 0269 | i | Execute Discrete,Last 019e 4800 |H | Short_Literal 0x0 019f 0263 | c | Execute Discrete,Above_Bound 01a0 7007 |p | Jump_Nonzero 0x1a8 01a1 e226 | & | Load 0x1,0x26 01a2 00d9 | | Load_Top At_Offset_1 01a3 e5ff | | Load 0x2,-0x1 01a4 0227 | ' | Execute Access,All_Reference 01a5 01d6 | | Execute Vector,Field_Write 01a6 00c8 | | Action Pop_Auxiliary_Range 01a7 3ff9 |? | Loop_Increasing 0x1a1 01a8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01a9 0000 0000 | | .BLANK 0000[0x7] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b5 | | .CONST 0x01b5 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0002 | | .CONST 0x0002 ; Number of locals 01b3 INIT_01b0: 01b3 029f 02eb | | Declare_Subprogram INIT_02e8,For_Call 01b5 BODY_01b0: 01b5 00cf | | Action Mark_Auxiliary 01b6 e22b | + | Load 0x1,0x2b 01b7 0269 | i | Execute Discrete,Last 01b8 4800 |H | Short_Literal 0x0 01b9 0263 | c | Execute Discrete,Above_Bound 01ba 7011 |p | Jump_Nonzero 0x1cc 01bb e5fe | | Load 0x2,-0x2 01bc 0229 | ) | Execute Access,All_Read 01bd 00d9 | | Load_Top At_Offset_1 01be 00d8 | | Load_Top At_Offset_0 01bf 00da | | Load_Top At_Offset_2 01c0 01d7 | | Execute Vector,Field_Read 01c1 00db | | Load_Top At_Offset_3 01c2 e5ff | | Load 0x2,-0x1 01c3 0227 | ' | Execute Access,All_Reference 01c4 01d7 | | Execute Vector,Field_Read 01c5 8402 | | Call 0x2,0x2 01c6 00d9 | | Load_Top At_Offset_1 01c7 00db | | Load_Top At_Offset_3 01c8 01d6 | | Execute Vector,Field_Write 01c9 00d2 | | Pop_Control Pop_Count_2 01ca 00c8 | | Action Pop_Auxiliary_Range 01cb 3fef |? | Loop_Increasing 0x1bb 01cc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01cd 0000 0000 | | .XXX[0x3] 01cf 0000 | | 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d5 | | .CONST 0x01d5 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0002 | | .CONST 0x0002 ; Number of locals 01d3 INIT_01d0: 01d3 e22a | * | Load 0x1,0x2a 01d4 0322 | " | Declare_Variable Record 01d5 BODY_01d0: 01d5 00db | | Load_Top At_Offset_3 01d6 7004 |p | Jump_Nonzero 0x1db 01d7 4801 |H | Short_Literal 0x1 01d8 e5fe | | Load 0x2,-0x2 01d9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01da 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01db 00cf | | Action Mark_Auxiliary 01dc e22b | + | Load 0x1,0x2b 01dd 0269 | i | Execute Discrete,Last 01de 4800 |H | Short_Literal 0x0 01df 0263 | c | Execute Discrete,Above_Bound 01e0 7018 |p | Jump_Nonzero 0x1f9 01e1 00d8 | | Load_Top At_Offset_0 01e2 e5ff | | Load 0x2,-0x1 01e3 0227 | ' | Execute Access,All_Reference 01e4 01d7 | | Execute Vector,Field_Read 01e5 e402 | | Load 0x2,0x2 01e6 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 01e7 00db | | Load_Top At_Offset_3 01e8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01e9 680d |h | Jump_Zero 0x1f7 01ea 4800 |H | Short_Literal 0x0 01eb e402 | | Load 0x2,0x2 01ec 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01ed 00d8 | | Load_Top At_Offset_0 01ee e402 | | Load 0x2,0x2 01ef 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01f0 e5ff | | Load 0x2,-0x1 01f1 e402 | | Load 0x2,0x2 01f2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01f3 00db | | Load_Top At_Offset_3 01f4 e5fe | | Load 0x2,-0x2 01f5 017d | } | Execute Record,Structure_Write 01f6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01f7 00c8 | | Action Pop_Auxiliary_Range 01f8 3fe8 |? | Loop_Increasing 0x1e1 01f9 00ce | | Action Pop_Auxiliary 01fa 4801 |H | Short_Literal 0x1 01fb 00d9 | | Load_Top At_Offset_1 01fc 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 01fd 00d8 | | Load_Top At_Offset_0 01fe e5fe | | Load 0x2,-0x2 01ff 017d | } | Execute Record,Structure_Write 0200 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0201 0000 0000 | | .BLANK 0000[0x7] 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 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 020d 0227 | ' | Execute Access,All_Reference 020e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 020f 00db | | Load_Top At_Offset_3 0210 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0211 00cf | | Action Mark_Auxiliary 0212 7818 |x | Jump 0x22b 0213 00db | | Load_Top At_Offset_3 0214 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0215 e22b | + | Load 0x1,0x2b 0216 0269 | i | Execute Discrete,Last 0217 027f | | Execute Discrete,Equal 0218 6804 |h | Jump_Zero 0x21d 0219 4801 |H | Short_Literal 0x1 021a e5ff | | Load 0x2,-0x1 021b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 021c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 021d 00db | | Load_Top At_Offset_3 021e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 021f 0a01 | | Execute_Immediate Plus,0x1 0220 e5ff | | Load 0x2,-0x1 0221 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0222 00db | | Load_Top At_Offset_3 0223 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0224 e5ff | | Load 0x2,-0x1 0225 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0226 0227 | ' | Execute Access,All_Reference 0227 01d7 | | Execute Vector,Field_Read 0228 e5ff | | Load 0x2,-0x1 0229 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 022a 00c9 | | Action Pop_Auxiliary_Loop 022b 00db | | Load_Top At_Offset_3 022c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 022d 6fe5 |o | Jump_Zero 0x213 022e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 022f 0000 | | .XXX[0x1] 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0233 | 3 | .CONST 0x0233 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0001 | | .CONST 0x0001 ; Number of locals 0233 BODY_0230: 0233 INIT_0230: 0233 00da | | Load_Top At_Offset_2 0234 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0235 0227 | ' | Execute Access,All_Reference 0236 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0237 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0238 00d8 | | Load_Top At_Offset_0 0239 0120 | | Execute Any,Is_Value 023a 7002 |p | Jump_Nonzero 0x23d 023b 00d8 | | Load_Top At_Offset_0 023c 011e | | Execute Any,Convert 023d e20f | | Load 0x1,0xf 023e 0119 | | Execute Any,Check_In_Formal_Type 023f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; -------------------------------------------------------------------------------------- 0240 0243 | C | .CONST 0x0243 ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0001 | | .CONST 0x0001 ; Number of locals 0243 BODY_0240: 0243 INIT_0240: 0243 00da | | Load_Top At_Offset_2 0244 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0245 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0246 0000 0000 | | .XXX[0x2] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024b | K | .CONST 0x024b ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0001 | | .CONST 0x0001 ; Number of locals 024b BODY_0248: 024b INIT_0248: 024b e229 | ) | Load 0x1,0x29 024c 00ca | | Action Exit_Nullary_Function 024d 0000 0000 | | .XXX[0x3] 024f 0000 | | 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 00da | | Load_Top At_Offset_2 0254 022d | - | Execute Access,Is_Null 0255 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0256 0000 0000 | | .XXX[0x2] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b 08e2 | | Execute_Immediate Raise,0xe2 025c 0000 0000 | | .BLANK 0000[0x4] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0271 | q | .CONST 0x0271 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0008 | | .CONST 0x0008 ; Number of locals 0263 INIT_0260: 0263 00e3 | | Load_Encached Natural_Cache 0264 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0265 00e3 | | Load_Encached Natural_Cache 0266 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0267 00e3 | | Load_Encached Natural_Cache 0268 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0269 00e3 | | Load_Encached Natural_Cache 026a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 026b 00e3 | | Load_Encached Natural_Cache 026c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 026d 029f 030b | | Declare_Subprogram INIT_0308,For_Call 026f 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call 0271 BODY_0260: 0271 e5fe | | Load 0x2,-0x2 0272 e002 | | Load 0x0,0x2 0273 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0274 e5ff | | Load 0x2,-0x1 0275 7005 |p | Jump_Nonzero 0x27b 0276 0092 0383 | | Action Push_String_Extended,0x383 ; " Map Empty" 0278 e002 | | Load 0x0,0x2 0279 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 027a 7813 |x | Jump 0x28e 027b e5fd | | Load 0x2,-0x3 027c 6804 |h | Jump_Zero 0x281 027d 0092 0384 | | Action Push_String_Extended,0x384 ; " " 027f e002 | | Load 0x0,0x2 0280 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0281 00cf | | Action Mark_Auxiliary 0282 e5ff | | Load 0x2,-0x1 0283 0227 | ' | Execute Access,All_Reference 0284 01dc | | Execute Vector,Last 0285 e5ff | | Load 0x2,-0x1 0286 0227 | ' | Execute Access,All_Reference 0287 01dd | | Execute Vector,First 0288 0263 | c | Execute Discrete,Above_Bound 0289 7003 |p | Jump_Nonzero 0x28d 028a 8408 | | Call 0x2,0x8 028b 00c8 | | Action Pop_Auxiliary_Range 028c 3ffd |? | Loop_Increasing 0x28a 028d 00ce | | Action Pop_Auxiliary 028e 4801 |H | Short_Literal 0x1 028f e002 | | Load 0x0,0x2 0290 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0291 0092 0385 | | Action Push_String_Extended,0x385 ; " Total map element count =" 0293 e402 | | Load 0x2,0x2 0294 00e0 | | Load_Encached Standard_Cache 0295 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0296 01cc | | Execute Vector,Catenate 0297 e002 | | Load 0x0,0x2 0298 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0299 0092 0386 | | Action Push_String_Extended,0x386 ; " Average set size =" 029b e402 | | Load 0x2,0x2 029c e20e | | Load 0x1,0xe 029d 0270 | p | Execute Discrete,Divide 029e 00e0 | | Load_Encached Standard_Cache 029f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02a0 01cc | | Execute Vector,Catenate 02a1 e002 | | Load 0x0,0x2 02a2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 02a3 0092 0387 | | Action Push_String_Extended,0x387 ; " Largest set size =" 02a5 e405 | | Load 0x2,0x5 02a6 00e0 | | Load_Encached Standard_Cache 02a7 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02a8 01cc | | Execute Vector,Catenate 02a9 e002 | | Load 0x0,0x2 02aa 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 02ab 0092 0388 | | Action Push_String_Extended,0x388 ; " Number of nonempty sets =" 02ad 00db | | Load_Top At_Offset_3 02ae 00e0 | | Load_Encached Standard_Cache 02af 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02b0 01cc | | Execute Vector,Catenate 02b1 e002 | | Load 0x0,0x2 02b2 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 02b3 4801 |H | Short_Literal 0x1 02b4 e002 | | Load 0x0,0x2 02b5 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 02b6 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02b7 0000 | | .XXX[0x1] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bc | | .CONST 0x02bc ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0002 | | .CONST 0x0002 ; Number of locals 02bb INIT_02b8: 02bb 00da | | Load_Top At_Offset_2 02bc BODY_02b8: 02bc 00cf | | Action Mark_Auxiliary 02bd 780e |x | Jump 0x2cc 02be 00d9 | | Load_Top At_Offset_1 02bf 0227 | ' | Execute Access,All_Reference 02c0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02c1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02c2 e5fe | | Load 0x2,-0x2 02c3 012f | / | Execute Any,Equal 02c4 6802 |h | Jump_Zero 0x2c7 02c5 00d9 | | Load_Top At_Offset_1 02c6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02c7 00d9 | | Load_Top At_Offset_1 02c8 0227 | ' | Execute Access,All_Reference 02c9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02ca 003a | : | Store_Top Access,At_Offset_2 02cb 00c9 | | Action Pop_Auxiliary_Loop 02cc 00d9 | | Load_Top At_Offset_1 02cd 77f0 |w | Jump_Nonzero 0x2be 02ce 00ce | | Action Pop_Auxiliary 02cf e226 | & | Load 0x1,0x26 02d0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02d1 0000 0000 | | .BLANK 0000[0x7] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db 00da | | Load_Top At_Offset_2 02dc 8211 | | Call 0x1,0x11 02dd e20e | | Load 0x1,0xe 02de 026e | n | Execute Discrete,Modulo 02df 00d8 | | Load_Top At_Offset_0 02e0 e22b | + | Load 0x1,0x2b 02e1 0260 | ` | Execute Discrete,In_Type 02e2 7001 |p | Jump_Nonzero 0x2e4 02e3 0801 | | Execute_Immediate Raise,0x1 02e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02e5 0000 0000 | | .XXX[0x3] 02e7 0000 | | 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02ed | | .CONST 0x02ed ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0002 | | .CONST 0x0002 ; Number of locals 02eb INIT_02e8: 02eb 00da | | Load_Top At_Offset_2 02ec 0007 | | Action Break_Optional 02ed BODY_02e8: 02ed e226 | & | Load 0x1,0x26 02ee a7fe | | Store_Unchecked 0x3,-0x2 02ef 00cf | | Action Mark_Auxiliary 02f0 7812 |x | Jump 0x303 02f1 e227 | ' | Load 0x1,0x27 02f2 0322 | " | Declare_Variable Record 02f3 00da | | Load_Top At_Offset_2 02f4 0227 | ' | Execute Access,All_Reference 02f5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02f6 00d9 | | Load_Top At_Offset_1 02f7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02f8 e7fe | | Load 0x3,-0x2 02f9 00d9 | | Load_Top At_Offset_1 02fa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02fb e226 | & | Load 0x1,0x26 02fc 03b6 | | Declare_Variable Access,By_Allocation,With_Value 02fd a7fe | | Store_Unchecked 0x3,-0x2 02fe 00d9 | | Load_Top At_Offset_1 02ff 0227 | ' | Execute Access,All_Reference 0300 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0301 003a | : | Store_Top Access,At_Offset_2 0302 00c9 | | Action Pop_Auxiliary_Loop 0303 00d9 | | Load_Top At_Offset_1 0304 77ec |w | Jump_Nonzero 0x2f1 0305 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0306 0000 0000 | | .XXX[0x2] 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 030e | | .CONST 0x030e ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0003 | | .CONST 0x0003 ; Number of locals 030b INIT_0308: 030b 00e3 | | Load_Encached Natural_Cache 030c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 030d 00db | | Load_Top At_Offset_3 030e BODY_0308: 030e 00cf | | Action Mark_Auxiliary 030f 7808 |x | Jump 0x318 0310 00da | | Load_Top At_Offset_2 0311 0a01 | | Execute_Immediate Plus,0x1 0312 005b | [ | Store_Top Discrete,At_Offset_3 0313 00d9 | | Load_Top At_Offset_1 0314 0227 | ' | Execute Access,All_Reference 0315 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0316 003a | : | Store_Top Access,At_Offset_2 0317 00c9 | | Action Pop_Auxiliary_Loop 0318 00d9 | | Load_Top At_Offset_1 0319 77f6 |w | Jump_Nonzero 0x310 031a 00ce | | Action Pop_Auxiliary 031b 00d9 | | Load_Top At_Offset_1 031c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 031d 0000 0000 | | .XXX[0x3] 031f 0000 | | 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 032c | , | .CONST 0x032c ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0003 | | .CONST 0x0003 ; Number of locals 0323 INIT_0320: 0323 e40b | | Load 0x2,0xb 0324 e5ff | | Load 0x2,-0x1 0325 0227 | ' | Execute Access,All_Reference 0326 01d5 | | Execute Vector,Field_Reference 0327 0007 | | Action Break_Optional 0328 00d8 | | Load_Top At_Offset_0 0329 8407 | | Call 0x2,0x7 032a 00e2 | | Load_Encached Integer_Cache 032b 03f1 | | Declare_Variable Discrete,With_Value 032c BODY_0320: 032c e402 | | Load 0x2,0x2 032d 00d9 | | Load_Top At_Offset_1 032e 0273 | s | Execute Discrete,Plus 032f c402 | | Store 0x2,0x2 0330 00d8 | | Load_Top At_Offset_0 0331 e405 | | Load 0x2,0x5 0332 027d | } | Execute Discrete,Greater 0333 6802 |h | Jump_Zero 0x336 0334 00d8 | | Load_Top At_Offset_0 0335 c405 | | Store 0x2,0x5 0336 00d8 | | Load_Top At_Offset_0 0337 6823 |h# | Jump_Zero 0x35b 0338 e406 | | Load 0x2,0x6 0339 0a01 | | Execute_Immediate Plus,0x1 033a c406 | | Store 0x2,0x6 033b e5fd | | Load 0x2,-0x3 033c 681e |h | Jump_Zero 0x35b 033d e40b | | Load 0x2,0xb 033e 00e0 | | Load_Encached Standard_Cache 033f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0340 0092 0389 | | Action Push_String_Extended,0x389 ; " =>" 0342 01cc | | Execute Vector,Catenate 0343 00d9 | | Load_Top At_Offset_1 0344 00e0 | | Load_Encached Standard_Cache 0345 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0346 01cc | | Execute Vector,Catenate 0347 0092 038a | | Action Push_String_Extended,0x38a ; ";" 0349 01cc | | Execute Vector,Catenate 034a e002 | | Load 0x0,0x2 034b 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 034c e403 | | Load 0x2,0x3 034d 0a01 | | Execute_Immediate Plus,0x1 034e c403 | | Store 0x2,0x3 034f e403 | | Load 0x2,0x3 0350 0c08 | | Execute_Immediate Greater_Equal,0x8 0351 6809 |h | Jump_Zero 0x35b 0352 4801 |H | Short_Literal 0x1 0353 e002 | | Load 0x0,0x2 0354 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0355 0092 0384 | | Action Push_String_Extended,0x384 ; " " 0357 e002 | | Load 0x0,0x2 0358 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0359 4800 |H | Short_Literal 0x0 035a a403 | | Store_Unchecked 0x2,0x3 035b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 035c 0000 0000 | | .BLANK 0000[0x4] 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0363 | c | .CONST 0x0363 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0001 | | .CONST 0x0001 ; Number of locals 0363 BODY_0360: 0363 INIT_0360: 0363 4601 |F | Jump_Case 0x2 0364 7801 |x | Jump 0x366 ; case 0x0 0365 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0366 00da | | Load_Top At_Offset_2 0367 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0368 1c00 | | Execute_Immediate Run_Utility,0x0 0369 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 036a 0000 0000 | | .BLANK 0000[0x6] 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 INIT_0370: 0373 4601 |F | Jump_Case 0x2 0374 7801 |x | Jump 0x376 ; case 0x0 0375 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0376 00da | | Load_Top At_Offset_2 0377 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0378 0125 | % | Execute Any,Set_Constraint 0379 00da | | Load_Top At_Offset_2 037a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 037b 1c00 | | Execute_Immediate Run_Utility,0x0 037c 00da | | Load_Top At_Offset_2 037d 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 037e 0125 | % | Execute Any,Set_Constraint 037f 00da | | Load_Top At_Offset_2 0380 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0381 1c00 | | Execute_Immediate Run_Utility,0x0 0382 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0383 ; -------------------------------------------------------------------------------------- 0383 ; STRING TABLE 0383 ; -------------------------------------------------------------------------------------- 0383 0012 | | .STRTAB 0x0012->0x038c ; " Map Empty" 0384 001b | | .STRTAB 0x001b->0x0391 ; " " 0385 001d | | .STRTAB 0x001d->0x0393 ; " Total map element count =" 0386 0036 | 6 | .STRTAB 0x0036->0x03a1 ; " Average set size =" 0387 004f | O | .STRTAB 0x004f->0x03ae ; " Largest set size =" 0388 0068 | h | .STRTAB 0x0068->0x03bc ; " Number of nonempty sets =" 0389 0081 | | .STRTAB 0x0081->0x03c9 ; " =>" 038a 0082 | | .STRTAB 0x0082->0x03cb ; ";" 038b 0081 | | .STREND 0x0081->0x03cb 038c 2020 4d61 | Ma| .STRTAB_STRINGS 03cc 0000 0000 | | .BLANK 0000[0x4] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; Debug Table 03d0 ; -------------------------------------------------------------------------------------- 03d0 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5daa,0x0000,0x0001,0x0000 03d6 0000 0000 | | .BLANK 0000[0x2a]