|
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: 6144 (0x1800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 07b8 | | .CONST 0x07b8 ; 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 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0031 | 1 | .CONST 0x0031 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0018 | | .CONST 0x0018 ; Number of locals
000b INIT_0008:
000b 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated
000d 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
000f 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated
0011 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated
0013 00bf | | Action Accept_Activation
0014 0093 0000 | | push_full_address 0x0
0016 60b1 |` | Indirect_Literal Discrete,0xc8,{0x80000000, 0x00010000}
0017 0273 | s | Execute Discrete,Plus
0018 0007 | | Action Break_Optional
0019 0007 | | Action Break_Optional
001a 0007 | | Action Break_Optional
001b 1d0d | | Execute_Immediate Reference_Lex_1,0xd
001c 00c7 | | Action Elaborate_Subprogram
001d 1d0e | | Execute_Immediate Reference_Lex_1,0xe
001e 00c7 | | Action Elaborate_Subprogram
001f 029d 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call
0021 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0022 00c7 | | Action Elaborate_Subprogram
0023 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call
0025 029d 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call
0027 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call
0029 029d 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call
002b 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call
002d 029d 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call
002f 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0030 00c7 | | Action Elaborate_Subprogram
0031 BODY_0008:
0031 00bc | | Action Signal_Activated
0032 00bb | | Action Signal_Completion
0033 0000 0000 | | .BLANK 0000[0x5]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0048 | H | .CONST 0x0048 ; Address of begin
0039 00c1 | | .CONST 0x00c1 ; Address of exception handler
003a 0005 | | .CONST 0x0005 ; Number of locals
003b INIT_0038:
003b e002 | | Load 0x0,0x2
003c 03bc | | Declare_Variable Access,By_Allocation
003d 00d8 | | Load_Top At_Offset_0
003e 0227 | ' | Execute Access,All_Reference
003f 1c00 | | Execute_Immediate Run_Utility,0x0
0040 e003 | | Load 0x0,0x3
0041 0007 | | Action Break_Optional
0042 e004 | | Load 0x0,0x4
0043 0322 | " | Declare_Variable Record
0044 e005 | | Load 0x0,0x5
0045 0322 | " | Declare_Variable Record
0046 00d8 | | Load_Top At_Offset_0
0047 1c00 | | Execute_Immediate Run_Utility,0x0
0048 BODY_0038:
0048 4801 |H | Short_Literal 0x1
0049 e5fb | | Load 0x2,-0x5
004a 00d8 | | Load_Top At_Offset_0
004b e006 | | Load 0x0,0x6
004c 0260 | ` | Execute Discrete,In_Type
004d 7001 |p | Jump_Nonzero 0x4f
004e 0801 | | Execute_Immediate Raise,0x1
004f e5fc | | Load 0x2,-0x4
0050 00d8 | | Load_Top At_Offset_0
0051 e006 | | Load 0x0,0x6
0052 0260 | ` | Execute Discrete,In_Type
0053 7001 |p | Jump_Nonzero 0x55
0054 0801 | | Execute_Immediate Raise,0x1
0055 e5fe | | Load 0x2,-0x2
0056 e5ff | | Load 0x2,-0x1
0057 8007 | | Call 0x0,0x7
0058 00da | | Load_Top At_Offset_2
0059 017d | } | Execute Record,Structure_Write
005a 00d9 | | Load_Top At_Offset_1
005b e008 | | Load 0x0,0x8
005c 017f | | Execute Record,Equal
005d 6804 |h | Jump_Zero 0x62
005e e008 | | Load 0x0,0x8
005f 0320 | | Declare_Variable Record,Duplicate
0060 00cd | | Action Spare6_Action
0061 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0062 00d8 | | Load_Top At_Offset_0
0063 e009 | | Load 0x0,0x9
0064 00db | | Load_Top At_Offset_3
0065 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0066 e5ff | | Load 0x2,-0x1
0067 800a | | Call 0x0,0xa
0068 003b | ; | Store_Top Access,At_Offset_3
0069 00da | | Load_Top At_Offset_2
006a e003 | | Load 0x0,0x3
006b 022f | / | Execute Access,Equal
006c 6804 |h | Jump_Zero 0x71
006d e008 | | Load 0x0,0x8
006e 0320 | | Declare_Variable Record,Duplicate
006f 00cd | | Action Spare6_Action
0070 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
0071 e5fb | | Load 0x2,-0x5
0072 e402 | | Load 0x2,0x2
0073 0227 | ' | Execute Access,All_Reference
0074 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0075 e5fc | | Load 0x2,-0x4
0076 e402 | | Load 0x2,0x2
0077 0227 | ' | Execute Access,All_Reference
0078 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0079 4801 |H | Short_Literal 0x1
007a e402 | | Load 0x2,0x2
007b 0227 | ' | Execute Access,All_Reference
007c 380a |8 | Execute Record,Field_Write,Field_Number 0xa
007d 4800 |H | Short_Literal 0x0
007e e402 | | Load 0x2,0x2
007f 0227 | ' | Execute Access,All_Reference
0080 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0081 4802 |H | Short_Literal 0x2
0082 e402 | | Load 0x2,0x2
0083 0227 | ' | Execute Access,All_Reference
0084 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0085 e5fd | | Load 0x2,-0x3
0086 e00b | | Load 0x0,0xb
0087 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0088 e402 | | Load 0x2,0x2
0089 0227 | ' | Execute Access,All_Reference
008a 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
008b 4800 |H | Short_Literal 0x0
008c e402 | | Load 0x2,0x2
008d 0227 | ' | Execute Access,All_Reference
008e 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
008f 4808 |H | Short_Literal 0x8
0090 e402 | | Load 0x2,0x2
0091 0227 | ' | Execute Access,All_Reference
0092 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
0093 4800 |H | Short_Literal 0x0
0094 e402 | | Load 0x2,0x2
0095 0227 | ' | Execute Access,All_Reference
0096 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0097 4808 |H | Short_Literal 0x8
0098 e402 | | Load 0x2,0x2
0099 0227 | ' | Execute Access,All_Reference
009a 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
009b e5fc | | Load 0x2,-0x4
009c 0a07 | | Execute_Immediate Plus,0x7
009d 09fd | | Execute_Immediate Binary_Scale,-0x3
009e e402 | | Load 0x2,0x2
009f 0227 | ' | Execute Access,All_Reference
00a0 380b |8 | Execute Record,Field_Write,Field_Number 0xb
00a1 e5fb | | Load 0x2,-0x5
00a2 e5fc | | Load 0x2,-0x4
00a3 4800 |H | Short_Literal 0x0
00a4 4800 |H | Short_Literal 0x0
00a5 4800 |H | Short_Literal 0x0
00a6 4800 |H | Short_Literal 0x0
00a7 e402 | | Load 0x2,0x2
00a8 e403 | | Load 0x2,0x3
00a9 e404 | | Load 0x2,0x4
00aa 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00ab e5ff | | Load 0x2,-0x1
00ac 800c | | Call 0x0,0xc
00ad 00db | | Load_Top At_Offset_3
00ae 0229 | ) | Execute Access,All_Read
00af 00d8 | | Load_Top At_Offset_0
00b0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
00b1 e00d | | Load 0x0,0xd
00b2 e00e | | Load 0x0,0xe
00b3 a00f | | Store_Unchecked 0x0,0xf
00b4 8010 | | Call 0x0,0x10
00b5 00d9 | | Load_Top At_Offset_1
00b6 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
00b7 00d1 | | Pop_Control Pop_Count_1
00b8 00db | | Load_Top At_Offset_3
00b9 8011 | | Call 0x0,0x11
00ba c402 | | Store 0x2,0x2
00bb 00da | | Load_Top At_Offset_2
00bc e5ff | | Load 0x2,-0x1
00bd 8012 | | Call 0x0,0x12
00be 003b | ; | Store_Top Access,At_Offset_3
00bf 00d9 | | Load_Top At_Offset_1
00c0 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5
00c1 TRAP_0038:
00c1 0007 | | Action Break_Optional
00c2 e402 | | Load 0x2,0x2
00c3 8011 | | Call 0x0,0x11
00c4 c402 | | Store 0x2,0x2
00c5 00d8 | | Load_Top At_Offset_0
00c6 0101 | | Execute Exception,Reraise
00c7 0000 | | .XXX[0x1]
00c8 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00cc 0000 0000 | | .BLANK 0000[0x4]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00dd | | .CONST 0x00dd ; Address of begin
00d1 017c | | | .CONST 0x017c ; Address of exception handler
00d2 0005 | | .CONST 0x0005 ; Number of locals
00d3 INIT_00d0:
00d3 e002 | | Load 0x0,0x2
00d4 0007 | | Action Break_Optional
00d5 e003 | | Load 0x0,0x3
00d6 0007 | | Action Break_Optional
00d7 e005 | | Load 0x0,0x5
00d8 0322 | " | Declare_Variable Record
00d9 00d8 | | Load_Top At_Offset_0
00da 1c00 | | Execute_Immediate Run_Utility,0x0
00db e004 | | Load 0x0,0x4
00dc 0322 | " | Declare_Variable Record
00dd BODY_00d0:
00dd e5f8 | | Load 0x2,-0x8
00de e5fb | | Load 0x2,-0x5
00df 00d8 | | Load_Top At_Offset_0
00e0 e006 | | Load 0x0,0x6
00e1 0260 | ` | Execute Discrete,In_Type
00e2 7001 |p | Jump_Nonzero 0xe4
00e3 0801 | | Execute_Immediate Raise,0x1
00e4 e5fc | | Load 0x2,-0x4
00e5 00d8 | | Load_Top At_Offset_0
00e6 e006 | | Load 0x0,0x6
00e7 0260 | ` | Execute Discrete,In_Type
00e8 7001 |p | Jump_Nonzero 0xea
00e9 0801 | | Execute_Immediate Raise,0x1
00ea e5fe | | Load 0x2,-0x2
00eb e5ff | | Load 0x2,-0x1
00ec 8007 | | Call 0x0,0x7
00ed 00d9 | | Load_Top At_Offset_1
00ee 017d | } | Execute Record,Structure_Write
00ef 00d8 | | Load_Top At_Offset_0
00f0 e008 | | Load 0x0,0x8
00f1 017f | | Execute Record,Equal
00f2 6804 |h | Jump_Zero 0xf7
00f3 e008 | | Load 0x0,0x8
00f4 0320 | | Declare_Variable Record,Duplicate
00f5 00cd | | Action Spare6_Action
00f6 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
00f7 e5fa | | Load 0x2,-0x6
00f8 00da | | Load_Top At_Offset_2
00f9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00fa e5f9 | | Load 0x2,-0x7
00fb 00da | | Load_Top At_Offset_2
00fc 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00fd 00d9 | | Load_Top At_Offset_1
00fe e013 | | Load 0x0,0x13
00ff 0337 | 7 | Declare_Variable Array
0100 4801 |H | Short_Literal 0x1
0101 481d |H | Short_Literal 0x1d
0102 00da | | Load_Top At_Offset_2
0103 01d6 | | Execute Vector,Field_Write
0104 4801 |H | Short_Literal 0x1
0105 481c |H | Short_Literal 0x1c
0106 00da | | Load_Top At_Offset_2
0107 01d6 | | Execute Vector,Field_Write
0108 481b |H | Short_Literal 0x1b
0109 4800 |H | Short_Literal 0x0
010a 4800 |H | Short_Literal 0x0
010b 00d9 | | Load_Top At_Offset_1
010c e407 | | Load 0x2,0x7
010d 01d6 | | Execute Vector,Field_Write
010e 3ffb |? | Loop_Increasing 0x10a
010f 4800 |H | Short_Literal 0x0
0110 481e |H | Short_Literal 0x1e
0111 00da | | Load_Top At_Offset_2
0112 01d6 | | Execute Vector,Field_Write
0113 4800 |H | Short_Literal 0x0
0114 481f |H | Short_Literal 0x1f
0115 00da | | Load_Top At_Offset_2
0116 01d6 | | Execute Vector,Field_Write
0117 e013 | | Load 0x0,0x13
0118 01c3 | | Execute Vector,Check_In_Type
0119 00da | | Load_Top At_Offset_2
011a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
011b e5ff | | Load 0x2,-0x1
011c 800a | | Call 0x0,0xa
011d 003b | ; | Store_Top Access,At_Offset_3
011e 00da | | Load_Top At_Offset_2
011f e003 | | Load 0x0,0x3
0120 022f | / | Execute Access,Equal
0121 6804 |h | Jump_Zero 0x126
0122 e008 | | Load 0x0,0x8
0123 0320 | | Declare_Variable Record,Duplicate
0124 00cd | | Action Spare6_Action
0125 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
0126 e002 | | Load 0x0,0x2
0127 03bc | | Declare_Variable Access,By_Allocation
0128 00d8 | | Load_Top At_Offset_0
0129 0227 | ' | Execute Access,All_Reference
012a 1c00 | | Execute_Immediate Run_Utility,0x0
012b a402 | | Store_Unchecked 0x2,0x2
012c e5fb | | Load 0x2,-0x5
012d e402 | | Load 0x2,0x2
012e 0227 | ' | Execute Access,All_Reference
012f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0130 e5fc | | Load 0x2,-0x4
0131 e402 | | Load 0x2,0x2
0132 0227 | ' | Execute Access,All_Reference
0133 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0134 4801 |H | Short_Literal 0x1
0135 e402 | | Load 0x2,0x2
0136 0227 | ' | Execute Access,All_Reference
0137 380a |8 | Execute Record,Field_Write,Field_Number 0xa
0138 4800 |H | Short_Literal 0x0
0139 e402 | | Load 0x2,0x2
013a 0227 | ' | Execute Access,All_Reference
013b 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
013c 4800 |H | Short_Literal 0x0
013d e402 | | Load 0x2,0x2
013e 0227 | ' | Execute Access,All_Reference
013f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0140 e5fd | | Load 0x2,-0x3
0141 e00b | | Load 0x0,0xb
0142 03b6 | | Declare_Variable Access,By_Allocation,With_Value
0143 e402 | | Load 0x2,0x2
0144 0227 | ' | Execute Access,All_Reference
0145 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0146 4800 |H | Short_Literal 0x0
0147 e402 | | Load 0x2,0x2
0148 0227 | ' | Execute Access,All_Reference
0149 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
014a 4808 |H | Short_Literal 0x8
014b e402 | | Load 0x2,0x2
014c 0227 | ' | Execute Access,All_Reference
014d 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
014e 4800 |H | Short_Literal 0x0
014f e402 | | Load 0x2,0x2
0150 0227 | ' | Execute Access,All_Reference
0151 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0152 4808 |H | Short_Literal 0x8
0153 e402 | | Load 0x2,0x2
0154 0227 | ' | Execute Access,All_Reference
0155 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0156 e5fc | | Load 0x2,-0x4
0157 0a07 | | Execute_Immediate Plus,0x7
0158 09fd | | Execute_Immediate Binary_Scale,-0x3
0159 e402 | | Load 0x2,0x2
015a 0227 | ' | Execute Access,All_Reference
015b 380b |8 | Execute Record,Field_Write,Field_Number 0xb
015c e5fb | | Load 0x2,-0x5
015d e5fc | | Load 0x2,-0x4
015e 4800 |H | Short_Literal 0x0
015f 4800 |H | Short_Literal 0x0
0160 4800 |H | Short_Literal 0x0
0161 4800 |H | Short_Literal 0x0
0162 e402 | | Load 0x2,0x2
0163 e403 | | Load 0x2,0x3
0164 e405 | | Load 0x2,0x5
0165 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0166 e5ff | | Load 0x2,-0x1
0167 800c | | Call 0x0,0xc
0168 00db | | Load_Top At_Offset_3
0169 0229 | ) | Execute Access,All_Read
016a 00d8 | | Load_Top At_Offset_0
016b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
016c e00d | | Load 0x0,0xd
016d e00e | | Load 0x0,0xe
016e a00f | | Store_Unchecked 0x0,0xf
016f 8010 | | Call 0x0,0x10
0170 00d9 | | Load_Top At_Offset_1
0171 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0172 00d1 | | Pop_Control Pop_Count_1
0173 00db | | Load_Top At_Offset_3
0174 8011 | | Call 0x0,0x11
0175 c402 | | Store 0x2,0x2
0176 00da | | Load_Top At_Offset_2
0177 e5ff | | Load 0x2,-0x1
0178 8012 | | Call 0x0,0x12
0179 003b | ; | Store_Top Access,At_Offset_3
017a 00d8 | | Load_Top At_Offset_0
017b 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8
017c TRAP_00d0:
017c 0007 | | Action Break_Optional
017d e402 | | Load 0x2,0x2
017e 8011 | | Call 0x0,0x11
017f c402 | | Store 0x2,0x2
0180 00d8 | | Load_Top At_Offset_0
0181 0101 | | Execute Exception,Reraise
0182 0000 0000 | | .BLANK 0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 019d | | .CONST 0x019d ; Address of begin
0189 02d1 | | .CONST 0x02d1 ; Address of exception handler
018a 0009 | | .CONST 0x0009 ; Number of locals
018b INIT_0188:
018b e00b | | Load 0x0,0xb
018c 0007 | | Action Break_Optional
018d e014 | | Load 0x0,0x14
018e 0007 | | Action Break_Optional
018f e014 | | Load 0x0,0x14
0190 0007 | | Action Break_Optional
0191 e015 | | Load 0x0,0x15
0192 0007 | | Action Break_Optional
0193 e002 | | Load 0x0,0x2
0194 0007 | | Action Break_Optional
0195 e016 | | Load 0x0,0x16
0196 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0197 02c7 | | Declare_Variable Any
0198 00d8 | | Load_Top At_Offset_0
0199 1c00 | | Execute_Immediate Run_Utility,0x0
019a 00e3 | | Load_Encached Natural_Cache
019b 029f 06e3 | | Declare_Subprogram INIT_06e0,For_Call
019d BODY_0188:
019d 00be | | Action Activate_Tasks
019e 4800 |H | Short_Literal 0x0
019f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
01a0 00cf | | Action Mark_Auxiliary
01a1 e5fe | | Load 0x2,-0x2
01a2 01da | | Execute Vector,Bounds
01a3 0264 | d | Execute Discrete,Below_Bound
01a4 700b |p | Jump_Nonzero 0x1b0
01a5 00d8 | | Load_Top At_Offset_0
01a6 e5fe | | Load 0x2,-0x2
01a7 01d7 | | Execute Vector,Field_Read
01a8 0f2e | . | Execute_Immediate Equal,0x2e
01a9 6804 |h | Jump_Zero 0x1ae
01aa 00d8 | | Load_Top At_Offset_0
01ab a408 | | Store_Unchecked 0x2,0x8
01ac 00d2 | | Pop_Control Pop_Count_2
01ad 7802 |x | Jump 0x1b0
01ae 00c8 | | Action Pop_Auxiliary_Range
01af 37f5 |7 | Loop_Decreasing 0x1a5
01b0 00ce | | Action Pop_Auxiliary
01b1 00d9 | | Load_Top At_Offset_1
01b2 7004 |p | Jump_Nonzero 0x1b7
01b3 e5fe | | Load 0x2,-0x2
01b4 01dd | | Execute Vector,First
01b5 005a | Z | Store_Top Discrete,At_Offset_2
01b6 7803 |x | Jump 0x1ba
01b7 00d9 | | Load_Top At_Offset_1
01b8 0a01 | | Execute_Immediate Plus,0x1
01b9 005a | Z | Store_Top Discrete,At_Offset_2
01ba 8409 | | Call 0x2,0x9
01bb 4801 |H | Short_Literal 0x1
01bc 4801 |H | Short_Literal 0x1
01bd e5fb | | Load 0x2,-0x5
01be e5fc | | Load 0x2,-0x4
01bf 4800 |H | Short_Literal 0x0
01c0 4800 |H | Short_Literal 0x0
01c1 e5fd | | Load 0x2,-0x3
01c2 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01c3 e5ff | | Load 0x2,-0x1
01c4 8017 | | Call 0x0,0x17
01c5 a406 | | Store_Unchecked 0x2,0x6
01c6 00db | | Load_Top At_Offset_3
01c7 e002 | | Load 0x0,0x2
01c8 022f | / | Execute Access,Equal
01c9 6806 |h | Jump_Zero 0x1d0
01ca 00da | | Load_Top At_Offset_2
01cb e016 | | Load 0x0,0x16
01cc 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01cd c407 | | Store 0x2,0x7
01ce 4804 |H | Short_Literal 0x4
01cf 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
01d0 e00b | | Load 0x0,0xb
01d1 e014 | | Load 0x0,0x14
01d2 e406 | | Load 0x2,0x6
01d3 8212 | | Call 0x1,0x12
01d4 c404 | | Store 0x2,0x4
01d5 c402 | | Store 0x2,0x2
01d6 00db | | Load_Top At_Offset_3
01d7 8018 | | Call 0x0,0x18
01d8 c406 | | Store 0x2,0x6
01d9 e402 | | Load 0x2,0x2
01da 7006 |p | Jump_Nonzero 0x1e1
01db 00da | | Load_Top At_Offset_2
01dc e016 | | Load 0x0,0x16
01dd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01de c407 | | Store 0x2,0x7
01df 4803 |H | Short_Literal 0x3
01e0 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
01e1 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define "
01e3 00db | | Load_Top At_Offset_3
01e4 e016 | | Load 0x0,0x16
01e5 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01e6 00d9 | | Load_Top At_Offset_1
01e7 e5fe | | Load 0x2,-0x2
01e8 01dc | | Execute Vector,Last
01e9 e5fe | | Load 0x2,-0x2
01ea 01cf | | Execute Vector,Slice_Read
01eb 00db | | Load_Top At_Offset_3
01ec e016 | | Load 0x0,0x16
01ed 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01ee 0092 0751 | Q| Action Push_String_Extended,0x751 ; "_width"
01f0 00db | | Load_Top At_Offset_3
01f1 e016 | | Load 0x0,0x16
01f2 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01f3 e019 | | Load 0x0,0x19
01f4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01f5 e019 | | Load 0x0,0x19
01f6 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01f7 e5fc | | Load 0x2,-0x4
01f8 e407 | | Load 0x2,0x7
01f9 e019 | | Load 0x0,0x19
01fa 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01fb 4801 |H | Short_Literal 0x1
01fc 00db | | Load_Top At_Offset_3
01fd e016 | | Load 0x0,0x16
01fe 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
01ff 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define "
0201 00db | | Load_Top At_Offset_3
0202 e016 | | Load 0x0,0x16
0203 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0204 00d9 | | Load_Top At_Offset_1
0205 e5fe | | Load 0x2,-0x2
0206 01dc | | Execute Vector,Last
0207 e5fe | | Load 0x2,-0x2
0208 01cf | | Execute Vector,Slice_Read
0209 00db | | Load_Top At_Offset_3
020a e016 | | Load 0x0,0x16
020b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
020c 0092 0752 | R| Action Push_String_Extended,0x752 ; "_height"
020e 00db | | Load_Top At_Offset_3
020f e016 | | Load 0x0,0x16
0210 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0211 e019 | | Load 0x0,0x19
0212 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0213 e019 | | Load 0x0,0x19
0214 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0215 e5fb | | Load 0x2,-0x5
0216 e407 | | Load 0x2,0x7
0217 e019 | | Load 0x0,0x19
0218 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0219 4801 |H | Short_Literal 0x1
021a 00db | | Load_Top At_Offset_3
021b e016 | | Load 0x0,0x16
021c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
021d e5fa | | Load 0x2,-0x6
021e 4fff |O | Short_Literal -0x1
021f 027e | ~ | Execute Discrete,Not_Equal
0220 683c |h< | Jump_Zero 0x25d
0221 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define "
0223 00db | | Load_Top At_Offset_3
0224 e016 | | Load 0x0,0x16
0225 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0226 00d9 | | Load_Top At_Offset_1
0227 e5fe | | Load 0x2,-0x2
0228 01dc | | Execute Vector,Last
0229 e5fe | | Load 0x2,-0x2
022a 01cf | | Execute Vector,Slice_Read
022b 00db | | Load_Top At_Offset_3
022c e016 | | Load 0x0,0x16
022d 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
022e 0092 0753 | S| Action Push_String_Extended,0x753 ; "_x_hot "
0230 00db | | Load_Top At_Offset_3
0231 e016 | | Load 0x0,0x16
0232 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0233 e019 | | Load 0x0,0x19
0234 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0235 e019 | | Load 0x0,0x19
0236 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0237 e5fa | | Load 0x2,-0x6
0238 e407 | | Load 0x2,0x7
0239 e019 | | Load 0x0,0x19
023a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
023b 4801 |H | Short_Literal 0x1
023c 00db | | Load_Top At_Offset_3
023d e016 | | Load 0x0,0x16
023e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
023f 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define "
0241 00db | | Load_Top At_Offset_3
0242 e016 | | Load 0x0,0x16
0243 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0244 00d9 | | Load_Top At_Offset_1
0245 e5fe | | Load 0x2,-0x2
0246 01dc | | Execute Vector,Last
0247 e5fe | | Load 0x2,-0x2
0248 01cf | | Execute Vector,Slice_Read
0249 00db | | Load_Top At_Offset_3
024a e016 | | Load 0x0,0x16
024b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
024c 0092 0754 | T| Action Push_String_Extended,0x754 ; "_y_hot "
024e 00db | | Load_Top At_Offset_3
024f e016 | | Load 0x0,0x16
0250 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0251 e019 | | Load 0x0,0x19
0252 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0253 e019 | | Load 0x0,0x19
0254 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0255 e5f9 | | Load 0x2,-0x7
0256 e407 | | Load 0x2,0x7
0257 e019 | | Load 0x0,0x19
0258 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0259 4801 |H | Short_Literal 0x1
025a 00db | | Load_Top At_Offset_3
025b e016 | | Load 0x0,0x16
025c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
025d 0092 0755 | U| Action Push_String_Extended,0x755 ; "static char "
025f 00db | | Load_Top At_Offset_3
0260 e016 | | Load 0x0,0x16
0261 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0262 00d9 | | Load_Top At_Offset_1
0263 e5fe | | Load 0x2,-0x2
0264 01dc | | Execute Vector,Last
0265 e5fe | | Load 0x2,-0x2
0266 01cf | | Execute Vector,Slice_Read
0267 00db | | Load_Top At_Offset_3
0268 e016 | | Load 0x0,0x16
0269 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
026a 0092 0756 | V| Action Push_String_Extended,0x756 ; "_bits() := {"
026c 00db | | Load_Top At_Offset_3
026d e016 | | Load 0x0,0x16
026e 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
026f 4801 |H | Short_Literal 0x1
0270 00db | | Load_Top At_Offset_3
0271 e016 | | Load 0x0,0x16
0272 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0273 e402 | | Load 0x2,0x2
0274 0227 | ' | Execute Access,All_Reference
0275 01dd | | Execute Vector,First
0276 c403 | | Store 0x2,0x3
0277 00cf | | Action Mark_Auxiliary
0278 e404 | | Load 0x2,0x4
0279 0aff | | Execute_Immediate Plus,-0x1
027a 4800 |H | Short_Literal 0x0
027b 0263 | c | Execute Discrete,Above_Bound
027c 703e |p> | Jump_Nonzero 0x2bb
027d 00d8 | | Load_Top At_Offset_0
027e 700a |p | Jump_Nonzero 0x289
027f 4801 |H | Short_Literal 0x1
0280 e407 | | Load 0x2,0x7
0281 e016 | | Load 0x0,0x16
0282 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0283 0092 0757 | W| Action Push_String_Extended,0x757 ; " "
0285 e407 | | Load 0x2,0x7
0286 e016 | | Load 0x0,0x16
0287 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0288 7813 |x | Jump 0x29c
0289 00d8 | | Load_Top At_Offset_0
028a 480c |H | Short_Literal 0xc
028b 026f | o | Execute Discrete,Remainder
028c 700a |p | Jump_Nonzero 0x297
028d 4801 |H | Short_Literal 0x1
028e e407 | | Load 0x2,0x7
028f e016 | | Load 0x0,0x16
0290 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0291 0092 0757 | W| Action Push_String_Extended,0x757 ; " "
0293 e407 | | Load 0x2,0x7
0294 e016 | | Load 0x0,0x16
0295 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0296 7805 |x | Jump 0x29c
0297 0092 0758 | X| Action Push_String_Extended,0x758 ; ", "
0299 e407 | | Load 0x2,0x7
029a e016 | | Load 0x0,0x16
029b 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
029c e403 | | Load 0x2,0x3
029d e402 | | Load 0x2,0x2
029e 0227 | ' | Execute Access,All_Reference
029f 01d7 | | Execute Vector,Field_Read
02a0 a405 | | Store_Unchecked 0x2,0x5
02a1 e405 | | Load 0x2,0x5
02a2 0d10 | | Execute_Immediate Less,0x10
02a3 6806 |h | Jump_Zero 0x2aa
02a4 0092 0759 | Y| Action Push_String_Extended,0x759 ; "0x0"
02a6 e407 | | Load 0x2,0x7
02a7 e016 | | Load 0x0,0x16
02a8 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
02a9 7805 |x | Jump 0x2af
02aa 0092 075a | Z| Action Push_String_Extended,0x75a ; "0x"
02ac e407 | | Load 0x2,0x7
02ad e016 | | Load 0x0,0x16
02ae 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
02af 4810 |H | Short_Literal 0x10
02b0 e019 | | Load 0x0,0x19
02b1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02b2 e405 | | Load 0x2,0x5
02b3 e407 | | Load 0x2,0x7
02b4 e019 | | Load 0x0,0x19
02b5 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02b6 e403 | | Load 0x2,0x3
02b7 0a01 | | Execute_Immediate Plus,0x1
02b8 c403 | | Store 0x2,0x3
02b9 00c8 | | Action Pop_Auxiliary_Range
02ba 3fc2 |? | Loop_Increasing 0x27d
02bb 00ce | | Action Pop_Auxiliary
02bc 0092 075b | [| Action Push_String_Extended,0x75b ; "}"
02be 00db | | Load_Top At_Offset_3
02bf e016 | | Load 0x0,0x16
02c0 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
02c1 4801 |H | Short_Literal 0x1
02c2 00db | | Load_Top At_Offset_3
02c3 e016 | | Load 0x0,0x16
02c4 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
02c5 e402 | | Load 0x2,0x2
02c6 e00d | | Load 0x0,0xd
02c7 e00e | | Load 0x0,0xe
02c8 a00f | | Store_Unchecked 0x0,0xf
02c9 8010 | | Call 0x0,0x10
02ca c402 | | Store 0x2,0x2
02cb 00da | | Load_Top At_Offset_2
02cc e016 | | Load 0x0,0x16
02cd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02ce c407 | | Store 0x2,0x7
02cf 4800 |H | Short_Literal 0x0
02d0 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
02d1 TRAP_0188:
02d1 0007 | | Action Break_Optional
02d2 e402 | | Load 0x2,0x2
02d3 e00d | | Load 0x0,0xd
02d4 e00e | | Load 0x0,0xe
02d5 a00f | | Store_Unchecked 0x0,0xf
02d6 8010 | | Call 0x0,0x10
02d7 c402 | | Store 0x2,0x2
02d8 00db | | Load_Top At_Offset_3
02d9 e016 | | Load 0x0,0x16
02da 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02db c407 | | Store 0x2,0x7
02dc 00d8 | | Load_Top At_Offset_0
02dd 0101 | | Execute Exception,Reraise
02de 0000 0000 | | .XXX[0x2]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 0315 | | .CONST 0x0315 ; Address of begin
02e1 0520 | | .CONST 0x0520 ; Address of exception handler
02e2 0019 | | .CONST 0x0019 ; Number of locals
02e3 INIT_02e0:
02e3 e016 | | Load 0x0,0x16
02e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02e5 02c7 | | Declare_Variable Any
02e6 00d8 | | Load_Top At_Offset_0
02e7 1c00 | | Execute_Immediate Run_Utility,0x0
02e8 e00b | | Load 0x0,0xb
02e9 0007 | | Action Break_Optional
02ea e014 | | Load 0x0,0x14
02eb 0007 | | Action Break_Optional
02ec 4801 |H | Short_Literal 0x1
02ed 4be8 |K | Short_Literal 0x3e8
02ee 00e9 | | Load_Encached String_Cache
02ef 035b | [ | Declare_Type Array,Constrained
02f0 0337 | 7 | Declare_Variable Array
02f1 00e3 | | Load_Encached Natural_Cache
02f2 00e3 | | Load_Encached Natural_Cache
02f3 e014 | | Load 0x0,0x14
02f4 0007 | | Action Break_Optional
02f5 e014 | | Load 0x0,0x14
02f6 0007 | | Action Break_Optional
02f7 00e3 | | Load_Encached Natural_Cache
02f8 00e3 | | Load_Encached Natural_Cache
02f9 00e3 | | Load_Encached Natural_Cache
02fa e01a | | Load 0x0,0x1a
02fb 0007 | | Action Break_Optional
02fc e01a | | Load 0x0,0x1a
02fd 0007 | | Action Break_Optional
02fe 00e1 | | Load_Encached Boolean_Cache
02ff e014 | | Load 0x0,0x14
0300 0007 | | Action Break_Optional
0301 e014 | | Load 0x0,0x14
0302 0007 | | Action Break_Optional
0303 e01b | | Load 0x0,0x1b
0304 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0305 e01b | | Load 0x0,0x1b
0306 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0307 4fff |O | Short_Literal -0x1
0308 e01c | | Load 0x0,0x1c
0309 03f1 | | Declare_Variable Discrete,With_Value
030a 4fff |O | Short_Literal -0x1
030b e01c | | Load 0x0,0x1c
030c 03f1 | | Declare_Variable Discrete,With_Value
030d e004 | | Load 0x0,0x4
030e 0322 | " | Declare_Variable Record
030f 029f 06f3 | | Declare_Subprogram INIT_06f0,For_Call
0311 029f 0703 | | Declare_Subprogram INIT_0700,For_Call
0313 029f 071b | | Declare_Subprogram INIT_0718,For_Call
0315 BODY_02e0:
0315 00be | | Action Activate_Tasks
0316 8417 | | Call 0x2,0x17
0317 00cf | | Action Mark_Auxiliary
0318 79d0 |y | Jump 0x4e9
0319 00e3 | | Load_Encached Natural_Cache
031a e405 | | Load 0x2,0x5
031b e402 | | Load 0x2,0x2
031c e016 | | Load 0x0,0x16
031d 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
031e 00d1 | | Pop_Control Pop_Count_1
031f c407 | | Store 0x2,0x7
0320 e402 | | Load 0x2,0x2
0321 e016 | | Load 0x0,0x16
0322 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0323 7002 |p | Jump_Nonzero 0x326
0324 e211 | | Load 0x1,0x11
0325 0257 | W | Execute Discrete,Raise
0326 4801 |H | Short_Literal 0x1
0327 a406 | | Store_Unchecked 0x2,0x6
0328 e406 | | Load 0x2,0x6
0329 4800 |H | Short_Literal 0x0
032a 0092 0750 | P| Action Push_String_Extended,0x750 ; "#define "
032c e407 | | Load 0x2,0x7
032d e405 | | Load 0x2,0x5
032e 8214 | | Call 0x1,0x14
032f c406 | | Store 0x2,0x6
0330 e406 | | Load 0x2,0x6
0331 0c02 | | Execute_Immediate Greater_Equal,0x2
0332 6881 |h | Jump_Zero 0x3b4
0333 00e3 | | Load_Encached Natural_Cache
0334 00e3 | | Load_Encached Natural_Cache
0335 e406 | | Load 0x2,0x6
0336 e407 | | Load 0x2,0x7
0337 e405 | | Load 0x2,0x5
0338 8216 | | Call 0x1,0x16
0339 c406 | | Store 0x2,0x6
033a c40a | | Store 0x2,0xa
033b c40b | | Store 0x2,0xb
033c e406 | | Load 0x2,0x6
033d 4801 |H | Short_Literal 0x1
033e 0092 0757 | W| Action Push_String_Extended,0x757 ; " "
0340 e407 | | Load 0x2,0x7
0341 e405 | | Load 0x2,0x5
0342 8214 | | Call 0x1,0x14
0343 c406 | | Store 0x2,0x6
0344 e01a | | Load 0x0,0x1a
0345 e406 | | Load 0x2,0x6
0346 e407 | | Load 0x2,0x7
0347 e405 | | Load 0x2,0x5
0348 8217 | | Call 0x1,0x17
0349 c406 | | Store 0x2,0x6
034a c40d | | Store 0x2,0xd
034b e40a | | Load 0x2,0xa
034c a40c | | Store_Unchecked 0x2,0xc
034d 00cf | | Action Mark_Auxiliary
034e e40a | | Load 0x2,0xa
034f e40b | | Load 0x2,0xb
0350 0264 | d | Execute Discrete,Below_Bound
0351 700c |p | Jump_Nonzero 0x35e
0352 00d8 | | Load_Top At_Offset_0
0353 e405 | | Load 0x2,0x5
0354 01d7 | | Execute Vector,Field_Read
0355 0f5f | _ | Execute_Immediate Equal,0x5f
0356 6805 |h | Jump_Zero 0x35c
0357 00d8 | | Load_Top At_Offset_0
0358 0a01 | | Execute_Immediate Plus,0x1
0359 c40c | | Store 0x2,0xc
035a 00d2 | | Pop_Control Pop_Count_2
035b 7802 |x | Jump 0x35e
035c 00c8 | | Action Pop_Auxiliary_Range
035d 37f4 |7 | Loop_Decreasing 0x352
035e 00ce | | Action Pop_Auxiliary
035f 0092 075c | \| Action Push_String_Extended,0x75c ; "width"
0361 e40c | | Load 0x2,0xc
0362 e40b | | Load 0x2,0xb
0363 e405 | | Load 0x2,0x5
0364 01cf | | Execute Vector,Slice_Read
0365 01de | | Execute Vector,Not_Equal
0366 6807 |h | Jump_Zero 0x36e
0367 e40d | | Load 0x2,0xd
0368 00d8 | | Load_Top At_Offset_0
0369 e01b | | Load 0x0,0x1b
036a 0260 | ` | Execute Discrete,In_Type
036b 7001 |p | Jump_Nonzero 0x36d
036c 0801 | | Execute_Immediate Raise,0x1
036d a412 | | Store_Unchecked 0x2,0x12
036e 0092 075d | ]| Action Push_String_Extended,0x75d ; "height"
0370 e40c | | Load 0x2,0xc
0371 e40b | | Load 0x2,0xb
0372 e405 | | Load 0x2,0x5
0373 01cf | | Execute Vector,Slice_Read
0374 01de | | Execute Vector,Not_Equal
0375 6807 |h | Jump_Zero 0x37d
0376 e40d | | Load 0x2,0xd
0377 00d8 | | Load_Top At_Offset_0
0378 e01b | | Load 0x0,0x1b
0379 0260 | ` | Execute Discrete,In_Type
037a 7001 |p | Jump_Nonzero 0x37c
037b 0801 | | Execute_Immediate Raise,0x1
037c a413 | | Store_Unchecked 0x2,0x13
037d 0092 075e | ^| Action Push_String_Extended,0x75e ; "hot"
037f e40c | | Load 0x2,0xc
0380 e40b | | Load 0x2,0xb
0381 e405 | | Load 0x2,0x5
0382 01cf | | Execute Vector,Slice_Read
0383 01de | | Execute Vector,Not_Equal
0384 6962 |ib | Jump_Zero 0x4e7
0385 e40c | | Load 0x2,0xc
0386 0aff | | Execute_Immediate Plus,-0x1
0387 c40c | | Store 0x2,0xc
0388 e40c | | Load 0x2,0xc
0389 e40a | | Load 0x2,0xa
038a 027f | | Execute Discrete,Equal
038b 6801 |h | Jump_Zero 0x38d
038c 795a |yZ | Jump 0x4e7
038d e40c | | Load 0x2,0xc
038e 0aff | | Execute_Immediate Plus,-0x1
038f c40c | | Store 0x2,0xc
0390 e40c | | Load 0x2,0xc
0391 e40a | | Load 0x2,0xa
0392 027f | | Execute Discrete,Equal
0393 6801 |h | Jump_Zero 0x395
0394 7952 |yR | Jump 0x4e7
0395 0092 075f | _| Action Push_String_Extended,0x75f ; "x_hot"
0397 e40c | | Load 0x2,0xc
0398 e40b | | Load 0x2,0xb
0399 e405 | | Load 0x2,0x5
039a 01cf | | Execute Vector,Slice_Read
039b 01de | | Execute Vector,Not_Equal
039c 6807 |h | Jump_Zero 0x3a4
039d e40d | | Load 0x2,0xd
039e 00d8 | | Load_Top At_Offset_0
039f e01c | | Load 0x0,0x1c
03a0 0260 | ` | Execute Discrete,In_Type
03a1 7001 |p | Jump_Nonzero 0x3a3
03a2 0801 | | Execute_Immediate Raise,0x1
03a3 a414 | | Store_Unchecked 0x2,0x14
03a4 0092 0760 | `| Action Push_String_Extended,0x760 ; "y_hot"
03a6 e40c | | Load 0x2,0xc
03a7 e40b | | Load 0x2,0xb
03a8 e405 | | Load 0x2,0x5
03a9 01cf | | Execute Vector,Slice_Read
03aa 01de | | Execute Vector,Not_Equal
03ab 693b |i; | Jump_Zero 0x4e7
03ac e40d | | Load 0x2,0xd
03ad 00d8 | | Load_Top At_Offset_0
03ae e01c | | Load 0x0,0x1c
03af 0260 | ` | Execute Discrete,In_Type
03b0 7001 |p | Jump_Nonzero 0x3b2
03b1 0801 | | Execute_Immediate Raise,0x1
03b2 a415 | | Store_Unchecked 0x2,0x15
03b3 7933 |y3 | Jump 0x4e7
03b4 e406 | | Load 0x2,0x6
03b5 4800 |H | Short_Literal 0x0
03b6 0092 0761 | a| Action Push_String_Extended,0x761 ; "static short "
03b8 e407 | | Load 0x2,0x7
03b9 e405 | | Load 0x2,0x5
03ba 8214 | | Call 0x1,0x14
03bb c406 | | Store 0x2,0x6
03bc e406 | | Load 0x2,0x6
03bd 0c02 | | Execute_Immediate Greater_Equal,0x2
03be 6803 |h | Jump_Zero 0x3c2
03bf 4801 |H | Short_Literal 0x1
03c0 a40f | | Store_Unchecked 0x2,0xf
03c1 781c |x | Jump 0x3de
03c2 e406 | | Load 0x2,0x6
03c3 4800 |H | Short_Literal 0x0
03c4 0092 0762 | b| Action Push_String_Extended,0x762 ; "static unsigned char "
03c6 e407 | | Load 0x2,0x7
03c7 e405 | | Load 0x2,0x5
03c8 8214 | | Call 0x1,0x14
03c9 c406 | | Store 0x2,0x6
03ca e406 | | Load 0x2,0x6
03cb 0c02 | | Execute_Immediate Greater_Equal,0x2
03cc 6803 |h | Jump_Zero 0x3d0
03cd 4800 |H | Short_Literal 0x0
03ce a40f | | Store_Unchecked 0x2,0xf
03cf 780e |x | Jump 0x3de
03d0 e406 | | Load 0x2,0x6
03d1 4800 |H | Short_Literal 0x0
03d2 0092 0755 | U| Action Push_String_Extended,0x755 ; "static char "
03d4 e407 | | Load 0x2,0x7
03d5 e405 | | Load 0x2,0x5
03d6 8214 | | Call 0x1,0x14
03d7 c406 | | Store 0x2,0x6
03d8 e406 | | Load 0x2,0x6
03d9 0c02 | | Execute_Immediate Greater_Equal,0x2
03da 690c |i | Jump_Zero 0x4e7
03db 4800 |H | Short_Literal 0x0
03dc a40f | | Store_Unchecked 0x2,0xf
03dd 7800 |x | Jump 0x3de
03de 00e3 | | Load_Encached Natural_Cache
03df 00e3 | | Load_Encached Natural_Cache
03e0 e406 | | Load 0x2,0x6
03e1 e407 | | Load 0x2,0x7
03e2 e405 | | Load 0x2,0x5
03e3 8216 | | Call 0x1,0x16
03e4 c406 | | Store 0x2,0x6
03e5 c40a | | Store 0x2,0xa
03e6 c40b | | Store 0x2,0xb
03e7 e406 | | Load 0x2,0x6
03e8 4801 |H | Short_Literal 0x1
03e9 0092 0763 | c| Action Push_String_Extended,0x763 ; " := {"
03eb e407 | | Load 0x2,0x7
03ec e405 | | Load 0x2,0x5
03ed 8214 | | Call 0x1,0x14
03ee c406 | | Store 0x2,0x6
03ef e40a | | Load 0x2,0xa
03f0 a40c | | Store_Unchecked 0x2,0xc
03f1 00cf | | Action Mark_Auxiliary
03f2 e40a | | Load 0x2,0xa
03f3 e40b | | Load 0x2,0xb
03f4 0264 | d | Execute Discrete,Below_Bound
03f5 700c |p | Jump_Nonzero 0x402
03f6 00d8 | | Load_Top At_Offset_0
03f7 e405 | | Load 0x2,0x5
03f8 01d7 | | Execute Vector,Field_Read
03f9 0f5f | _ | Execute_Immediate Equal,0x5f
03fa 6805 |h | Jump_Zero 0x400
03fb 00d8 | | Load_Top At_Offset_0
03fc 0a01 | | Execute_Immediate Plus,0x1
03fd c40c | | Store 0x2,0xc
03fe 00d2 | | Pop_Control Pop_Count_2
03ff 7802 |x | Jump 0x402
0400 00c8 | | Action Pop_Auxiliary_Range
0401 37f4 |7 | Loop_Decreasing 0x3f6
0402 00ce | | Action Pop_Auxiliary
0403 0092 0764 | d| Action Push_String_Extended,0x764 ; "bits()"
0405 e40c | | Load 0x2,0xc
0406 e40b | | Load 0x2,0xb
0407 e405 | | Load 0x2,0x5
0408 01cf | | Execute Vector,Slice_Read
0409 01df | | Execute Vector,Equal
040a 6801 |h | Jump_Zero 0x40c
040b 78db |x | Jump 0x4e7
040c e412 | | Load 0x2,0x12
040d 7002 |p | Jump_Nonzero 0x410
040e e413 | | Load 0x2,0x13
040f 6802 |h | Jump_Zero 0x412
0410 e211 | | Load 0x1,0x11
0411 0257 | W | Execute Discrete,Raise
0412 4801 |H | Short_Literal 0x1
0413 a410 | | Store_Unchecked 0x2,0x10
0414 e412 | | Load 0x2,0x12
0415 0a07 | | Execute_Immediate Plus,0x7
0416 00d8 | | Load_Top At_Offset_0
0417 e014 | | Load 0x0,0x14
0418 0260 | ` | Execute Discrete,In_Type
0419 7001 |p | Jump_Nonzero 0x41b
041a 0801 | | Execute_Immediate Raise,0x1
041b 09fd | | Execute_Immediate Binary_Scale,-0x3
041c e410 | | Load 0x2,0x10
041d 0273 | s | Execute Discrete,Plus
041e c411 | | Store 0x2,0x11
041f e411 | | Load 0x2,0x11
0420 e413 | | Load 0x2,0x13
0421 0271 | q | Execute Discrete,Times
0422 c408 | | Store 0x2,0x8
0423 8418 | | Call 0x2,0x18
0424 e40f | | Load 0x2,0xf
0425 6872 |hr | Jump_Zero 0x498
0426 4800 |H | Short_Literal 0x0
0427 a409 | | Store_Unchecked 0x2,0x9
0428 e403 | | Load 0x2,0x3
0429 0227 | ' | Execute Access,All_Reference
042a 01dd | | Execute Vector,First
042b c404 | | Store 0x2,0x4
042c 00cf | | Action Mark_Auxiliary
042d 7864 |xd | Jump 0x492
042e e406 | | Load 0x2,0x6
042f e407 | | Load 0x2,0x7
0430 027d | } | Execute Discrete,Greater
0431 6817 |h | Jump_Zero 0x449
0432 e409 | | Load 0x2,0x9
0433 e408 | | Load 0x2,0x8
0434 027c | | | Execute Discrete,Less
0435 6813 |h | Jump_Zero 0x449
0436 e402 | | Load 0x2,0x2
0437 e016 | | Load 0x0,0x16
0438 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0439 6802 |h | Jump_Zero 0x43c
043a e211 | | Load 0x1,0x11
043b 0257 | W | Execute Discrete,Raise
043c 00e3 | | Load_Encached Natural_Cache
043d e405 | | Load 0x2,0x5
043e e402 | | Load 0x2,0x2
043f e016 | | Load 0x0,0x16
0440 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
0441 00d1 | | Pop_Control Pop_Count_1
0442 c407 | | Store 0x2,0x7
0443 e402 | | Load 0x2,0x2
0444 e016 | | Load 0x0,0x16
0445 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0446 7002 |p | Jump_Nonzero 0x449
0447 e211 | | Load 0x1,0x11
0448 0257 | W | Execute Discrete,Raise
0449 e406 | | Load 0x2,0x6
044a 4801 |H | Short_Literal 0x1
044b 0092 0765 | e| Action Push_String_Extended,0x765 ; " 0x"
044d e407 | | Load 0x2,0x7
044e e405 | | Load 0x2,0x5
044f 8214 | | Call 0x1,0x14
0450 c406 | | Store 0x2,0x6
0451 e01a | | Load 0x0,0x1a
0452 e406 | | Load 0x2,0x6
0453 e407 | | Load 0x2,0x7
0454 e405 | | Load 0x2,0x5
0455 8218 | | Call 0x1,0x18
0456 c406 | | Store 0x2,0x6
0457 c40e | | Store 0x2,0xe
0458 e406 | | Load 0x2,0x6
0459 0092 0766 | f| Action Push_String_Extended,0x766 ; ",}"
045b e407 | | Load 0x2,0x7
045c e405 | | Load 0x2,0x5
045d 8215 | | Call 0x1,0x15
045e c406 | | Store 0x2,0x6
045f e406 | | Load 0x2,0x6
0460 e407 | | Load 0x2,0x7
0461 027a | z | Execute Discrete,Less_Equal
0462 6807 |h | Jump_Zero 0x46a
0463 e406 | | Load 0x2,0x6
0464 0092 0757 | W| Action Push_String_Extended,0x757 ; " "
0466 e407 | | Load 0x2,0x7
0467 e405 | | Load 0x2,0x5
0468 8215 | | Call 0x1,0x15
0469 c406 | | Store 0x2,0x6
046a e404 | | Load 0x2,0x4
046b 0a01 | | Execute_Immediate Plus,0x1
046c c404 | | Store 0x2,0x4
046d e40e | | Load 0x2,0xe
046e 4900 |I | Short_Literal 0x100
046f 026f | o | Execute Discrete,Remainder
0470 00d8 | | Load_Top At_Offset_0
0471 e015 | | Load 0x0,0x15
0472 0260 | ` | Execute Discrete,In_Type
0473 7001 |p | Jump_Nonzero 0x475
0474 0801 | | Execute_Immediate Raise,0x1
0475 e404 | | Load 0x2,0x4
0476 e403 | | Load 0x2,0x3
0477 0227 | ' | Execute Access,All_Reference
0478 01d6 | | Execute Vector,Field_Write
0479 e410 | | Load 0x2,0x10
047a 6805 |h | Jump_Zero 0x480
047b e409 | | Load 0x2,0x9
047c 0a02 | | Execute_Immediate Plus,0x2
047d e411 | | Load 0x2,0x11
047e 026f | o | Execute Discrete,Remainder
047f 680e |h | Jump_Zero 0x48e
0480 e404 | | Load 0x2,0x4
0481 0a01 | | Execute_Immediate Plus,0x1
0482 c404 | | Store 0x2,0x4
0483 e40e | | Load 0x2,0xe
0484 09f8 | | Execute_Immediate Binary_Scale,-0x8
0485 00d8 | | Load_Top At_Offset_0
0486 e015 | | Load 0x0,0x15
0487 0260 | ` | Execute Discrete,In_Type
0488 7001 |p | Jump_Nonzero 0x48a
0489 0801 | | Execute_Immediate Raise,0x1
048a e404 | | Load 0x2,0x4
048b e403 | | Load 0x2,0x3
048c 0227 | ' | Execute Access,All_Reference
048d 01d6 | | Execute Vector,Field_Write
048e e409 | | Load 0x2,0x9
048f 0a02 | | Execute_Immediate Plus,0x2
0490 c409 | | Store 0x2,0x9
0491 00c9 | | Action Pop_Auxiliary_Loop
0492 e409 | | Load 0x2,0x9
0493 e408 | | Load 0x2,0x8
0494 027c | | | Execute Discrete,Less
0495 7798 |w | Jump_Nonzero 0x42e
0496 00ce | | Action Pop_Auxiliary
0497 784f |xO | Jump 0x4e7
0498 00cf | | Action Mark_Auxiliary
0499 e403 | | Load 0x2,0x3
049a 0227 | ' | Execute Access,All_Reference
049b 01d9 | | Execute Vector,Reverse_Bounds
049c 0263 | c | Execute Discrete,Above_Bound
049d 7048 |pH | Jump_Nonzero 0x4e6
049e e406 | | Load 0x2,0x6
049f e407 | | Load 0x2,0x7
04a0 027d | } | Execute Discrete,Greater
04a1 6817 |h | Jump_Zero 0x4b9
04a2 e409 | | Load 0x2,0x9
04a3 e408 | | Load 0x2,0x8
04a4 027c | | | Execute Discrete,Less
04a5 6813 |h | Jump_Zero 0x4b9
04a6 e402 | | Load 0x2,0x2
04a7 e016 | | Load 0x0,0x16
04a8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
04a9 6802 |h | Jump_Zero 0x4ac
04aa e211 | | Load 0x1,0x11
04ab 0257 | W | Execute Discrete,Raise
04ac 00e3 | | Load_Encached Natural_Cache
04ad e405 | | Load 0x2,0x5
04ae e402 | | Load 0x2,0x2
04af e016 | | Load 0x0,0x16
04b0 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
04b1 00d1 | | Pop_Control Pop_Count_1
04b2 c407 | | Store 0x2,0x7
04b3 e402 | | Load 0x2,0x2
04b4 e016 | | Load 0x0,0x16
04b5 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
04b6 7002 |p | Jump_Nonzero 0x4b9
04b7 e211 | | Load 0x1,0x11
04b8 0257 | W | Execute Discrete,Raise
04b9 e406 | | Load 0x2,0x6
04ba 4801 |H | Short_Literal 0x1
04bb 0092 0765 | e| Action Push_String_Extended,0x765 ; " 0x"
04bd e407 | | Load 0x2,0x7
04be e405 | | Load 0x2,0x5
04bf 8214 | | Call 0x1,0x14
04c0 c406 | | Store 0x2,0x6
04c1 e01a | | Load 0x0,0x1a
04c2 e406 | | Load 0x2,0x6
04c3 e407 | | Load 0x2,0x7
04c4 e405 | | Load 0x2,0x5
04c5 8218 | | Call 0x1,0x18
04c6 c406 | | Store 0x2,0x6
04c7 c40e | | Store 0x2,0xe
04c8 e406 | | Load 0x2,0x6
04c9 0092 0766 | f| Action Push_String_Extended,0x766 ; ",}"
04cb e407 | | Load 0x2,0x7
04cc e405 | | Load 0x2,0x5
04cd 8215 | | Call 0x1,0x15
04ce c406 | | Store 0x2,0x6
04cf e406 | | Load 0x2,0x6
04d0 e407 | | Load 0x2,0x7
04d1 027a | z | Execute Discrete,Less_Equal
04d2 6807 |h | Jump_Zero 0x4da
04d3 e406 | | Load 0x2,0x6
04d4 0092 0757 | W| Action Push_String_Extended,0x757 ; " "
04d6 e407 | | Load 0x2,0x7
04d7 e405 | | Load 0x2,0x5
04d8 8215 | | Call 0x1,0x15
04d9 c406 | | Store 0x2,0x6
04da e40e | | Load 0x2,0xe
04db 00d8 | | Load_Top At_Offset_0
04dc e015 | | Load 0x0,0x15
04dd 0260 | ` | Execute Discrete,In_Type
04de 7001 |p | Jump_Nonzero 0x4e0
04df 0801 | | Execute_Immediate Raise,0x1
04e0 00d9 | | Load_Top At_Offset_1
04e1 e403 | | Load 0x2,0x3
04e2 0227 | ' | Execute Access,All_Reference
04e3 01d6 | | Execute Vector,Field_Write
04e4 00c8 | | Action Pop_Auxiliary_Range
04e5 3fb8 |? | Loop_Increasing 0x49e
04e6 00ce | | Action Pop_Auxiliary
04e7 0008 | | Action Idle
04e8 00c9 | | Action Pop_Auxiliary_Loop
04e9 e402 | | Load 0x2,0x2
04ea e016 | | Load 0x0,0x16
04eb 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
04ec 6e2c |n, | Jump_Zero 0x319
04ed 00ce | | Action Pop_Auxiliary
04ee e403 | | Load 0x2,0x3
04ef 7008 |p | Jump_Nonzero 0x4f8
04f0 e402 | | Load 0x2,0x2
04f1 e403 | | Load 0x2,0x3
04f2 8213 | | Call 0x1,0x13
04f3 c403 | | Store 0x2,0x3
04f4 c402 | | Store 0x2,0x2
04f5 4802 |H | Short_Literal 0x2
04f6 a5f7 | | Store_Unchecked 0x2,-0x9
04f7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04f8 e413 | | Load 0x2,0x13
04f9 e412 | | Load 0x2,0x12
04fa e403 | | Load 0x2,0x3
04fb 0227 | ' | Execute Access,All_Reference
04fc e5fe | | Load 0x2,-0x2
04fd e5ff | | Load 0x2,-0x1
04fe 820d | | Call 0x1,0xd
04ff e416 | | Load 0x2,0x16
0500 017d | } | Execute Record,Structure_Write
0501 00db | | Load_Top At_Offset_3
0502 e008 | | Load 0x0,0x8
0503 017f | | Execute Record,Equal
0504 6808 |h | Jump_Zero 0x50d
0505 e402 | | Load 0x2,0x2
0506 e403 | | Load 0x2,0x3
0507 8213 | | Call 0x1,0x13
0508 c403 | | Store 0x2,0x3
0509 c402 | | Store 0x2,0x2
050a 4803 |H | Short_Literal 0x3
050b a5f7 | | Store_Unchecked 0x2,-0x9
050c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
050d 00db | | Load_Top At_Offset_3
050e e5fa | | Load 0x2,-0x6
050f 017d | } | Execute Record,Structure_Write
0510 e412 | | Load 0x2,0x12
0511 a5fc | | Store_Unchecked 0x2,-0x4
0512 e413 | | Load 0x2,0x13
0513 a5fb | | Store_Unchecked 0x2,-0x5
0514 e414 | | Load 0x2,0x14
0515 a5f9 | | Store_Unchecked 0x2,-0x7
0516 e415 | | Load 0x2,0x15
0517 a5f8 | | Store_Unchecked 0x2,-0x8
0518 e402 | | Load 0x2,0x2
0519 e403 | | Load 0x2,0x3
051a 8213 | | Call 0x1,0x13
051b c403 | | Store 0x2,0x3
051c c402 | | Store 0x2,0x2
051d 4800 |H | Short_Literal 0x0
051e a5f7 | | Store_Unchecked 0x2,-0x9
051f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0520 TRAP_02e0:
0520 0007 | | Action Break_Optional
0521 8419 | | Call 0x2,0x19
0522 4800 |H | Short_Literal 0x0
0523 a5fc | | Store_Unchecked 0x2,-0x4
0524 4800 |H | Short_Literal 0x0
0525 a5fb | | Store_Unchecked 0x2,-0x5
0526 e008 | | Load 0x0,0x8
0527 e5fa | | Load 0x2,-0x6
0528 017d | } | Execute Record,Structure_Write
0529 4800 |H | Short_Literal 0x0
052a a5f9 | | Store_Unchecked 0x2,-0x7
052b 4800 |H | Short_Literal 0x0
052c a5f8 | | Store_Unchecked 0x2,-0x8
052d 4802 |H | Short_Literal 0x2
052e a5f7 | | Store_Unchecked 0x2,-0x9
052f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0542 | B | .CONST 0x0542 ; Address of begin
0531 0004 | | .CONST 0x0004 ; Address of exception handler
0532 0009 | | .CONST 0x0009 ; Number of locals
0533 INIT_0530:
0533 e015 | | Load 0x0,0x15
0534 0007 | | Action Break_Optional
0535 e015 | | Load 0x0,0x15
0536 0007 | | Action Break_Optional
0537 e014 | | Load 0x0,0x14
0538 0007 | | Action Break_Optional
0539 e00b | | Load 0x0,0xb
053a 0007 | | Action Break_Optional
053b e01b | | Load 0x0,0x1b
053c 0007 | | Action Break_Optional
053d e01b | | Load 0x0,0x1b
053e 0007 | | Action Break_Optional
053f e01b | | Load 0x0,0x1b
0540 029f 072b | +| Declare_Subprogram INIT_0728,For_Call
0542 BODY_0530:
0542 e5ff | | Load 0x2,-0x1
0543 0227 | ' | Execute Access,All_Reference
0544 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0545 a406 | | Store_Unchecked 0x2,0x6
0546 e5ff | | Load 0x2,-0x1
0547 0227 | ' | Execute Access,All_Reference
0548 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0549 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
054a 00db | | Load_Top At_Offset_3
054b 0a07 | | Execute_Immediate Plus,0x7
054c 09fd | | Execute_Immediate Binary_Scale,-0x3
054d 005a | Z | Store_Top Discrete,At_Offset_2
054e 00d9 | | Load_Top At_Offset_1
054f 00db | | Load_Top At_Offset_3
0550 0271 | q | Execute Discrete,Times
0551 c5fe | | Store 0x2,-0x2
0552 8409 | | Call 0x2,0x9
0553 e405 | | Load 0x2,0x5
0554 0227 | ' | Execute Access,All_Reference
0555 01dd | | Execute Vector,First
0556 c404 | | Store 0x2,0x4
0557 4800 |H | Short_Literal 0x0
0558 a402 | | Store_Unchecked 0x2,0x2
0559 4801 |H | Short_Literal 0x1
055a a403 | | Store_Unchecked 0x2,0x3
055b 00cf | | Action Mark_Auxiliary
055c 00db | | Load_Top At_Offset_3
055d 00d8 | | Load_Top At_Offset_0
055e e01c | | Load 0x0,0x1c
055f 0260 | ` | Execute Discrete,In_Type
0560 7001 |p | Jump_Nonzero 0x562
0561 0801 | | Execute_Immediate Raise,0x1
0562 0aff | | Execute_Immediate Plus,-0x1
0563 4800 |H | Short_Literal 0x0
0564 0263 | c | Execute Discrete,Above_Bound
0565 703d |p= | Jump_Nonzero 0x5a3
0566 00cf | | Action Mark_Auxiliary
0567 e406 | | Load 0x2,0x6
0568 00d8 | | Load_Top At_Offset_0
0569 e01c | | Load 0x0,0x1c
056a 0260 | ` | Execute Discrete,In_Type
056b 7001 |p | Jump_Nonzero 0x56d
056c 0801 | | Execute_Immediate Raise,0x1
056d 0aff | | Execute_Immediate Plus,-0x1
056e 4800 |H | Short_Literal 0x0
056f 0263 | c | Execute Discrete,Above_Bound
0570 7020 |p | Jump_Nonzero 0x591
0571 00db | | Load_Top At_Offset_3
0572 00d9 | | Load_Top At_Offset_1
0573 e5ff | | Load 0x2,-0x1
0574 801d | | Call 0x0,0x1d
0575 6804 |h | Jump_Zero 0x57a
0576 e402 | | Load 0x2,0x2
0577 e403 | | Load 0x2,0x3
0578 0273 | s | Execute Discrete,Plus
0579 c402 | | Store 0x2,0x2
057a e403 | | Load 0x2,0x3
057b 00d8 | | Load_Top At_Offset_0
057c 0273 | s | Execute Discrete,Plus
057d c403 | | Store 0x2,0x3
057e 00d8 | | Load_Top At_Offset_0
057f 4808 |H | Short_Literal 0x8
0580 026f | o | Execute Discrete,Remainder
0581 0f07 | | Execute_Immediate Equal,0x7
0582 680c |h | Jump_Zero 0x58f
0583 e402 | | Load 0x2,0x2
0584 e404 | | Load 0x2,0x4
0585 e405 | | Load 0x2,0x5
0586 0227 | ' | Execute Access,All_Reference
0587 01d6 | | Execute Vector,Field_Write
0588 e404 | | Load 0x2,0x4
0589 0a01 | | Execute_Immediate Plus,0x1
058a c404 | | Store 0x2,0x4
058b 4800 |H | Short_Literal 0x0
058c a402 | | Store_Unchecked 0x2,0x2
058d 4801 |H | Short_Literal 0x1
058e a403 | | Store_Unchecked 0x2,0x3
058f 00c8 | | Action Pop_Auxiliary_Range
0590 3fe0 |? | Loop_Increasing 0x571
0591 00ce | | Action Pop_Auxiliary
0592 e403 | | Load 0x2,0x3
0593 0e01 | | Execute_Immediate Not_Equal,0x1
0594 680c |h | Jump_Zero 0x5a1
0595 e402 | | Load 0x2,0x2
0596 e404 | | Load 0x2,0x4
0597 e405 | | Load 0x2,0x5
0598 0227 | ' | Execute Access,All_Reference
0599 01d6 | | Execute Vector,Field_Write
059a e404 | | Load 0x2,0x4
059b 0a01 | | Execute_Immediate Plus,0x1
059c c404 | | Store 0x2,0x4
059d 4800 |H | Short_Literal 0x0
059e a402 | | Store_Unchecked 0x2,0x2
059f 4801 |H | Short_Literal 0x1
05a0 a403 | | Store_Unchecked 0x2,0x3
05a1 00c8 | | Action Pop_Auxiliary_Range
05a2 3fc3 |? | Loop_Increasing 0x566
05a3 00ce | | Action Pop_Auxiliary
05a4 e405 | | Load 0x2,0x5
05a5 a5fd | | Store_Unchecked 0x2,-0x3
05a6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05a7 0000 | | .XXX[0x1]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ab | | .CONST 0x05ab ; Address of begin
05a9 0004 | | .CONST 0x0004 ; Address of exception handler
05aa 0001 | | .CONST 0x0001 ; Number of locals
05ab BODY_05a8:
05ab INIT_05a8:
05ab 00da | | Load_Top At_Offset_2
05ac 6806 |h | Jump_Zero 0x5b3
05ad 00da | | Load_Top At_Offset_2
05ae e00d | | Load 0x0,0xd
05af e00e | | Load 0x0,0xe
05b0 a00f | | Store_Unchecked 0x0,0xf
05b1 8010 | | Call 0x0,0x10
05b2 003b | ; | Store_Top Access,At_Offset_3
05b3 00db | | Load_Top At_Offset_3
05b4 e016 | | Load 0x0,0x16
05b5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05b6 c5fe | | Store 0x2,-0x2
05b7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb | | .CONST 0x05bb ; Address of begin
05b9 0004 | | .CONST 0x0004 ; Address of exception handler
05ba 0001 | | .CONST 0x0001 ; Number of locals
05bb BODY_05b8:
05bb INIT_05b8:
05bb e5fb | | Load 0x2,-0x5
05bc 0aff | | Execute_Immediate Plus,-0x1
05bd e5fd | | Load 0x2,-0x3
05be 01db | | Execute Vector,Length
05bf 0273 | s | Execute Discrete,Plus
05c0 e5fe | | Load 0x2,-0x2
05c1 027a | z | Execute Discrete,Less_Equal
05c2 6816 |h | Jump_Zero 0x5d9
05c3 e5fb | | Load 0x2,-0x5
05c4 00d8 | | Load_Top At_Offset_0
05c5 0aff | | Execute_Immediate Plus,-0x1
05c6 e5fd | | Load 0x2,-0x3
05c7 01db | | Execute Vector,Length
05c8 0273 | s | Execute Discrete,Plus
05c9 00d8 | | Load_Top At_Offset_0
05ca 00e2 | | Load_Encached Integer_Cache
05cb 0260 | ` | Execute Discrete,In_Type
05cc 7001 |p | Jump_Nonzero 0x5ce
05cd 0801 | | Execute_Immediate Raise,0x1
05ce e5ff | | Load 0x2,-0x1
05cf 01cf | | Execute Vector,Slice_Read
05d0 e5fd | | Load 0x2,-0x3
05d1 01df | | Execute Vector,Equal
05d2 6806 |h | Jump_Zero 0x5d9
05d3 e5fb | | Load 0x2,-0x5
05d4 e5fd | | Load 0x2,-0x3
05d5 01db | | Execute Vector,Length
05d6 0273 | s | Execute Discrete,Plus
05d7 c5fb | | Store 0x2,-0x5
05d8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
05d9 e5fc | | Load 0x2,-0x4
05da 6802 |h | Jump_Zero 0x5dd
05db e211 | | Load 0x1,0x11
05dc 0257 | W | Execute Discrete,Raise
05dd 4505 |E | Exit_Suprogram New_Top_Offset 0x5
05de 0000 0000 | | .XXX[0x2]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e3 | | .CONST 0x05e3 ; Address of begin
05e1 0004 | | .CONST 0x0004 ; Address of exception handler
05e2 0001 | | .CONST 0x0001 ; Number of locals
05e3 BODY_05e0:
05e3 INIT_05e0:
05e3 e5fc | | Load 0x2,-0x4
05e4 e5fe | | Load 0x2,-0x2
05e5 027a | z | Execute Discrete,Less_Equal
05e6 6815 |h | Jump_Zero 0x5fc
05e7 00cf | | Action Mark_Auxiliary
05e8 e5fd | | Load 0x2,-0x3
05e9 01d9 | | Execute Vector,Reverse_Bounds
05ea 0263 | c | Execute Discrete,Above_Bound
05eb 700e |p | Jump_Nonzero 0x5fa
05ec e5fc | | Load 0x2,-0x4
05ed e5ff | | Load 0x2,-0x1
05ee 01d7 | | Execute Vector,Field_Read
05ef 00d9 | | Load_Top At_Offset_1
05f0 e5fd | | Load 0x2,-0x3
05f1 01d7 | | Execute Vector,Field_Read
05f2 027f | | Execute Discrete,Equal
05f3 6804 |h | Jump_Zero 0x5f8
05f4 e5fc | | Load 0x2,-0x4
05f5 0a01 | | Execute_Immediate Plus,0x1
05f6 c5fc | | Store 0x2,-0x4
05f7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05f8 00c8 | | Action Pop_Auxiliary_Range
05f9 3ff2 |? | Loop_Increasing 0x5ec
05fa 00ce | | Action Pop_Auxiliary
05fb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05fc e211 | | Load 0x1,0x11
05fd 0257 | W | Execute Discrete,Raise
05fe 0000 0000 | | .XXX[0x2]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0603 | | .CONST 0x0603 ; Address of begin
0601 0004 | | .CONST 0x0004 ; Address of exception handler
0602 0001 | | .CONST 0x0001 ; Number of locals
0603 BODY_0600:
0603 INIT_0600:
0603 e5fd | | Load 0x2,-0x3
0604 e5fe | | Load 0x2,-0x2
0605 027d | } | Execute Discrete,Greater
0606 7013 |p | Jump_Nonzero 0x61a
0607 e5fd | | Load 0x2,-0x3
0608 00db | | Load_Top At_Offset_3
0609 01d7 | | Execute Vector,Field_Read
060a 4841 |HA | Short_Literal 0x41
060b 485a |HZ | Short_Literal 0x5a
060c 0261 | a | Execute Discrete,Not_In_Range
060d 680e |h | Jump_Zero 0x61c
060e e5fd | | Load 0x2,-0x3
060f 00db | | Load_Top At_Offset_3
0610 01d7 | | Execute Vector,Field_Read
0611 4861 |Ha | Short_Literal 0x61
0612 487a |Hz | Short_Literal 0x7a
0613 0261 | a | Execute Discrete,Not_In_Range
0614 6807 |h | Jump_Zero 0x61c
0615 e5fd | | Load 0x2,-0x3
0616 00db | | Load_Top At_Offset_3
0617 01d7 | | Execute Vector,Field_Read
0618 0e5f | _ | Execute_Immediate Not_Equal,0x5f
0619 6802 |h | Jump_Zero 0x61c
061a e211 | | Load 0x1,0x11
061b 0257 | W | Execute Discrete,Raise
061c e5fd | | Load 0x2,-0x3
061d a5fc | | Store_Unchecked 0x2,-0x4
061e e5fd | | Load 0x2,-0x3
061f 0a01 | | Execute_Immediate Plus,0x1
0620 c5fd | | Store 0x2,-0x3
0621 00cf | | Action Mark_Auxiliary
0622 7804 |x | Jump 0x627
0623 e5fd | | Load 0x2,-0x3
0624 0a01 | | Execute_Immediate Plus,0x1
0625 c5fd | | Store 0x2,-0x3
0626 00c9 | | Action Pop_Auxiliary_Loop
0627 e5fd | | Load 0x2,-0x3
0628 e5fe | | Load 0x2,-0x2
0629 027a | z | Execute Discrete,Less_Equal
062a 6813 |h | Jump_Zero 0x63e
062b e5fd | | Load 0x2,-0x3
062c e5ff | | Load 0x2,-0x1
062d 01d7 | | Execute Vector,Field_Read
062e 4841 |HA | Short_Literal 0x41
062f 485a |HZ | Short_Literal 0x5a
0630 0262 | b | Execute Discrete,In_Range
0631 77f1 |w | Jump_Nonzero 0x623
0632 e5fd | | Load 0x2,-0x3
0633 e5ff | | Load 0x2,-0x1
0634 01d7 | | Execute Vector,Field_Read
0635 4861 |Ha | Short_Literal 0x61
0636 487a |Hz | Short_Literal 0x7a
0637 0262 | b | Execute Discrete,In_Range
0638 77ea |w | Jump_Nonzero 0x623
0639 e5fd | | Load 0x2,-0x3
063a e5ff | | Load 0x2,-0x1
063b 01d7 | | Execute Vector,Field_Read
063c 0f5f | _ | Execute_Immediate Equal,0x5f
063d 77e5 |w | Jump_Nonzero 0x623
063e 00ce | | Action Pop_Auxiliary
063f e5fd | | Load 0x2,-0x3
0640 0aff | | Execute_Immediate Plus,-0x1
0641 c5fb | | Store 0x2,-0x5
0642 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0643 0000 0000 | | .BLANK 0000[0x5]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064c | L | .CONST 0x064c ; Address of begin
0649 067c | | | .CONST 0x067c ; Address of exception handler
064a 0002 | | .CONST 0x0002 ; Number of locals
064b INIT_0648:
064b 00e3 | | Load_Encached Natural_Cache
064c BODY_0648:
064c e5fd | | Load 0x2,-0x3
064d e5fe | | Load 0x2,-0x2
064e 027d | } | Execute Discrete,Greater
064f 7007 |p | Jump_Nonzero 0x657
0650 e5fd | | Load 0x2,-0x3
0651 e5ff | | Load 0x2,-0x1
0652 01d7 | | Execute Vector,Field_Read
0653 4830 |H0 | Short_Literal 0x30
0654 4839 |H9 | Short_Literal 0x39
0655 0261 | a | Execute Discrete,Not_In_Range
0656 6804 |h | Jump_Zero 0x65b
0657 4800 |H | Short_Literal 0x0
0658 a5fc | | Store_Unchecked 0x2,-0x4
0659 e211 | | Load 0x1,0x11
065a 0257 | W | Execute Discrete,Raise
065b e5fd | | Load 0x2,-0x3
065c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
065d e5fd | | Load 0x2,-0x3
065e 0a01 | | Execute_Immediate Plus,0x1
065f c5fd | | Store 0x2,-0x3
0660 00cf | | Action Mark_Auxiliary
0661 7804 |x | Jump 0x666
0662 e5fd | | Load 0x2,-0x3
0663 0a01 | | Execute_Immediate Plus,0x1
0664 c5fd | | Store 0x2,-0x3
0665 00c9 | | Action Pop_Auxiliary_Loop
0666 e5fd | | Load 0x2,-0x3
0667 e5fe | | Load 0x2,-0x2
0668 027a | z | Execute Discrete,Less_Equal
0669 6807 |h | Jump_Zero 0x671
066a e5fd | | Load 0x2,-0x3
066b e5ff | | Load 0x2,-0x1
066c 01d7 | | Execute Vector,Field_Read
066d 4830 |H0 | Short_Literal 0x30
066e 4839 |H9 | Short_Literal 0x39
066f 0262 | b | Execute Discrete,In_Range
0670 77f1 |w | Jump_Nonzero 0x662
0671 00ce | | Action Pop_Auxiliary
0672 00d8 | | Load_Top At_Offset_0
0673 e5fd | | Load 0x2,-0x3
0674 0aff | | Execute_Immediate Plus,-0x1
0675 e5ff | | Load 0x2,-0x1
0676 01cf | | Execute Vector,Slice_Read
0677 00e5 | | Load_Encached Long_Integer_Cache
0678 00e0 | | Load_Encached Standard_Cache
0679 1819 | | Execute Package,Field_Execute,Field_Number 0x19
067a c5fc | | Store 0x2,-0x4
067b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
067c TRAP_0648:
067c 0007 | | Action Break_Optional
067d e211 | | Load 0x1,0x11
067e 0257 | W | Execute Discrete,Raise
067f 0000 | | .XXX[0x1]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0684 | | .CONST 0x0684 ; Address of begin
0681 06d6 | | .CONST 0x06d6 ; Address of exception handler
0682 0002 | | .CONST 0x0002 ; Number of locals
0683 INIT_0680:
0683 00e3 | | Load_Encached Natural_Cache
0684 BODY_0680:
0684 e5fd | | Load 0x2,-0x3
0685 e5fe | | Load 0x2,-0x2
0686 027d | } | Execute Discrete,Greater
0687 7015 |p | Jump_Nonzero 0x69d
0688 e5fd | | Load 0x2,-0x3
0689 e5ff | | Load 0x2,-0x1
068a 01d7 | | Execute Vector,Field_Read
068b 4830 |H0 | Short_Literal 0x30
068c 4839 |H9 | Short_Literal 0x39
068d 0261 | a | Execute Discrete,Not_In_Range
068e 6812 |h | Jump_Zero 0x6a1
068f e5fd | | Load 0x2,-0x3
0690 e5ff | | Load 0x2,-0x1
0691 01d7 | | Execute Vector,Field_Read
0692 4841 |HA | Short_Literal 0x41
0693 4846 |HF | Short_Literal 0x46
0694 0261 | a | Execute Discrete,Not_In_Range
0695 680b |h | Jump_Zero 0x6a1
0696 e5fd | | Load 0x2,-0x3
0697 e5ff | | Load 0x2,-0x1
0698 01d7 | | Execute Vector,Field_Read
0699 4861 |Ha | Short_Literal 0x61
069a 4866 |Hf | Short_Literal 0x66
069b 0261 | a | Execute Discrete,Not_In_Range
069c 6804 |h | Jump_Zero 0x6a1
069d 4800 |H | Short_Literal 0x0
069e a5fc | | Store_Unchecked 0x2,-0x4
069f e211 | | Load 0x1,0x11
06a0 0257 | W | Execute Discrete,Raise
06a1 e5fd | | Load 0x2,-0x3
06a2 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
06a3 e5fd | | Load 0x2,-0x3
06a4 0a01 | | Execute_Immediate Plus,0x1
06a5 c5fd | | Store 0x2,-0x3
06a6 00cf | | Action Mark_Auxiliary
06a7 7804 |x | Jump 0x6ac
06a8 e5fd | | Load 0x2,-0x3
06a9 0a01 | | Execute_Immediate Plus,0x1
06aa c5fd | | Store 0x2,-0x3
06ab 00c9 | | Action Pop_Auxiliary_Loop
06ac e5fd | | Load 0x2,-0x3
06ad e5fe | | Load 0x2,-0x2
06ae 027a | z | Execute Discrete,Less_Equal
06af 6815 |h | Jump_Zero 0x6c5
06b0 e5fd | | Load 0x2,-0x3
06b1 e5ff | | Load 0x2,-0x1
06b2 01d7 | | Execute Vector,Field_Read
06b3 4830 |H0 | Short_Literal 0x30
06b4 4839 |H9 | Short_Literal 0x39
06b5 0262 | b | Execute Discrete,In_Range
06b6 77f1 |w | Jump_Nonzero 0x6a8
06b7 e5fd | | Load 0x2,-0x3
06b8 e5ff | | Load 0x2,-0x1
06b9 01d7 | | Execute Vector,Field_Read
06ba 4841 |HA | Short_Literal 0x41
06bb 4846 |HF | Short_Literal 0x46
06bc 0262 | b | Execute Discrete,In_Range
06bd 77ea |w | Jump_Nonzero 0x6a8
06be e5fd | | Load 0x2,-0x3
06bf e5ff | | Load 0x2,-0x1
06c0 01d7 | | Execute Vector,Field_Read
06c1 4861 |Ha | Short_Literal 0x61
06c2 4866 |Hf | Short_Literal 0x66
06c3 0262 | b | Execute Discrete,In_Range
06c4 77e3 |w | Jump_Nonzero 0x6a8
06c5 00ce | | Action Pop_Auxiliary
06c6 0092 0767 | g| Action Push_String_Extended,0x767 ; "16#"
06c8 00d9 | | Load_Top At_Offset_1
06c9 e5fd | | Load 0x2,-0x3
06ca 0aff | | Execute_Immediate Plus,-0x1
06cb e5ff | | Load 0x2,-0x1
06cc 01cf | | Execute Vector,Slice_Read
06cd 01cc | | Execute Vector,Catenate
06ce 0092 0768 | h| Action Push_String_Extended,0x768 ; "#"
06d0 01cc | | Execute Vector,Catenate
06d1 00e5 | | Load_Encached Long_Integer_Cache
06d2 00e0 | | Load_Encached Standard_Cache
06d3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
06d4 c5fc | | Store 0x2,-0x4
06d5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
06d6 TRAP_0680:
06d6 0007 | | Action Break_Optional
06d7 e211 | | Load 0x1,0x11
06d8 0257 | W | Execute Discrete,Raise
06d9 0000 0000 | | .BLANK 0000[0x7]
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e5 | | .CONST 0x06e5 ; Address of begin
06e1 06ed | | .CONST 0x06ed ; Address of exception handler
06e2 0002 | | .CONST 0x0002 ; Number of locals
06e3 INIT_06e0:
06e3 029f 0743 | C| Declare_Subprogram INIT_0740,For_Call
06e5 BODY_06e0:
06e5 e407 | | Load 0x2,0x7
06e6 00ea | | Load_Encached Null_String_Cache
06e7 e5fe | | Load 0x2,-0x2
06e8 4801 |H | Short_Literal 0x1
06e9 e016 | | Load 0x0,0x16
06ea 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06eb c407 | | Store 0x2,0x7
06ec 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06ed TRAP_06e0:
06ed 0007 | | Action Break_Optional
06ee 8602 | | Call 0x3,0x2
06ef 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3 | | .CONST 0x06f3 ; Address of begin
06f1 06fb | | .CONST 0x06fb ; Address of exception handler
06f2 0001 | | .CONST 0x0001 ; Number of locals
06f3 BODY_06f0:
06f3 INIT_06f0:
06f3 e402 | | Load 0x2,0x2
06f4 00ea | | Load_Encached Null_String_Cache
06f5 e5fd | | Load 0x2,-0x3
06f6 4800 |H | Short_Literal 0x0
06f7 e016 | | Load 0x0,0x16
06f8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06f9 c402 | | Store 0x2,0x2
06fa 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06fb TRAP_06f0:
06fb 0007 | | Action Break_Optional
06fc 4801 |H | Short_Literal 0x1
06fd a5f7 | | Store_Unchecked 0x2,-0x9
06fe 00cc | | Action Pop_Block
06ff 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0703 | | .CONST 0x0703 ; Address of begin
0701 070a | | .CONST 0x070a ; Address of exception handler
0702 0001 | | .CONST 0x0001 ; Number of locals
0703 BODY_0700:
0703 INIT_0700:
0703 4800 |H | Short_Literal 0x0
0704 e408 | | Load 0x2,0x8
0705 0aff | | Execute_Immediate Plus,-0x1
0706 e00b | | Load 0x0,0xb
0707 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
0708 a403 | | Store_Unchecked 0x2,0x3
0709 4501 |E | Exit_Suprogram New_Top_Offset 0x1
070a TRAP_0700:
070a 010b | | Execute Exception,Is_Storage_Error
070b 6809 |h | Jump_Zero 0x715
070c e402 | | Load 0x2,0x2
070d e403 | | Load 0x2,0x3
070e 8213 | | Call 0x1,0x13
070f c403 | | Store 0x2,0x3
0710 c402 | | Store 0x2,0x2
0711 4803 |H | Short_Literal 0x3
0712 a5f7 | | Store_Unchecked 0x2,-0x9
0713 00cc | | Action Pop_Block
0714 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0715 0100 | | Execute Exception,Raise
0716 0000 0000 | | .XXX[0x2]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071b | | .CONST 0x071b ; Address of begin
0719 0721 | ! | .CONST 0x0721 ; Address of exception handler
071a 0001 | | .CONST 0x0001 ; Number of locals
071b BODY_0718:
071b INIT_0718:
071b e402 | | Load 0x2,0x2
071c e403 | | Load 0x2,0x3
071d 8213 | | Call 0x1,0x13
071e c403 | | Store 0x2,0x3
071f c402 | | Store 0x2,0x2
0720 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0721 TRAP_0718:
0721 0007 | | Action Break_Optional
0722 0008 | | Action Idle
0723 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0724 0000 0000 | | .BLANK 0000[0x4]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072b | + | .CONST 0x072b ; Address of begin
0729 0734 | 4 | .CONST 0x0734 ; Address of exception handler
072a 0001 | | .CONST 0x0001 ; Number of locals
072b BODY_0728:
072b INIT_0728:
072b 4800 |H | Short_Literal 0x0
072c e408 | | Load 0x2,0x8
072d e407 | | Load 0x2,0x7
072e 0271 | q | Execute Discrete,Times
072f 0aff | | Execute_Immediate Plus,-0x1
0730 e00b | | Load 0x0,0xb
0731 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
0732 a405 | | Store_Unchecked 0x2,0x5
0733 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0734 TRAP_0728:
0734 010b | | Execute Exception,Is_Storage_Error
0735 6804 |h | Jump_Zero 0x73a
0736 e00b | | Load 0x0,0xb
0737 a5fd | | Store_Unchecked 0x2,-0x3
0738 00cc | | Action Pop_Block
0739 4502 |E | Exit_Suprogram New_Top_Offset 0x2
073a 0100 | | Execute Exception,Raise
073b 0000 0000 | | .BLANK 0000[0x5]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743 | C | .CONST 0x0743 ; Address of begin
0741 074b | K | .CONST 0x074b ; Address of exception handler
0742 0001 | | .CONST 0x0001 ; Number of locals
0743 BODY_0740:
0743 INIT_0740:
0743 e407 | | Load 0x2,0x7
0744 00ea | | Load_Encached Null_String_Cache
0745 e5fe | | Load 0x2,-0x2
0746 4801 |H | Short_Literal 0x1
0747 e016 | | Load 0x0,0x16
0748 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0749 c407 | | Store 0x2,0x7
074a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
074b TRAP_0740:
074b 0007 | | Action Break_Optional
074c 4801 |H | Short_Literal 0x1
074d 00cb | | Action Pop_Block_With_Result
074e 00cb | | Action Pop_Block_With_Result
074f 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7
0750 ; --------------------------------------------------------------------------------------
0750 ; STRING TABLE
0750 ; --------------------------------------------------------------------------------------
0750 0034 | 4 | .STRTAB 0x0034->0x076a ; "#define "
0751 003a | : | .STRTAB 0x003a->0x076e ; "_width"
0752 003e | > | .STRTAB 0x003e->0x0771 ; "_height"
0753 0043 | C | .STRTAB 0x0043->0x0774 ; "_x_hot "
0754 0048 | H | .STRTAB 0x0048->0x0778 ; "_y_hot "
0755 004d | M | .STRTAB 0x004d->0x077b ; "static char "
0756 0057 | W | .STRTAB 0x0057->0x0781 ; "_bits() := {"
0757 0061 | a | .STRTAB 0x0061->0x0787 ; " "
0758 0060 | ` | .STRTAB 0x0060->0x0788 ; ", "
0759 0060 | ` | .STRTAB 0x0060->0x0789 ; "0x0"
075a 0061 | a | .STRTAB 0x0061->0x078a ; "0x"
075b 0061 | a | .STRTAB 0x0061->0x078b ; "}"
075c 0060 | ` | .STRTAB 0x0060->0x078c ; "width"
075d 0063 | c | .STRTAB 0x0063->0x078e ; "height"
075e 0067 | g | .STRTAB 0x0067->0x0791 ; "hot"
075f 0068 | h | .STRTAB 0x0068->0x0793 ; "x_hot"
0760 006b | k | .STRTAB 0x006b->0x0795 ; "y_hot"
0761 006e | n | .STRTAB 0x006e->0x0798 ; "static short "
0762 0079 | y | .STRTAB 0x0079->0x079e ; "static unsigned char "
0763 008c | | .STRTAB 0x008c->0x07a9 ; " := {"
0764 008f | | .STRTAB 0x008f->0x07ab ; "bits()"
0765 0093 | | .STRTAB 0x0093->0x07ae ; " 0x"
0766 0094 | | .STRTAB 0x0094->0x07b0 ; ",}"
0767 0094 | | .STRTAB 0x0094->0x07b1 ; "16#"
0768 0095 | | .STRTAB 0x0095->0x07b2 ; "#"
0769 0094 | | .STREND 0x0094->0x07b3
076a 2364 6566 |#def| .STRTAB_STRINGS
07b3 0000 0000 | | .BLANK 0000[0x5]
07b8 ; --------------------------------------------------------------------------------------
07b8 ; Debug Table
07b8 ; --------------------------------------------------------------------------------------
07b8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6801,0x0000,0x0001,0x0013
07be 000b 080a | | .DBG4T 0x000b,0x080a,0x8000,0x0000
07c2 0014 0810 | | .DBG4T 0x0014,0x0810,0x8000,0x0000
07c6 003b 0820 | ; | .DBG4T 0x003b,0x0820,0x0002,0x0000
07ca 00d3 083e | >| .DBG4T 0x00d3,0x083e,0x0002,0x0000
07ce 018b 085f | _| .DBG4T 0x018b,0x085f,0x0002,0x0000
07d2 02e3 08aa | | .DBG4T 0x02e3,0x08aa,0x0001,0x4000
07d6 0533 09a5 | 3 | .DBG4T 0x0533,0x09a5,0x0001,0x0000
07da 05ab 09c6 | | .DBG4T 0x05ab,0x09c6,0x0001,0x0000
07de 05bb 09cb | | .DBG4T 0x05bb,0x09cb,0x0001,0x0000
07e2 05e3 09d2 | | .DBG4T 0x05e3,0x09d2,0x0001,0x0000
07e6 0603 09db | | .DBG4T 0x0603,0x09db,0x0001,0x4000
07ea 064b 09eb | K | .DBG4T 0x064b,0x09eb,0x0001,0x4000
07ee 0683 0a00 | | .DBG4T 0x0683,0x0a00,0x0001,0x4000
07f2 06e3 0a15 | | .DBG4T 0x06e3,0x0a15,0x0004,0x0000
07f6 06f3 0a19 | | .DBG4T 0x06f3,0x0a19,0x0004,0x0000
07fa 0703 0a1e | | .DBG4T 0x0703,0x0a1e,0x0004,0x0000
07fe 071b 0a24 | $| .DBG4T 0x071b,0x0a24,0x0004,0x0000
0802 072b 0a28 | + (| .DBG4T 0x072b,0x0a28,0x0004,0x0000
0806 0743 0a2d | C -| .DBG4T 0x0743,0x0a2d,0x0004,0x0000
080a ; --------------------------------------------------------------------------------------
080a ; Debug chain
080a ; --------------------------------------------------------------------------------------
080a 0004 0000 | | .DBGLEN 0x0004,0x0000
080c 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011
0810 ; --------------------------------------------------------------------------------------
0810 ; Debug chain
0810 ; --------------------------------------------------------------------------------------
0810 000e 0000 | | .DBGLEN 0x000e,0x0000
0812 0014 0019 | | .DBGLNO 0x0014,0x0019,0x001a,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f
0820 ; --------------------------------------------------------------------------------------
0820 ; Debug chain
0820 ; --------------------------------------------------------------------------------------
0820 0004 0018 | | .DBGLEN 0x0004,0x0018
0822 003b 0040 | ; @| .DBGLNO 0x003b,0x0040,0x0042,0x0044,0x0048,0x005a,0x005e,0x0062,0x0069,0x006d,0x0071,0x0075,0x0079,0x007d,0x0081,0x0085,0x008b,0x008f,0x0093,0x0097,0x009b,0x00a1,0x00ad,0x00b8,0x00bb,0x00bf,0x00c2,0x00c5
083e ; --------------------------------------------------------------------------------------
083e ; Debug chain
083e ; --------------------------------------------------------------------------------------
083e 0004 001b | | .DBGLEN 0x0004,0x001b
0840 00d3 00d5 | | .DBGLNO 0x00d3,0x00d5,0x00d7,0x00db,0x00dd,0x00ef,0x00f3,0x00f7,0x00fa,0x00fd,0x011e,0x0122,0x0126,0x012c,0x0130,0x0134,0x0138,0x013c,0x0140,0x0146,0x014a,0x014e,0x0152,0x0156,0x015c,0x0168,0x0173,0x0176,0x017a,0x017d,0x0180
085f ; --------------------------------------------------------------------------------------
085f ; Debug chain
085f ; --------------------------------------------------------------------------------------
085f 0007 0042 | B| .DBGLEN 0x0007,0x0042
0861 018b 018d | | .DBGLNO 0x018b,0x018d,0x018f,0x0191,0x0193,0x0195,0x019a,0x019e,0x01a1,0x01a5,0x01aa,0x01ac,0x01b1,0x01b3,0x01b7,0x01ba,0x01bb,0x01c6,0x01ca,0x01ce,0x01d0,0x01d6,0x01d9,0x01db,0x01df,0x01e1,0x01e6,0x01ee,0x01f3,0x01fb,0x01ff,0x0204,0x020c,0x0211,0x0219,0x021d,0x0221,0x0226,0x022e,0x0233,0x023b,0x023f,0x0244,0x024c,0x0251,0x0259,0x025d,0x0262,0x026a,0x026f,0x0273,0x0278,0x027d,0x027f,0x0283,0x0289,0x028d,0x0291,0x0297,0x029c,0x02a1,0x02a4,0x02aa,0x02af,0x02b6,0x02bc,0x02c1,0x02c5,0x02cb,0x02cf,0x02d2,0x02d8,0x02dc
08aa ; --------------------------------------------------------------------------------------
08aa ; Debug chain
08aa ; --------------------------------------------------------------------------------------
08aa 0015 0072 | r| .DBGLEN 0x0015,0x0072
08ac 02e3 02e8 | | .DBGLNO 0x02e3,0x02e8,0x02ea,0x02ec,0x02f1,0x02f2,0x02f3,0x02f5,0x02f7,0x02f8,0x02f9,0x02fa,0x02fc,0x02fe,0x02ff,0x0301,0x0303,0x0305,0x0307,0x030a,0x030d,0x0316,0x0319,0x0320,0x0324,0x0326,0x0328,0x0330,0x0333,0x033c,0x0344,0x034b,0x034e,0x0352,0x0357,0x035a,0x035f,0x0367,0x036e,0x0376,0x037d,0x0385,0x0388,0x038c,0x038d,0x0390,0x0394,0x0395,0x039d,0x03a4,0x03ac,0x03b3,0x03b4,0x03bc,0x03bf,0x03c2,0x03ca,0x03cd,0x03d0,0x03d8,0x03db,0x03de,0x03e7,0x03ef,0x03f2,0x03f6,0x03fb,0x03fe,0x0403,0x040b,0x040c,0x0410,0x0412,0x0414,0x041f,0x0423,0x0424,0x0426,0x0428,0x042e,0x0436,0x043a,0x043c,0x0443,0x0447,0x0449,0x0451,0x0458,0x045f,0x0463,0x046a,0x046d,0x0479,0x0480,0x0483,0x048e,0x0492,0x0499,0x049e,0x04a6,0x04aa,0x04ac,0x04b3,0x04b7,0x04b9,0x04c1,0x04c8,0x04cf,0x04d3,0x04da,0x04e7,0x04e9,0x04ee,0x04f0,0x04f5,0x04f7,0x04f8,0x0501,0x0505,0x050a,0x050c,0x050d,0x0510,0x0512,0x0514,0x0516,0x0518,0x051d,0x0521,0x0522,0x0524,0x0526,0x0529,0x052b,0x052d
0933 0001 0003 | | .XXX[0x72]
0935 0004 0005 | |
0937 0006 0007 | |
0939 0008 0009 | |
093b 000a 000b | |
093d 000c 000d | |
093f 000e 000f | |
0941 0010 0011 | |
0943 0012 0013 | |
0945 0014 0015 | |
0947 0016 0017 | |
0949 0018 0019 | |
094b 001a 001b | |
094d 001c 001d | |
094f 001e 001f | |
0951 0020 0021 | !|
0953 0022 0023 | " #|
0955 0024 0025 | $ %|
0957 0026 0027 | & '|
0959 0028 0029 | ( )|
095b 002b 002c | + ,|
095d 002d 002e | - .|
095f 002f 0030 | / 0|
0961 0031 0032 | 1 2|
0963 0033 0034 | 3 4|
0965 0035 0036 | 5 6|
0967 0037 0038 | 7 8|
0969 0039 003a | 9 :|
096b 003b 003c | ; <|
096d 003e 003f | > ?|
096f 0040 0041 | @ A|
0971 0042 0043 | B C|
0973 0044 0045 | D E|
0975 0046 0047 | F G|
0977 0048 0049 | H I|
0979 004a 004b | J K|
097b 004c 004d | L M|
097d 004e 003d | N =|
097f 004f 0050 | O P|
0981 0051 0052 | Q R|
0983 0053 0054 | S T|
0985 0055 0056 | U V|
0987 0057 0058 | W X|
0989 0059 005a | Y Z|
098b 005b 005c | [ \|
098d 0002 005d | ]|
098f 005e 005f | ^ _|
0991 0060 0061 | ` a|
0993 0062 0063 | b c|
0995 0064 0065 | d e|
0997 0066 0067 | f g|
0999 0068 0069 | h i|
099b 006a 006b | j k|
099d 006c 006d | l m|
099f 006e 006f | n o|
09a1 0070 0071 | p q|
09a3 0072 0073 | r s|
09a5 ; --------------------------------------------------------------------------------------
09a5 ; Debug chain
09a5 ; --------------------------------------------------------------------------------------
09a5 0007 0018 | | .DBGLEN 0x0007,0x0018
09a7 0533 0535 | 3 5| .DBGLNO 0x0533,0x0535,0x0537,0x0539,0x053b,0x053d,0x053f,0x0542,0x0546,0x054a,0x054e,0x0552,0x0553,0x0557,0x0559,0x055c,0x0567,0x0571,0x0576,0x057a,0x057e,0x0583,0x0588,0x058b,0x058d,0x0592,0x0595,0x059a,0x059d,0x059f,0x05a4
09c6 ; --------------------------------------------------------------------------------------
09c6 ; Debug chain
09c6 ; --------------------------------------------------------------------------------------
09c6 0000 0003 | | .DBGLEN 0x0000,0x0003
09c8 05ab 05ad | | .DBGLNO 0x05ab,0x05ad,0x05b3
09cb ; --------------------------------------------------------------------------------------
09cb ; Debug chain
09cb ; --------------------------------------------------------------------------------------
09cb 0000 0005 | | .DBGLEN 0x0000,0x0005
09cd 05bb 05d3 | | .DBGLNO 0x05bb,0x05d3,0x05d8,0x05d9,0x05db
09d2 ; --------------------------------------------------------------------------------------
09d2 ; Debug chain
09d2 ; --------------------------------------------------------------------------------------
09d2 0000 0007 | | .DBGLEN 0x0000,0x0007
09d4 05e3 05e8 | | .DBGLNO 0x05e3,0x05e8,0x05ec,0x05f4,0x05f7,0x05fb,0x05fc
09db ; --------------------------------------------------------------------------------------
09db ; Debug chain
09db ; --------------------------------------------------------------------------------------
09db 0000 0007 | | .DBGLEN 0x0000,0x0007
09dd 0603 061a | | .DBGLNO 0x0603,0x061a,0x061c,0x061e,0x0623,0x0627,0x063f
09e4 0001 0002 | | .XXX[0x7]
09e6 0003 0004 | |
09e8 0006 0005 | |
09ea 0007 | |
09eb ; --------------------------------------------------------------------------------------
09eb ; Debug chain
09eb ; --------------------------------------------------------------------------------------
09eb 0001 0009 | | .DBGLEN 0x0001,0x0009
09ed 064b 064c | K L| .DBGLNO 0x064b,0x064c,0x0657,0x0659,0x065b,0x065d,0x0662,0x0666,0x0672,0x067d
09f7 0001 0002 | | .XXX[0x9]
09f9 0003 0004 | |
09fb 0005 0007 | |
09fd 0006 0008 | |
09ff 0009 | |
0a00 ; --------------------------------------------------------------------------------------
0a00 ; Debug chain
0a00 ; --------------------------------------------------------------------------------------
0a00 0001 0009 | | .DBGLEN 0x0001,0x0009
0a02 0683 0684 | | .DBGLNO 0x0683,0x0684,0x069d,0x069f,0x06a1,0x06a3,0x06a8,0x06ac,0x06c6,0x06d7
0a0c 0001 0002 | | .XXX[0x9]
0a0e 0003 0004 | |
0a10 0005 0007 | |
0a12 0006 0008 | |
0a14 0009 | |
0a15 ; --------------------------------------------------------------------------------------
0a15 ; Debug chain
0a15 ; --------------------------------------------------------------------------------------
0a15 0000 0002 | | .DBGLEN 0x0000,0x0002
0a17 06e5 06ee | | .DBGLNO 0x06e5,0x06ee
0a19 ; --------------------------------------------------------------------------------------
0a19 ; Debug chain
0a19 ; --------------------------------------------------------------------------------------
0a19 0000 0003 | | .DBGLEN 0x0000,0x0003
0a1b 06f3 06fc | | .DBGLNO 0x06f3,0x06fc,0x06fe
0a1e ; --------------------------------------------------------------------------------------
0a1e ; Debug chain
0a1e ; --------------------------------------------------------------------------------------
0a1e 0000 0004 | | .DBGLEN 0x0000,0x0004
0a20 0703 070c | | .DBGLNO 0x0703,0x070c,0x0711,0x0713
0a24 ; --------------------------------------------------------------------------------------
0a24 ; Debug chain
0a24 ; --------------------------------------------------------------------------------------
0a24 0000 0002 | | .DBGLEN 0x0000,0x0002
0a26 071b 0722 | "| .DBGLNO 0x071b,0x0722
0a28 ; --------------------------------------------------------------------------------------
0a28 ; Debug chain
0a28 ; --------------------------------------------------------------------------------------
0a28 0000 0003 | | .DBGLEN 0x0000,0x0003
0a2a 072b 0736 | + 6| .DBGLNO 0x072b,0x0736,0x0738
0a2d ; --------------------------------------------------------------------------------------
0a2d ; Debug chain
0a2d ; --------------------------------------------------------------------------------------
0a2d 0000 0002 | | .DBGLEN 0x0000,0x0002
0a2f 0743 074c | C L| .DBGLNO 0x0743,0x074c
0a31 0000 0000 | | .BLANK 0000[0x1cf]