|
|
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: 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 For_Call,INIT_0370
000f 4802 |H | Short_Literal 0x2
0010 032e | . | Declare_Type Record,Defined,Visible
0011 029a 009b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0098
0013 029a 00cb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c8
0015 029a 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8
0017 029a 010b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0108
0019 029a 0143 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0140
001b 029a 017b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0178
001d 029a 0183 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0180
001f 029a 019b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0198
0021 029a 01b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b0
0023 029a 01d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01d0
0025 029a 020b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0208
0027 029a 0233 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0230
0029 029a 0243 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0240
002b 0093 0000 | | PushFullAddress InMicrocode
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 | | PushFullAddress InMicrocode
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 For_Outer_Call,Visible,Unelaborated,INIT_0248
003f 029a 0253 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0250
0041 029a 025b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0258
0043 029a 0263 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0260
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 For_Call,INIT_0360
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 For_Outer_Call,INIT_02b8
006f 029d 02db | | Declare_Subprogram For_Outer_Call,INIT_02d8
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_Result,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_Subprogram 0x3
00e0 4800 |H | Short_Literal 0x0
00e1 a5fc | | Store_Unchecked 0x2,-0x4
00e2 4503 |E | Exit_Subprogram 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_Subprogram 0x3
0100 4800 |H | Short_Literal 0x0
0101 a5fc | | Store_Unchecked 0x2,-0x4
0102 4503 |E | Exit_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Result,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_Result,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_Subprogram 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 For_Call,INIT_02e8
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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Subprogram 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_Result,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_Result,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_Result,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 For_Call,INIT_0308
026f 029f 0323 | #| Declare_Subprogram For_Call,INIT_0320
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_Subprogram 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_Result,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_Result,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_Result,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_Subprogram 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_Result,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_Subprogram 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 0x1
0364 7801 |x | Jump 0x366 ; case 0x0
0365 4302 |C | Exit_Subprogram From_Utility,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,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 0x1
0374 7801 |x | Jump 0x376 ; case 0x0
0375 4302 |C | Exit_Subprogram From_Utility,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,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]