|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0694fc
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0380 | | .CONST 0x0380 ; 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 003e | > | .CONST 0x003e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0019 | | .CONST 0x0019 ; Number of locals
000b INIT_0008:
000b 4801 |H | Short_Literal 0x1
000c 4804 |H | Short_Literal 0x4
000d e001 | | Load 0x0,0x1
000e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
000f 035c | \ | Declare_Type Array,Constrained,Visible
0010 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated
0012 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
0014 4801 |H | Short_Literal 0x1
0015 4808 |H | Short_Literal 0x8
0016 e001 | | Load 0x0,0x1
0017 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0018 035c | \ | Declare_Type Array,Constrained,Visible
0019 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated
001b 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated
001d 00bf | | Action Accept_Activation
001e e002 | | Load 0x0,0x2
001f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0020 4800 |H | Short_Literal 0x0
0021 608a |` | Indirect_Literal Discrete,0xac,{0x7fffffff, 0xffffffff}
0022 00da | | Load_Top At_Offset_2
0023 03f8 | | Declare_Type Discrete,Constrained
0024 4f81 |O | Short_Literal -0x7f
0025 4880 |H | Short_Literal 0x80
0026 00db | | Load_Top At_Offset_3
0027 03f8 | | Declare_Type Discrete,Constrained
0028 4800 |H | Short_Literal 0x0
0029 607e |`~ | Indirect_Literal Discrete,0xa8,{0x00000000, 0x007fffff}
002a e213 | | Load 0x1,0x13
002b 03f8 | | Declare_Type Discrete,Constrained
002c 4c01 |L | Short_Literal -0x3ff
002d 6076 |`v | Indirect_Literal Discrete,0xa4,{0x00000000, 0x00000400}
002e e213 | | Load 0x1,0x13
002f 03f8 | | Declare_Type Discrete,Constrained
0030 4800 |H | Short_Literal 0x0
0031 606e |`n | Indirect_Literal Discrete,0xa0,{0x000fffff, 0xffffffff}
0032 e213 | | Load 0x1,0x13
0033 03f8 | | Declare_Type Discrete,Constrained
0034 029d 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call
0036 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0037 00c7 | | Action Elaborate_Subprogram
0038 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0039 00c7 | | Action Elaborate_Subprogram
003a 1d11 | | Execute_Immediate Reference_Lex_1,0x11
003b 00c7 | | Action Elaborate_Subprogram
003c 1d12 | | Execute_Immediate Reference_Lex_1,0x12
003d 00c7 | | Action Elaborate_Subprogram
003e BODY_0008:
003e 00bc | | Action Signal_Activated
003f 00bb | | Action Signal_Completion
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0053 | S | .CONST 0x0053 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0008 | | .CONST 0x0008 ; Number of locals
0043 INIT_0040:
0043 e20d | | Load 0x1,0xd
0044 0337 | 7 | Declare_Variable Array
0045 00db | | Load_Top At_Offset_3
0046 00d9 | | Load_Top At_Offset_1
0047 01d4 | | Execute Vector,Structure_Write
0048 e002 | | Load 0x0,0x2
0049 1b11 | | Execute Package,Field_Read,Field_Number 0x11
004a 00e1 | | Load_Encached Boolean_Cache
004b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
004c e215 | | Load 0x1,0x15
004d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
004e e216 | | Load 0x1,0x16
004f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0050 00e3 | | Load_Encached Natural_Cache
0051 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call
0053 BODY_0040:
0053 8408 | | Call 0x2,0x8
0054 00d9 | | Load_Top At_Offset_1
0055 0a81 | | Execute_Immediate Plus,-0x7f
0056 00d8 | | Load_Top At_Offset_0
0057 e215 | | Load 0x1,0x15
0058 0260 | ` | Execute Discrete,In_Type
0059 7001 |p | Jump_Nonzero 0x5b
005a 0801 | | Execute_Immediate Raise,0x1
005b a405 | | Store_Unchecked 0x2,0x5
005c 00db | | Load_Top At_Offset_3
005d 0f80 | | Execute_Immediate Equal,-0x80
005e 6803 |h | Jump_Zero 0x62
005f 583c |X< | Indirect_Literal Float,0x9c,3.402823669209385e+38
0060 a403 | | Store_Unchecked 0x2,0x3
0061 781c |x | Jump 0x7e
0062 00db | | Load_Top At_Offset_3
0063 4f81 |O | Short_Literal -0x7f
0064 027d | } | Execute Discrete,Greater
0065 680c |h | Jump_Zero 0x72
0066 5831 |X1 | Indirect_Literal Float,0x98,1.0
0067 00db | | Load_Top At_Offset_3
0068 0237 | 7 | Execute Float,Convert_From_Discrete
0069 582a |X* | Indirect_Literal Float,0x94,1.1920928955078125e-07
006a 023b | ; | Execute Float,Times
006b 023d | = | Execute Float,Plus
006c 5823 |X# | Indirect_Literal Float,0x90,2.0
006d e405 | | Load 0x2,0x5
006e 0239 | 9 | Execute Float,Exponentiate
006f 023b | ; | Execute Float,Times
0070 c403 | | Store 0x2,0x3
0071 780c |x | Jump 0x7e
0072 00da | | Load_Top At_Offset_2
0073 6808 |h | Jump_Zero 0x7c
0074 00da | | Load_Top At_Offset_2
0075 0237 | 7 | Execute Float,Convert_From_Discrete
0076 581d |X | Indirect_Literal Float,0x94,1.1920928955078125e-07
0077 023b | ; | Execute Float,Times
0078 5813 |X | Indirect_Literal Float,0x8c,1.1754943508222875e-38
0079 023b | ; | Execute Float,Times
007a c403 | | Store 0x2,0x3
007b 7802 |x | Jump 0x7e
007c 580b |X | Indirect_Literal Float,0x88,0.0
007d a403 | | Store_Unchecked 0x2,0x3
007e e404 | | Load 0x2,0x4
007f 6803 |h | Jump_Zero 0x83
0080 e403 | | Load 0x2,0x3
0081 023f | ? | Execute Float,Unary_Minus
0082 c403 | | Store 0x2,0x3
0083 e403 | | Load 0x2,0x3
0084 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0085 0000 0000 | | .XXX[0x3]
0087 0000 | |
0088 0000 0000 | | .DBL 0.0
008a 0000 0000 | |
008c 3810 0000 |8 | .DBL 1.1754943508222875e-38
008e 0000 0000 | |
0090 4000 0000 |@ | .DBL 2.0
0092 0000 0000 | |
0094 3e80 0000 |> | .DBL 1.1920928955078125e-07
0096 0000 0000 | |
0098 3ff0 0000 |? | .DBL 1.0
009a 0000 0000 | |
009c 47f0 0000 |G | .DBL 3.402823669209385e+38
009e 0000 0000 | |
00a0 000f ffff | | .LITERAL {0x000fffff, 0xffffffff}
00a4 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
00a8 0000 0000 | | .LITERAL {0x00000000, 0x007fffff}
00ac 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff}
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00c1 | | .CONST 0x00c1 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0007 | | .CONST 0x0007 ; Number of locals
00b3 INIT_00b0:
00b3 00da | | Load_Top At_Offset_2
00b4 e002 | | Load 0x0,0x2
00b5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00b6 03df | | Declare_Variable Float,With_Value
00b7 e20d | | Load 0x1,0xd
00b8 0337 | 7 | Declare_Variable Array
00b9 00e1 | | Load_Encached Boolean_Cache
00ba 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00bb e215 | | Load 0x1,0x15
00bc 0007 | | Action Break_Optional
00bd e216 | | Load 0x1,0x16
00be 0007 | | Action Break_Optional
00bf e214 | | Load 0x1,0x14
00c0 0007 | | Action Break_Optional
00c1 BODY_00b0:
00c1 e402 | | Load 0x2,0x2
00c2 014b | K | Execute Float,Less_Zero
00c3 6805 |h | Jump_Zero 0xc9
00c4 4801 |H | Short_Literal 0x1
00c5 a404 | | Store_Unchecked 0x2,0x4
00c6 e402 | | Load 0x2,0x2
00c7 023f | ? | Execute Float,Unary_Minus
00c8 c402 | | Store 0x2,0x2
00c9 e402 | | Load 0x2,0x2
00ca 7005 |p | Jump_Nonzero 0xd0
00cb 4f81 |O | Short_Literal -0x7f
00cc 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00cd 4800 |H | Short_Literal 0x0
00ce 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00cf 7838 |x8 | Jump 0x108
00d0 e402 | | Load 0x2,0x2
00d1 5fba |_ | Indirect_Literal Float,0x8c,1.1754943508222875e-38
00d2 0244 | D | Execute Float,Less
00d3 680e |h | Jump_Zero 0xe2
00d4 4f81 |O | Short_Literal -0x7f
00d5 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00d6 e402 | | Load 0x2,0x2
00d7 5874 |Xt | Indirect_Literal Float,0x14c,8.507059173023462e+37
00d8 023b | ; | Execute Float,Times
00d9 c402 | | Store 0x2,0x2
00da e402 | | Load 0x2,0x2
00db 586c |Xl | Indirect_Literal Float,0x148,8388608.0
00dc 023b | ; | Execute Float,Times
00dd 0235 | 5 | Execute Float,Round_To_Discrete
00de e216 | | Load 0x1,0x16
00df 025e | ^ | Execute Discrete,Convert
00e0 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00e1 7826 |x& | Jump 0x108
00e2 e402 | | Load 0x2,0x2
00e3 5860 |X` | Indirect_Literal Float,0x144,3.4028234663852886e+38
00e4 0245 | E | Execute Float,Greater
00e5 6805 |h | Jump_Zero 0xeb
00e6 4880 |H | Short_Literal 0x80
00e7 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00e8 4800 |H | Short_Literal 0x0
00e9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00ea 781d |x | Jump 0x108
00eb e402 | | Load 0x2,0x2
00ec 8219 | | Call 0x1,0x19
00ed 00d8 | | Load_Top At_Offset_0
00ee e215 | | Load 0x1,0x15
00ef 0260 | ` | Execute Discrete,In_Type
00f0 7001 |p | Jump_Nonzero 0xf2
00f1 0801 | | Execute_Immediate Raise,0x1
00f2 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00f3 e402 | | Load 0x2,0x2
00f4 5f9b |_ | Indirect_Literal Float,0x90,2.0
00f5 e405 | | Load 0x2,0x5
00f6 0275 | u | Execute Discrete,Unary_Minus
00f7 00d8 | | Load_Top At_Offset_0
00f8 00e2 | | Load_Encached Integer_Cache
00f9 0260 | ` | Execute Discrete,In_Type
00fa 7001 |p | Jump_Nonzero 0xfc
00fb 0801 | | Execute_Immediate Raise,0x1
00fc 0239 | 9 | Execute Float,Exponentiate
00fd 023b | ; | Execute Float,Times
00fe c402 | | Store 0x2,0x2
00ff e402 | | Load 0x2,0x2
0100 5f97 |_ | Indirect_Literal Float,0x98,1.0
0101 023c | < | Execute Float,Minus
0102 5845 |XE | Indirect_Literal Float,0x148,8388608.0
0103 023b | ; | Execute Float,Times
0104 0235 | 5 | Execute Float,Round_To_Discrete
0105 e216 | | Load 0x1,0x16
0106 025e | ^ | Execute Discrete,Convert
0107 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0108 00da | | Load_Top At_Offset_2
0109 0a7f | | Execute_Immediate Plus,0x7f
010a 0059 | Y | Store_Top Discrete,At_Offset_1
010b 00cf | | Action Mark_Auxiliary
010c 4802 |H | Short_Literal 0x2
010d 4804 |H | Short_Literal 0x4
010e 0007 | | Action Break_Optional
010f e406 | | Load 0x2,0x6
0110 48ff |H | Short_Literal 0xff
0111 0279 | y | Execute Discrete,And
0112 00d8 | | Load_Top At_Offset_0
0113 e003 | | Load 0x0,0x3
0114 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0115 0260 | ` | Execute Discrete,In_Type
0116 7001 |p | Jump_Nonzero 0x118
0117 0801 | | Execute_Immediate Raise,0x1
0118 00d9 | | Load_Top At_Offset_1
0119 e403 | | Load 0x2,0x3
011a 01d6 | | Execute Vector,Field_Write
011b e406 | | Load 0x2,0x6
011c 09f8 | | Execute_Immediate Binary_Scale,-0x8
011d c406 | | Store 0x2,0x6
011e 00c8 | | Action Pop_Auxiliary_Range
011f 37ef |7 | Loop_Decreasing 0x10f
0120 00ce | | Action Pop_Auxiliary
0121 00d8 | | Load_Top At_Offset_0
0122 4801 |H | Short_Literal 0x1
0123 0279 | y | Execute Discrete,And
0124 6808 |h | Jump_Zero 0x12d
0125 4802 |H | Short_Literal 0x2
0126 e403 | | Load 0x2,0x3
0127 01d7 | | Execute Vector,Field_Read
0128 4880 |H | Short_Literal 0x80
0129 0273 | s | Execute Discrete,Plus
012a 4802 |H | Short_Literal 0x2
012b e403 | | Load 0x2,0x3
012c 01d6 | | Execute Vector,Field_Write
012d 00d8 | | Load_Top At_Offset_0
012e 09ff | | Execute_Immediate Binary_Scale,-0x1
012f 00d8 | | Load_Top At_Offset_0
0130 e003 | | Load 0x0,0x3
0131 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0132 0260 | ` | Execute Discrete,In_Type
0133 7001 |p | Jump_Nonzero 0x135
0134 0801 | | Execute_Immediate Raise,0x1
0135 4801 |H | Short_Literal 0x1
0136 e403 | | Load 0x2,0x3
0137 01d6 | | Execute Vector,Field_Write
0138 00db | | Load_Top At_Offset_3
0139 6808 |h | Jump_Zero 0x142
013a 4801 |H | Short_Literal 0x1
013b e403 | | Load 0x2,0x3
013c 01d7 | | Execute Vector,Field_Read
013d 4880 |H | Short_Literal 0x80
013e 0273 | s | Execute Discrete,Plus
013f 4801 |H | Short_Literal 0x1
0140 e403 | | Load 0x2,0x3
0141 01d6 | | Execute Vector,Field_Write
0142 e403 | | Load 0x2,0x3
0143 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0144 47ef ffff |G | .DBL 3.4028234663852886e+38
0146 e000 0000 | |
0148 4160 0000 |A` | .DBL 8388608.0
014a 0000 0000 | |
014c 47d0 0000 |G | .DBL 8.507059173023462e+37
014e 0000 0000 | |
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0163 | c | .CONST 0x0163 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0008 | | .CONST 0x0008 ; Number of locals
0153 INIT_0150:
0153 e002 | | Load 0x0,0x2
0154 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0155 e210 | | Load 0x1,0x10
0156 0337 | 7 | Declare_Variable Array
0157 e5ff | | Load 0x2,-0x1
0158 00d9 | | Load_Top At_Offset_1
0159 01d4 | | Execute Vector,Structure_Write
015a 00e1 | | Load_Encached Boolean_Cache
015b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
015c e217 | | Load 0x1,0x17
015d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
015e e218 | | Load 0x1,0x18
015f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0160 00e3 | | Load_Encached Natural_Cache
0161 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call
0163 BODY_0150:
0163 8408 | | Call 0x2,0x8
0164 00d9 | | Load_Top At_Offset_1
0165 4c01 |L | Short_Literal -0x3ff
0166 0273 | s | Execute Discrete,Plus
0167 00d8 | | Load_Top At_Offset_0
0168 e217 | | Load 0x1,0x17
0169 0260 | ` | Execute Discrete,In_Type
016a 7001 |p | Jump_Nonzero 0x16c
016b 0801 | | Execute_Immediate Raise,0x1
016c a405 | | Store_Unchecked 0x2,0x5
016d 00db | | Load_Top At_Offset_3
016e 6041 |`A | Indirect_Literal Discrete,0x1b0,{0x00000000, 0x00000400}
016f 027f | | Execute Discrete,Equal
0170 6803 |h | Jump_Zero 0x174
0171 583a |X: | Indirect_Literal Float,0x1ac,1.7976931348623157e+308
0172 a402 | | Store_Unchecked 0x2,0x2
0173 781c |x | Jump 0x190
0174 00db | | Load_Top At_Offset_3
0175 4c01 |L | Short_Literal -0x3ff
0176 027d | } | Execute Discrete,Greater
0177 680c |h | Jump_Zero 0x184
0178 582f |X/ | Indirect_Literal Float,0x1a8,1.0
0179 00db | | Load_Top At_Offset_3
017a 0237 | 7 | Execute Float,Convert_From_Discrete
017b 5828 |X( | Indirect_Literal Float,0x1a4,2.220446049250313e-16
017c 023b | ; | Execute Float,Times
017d 023d | = | Execute Float,Plus
017e 5821 |X! | Indirect_Literal Float,0x1a0,2.0
017f e405 | | Load 0x2,0x5
0180 0239 | 9 | Execute Float,Exponentiate
0181 023b | ; | Execute Float,Times
0182 a402 | | Store_Unchecked 0x2,0x2
0183 780c |x | Jump 0x190
0184 00da | | Load_Top At_Offset_2
0185 6808 |h | Jump_Zero 0x18e
0186 00da | | Load_Top At_Offset_2
0187 0237 | 7 | Execute Float,Convert_From_Discrete
0188 581b |X | Indirect_Literal Float,0x1a4,2.220446049250313e-16
0189 023b | ; | Execute Float,Times
018a 5811 |X | Indirect_Literal Float,0x19c,2.2250738585072014e-308
018b 023b | ; | Execute Float,Times
018c a402 | | Store_Unchecked 0x2,0x2
018d 7802 |x | Jump 0x190
018e 5809 |X | Indirect_Literal Float,0x198,0.0
018f a402 | | Store_Unchecked 0x2,0x2
0190 e404 | | Load 0x2,0x4
0191 6803 |h | Jump_Zero 0x195
0192 e402 | | Load 0x2,0x2
0193 023f | ? | Execute Float,Unary_Minus
0194 a402 | | Store_Unchecked 0x2,0x2
0195 e402 | | Load 0x2,0x2
0196 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0197 0000 | | .XXX[0x1]
0198 0000 0000 | | .DBL 0.0
019a 0000 0000 | |
019c 0010 0000 | | .DBL 2.2250738585072014e-308
019e 0000 0000 | |
01a0 4000 0000 |@ | .DBL 2.0
01a2 0000 0000 | |
01a4 3cb0 0000 |< | .DBL 2.220446049250313e-16
01a6 0000 0000 | |
01a8 3ff0 0000 |? | .DBL 1.0
01aa 0000 0000 | |
01ac 7fef ffff | | .DBL 1.7976931348623157e+308
01ae ffff ffff | |
01b0 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
01b4 0000 0000 | | .BLANK 0000[0x4]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01c9 | | .CONST 0x01c9 ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0007 | | .CONST 0x0007 ; Number of locals
01bb INIT_01b8:
01bb 00da | | Load_Top At_Offset_2
01bc e002 | | Load 0x0,0x2
01bd 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01be 03df | | Declare_Variable Float,With_Value
01bf e210 | | Load 0x1,0x10
01c0 0337 | 7 | Declare_Variable Array
01c1 00e1 | | Load_Encached Boolean_Cache
01c2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
01c3 e217 | | Load 0x1,0x17
01c4 0007 | | Action Break_Optional
01c5 e218 | | Load 0x1,0x18
01c6 0007 | | Action Break_Optional
01c7 e214 | | Load 0x1,0x14
01c8 0007 | | Action Break_Optional
01c9 BODY_01b8:
01c9 e402 | | Load 0x2,0x2
01ca 014b | K | Execute Float,Less_Zero
01cb 6805 |h | Jump_Zero 0x1d1
01cc 4801 |H | Short_Literal 0x1
01cd a404 | | Store_Unchecked 0x2,0x4
01ce e402 | | Load 0x2,0x2
01cf 023f | ? | Execute Float,Unary_Minus
01d0 a402 | | Store_Unchecked 0x2,0x2
01d1 e402 | | Load 0x2,0x2
01d2 7005 |p | Jump_Nonzero 0x1d8
01d3 4c01 |L | Short_Literal -0x3ff
01d4 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
01d5 4800 |H | Short_Literal 0x0
01d6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
01d7 7833 |x3 | Jump 0x20b
01d8 e402 | | Load 0x2,0x2
01d9 5fc2 |_ | Indirect_Literal Float,0x19c,2.2250738585072014e-308
01da 0244 | D | Execute Float,Less
01db 680e |h | Jump_Zero 0x1ea
01dc 4c01 |L | Short_Literal -0x3ff
01dd 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
01de e402 | | Load 0x2,0x2
01df 5874 |Xt | Indirect_Literal Float,0x254,4.49423283715579e+307
01e0 023b | ; | Execute Float,Times
01e1 a402 | | Store_Unchecked 0x2,0x2
01e2 e402 | | Load 0x2,0x2
01e3 586c |Xl | Indirect_Literal Float,0x250,4503599627370496.0
01e4 023b | ; | Execute Float,Times
01e5 0235 | 5 | Execute Float,Round_To_Discrete
01e6 e218 | | Load 0x1,0x18
01e7 025e | ^ | Execute Discrete,Convert
01e8 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
01e9 7821 |x! | Jump 0x20b
01ea e402 | | Load 0x2,0x2
01eb 5fc0 |_ | Indirect_Literal Float,0x1ac,1.7976931348623157e+308
01ec 0245 | E | Execute Float,Greater
01ed 6805 |h | Jump_Zero 0x1f3
01ee 67c1 |g | Indirect_Literal Discrete,0x1b0,{0x00000000, 0x00000400}
01ef 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
01f0 4800 |H | Short_Literal 0x0
01f1 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
01f2 7818 |x | Jump 0x20b
01f3 e402 | | Load 0x2,0x2
01f4 8219 | | Call 0x1,0x19
01f5 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
01f6 e402 | | Load 0x2,0x2
01f7 5fa8 |_ | Indirect_Literal Float,0x1a0,2.0
01f8 e405 | | Load 0x2,0x5
01f9 0275 | u | Execute Discrete,Unary_Minus
01fa 00d8 | | Load_Top At_Offset_0
01fb 00e2 | | Load_Encached Integer_Cache
01fc 0260 | ` | Execute Discrete,In_Type
01fd 7001 |p | Jump_Nonzero 0x1ff
01fe 0801 | | Execute_Immediate Raise,0x1
01ff 0239 | 9 | Execute Float,Exponentiate
0200 023b | ; | Execute Float,Times
0201 a402 | | Store_Unchecked 0x2,0x2
0202 e402 | | Load 0x2,0x2
0203 5fa4 |_ | Indirect_Literal Float,0x1a8,1.0
0204 023c | < | Execute Float,Minus
0205 584a |XJ | Indirect_Literal Float,0x250,4503599627370496.0
0206 023b | ; | Execute Float,Times
0207 0235 | 5 | Execute Float,Round_To_Discrete
0208 e218 | | Load 0x1,0x18
0209 025e | ^ | Execute Discrete,Convert
020a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
020b 00da | | Load_Top At_Offset_2
020c 4bff |K | Short_Literal 0x3ff
020d 0273 | s | Execute Discrete,Plus
020e 0059 | Y | Store_Top Discrete,At_Offset_1
020f 00cf | | Action Mark_Auxiliary
0210 4802 |H | Short_Literal 0x2
0211 4808 |H | Short_Literal 0x8
0212 0007 | | Action Break_Optional
0213 e406 | | Load 0x2,0x6
0214 48ff |H | Short_Literal 0xff
0215 0279 | y | Execute Discrete,And
0216 00d8 | | Load_Top At_Offset_0
0217 e003 | | Load 0x0,0x3
0218 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0219 0260 | ` | Execute Discrete,In_Type
021a 7001 |p | Jump_Nonzero 0x21c
021b 0801 | | Execute_Immediate Raise,0x1
021c 00d9 | | Load_Top At_Offset_1
021d e403 | | Load 0x2,0x3
021e 01d6 | | Execute Vector,Field_Write
021f e406 | | Load 0x2,0x6
0220 09f8 | | Execute_Immediate Binary_Scale,-0x8
0221 c406 | | Store 0x2,0x6
0222 00c8 | | Action Pop_Auxiliary_Range
0223 37ef |7 | Loop_Decreasing 0x213
0224 00ce | | Action Pop_Auxiliary
0225 4802 |H | Short_Literal 0x2
0226 e403 | | Load 0x2,0x3
0227 01d7 | | Execute Vector,Field_Read
0228 00d9 | | Load_Top At_Offset_1
0229 480f |H | Short_Literal 0xf
022a 0279 | y | Execute Discrete,And
022b 0904 | | Execute_Immediate Binary_Scale,0x4
022c 00d8 | | Load_Top At_Offset_0
022d e003 | | Load 0x0,0x3
022e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
022f 0260 | ` | Execute Discrete,In_Type
0230 7001 |p | Jump_Nonzero 0x232
0231 0801 | | Execute_Immediate Raise,0x1
0232 0273 | s | Execute Discrete,Plus
0233 4802 |H | Short_Literal 0x2
0234 e403 | | Load 0x2,0x3
0235 01d6 | | Execute Vector,Field_Write
0236 00d8 | | Load_Top At_Offset_0
0237 09fc | | Execute_Immediate Binary_Scale,-0x4
0238 00d8 | | Load_Top At_Offset_0
0239 e003 | | Load 0x0,0x3
023a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
023b 0260 | ` | Execute Discrete,In_Type
023c 7001 |p | Jump_Nonzero 0x23e
023d 0801 | | Execute_Immediate Raise,0x1
023e 4801 |H | Short_Literal 0x1
023f e403 | | Load 0x2,0x3
0240 01d6 | | Execute Vector,Field_Write
0241 00db | | Load_Top At_Offset_3
0242 6808 |h | Jump_Zero 0x24b
0243 4801 |H | Short_Literal 0x1
0244 e403 | | Load 0x2,0x3
0245 01d7 | | Execute Vector,Field_Read
0246 4880 |H | Short_Literal 0x80
0247 0273 | s | Execute Discrete,Plus
0248 4801 |H | Short_Literal 0x1
0249 e403 | | Load 0x2,0x3
024a 01d6 | | Execute Vector,Field_Write
024b e403 | | Load 0x2,0x3
024c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
024d 0000 0000 | | .XXX[0x3]
024f 0000 | |
0250 4330 0000 |C0 | .DBL 4503599627370496.0
0252 0000 0000 | |
0254 7fd0 0000 | | .DBL 4.49423283715579e+307
0256 0000 0000 | |
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0261 | a | .CONST 0x0261 ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0004 | | .CONST 0x0004 ; Number of locals
025b INIT_0258:
025b e217 | | Load 0x1,0x17
025c 0007 | | Action Break_Optional
025d e213 | | Load 0x1,0x13
025e 0007 | | Action Break_Optional
025f 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call
0261 BODY_0258:
0261 e5ff | | Load 0x2,-0x1
0262 014c | L | Execute Float,Greater_Zero
0263 7001 |p | Jump_Nonzero 0x265
0264 0887 | | Execute_Immediate Raise,0x87
0265 e5ff | | Load 0x2,-0x1
0266 584d |XM | Indirect_Literal Float,0x2b4,2.0
0267 0243 | C | Execute Float,Greater_Equal
0268 681b |h | Jump_Zero 0x284
0269 4801 |H | Short_Literal 0x1
026a 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
026b 00cf | | Action Mark_Auxiliary
026c 7808 |x | Jump 0x275
026d 00db | | Load_Top At_Offset_3
026e 0901 | | Execute_Immediate Binary_Scale,0x1
026f c402 | | Store 0x2,0x2
0270 00db | | Load_Top At_Offset_3
0271 603e |`> | Indirect_Literal Discrete,0x2b0,{0x00000000, 0x00000400}
0272 027b | { | Execute Discrete,Greater_Equal
0273 700d |p | Jump_Nonzero 0x281
0274 00c9 | | Action Pop_Auxiliary_Loop
0275 e5ff | | Load 0x2,-0x1
0276 583d |X= | Indirect_Literal Float,0x2b4,2.0
0277 e402 | | Load 0x2,0x2
0278 0a01 | | Execute_Immediate Plus,0x1
0279 00d8 | | Load_Top At_Offset_0
027a 00e2 | | Load_Encached Integer_Cache
027b 0260 | ` | Execute Discrete,In_Type
027c 7001 |p | Jump_Nonzero 0x27e
027d 0801 | | Execute_Immediate Raise,0x1
027e 0239 | 9 | Execute Float,Exponentiate
027f 0243 | C | Execute Float,Greater_Equal
0280 77ec |w | Jump_Nonzero 0x26d
0281 00ce | | Action Pop_Auxiliary
0282 8404 | | Call 0x2,0x4
0283 7823 |x# | Jump 0x2a7
0284 e5ff | | Load 0x2,-0x1
0285 5826 |X& | Indirect_Literal Float,0x2ac,1.0
0286 0244 | D | Execute Float,Less
0287 681d |h | Jump_Zero 0x2a5
0288 4fff |O | Short_Literal -0x1
0289 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
028a 00cf | | Action Mark_Auxiliary
028b 7810 |x | Jump 0x29c
028c 00db | | Load_Top At_Offset_3
028d 0901 | | Execute_Immediate Binary_Scale,0x1
028e 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
028f 00da | | Load_Top At_Offset_2
0290 4c01 |L | Short_Literal -0x3ff
0291 027c | | | Execute Discrete,Less
0292 6801 |h | Jump_Zero 0x294
0293 780e |x | Jump 0x2a2
0294 00da | | Load_Top At_Offset_2
0295 00d8 | | Load_Top At_Offset_0
0296 e217 | | Load 0x1,0x17
0297 0260 | ` | Execute Discrete,In_Type
0298 7001 |p | Jump_Nonzero 0x29a
0299 0801 | | Execute_Immediate Raise,0x1
029a a402 | | Store_Unchecked 0x2,0x2
029b 00c9 | | Action Pop_Auxiliary_Loop
029c e5ff | | Load 0x2,-0x1
029d 5816 |X | Indirect_Literal Float,0x2b4,2.0
029e e402 | | Load 0x2,0x2
029f 0239 | 9 | Execute Float,Exponentiate
02a0 0244 | D | Execute Float,Less
02a1 77ea |w | Jump_Nonzero 0x28c
02a2 00ce | | Action Pop_Auxiliary
02a3 8404 | | Call 0x2,0x4
02a4 7802 |x | Jump 0x2a7
02a5 4800 |H | Short_Literal 0x0
02a6 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
02a7 00da | | Load_Top At_Offset_2
02a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02a9 0000 0000 | | .XXX[0x3]
02ab 0000 | |
02ac 3ff0 0000 |? | .DBL 1.0
02ae 0000 0000 | |
02b0 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
02b4 4000 0000 |@ | .DBL 2.0
02b6 0000 0000 | |
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 4801 |H | Short_Literal 0x1
02bc e402 | | Load 0x2,0x2
02bd 01d7 | | Execute Vector,Field_Read
02be 09f9 | | Execute_Immediate Binary_Scale,-0x7
02bf 680a |h | Jump_Zero 0x2ca
02c0 4801 |H | Short_Literal 0x1
02c1 a404 | | Store_Unchecked 0x2,0x4
02c2 4801 |H | Short_Literal 0x1
02c3 e402 | | Load 0x2,0x2
02c4 01d7 | | Execute Vector,Field_Read
02c5 487f |H | Short_Literal 0x7f
02c6 0279 | y | Execute Discrete,And
02c7 4801 |H | Short_Literal 0x1
02c8 e402 | | Load 0x2,0x2
02c9 01d6 | | Execute Vector,Field_Write
02ca 4801 |H | Short_Literal 0x1
02cb e402 | | Load 0x2,0x2
02cc 01d7 | | Execute Vector,Field_Read
02cd 0901 | | Execute_Immediate Binary_Scale,0x1
02ce 4802 |H | Short_Literal 0x2
02cf e402 | | Load 0x2,0x2
02d0 01d7 | | Execute Vector,Field_Read
02d1 09f9 | | Execute_Immediate Binary_Scale,-0x7
02d2 0273 | s | Execute Discrete,Plus
02d3 c407 | | Store 0x2,0x7
02d4 4802 |H | Short_Literal 0x2
02d5 e402 | | Load 0x2,0x2
02d6 01d7 | | Execute Vector,Field_Read
02d7 487f |H | Short_Literal 0x7f
02d8 0279 | y | Execute Discrete,And
02d9 4802 |H | Short_Literal 0x2
02da e402 | | Load 0x2,0x2
02db 01d6 | | Execute Vector,Field_Write
02dc 00cf | | Action Mark_Auxiliary
02dd 4804 |H | Short_Literal 0x4
02de 4802 |H | Short_Literal 0x2
02df 0007 | | Action Break_Optional
02e0 e406 | | Load 0x2,0x6
02e1 0908 | | Execute_Immediate Binary_Scale,0x8
02e2 00d9 | | Load_Top At_Offset_1
02e3 e402 | | Load 0x2,0x2
02e4 01d7 | | Execute Vector,Field_Read
02e5 0273 | s | Execute Discrete,Plus
02e6 c406 | | Store 0x2,0x6
02e7 00c8 | | Action Pop_Auxiliary_Range
02e8 3ff7 |? | Loop_Increasing 0x2e0
02e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02ea 0000 0000 | | .BLANK 0000[0x6]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3 | | .CONST 0x02f3 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0001 | | .CONST 0x0001 ; Number of locals
02f3 BODY_02f0:
02f3 INIT_02f0:
02f3 4801 |H | Short_Literal 0x1
02f4 e403 | | Load 0x2,0x3
02f5 01d7 | | Execute Vector,Field_Read
02f6 09f9 | | Execute_Immediate Binary_Scale,-0x7
02f7 6809 |h | Jump_Zero 0x301
02f8 4801 |H | Short_Literal 0x1
02f9 a404 | | Store_Unchecked 0x2,0x4
02fa 4801 |H | Short_Literal 0x1
02fb e403 | | Load 0x2,0x3
02fc 01d7 | | Execute Vector,Field_Read
02fd 0a80 | | Execute_Immediate Plus,-0x80
02fe 4801 |H | Short_Literal 0x1
02ff e403 | | Load 0x2,0x3
0300 01d6 | | Execute Vector,Field_Write
0301 4801 |H | Short_Literal 0x1
0302 e403 | | Load 0x2,0x3
0303 01d7 | | Execute Vector,Field_Read
0304 0904 | | Execute_Immediate Binary_Scale,0x4
0305 4802 |H | Short_Literal 0x2
0306 e403 | | Load 0x2,0x3
0307 01d7 | | Execute Vector,Field_Read
0308 09fc | | Execute_Immediate Binary_Scale,-0x4
0309 0273 | s | Execute Discrete,Plus
030a c407 | | Store 0x2,0x7
030b 4802 |H | Short_Literal 0x2
030c e403 | | Load 0x2,0x3
030d 01d7 | | Execute Vector,Field_Read
030e 480f |H | Short_Literal 0xf
030f 0279 | y | Execute Discrete,And
0310 c406 | | Store 0x2,0x6
0311 00cf | | Action Mark_Auxiliary
0312 4808 |H | Short_Literal 0x8
0313 4803 |H | Short_Literal 0x3
0314 0007 | | Action Break_Optional
0315 e406 | | Load 0x2,0x6
0316 0908 | | Execute_Immediate Binary_Scale,0x8
0317 00d9 | | Load_Top At_Offset_1
0318 e403 | | Load 0x2,0x3
0319 01d7 | | Execute Vector,Field_Read
031a 0273 | s | Execute Discrete,Plus
031b c406 | | Store 0x2,0x6
031c 00c8 | | Action Pop_Auxiliary_Range
031d 3ff7 |? | Loop_Increasing 0x315
031e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
031f 0000 | | .XXX[0x1]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0325 | % | .CONST 0x0325 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0002 | | .CONST 0x0002 ; Number of locals
0323 INIT_0320:
0323 e217 | | Load 0x1,0x17
0324 0007 | | Action Break_Optional
0325 BODY_0320:
0325 e402 | | Load 0x2,0x2
0326 0274 | t | Execute Discrete,Absolute_Value
0327 09ff | | Execute_Immediate Binary_Scale,-0x1
0328 0059 | Y | Store_Top Discrete,At_Offset_1
0329 00cf | | Action Mark_Auxiliary
032a 7844 |xD | Jump 0x36f
032b e402 | | Load 0x2,0x2
032c 604b |`K | Indirect_Literal Discrete,0x378,{0x00000000, 0x00000400}
032d 027c | | | Execute Discrete,Less
032e 6812 |h | Jump_Zero 0x341
032f e5ff | | Load 0x2,-0x1
0330 5843 |XC | Indirect_Literal Float,0x374,2.0
0331 e402 | | Load 0x2,0x2
0332 e602 | | Load 0x3,0x2
0333 0273 | s | Execute Discrete,Plus
0334 00d8 | | Load_Top At_Offset_0
0335 00e2 | | Load_Encached Integer_Cache
0336 0260 | ` | Execute Discrete,In_Type
0337 7001 |p | Jump_Nonzero 0x339
0338 0801 | | Execute_Immediate Raise,0x1
0339 0239 | 9 | Execute Float,Exponentiate
033a 0243 | C | Execute Float,Greater_Equal
033b 6805 |h | Jump_Zero 0x341
033c e402 | | Load 0x2,0x2
033d 00da | | Load_Top At_Offset_2
033e 0273 | s | Execute Discrete,Plus
033f c402 | | Store 0x2,0x2
0340 782a |x* | Jump 0x36b
0341 e402 | | Load 0x2,0x2
0342 6035 |`5 | Indirect_Literal Discrete,0x378,{0x00000000, 0x00000400}
0343 027c | | | Execute Discrete,Less
0344 6813 |h | Jump_Zero 0x358
0345 e5ff | | Load 0x2,-0x1
0346 582d |X- | Indirect_Literal Float,0x374,2.0
0347 e402 | | Load 0x2,0x2
0348 e602 | | Load 0x3,0x2
0349 0272 | r | Execute Discrete,Minus
034a 0a01 | | Execute_Immediate Plus,0x1
034b 00d8 | | Load_Top At_Offset_0
034c 00e2 | | Load_Encached Integer_Cache
034d 0260 | ` | Execute Discrete,In_Type
034e 7001 |p | Jump_Nonzero 0x350
034f 0801 | | Execute_Immediate Raise,0x1
0350 0239 | 9 | Execute Float,Exponentiate
0351 0244 | D | Execute Float,Less
0352 6818 |h | Jump_Zero 0x36b
0353 e402 | | Load 0x2,0x2
0354 00da | | Load_Top At_Offset_2
0355 0272 | r | Execute Discrete,Minus
0356 c402 | | Store 0x2,0x2
0357 7813 |x | Jump 0x36b
0358 e5ff | | Load 0x2,-0x1
0359 581a |X | Indirect_Literal Float,0x374,2.0
035a 023a | : | Execute Float,Divide
035b 5818 |X | Indirect_Literal Float,0x374,2.0
035c e402 | | Load 0x2,0x2
035d e602 | | Load 0x3,0x2
035e 0272 | r | Execute Discrete,Minus
035f 00d8 | | Load_Top At_Offset_0
0360 00e2 | | Load_Encached Integer_Cache
0361 0260 | ` | Execute Discrete,In_Type
0362 7001 |p | Jump_Nonzero 0x364
0363 0801 | | Execute_Immediate Raise,0x1
0364 0239 | 9 | Execute Float,Exponentiate
0365 0244 | D | Execute Float,Less
0366 6804 |h | Jump_Zero 0x36b
0367 e402 | | Load 0x2,0x2
0368 00da | | Load_Top At_Offset_2
0369 0272 | r | Execute Discrete,Minus
036a c402 | | Store 0x2,0x2
036b 00d9 | | Load_Top At_Offset_1
036c 09ff | | Execute_Immediate Binary_Scale,-0x1
036d 005a | Z | Store_Top Discrete,At_Offset_2
036e 00c9 | | Action Pop_Auxiliary_Loop
036f 00d9 | | Load_Top At_Offset_1
0370 77ba |w | Jump_Nonzero 0x32b
0371 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0372 0000 0000 | | .XXX[0x2]
0374 4000 0000 |@ | .DBL 2.0
0376 0000 0000 | |
0378 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
037c 0000 0000 | | .BLANK 0000[0x4]
0380 ; --------------------------------------------------------------------------------------
0380 ; Debug Table
0380 ; --------------------------------------------------------------------------------------
0380 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0eda,0x0000,0x0001,0x0000
0386 0000 0000 | | .BLANK 0000[0x27]
03ad 1002 8000 | | .XXX[0xb]
03af 0000 0000 | |
03b1 0020 0000 | |
03b3 0110 0000 | |
03b5 0000 8000 | |
03b7 0005 | |
03b8 0000 0000 | | .BLANK 0000[0x48]