|
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: 3072 (0xc00)
Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_040cf4
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0348 | H | .CONST 0x0348 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0042 | B | .CONST 0x0042 ; 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 ; Debug Table 0x0 = .DEBUG 0x000b,0x039a,0x8000,0x0000,0x0035,0x1864,0x0000,0x0007
; Debug Table 0x0.0x0 = 0xb,0xffff
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 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0x10,0xfffe
0012 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0x12,0xfffd
0014 4801 |H | Short_Literal 0x1 ; Debug Table 0x0.0x3 = 0x14,0xfffc
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 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x19,0xfffb
001b 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x1b,0xfffa
001d 00bf | | Action Accept_Activation
001e 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001e,0x03a8,0x8000,0x0000,0x0035,0x1984,0x0000,0x0003
; Debug Table 0x1.0x0 = 0x1e,0xffff
001f e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x1 = 0x1f,0xfffe
0020 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0021 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x2 = 0x21,0xfffd
0022 62d5 |b | Indirect_Literal Discrete,0x2f8,{0x00000000, 0x7fffffff}
0023 00da | | Load_Top At_Offset_2
0024 03f8 | | Declare_Type Discrete,Constrained
0025 4f81 |O | Short_Literal -0x7f ; Debug Table 0x1.0x3 = 0x25,0xfffc
0026 4880 |H | Short_Literal 0x80
0027 00db | | Load_Top At_Offset_3
0028 03f8 | | Declare_Type Discrete,Constrained
0029 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x4 = 0x29,0xfffb
002a 62c9 |b | Indirect_Literal Discrete,0x2f4,{0x00000000, 0x007fffff}
002b e213 | | Load 0x1,0x13
002c 03f8 | | Declare_Type Discrete,Constrained
002d 4c01 |L | Short_Literal -0x3ff ; Debug Table 0x1.0x5 = 0x2d,0xfffa
002e 62c1 |b | Indirect_Literal Discrete,0x2f0,{0x00000000, 0x00000400}
002f e213 | | Load 0x1,0x13
0030 03f8 | | Declare_Type Discrete,Constrained
0031 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x6 = 0x31,0xfff9
0032 4802 |H | Short_Literal 0x2
0033 4834 |H4 | Short_Literal 0x34
0034 026d | m | Execute Discrete,Exponentiate
0035 0aff | | Execute_Immediate Plus,-0x1
0036 e213 | | Load 0x1,0x13
0037 03f8 | | Declare_Type Discrete,Constrained
0038 029d 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call ; Debug Table 0x1.0x7 = 0x38,0xfff8
003a 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x8 = 0x3a,0xfff7
003b 00c7 | | Action Elaborate_Subprogram
003c 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x9 = 0x3c,0xfff6
003d 00c7 | | Action Elaborate_Subprogram
003e 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xa = 0x3e,0xfff5
003f 00c7 | | Action Elaborate_Subprogram
0040 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xb = 0x40,0xfff4
0041 00c7 | | Action Elaborate_Subprogram
0042 BODY_0008:
0042 00bc | | Action Signal_Activated
0043 00bb | | Action Signal_Completion
0044 0000 0000 | | .BLANK 0000[0x4]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 005b | [ | .CONST 0x005b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0008 | | .CONST 0x0008 ; Number of locals
004b INIT_0048:
004b e20d | | Load 0x1,0xd ; Debug Table 0x2 = .DEBUG 0x004b,0x03c2,0x0002,0x0000,0x0035,0x1864,0x0000,0x0014
; Debug Table 0x2.0x0 = 0x4b,0xffff
004c 0337 | 7 | Declare_Variable Array
004d 00db | | Load_Top At_Offset_3
004e 00d9 | | Load_Top At_Offset_1
004f 01d4 | | Execute Vector,Structure_Write
0050 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x1 = 0x50,0xfffe
0051 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0052 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x2.0x2 = 0x52,0xfffd
0053 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0054 e215 | | Load 0x1,0x15 ; Debug Table 0x2.0x3 = 0x54,0xfffc
0055 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0056 e216 | | Load 0x1,0x16 ; Debug Table 0x2.0x4 = 0x56,0xfffb
0057 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0058 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x5 = 0x58,0xfffa
0059 029f 024b | K| Declare_Subprogram INIT_0248,For_Call
005b BODY_0048:
005b 8408 | | Call 0x2,0x8 ; Debug Table 0x2.0x6 = 0x5b,0x1
005c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x7 = 0x5c,0x2
005d 0a81 | | Execute_Immediate Plus,-0x7f
005e e215 | | Load 0x1,0x15
005f 025b | [ | Execute Discrete,Check_In_Type
0060 a405 | | Store_Unchecked 0x2,0x5
0061 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x8 = 0x61,0x3
0062 0f80 | | Execute_Immediate Equal,-0x80
0063 6803 |h | Jump_Zero 0x67
0064 5a87 |Z | Indirect_Literal Float,0x2ec,3.402823669209385e+38 ; Debug Table 0x2.0x9 = 0x64,0x4
0065 a403 | | Store_Unchecked 0x2,0x3
0066 781c |x | Jump 0x83
0067 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0xa = 0x67,0x5
0068 4f81 |O | Short_Literal -0x7f
0069 027d | } | Execute Discrete,Greater
006a 680c |h | Jump_Zero 0x77
006b 5a7c |Z| | Indirect_Literal Float,0x2e8,1.0 ; Debug Table 0x2.0xb = 0x6b,0x6
006c 00db | | Load_Top At_Offset_3
006d 0237 | 7 | Execute Float,Convert_From_Discrete
006e 5a75 |Zu | Indirect_Literal Float,0x2e4,1.1920928955078125e-07
006f 023b | ; | Execute Float,Times
0070 023d | = | Execute Float,Plus
0071 5a6e |Zn | Indirect_Literal Float,0x2e0,2.0
0072 e405 | | Load 0x2,0x5
0073 0239 | 9 | Execute Float,Exponentiate
0074 023b | ; | Execute Float,Times
0075 c403 | | Store 0x2,0x3
0076 780c |x | Jump 0x83
0077 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xc = 0x77,0x7
0078 6808 |h | Jump_Zero 0x81
0079 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xd = 0x79,0x8
007a 0237 | 7 | Execute Float,Convert_From_Discrete
007b 5a68 |Zh | Indirect_Literal Float,0x2e4,1.1920928955078125e-07
007c 023b | ; | Execute Float,Times
007d 5a5e |Z^ | Indirect_Literal Float,0x2dc,1.1754943508222875e-38
007e 023b | ; | Execute Float,Times
007f c403 | | Store 0x2,0x3
0080 7802 |x | Jump 0x83
0081 5a56 |ZV | Indirect_Literal Float,0x2d8,0.0 ; Debug Table 0x2.0xe = 0x81,0x9
0082 a403 | | Store_Unchecked 0x2,0x3
0083 e404 | | Load 0x2,0x4 ; Debug Table 0x2.0xf = 0x83,0xa
0084 6803 |h | Jump_Zero 0x88
0085 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x10 = 0x85,0xb
0086 023f | ? | Execute Float,Unary_Minus
0087 c403 | | Store 0x2,0x3
0088 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x11 = 0x88,0xc
0089 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
008a 0000 0000 | | .BLANK 0000[0x6]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 00a1 | | .CONST 0x00a1 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0007 | | .CONST 0x0007 ; Number of locals
0093 INIT_0090:
0093 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x0093,0x03e8,0x0002,0x0000,0x0035,0x1864,0x0000,0x0021
; Debug Table 0x3.0x0 = 0x93,0xffff
0094 e002 | | Load 0x0,0x2
0095 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0096 03df | | Declare_Variable Float,With_Value
0097 e20d | | Load 0x1,0xd ; Debug Table 0x3.0x1 = 0x97,0xfffe
0098 0337 | 7 | Declare_Variable Array
0099 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x2 = 0x99,0xfffd
009a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
009b e215 | | Load 0x1,0x15 ; Debug Table 0x3.0x3 = 0x9b,0xfffc
009c 0007 | | Action Break_Optional
009d e216 | | Load 0x1,0x16 ; Debug Table 0x3.0x4 = 0x9d,0xfffb
009e 0007 | | Action Break_Optional
009f e214 | | Load 0x1,0x14 ; Debug Table 0x3.0x5 = 0x9f,0xfffa
00a0 0007 | | Action Break_Optional
00a1 BODY_0090:
00a1 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x6 = 0xa1,0x1
00a2 014b | K | Execute Float,Less_Zero
00a3 6805 |h | Jump_Zero 0xa9
00a4 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x7 = 0xa4,0x2
00a5 a404 | | Store_Unchecked 0x2,0x4
00a6 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x8 = 0xa6,0x3
00a7 023f | ? | Execute Float,Unary_Minus
00a8 c402 | | Store 0x2,0x2
00a9 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x9 = 0xa9,0x4
00aa 7005 |p | Jump_Nonzero 0xb0
00ab 4f81 |O | Short_Literal -0x7f ; Debug Table 0x3.0xa = 0xab,0x5
00ac 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00ad 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xb = 0xad,0x6
00ae 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00af 7831 |x1 | Jump 0xe1
00b0 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0xc = 0xb0,0x7
00b1 5a2a |Z* | Indirect_Literal Float,0x2dc,1.1754943508222875e-38
00b2 0244 | D | Execute Float,Less
00b3 680e |h | Jump_Zero 0xc2
00b4 4f81 |O | Short_Literal -0x7f ; Debug Table 0x3.0xd = 0xb4,0x8
00b5 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00b6 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0xe = 0xb6,0x9
00b7 5a1c |Z | Indirect_Literal Float,0x2d4,8.507059173023462e+37
00b8 023b | ; | Execute Float,Times
00b9 c402 | | Store 0x2,0x2
00ba e402 | | Load 0x2,0x2 ; Debug Table 0x3.0xf = 0xba,0xa
00bb 5a14 |Z | Indirect_Literal Float,0x2d0,8388608.0
00bc 023b | ; | Execute Float,Times
00bd 0235 | 5 | Execute Float,Round_To_Discrete
00be e216 | | Load 0x1,0x16
00bf 025e | ^ | Execute Discrete,Convert
00c0 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00c1 781f |x | Jump 0xe1
00c2 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x10 = 0xc2,0xb
00c3 5a08 |Z | Indirect_Literal Float,0x2cc,3.4028220466166163e+38
00c4 0245 | E | Execute Float,Greater
00c5 6805 |h | Jump_Zero 0xcb
00c6 4880 |H | Short_Literal 0x80 ; Debug Table 0x3.0x11 = 0xc6,0xc
00c7 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00c8 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x12 = 0xc8,0xd
00c9 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00ca 7816 |x | Jump 0xe1
00cb e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x13 = 0xcb,0xe
00cc 8219 | | Call 0x1,0x19
00cd e215 | | Load 0x1,0x15
00ce 025b | [ | Execute Discrete,Check_In_Type
00cf 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00d0 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x14 = 0xd0,0xf
00d1 5a0e |Z | Indirect_Literal Float,0x2e0,2.0
00d2 e405 | | Load 0x2,0x5
00d3 0275 | u | Execute Discrete,Unary_Minus
00d4 0248 | H | Execute Discrete,Check_In_Integer
00d5 0239 | 9 | Execute Float,Exponentiate
00d6 023b | ; | Execute Float,Times
00d7 c402 | | Store 0x2,0x2
00d8 e402 | | Load 0x2,0x2 ; Debug Table 0x3.0x15 = 0xd8,0x10
00d9 5a0e |Z | Indirect_Literal Float,0x2e8,1.0
00da 023c | < | Execute Float,Minus
00db 59f4 |Y | Indirect_Literal Float,0x2d0,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 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x16 = 0xe1,0x11
00e2 0a7f | | Execute_Immediate Plus,0x7f
00e3 0059 | Y | Store_Top Discrete,At_Offset_1
00e4 00cf | | Action Mark_Auxiliary
00e5 4802 |H | Short_Literal 0x2 ; Debug Table 0x3.0x17 = 0xe5,0x12
00e6 4804 |H | Short_Literal 0x4
00e7 0007 | | Action Break_Optional
00e8 e406 | | Load 0x2,0x6 ; Debug Table 0x3.0x18 = 0xe8,0x13
00e9 48ff |H | Short_Literal 0xff
00ea 0279 | y | Execute Discrete,And
00eb e003 | | Load 0x0,0x3
00ec 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00ed 025b | [ | Execute Discrete,Check_In_Type
00ee 00d9 | | Load_Top At_Offset_1
00ef e403 | | Load 0x2,0x3
00f0 01d6 | | Execute Vector,Field_Write
00f1 e406 | | Load 0x2,0x6 ; Debug Table 0x3.0x19 = 0xf1,0x14
00f2 09f8 | | Execute_Immediate Binary_Scale,-0x8
00f3 c406 | | Store 0x2,0x6
00f4 00c8 | | Action Pop_Auxiliary_Range
00f5 37f2 |7 | Loop_Decreasing 0xe8
00f6 00ce | | Action Pop_Auxiliary
00f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1a = 0xf7,0x15
00f8 4801 |H | Short_Literal 0x1
00f9 0279 | y | Execute Discrete,And
00fa 6808 |h | Jump_Zero 0x103
00fb 4802 |H | Short_Literal 0x2 ; Debug Table 0x3.0x1b = 0xfb,0x16
00fc e403 | | Load 0x2,0x3
00fd 01d7 | | Execute Vector,Field_Read
00fe 4880 |H | Short_Literal 0x80
00ff 0273 | s | Execute Discrete,Plus
0100 4802 |H | Short_Literal 0x2
0101 e403 | | Load 0x2,0x3
0102 01d6 | | Execute Vector,Field_Write
0103 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x1c = 0x103,0x17
0104 09ff | | Execute_Immediate Binary_Scale,-0x1
0105 e003 | | Load 0x0,0x3
0106 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0107 025b | [ | Execute Discrete,Check_In_Type
0108 4801 |H | Short_Literal 0x1
0109 e403 | | Load 0x2,0x3
010a 01d6 | | Execute Vector,Field_Write
010b 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x1d = 0x10b,0x18
010c 6808 |h | Jump_Zero 0x115
010d 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x1e = 0x10d,0x19
010e e403 | | Load 0x2,0x3
010f 01d7 | | Execute Vector,Field_Read
0110 4880 |H | Short_Literal 0x80
0111 0273 | s | Execute Discrete,Plus
0112 4801 |H | Short_Literal 0x1
0113 e403 | | Load 0x2,0x3
0114 01d6 | | Execute Vector,Field_Write
0115 e403 | | Load 0x2,0x3 ; Debug Table 0x3.0x1f = 0x115,0x1a
0116 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0117 0000 | | .XXX[0x1]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 012b | + | .CONST 0x012b ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0008 | | .CONST 0x0008 ; Number of locals
011b INIT_0118:
011b e002 | | Load 0x0,0x2 ; Debug Table 0x4 = .DEBUG 0x011b,0x042a,0x0002,0x0000,0x0035,0x1864,0x0000,0x003a
; Debug Table 0x4.0x0 = 0x11b,0xffff
011c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
011d e210 | | Load 0x1,0x10 ; Debug Table 0x4.0x1 = 0x11d,0xfffe
011e 0337 | 7 | Declare_Variable Array
011f e5ff | | Load 0x2,-0x1
0120 00d9 | | Load_Top At_Offset_1
0121 01d4 | | Execute Vector,Structure_Write
0122 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x2 = 0x122,0xfffd
0123 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0124 e217 | | Load 0x1,0x17 ; Debug Table 0x4.0x3 = 0x124,0xfffc
0125 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0126 e218 | | Load 0x1,0x18 ; Debug Table 0x4.0x4 = 0x126,0xfffb
0127 0700 | | Execute_Immediate Set_Value,0x0
0128 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x4.0x5 = 0x128,0xfffa
0129 029f 0283 | | Declare_Subprogram INIT_0280,For_Call
012b BODY_0118:
012b 8408 | | Call 0x2,0x8 ; Debug Table 0x4.0x6 = 0x12b,0x1
012c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x7 = 0x12c,0x2
012d 4c01 |L | Short_Literal -0x3ff
012e 0273 | s | Execute Discrete,Plus
012f e217 | | Load 0x1,0x17
0130 025b | [ | Execute Discrete,Check_In_Type
0131 a405 | | Store_Unchecked 0x2,0x5
0132 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x8 = 0x132,0x3
0133 61bc |a | Indirect_Literal Discrete,0x2f0,{0x00000000, 0x00000400}
0134 027f | | Execute Discrete,Equal
0135 6803 |h | Jump_Zero 0x139
0136 5991 |Y | Indirect_Literal Float,0x2c8,9.999994528969601e+31 ; Debug Table 0x4.0x9 = 0x136,0x4
0137 a402 | | Store_Unchecked 0x2,0x2
0138 7824 |x$ | Jump 0x15d
0139 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0xa = 0x139,0x5
013a 4c01 |L | Short_Literal -0x3ff
013b 027d | } | Execute Discrete,Greater
013c 680f |h | Jump_Zero 0x14c
013d 59aa |Y | Indirect_Literal Float,0x2e8,1.0 ; Debug Table 0x4.0xb = 0x13d,0x6
013e 00db | | Load_Top At_Offset_3
013f 0237 | 7 | Execute Float,Convert_From_Discrete
0140 e002 | | Load 0x0,0x2
0141 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0142 0238 | 8 | Execute Float,Convert
0143 5980 |Y | Indirect_Literal Float,0x2c4,2.220446049250313e-16
0144 023b | ; | Execute Float,Times
0145 023d | = | Execute Float,Plus
0146 5999 |Y | Indirect_Literal Float,0x2e0,2.0
0147 e405 | | Load 0x2,0x5
0148 0239 | 9 | Execute Float,Exponentiate
0149 023b | ; | Execute Float,Times
014a a402 | | Store_Unchecked 0x2,0x2
014b 7811 |x | Jump 0x15d
014c 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xc = 0x14c,0x7
014d 680d |h | Jump_Zero 0x15b
014e 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xd = 0x14e,0x8
014f 0237 | 7 | Execute Float,Convert_From_Discrete
0150 e002 | | Load 0x0,0x2
0151 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0152 0238 | 8 | Execute Float,Convert
0153 5970 |Yp | Indirect_Literal Float,0x2c4,2.220446049250313e-16
0154 023b | ; | Execute Float,Times
0155 598a |Y | Indirect_Literal Float,0x2e0,2.0
0156 4c02 |L | Short_Literal -0x3fe
0157 0239 | 9 | Execute Float,Exponentiate
0158 023b | ; | Execute Float,Times
0159 a402 | | Store_Unchecked 0x2,0x2
015a 7802 |x | Jump 0x15d
015b 597c |Y| | Indirect_Literal Float,0x2d8,0.0 ; Debug Table 0x4.0xe = 0x15b,0x9
015c a402 | | Store_Unchecked 0x2,0x2
015d e404 | | Load 0x2,0x4 ; Debug Table 0x4.0xf = 0x15d,0xa
015e 6803 |h | Jump_Zero 0x162
015f e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x10 = 0x15f,0xb
0160 023f | ? | Execute Float,Unary_Minus
0161 a402 | | Store_Unchecked 0x2,0x2
0162 e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x11 = 0x162,0xc
0163 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0164 0000 0000 | | .BLANK 0000[0x4]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 0179 | y | .CONST 0x0179 ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0007 | | .CONST 0x0007 ; Number of locals
016b INIT_0168:
016b 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x016b,0x0450,0x0002,0x0000,0x0035,0x1864,0x0000,0x0047
; Debug Table 0x5.0x0 = 0x16b,0xffff
016c e002 | | Load 0x0,0x2
016d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016e 03df | | Declare_Variable Float,With_Value
016f e210 | | Load 0x1,0x10 ; Debug Table 0x5.0x1 = 0x16f,0xfffe
0170 0337 | 7 | Declare_Variable Array
0171 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x2 = 0x171,0xfffd
0172 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0173 e217 | | Load 0x1,0x17 ; Debug Table 0x5.0x3 = 0x173,0xfffc
0174 0007 | | Action Break_Optional
0175 e218 | | Load 0x1,0x18 ; Debug Table 0x5.0x4 = 0x175,0xfffb
0176 0007 | | Action Break_Optional
0177 e214 | | Load 0x1,0x14 ; Debug Table 0x5.0x5 = 0x177,0xfffa
0178 0007 | | Action Break_Optional
0179 BODY_0168:
0179 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x6 = 0x179,0x1
017a 014b | K | Execute Float,Less_Zero
017b 6805 |h | Jump_Zero 0x181
017c 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x7 = 0x17c,0x2
017d a404 | | Store_Unchecked 0x2,0x4
017e e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x8 = 0x17e,0x3
017f 023f | ? | Execute Float,Unary_Minus
0180 a402 | | Store_Unchecked 0x2,0x2
0181 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x9 = 0x181,0x4
0182 7005 |p | Jump_Nonzero 0x188
0183 4c01 |L | Short_Literal -0x3ff ; Debug Table 0x5.0xa = 0x183,0x5
0184 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0185 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0xb = 0x185,0x6
0186 005a | Z | Store_Top Discrete,At_Offset_2
0187 782f |x/ | Jump 0x1b7
0188 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0xc = 0x188,0x7
0189 5936 |Y6 | Indirect_Literal Float,0x2c0,4.0
018a 0244 | D | Execute Float,Less
018b 680e |h | Jump_Zero 0x19a
018c 4c01 |L | Short_Literal -0x3ff ; Debug Table 0x5.0xd = 0x18c,0x8
018d 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
018e e402 | | Load 0x2,0x2 ; Debug Table 0x5.0xe = 0x18e,0x9
018f 592c |Y, | Indirect_Literal Float,0x2bc,0.25
0190 023b | ; | Execute Float,Times
0191 a402 | | Store_Unchecked 0x2,0x2
0192 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0xf = 0x192,0xa
0193 5924 |Y$ | Indirect_Literal Float,0x2b8,4503599627370496.0
0194 023b | ; | Execute Float,Times
0195 0235 | 5 | Execute Float,Round_To_Discrete
0196 e218 | | Load 0x1,0x18
0197 025e | ^ | Execute Discrete,Convert
0198 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0199 781d |x | Jump 0x1b7
019a e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x10 = 0x19a,0xb
019b 594c |YL | Indirect_Literal Float,0x2e8,1.0
019c 0245 | E | Execute Float,Greater
019d 6805 |h | Jump_Zero 0x1a3
019e 6151 |aQ | Indirect_Literal Discrete,0x2f0,{0x00000000, 0x00000400} ; Debug Table 0x5.0x11 = 0x19e,0xc
019f 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
01a0 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x12 = 0x1a0,0xd
01a1 005a | Z | Store_Top Discrete,At_Offset_2
01a2 7814 |x | Jump 0x1b7
01a3 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x13 = 0x1a3,0xe
01a4 8219 | | Call 0x1,0x19
01a5 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
01a6 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x14 = 0x1a6,0xf
01a7 5938 |Y8 | Indirect_Literal Float,0x2e0,2.0
01a8 e405 | | Load 0x2,0x5
01a9 0275 | u | Execute Discrete,Unary_Minus
01aa 0248 | H | Execute Discrete,Check_In_Integer
01ab 0239 | 9 | Execute Float,Exponentiate
01ac 023b | ; | Execute Float,Times
01ad a402 | | Store_Unchecked 0x2,0x2
01ae e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x15 = 0x1ae,0x10
01af 5938 |Y8 | Indirect_Literal Float,0x2e8,1.0
01b0 023c | < | Execute Float,Minus
01b1 5906 |Y | Indirect_Literal Float,0x2b8,4503599627370496.0
01b2 023b | ; | Execute Float,Times
01b3 0235 | 5 | Execute Float,Round_To_Discrete
01b4 e218 | | Load 0x1,0x18
01b5 025e | ^ | Execute Discrete,Convert
01b6 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
01b7 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x16 = 0x1b7,0x11
01b8 4bff |K | Short_Literal 0x3ff
01b9 0273 | s | Execute Discrete,Plus
01ba 0059 | Y | Store_Top Discrete,At_Offset_1
01bb 00cf | | Action Mark_Auxiliary
01bc 4802 |H | Short_Literal 0x2 ; Debug Table 0x5.0x17 = 0x1bc,0x12
01bd 4808 |H | Short_Literal 0x8
01be 0007 | | Action Break_Optional
01bf e406 | | Load 0x2,0x6 ; Debug Table 0x5.0x18 = 0x1bf,0x13
01c0 4900 |I | Short_Literal 0x100
01c1 e218 | | Load 0x1,0x18
01c2 025b | [ | Execute Discrete,Check_In_Type
01c3 026e | n | Execute Discrete,Modulo
01c4 e003 | | Load 0x0,0x3
01c5 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01c6 025b | [ | Execute Discrete,Check_In_Type
01c7 00d9 | | Load_Top At_Offset_1
01c8 e403 | | Load 0x2,0x3
01c9 01d6 | | Execute Vector,Field_Write
01ca e406 | | Load 0x2,0x6 ; Debug Table 0x5.0x19 = 0x1ca,0x14
01cb 4900 |I | Short_Literal 0x100
01cc e218 | | Load 0x1,0x18
01cd 025b | [ | Execute Discrete,Check_In_Type
01ce 0270 | p | Execute Discrete,Divide
01cf c406 | | Store 0x2,0x6
01d0 00c8 | | Action Pop_Auxiliary_Range
01d1 37ed |7 | Loop_Decreasing 0x1bf
01d2 00ce | | Action Pop_Auxiliary
01d3 4802 |H | Short_Literal 0x2 ; Debug Table 0x5.0x1a = 0x1d3,0x15
01d4 e403 | | Load 0x2,0x3
01d5 01d7 | | Execute Vector,Field_Read
01d6 00d9 | | Load_Top At_Offset_1
01d7 480f |H | Short_Literal 0xf
01d8 0279 | y | Execute Discrete,And
01d9 0904 | | Execute_Immediate Binary_Scale,0x4
01da e003 | | Load 0x0,0x3
01db 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01dc 025b | [ | Execute Discrete,Check_In_Type
01dd 0273 | s | Execute Discrete,Plus
01de 4802 |H | Short_Literal 0x2
01df e403 | | Load 0x2,0x3
01e0 01d6 | | Execute Vector,Field_Write
01e1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x1b = 0x1e1,0x16
01e2 09fc | | Execute_Immediate Binary_Scale,-0x4
01e3 e003 | | Load 0x0,0x3
01e4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01e5 025b | [ | Execute Discrete,Check_In_Type
01e6 4801 |H | Short_Literal 0x1
01e7 e403 | | Load 0x2,0x3
01e8 01d6 | | Execute Vector,Field_Write
01e9 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x1c = 0x1e9,0x17
01ea 6808 |h | Jump_Zero 0x1f3
01eb 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x1d = 0x1eb,0x18
01ec e403 | | Load 0x2,0x3
01ed 01d7 | | Execute Vector,Field_Read
01ee 4880 |H | Short_Literal 0x80
01ef 0273 | s | Execute Discrete,Plus
01f0 4801 |H | Short_Literal 0x1
01f1 e403 | | Load 0x2,0x3
01f2 01d6 | | Execute Vector,Field_Write
01f3 e403 | | Load 0x2,0x3 ; Debug Table 0x5.0x1e = 0x1f3,0x19
01f4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01f5 0000 0000 | | .XXX[0x3]
01f7 0000 | |
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0201 | | .CONST 0x0201 ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0004 | | .CONST 0x0004 ; Number of locals
01fb INIT_01f8:
01fb e217 | | Load 0x1,0x17 ; Debug Table 0x6 = .DEBUG 0x01fb,0x0490,0x0002,0x0000,0x0035,0x1984,0x0000,0x0051
; Debug Table 0x6.0x0 = 0x1fb,0xffff
01fc 0007 | | Action Break_Optional
01fd e213 | | Load 0x1,0x13 ; Debug Table 0x6.0x1 = 0x1fd,0xfffe
01fe 0007 | | Action Break_Optional
01ff 029f 0303 | | Declare_Subprogram INIT_0300,For_Call ; Debug Table 0x6.0x2 = 0x1ff,0xfffd
0201 BODY_01f8:
0201 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x3 = 0x201,0x1
0202 014c | L | Execute Float,Greater_Zero
0203 7002 |p | Jump_Nonzero 0x206
0204 4887 |H | Short_Literal 0x87
0205 0257 | W | Execute Discrete,Raise
0206 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x4 = 0x206,0x2
0207 58d8 |X | Indirect_Literal Float,0x2e0,2.0
0208 0243 | C | Execute Float,Greater_Equal
0209 6817 |h | Jump_Zero 0x221
020a 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x5 = 0x20a,0x3
020b 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
020c 00cf | | Action Mark_Auxiliary
020d 7808 |x | Jump 0x216
020e 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x6 = 0x20e,0x5
020f 0901 | | Execute_Immediate Binary_Scale,0x1
0210 c402 | | Store 0x2,0x2
0211 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x7 = 0x211,0x6
0212 60dd |` | Indirect_Literal Discrete,0x2f0,{0x00000000, 0x00000400}
0213 027b | { | Execute Discrete,Greater_Equal
0214 7009 |p | Jump_Nonzero 0x21e
0215 00c9 | | Action Pop_Auxiliary_Loop
0216 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x8 = 0x216,0x4
0217 58c8 |X | Indirect_Literal Float,0x2e0,2.0
0218 e402 | | Load 0x2,0x2
0219 0a01 | | Execute_Immediate Plus,0x1
021a 0248 | H | Execute Discrete,Check_In_Integer
021b 0239 | 9 | Execute Float,Exponentiate
021c 0243 | C | Execute Float,Greater_Equal
021d 77f0 |w | Jump_Nonzero 0x20e
021e 00ce | | Action Pop_Auxiliary
021f 8404 | | Call 0x2,0x4 ; Debug Table 0x6.0x9 = 0x21f,0x7
0220 7820 |x | Jump 0x241
0221 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0xa = 0x221,0x8
0222 58c5 |X | Indirect_Literal Float,0x2e8,1.0
0223 0244 | D | Execute Float,Less
0224 681a |h | Jump_Zero 0x23f
0225 4fff |O | Short_Literal -0x1 ; Debug Table 0x6.0xb = 0x225,0x9
0226 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0227 00cf | | Action Mark_Auxiliary
0228 780d |x | Jump 0x236
0229 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0xc = 0x229,0xb
022a 0901 | | Execute_Immediate Binary_Scale,0x1
022b 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
022c 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0xd = 0x22c,0xc
022d 4c01 |L | Short_Literal -0x3ff
022e 027c | | | Execute Discrete,Less
022f 6801 |h | Jump_Zero 0x231
0230 780b |x | Jump 0x23c ; Debug Table 0x6.0xe = 0x230,0xd
0231 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0xf = 0x231,0xe
0232 e217 | | Load 0x1,0x17
0233 025b | [ | Execute Discrete,Check_In_Type
0234 a402 | | Store_Unchecked 0x2,0x2
0235 00c9 | | Action Pop_Auxiliary_Loop
0236 e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x10 = 0x236,0xa
0237 58a8 |X | Indirect_Literal Float,0x2e0,2.0
0238 e402 | | Load 0x2,0x2
0239 0239 | 9 | Execute Float,Exponentiate
023a 0244 | D | Execute Float,Less
023b 77ed |w | Jump_Nonzero 0x229
023c 00ce | | Action Pop_Auxiliary
023d 8404 | | Call 0x2,0x4 ; Debug Table 0x6.0x11 = 0x23d,0xf
023e 7802 |x | Jump 0x241
023f 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x12 = 0x23f,0x10
0240 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0241 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x13 = 0x241,0x11
0242 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0243 0000 0000 | | .BLANK 0000[0x5]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b 4801 |H | Short_Literal 0x1 ; Debug Table 0x7 = .DEBUG 0x024b,0x04ba,0x0004,0x0000,0x0035,0x1984,0x0000,0x0228
; Debug Table 0x7.0x0 = 0x24b,0x1
024c e402 | | Load 0x2,0x2
024d 01d7 | | Execute Vector,Field_Read
024e 09f9 | | Execute_Immediate Binary_Scale,-0x7
024f 680a |h | Jump_Zero 0x25a
0250 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x1 = 0x250,0x2
0251 a404 | | Store_Unchecked 0x2,0x4
0252 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x2 = 0x252,0x3
0253 e402 | | Load 0x2,0x2
0254 01d7 | | Execute Vector,Field_Read
0255 487f |H | Short_Literal 0x7f
0256 0279 | y | Execute Discrete,And
0257 4801 |H | Short_Literal 0x1
0258 e402 | | Load 0x2,0x2
0259 01d6 | | Execute Vector,Field_Write
025a 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x3 = 0x25a,0x4
025b e402 | | Load 0x2,0x2
025c 01d7 | | Execute Vector,Field_Read
025d 0901 | | Execute_Immediate Binary_Scale,0x1
025e 0248 | H | Execute Discrete,Check_In_Integer
025f 4802 |H | Short_Literal 0x2
0260 e402 | | Load 0x2,0x2
0261 01d7 | | Execute Vector,Field_Read
0262 09f9 | | Execute_Immediate Binary_Scale,-0x7
0263 0273 | s | Execute Discrete,Plus
0264 c407 | | Store 0x2,0x7
0265 4802 |H | Short_Literal 0x2 ; Debug Table 0x7.0x4 = 0x265,0x5
0266 e402 | | Load 0x2,0x2
0267 01d7 | | Execute Vector,Field_Read
0268 487f |H | Short_Literal 0x7f
0269 0279 | y | Execute Discrete,And
026a 4802 |H | Short_Literal 0x2
026b e402 | | Load 0x2,0x2
026c 01d6 | | Execute Vector,Field_Write
026d 00cf | | Action Mark_Auxiliary
026e 4804 |H | Short_Literal 0x4 ; Debug Table 0x7.0x5 = 0x26e,0x6
026f 4802 |H | Short_Literal 0x2
0270 0007 | | Action Break_Optional
0271 e406 | | Load 0x2,0x6 ; Debug Table 0x7.0x6 = 0x271,0x7
0272 0908 | | Execute_Immediate Binary_Scale,0x8
0273 00d9 | | Load_Top At_Offset_1
0274 e402 | | Load 0x2,0x2
0275 01d7 | | Execute Vector,Field_Read
0276 0273 | s | Execute Discrete,Plus
0277 c406 | | Store 0x2,0x6
0278 00c8 | | Action Pop_Auxiliary_Range
0279 3ff7 |? | Loop_Increasing 0x271
027a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
027b 0000 0000 | | .BLANK 0000[0x5]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 4801 |H | Short_Literal 0x1 ; Debug Table 0x8 = .DEBUG 0x0283,0x04ca,0x0004,0x0000,0x0035,0x1984,0x0000,0x049f
; Debug Table 0x8.0x0 = 0x283,0x1
0284 e403 | | Load 0x2,0x3
0285 01d7 | | Execute Vector,Field_Read
0286 09f9 | | Execute_Immediate Binary_Scale,-0x7
0287 6809 |h | Jump_Zero 0x291
0288 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x1 = 0x288,0x2
0289 a404 | | Store_Unchecked 0x2,0x4
028a 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x2 = 0x28a,0x3
028b e403 | | Load 0x2,0x3
028c 01d7 | | Execute Vector,Field_Read
028d 0a80 | | Execute_Immediate Plus,-0x80
028e 4801 |H | Short_Literal 0x1
028f e403 | | Load 0x2,0x3
0290 01d6 | | Execute Vector,Field_Write
0291 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x3 = 0x291,0x4
0292 e403 | | Load 0x2,0x3
0293 01d7 | | Execute Vector,Field_Read
0294 0904 | | Execute_Immediate Binary_Scale,0x4
0295 0248 | H | Execute Discrete,Check_In_Integer
0296 4802 |H | Short_Literal 0x2
0297 e403 | | Load 0x2,0x3
0298 01d7 | | Execute Vector,Field_Read
0299 09fc | | Execute_Immediate Binary_Scale,-0x4
029a 0273 | s | Execute Discrete,Plus
029b c407 | | Store 0x2,0x7
029c 4802 |H | Short_Literal 0x2 ; Debug Table 0x8.0x4 = 0x29c,0x5
029d e403 | | Load 0x2,0x3
029e 01d7 | | Execute Vector,Field_Read
029f e218 | | Load 0x1,0x18
02a0 025b | [ | Execute Discrete,Check_In_Type
02a1 480f |H | Short_Literal 0xf
02a2 0279 | y | Execute Discrete,And
02a3 c406 | | Store 0x2,0x6
02a4 00cf | | Action Mark_Auxiliary
02a5 4808 |H | Short_Literal 0x8 ; Debug Table 0x8.0x5 = 0x2a5,0x6
02a6 4803 |H | Short_Literal 0x3
02a7 0007 | | Action Break_Optional
02a8 e406 | | Load 0x2,0x6 ; Debug Table 0x8.0x6 = 0x2a8,0x7
02a9 4900 |I | Short_Literal 0x100
02aa e218 | | Load 0x1,0x18
02ab 025b | [ | Execute Discrete,Check_In_Type
02ac 0271 | q | Execute Discrete,Times
02ad 00d9 | | Load_Top At_Offset_1
02ae e403 | | Load 0x2,0x3
02af 01d7 | | Execute Vector,Field_Read
02b0 e218 | | Load 0x1,0x18
02b1 025b | [ | Execute Discrete,Check_In_Type
02b2 0273 | s | Execute Discrete,Plus
02b3 c406 | | Store 0x2,0x6
02b4 00c8 | | Action Pop_Auxiliary_Range
02b5 3ff2 |? | Loop_Increasing 0x2a8
02b6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02b7 0000 | | .XXX[0x1]
02b8 4330 0000 |C0 | .DBL 4503599627370496.0
02ba 0000 0000 | |
02bc 3fd0 0000 |? | .DBL 0.25
02be 0000 0000 | |
02c0 4010 0000 |@ | .DBL 4.0
02c2 0000 0000 | |
02c4 3cb0 0000 |< | .DBL 2.220446049250313e-16
02c6 0000 0000 | |
02c8 4693 b8b5 |F | .DBL 9.999994528969601e+31
02ca 0000 0000 | |
02cc 47ef ffff |G | .DBL 3.4028220466166163e+38
02ce 0000 0000 | |
02d0 4160 0000 |A` | .DBL 8388608.0
02d2 0000 0000 | |
02d4 47d0 0000 |G | .DBL 8.507059173023462e+37
02d6 0000 0000 | |
02d8 0000 0000 | | .DBL 0.0
02da 0000 0000 | |
02dc 3810 0000 |8 | .DBL 1.1754943508222875e-38
02de 0000 0000 | |
02e0 4000 0000 |@ | .DBL 2.0
02e2 0000 0000 | |
02e4 3e80 0000 |> | .DBL 1.1920928955078125e-07
02e6 0000 0000 | |
02e8 3ff0 0000 |? | .DBL 1.0
02ea 0000 0000 | |
02ec 47f0 0000 |G | .DBL 3.402823669209385e+38
02ee 0000 0000 | |
02f0 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
02f4 0000 0000 | | .LITERAL {0x00000000, 0x007fffff}
02f8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
02fc 0000 0000 | | .BLANK 0000[0x4]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0305 | | .CONST 0x0305 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0002 | | .CONST 0x0002 ; Number of locals
0303 INIT_0300:
0303 e217 | | Load 0x1,0x17 ; Debug Table 0x9 = .DEBUG 0x0303,0x04da,0x0001,0x0000,0x0035,0x1984,0x0000,0x0065
; Debug Table 0x9.0x0 = 0x303,0xffff
0304 0007 | | Action Break_Optional
0305 BODY_0300:
0305 e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x1 = 0x305,0x1
0306 0274 | t | Execute Discrete,Absolute_Value
0307 09ff | | Execute_Immediate Binary_Scale,-0x1
0308 0059 | Y | Store_Top Discrete,At_Offset_1
0309 00cf | | Action Mark_Auxiliary
030a 7838 |x8 | Jump 0x343
030b e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x2 = 0x30b,0x3
030c 67e3 |g | Indirect_Literal Discrete,0x2f0,{0x00000000, 0x00000400}
030d 027c | | | Execute Discrete,Less
030e 680e |h | Jump_Zero 0x31d
030f e5ff | | Load 0x2,-0x1
0310 5fcf |_ | Indirect_Literal Float,0x2e0,2.0
0311 e402 | | Load 0x2,0x2
0312 e602 | | Load 0x3,0x2
0313 0273 | s | Execute Discrete,Plus
0314 0248 | H | Execute Discrete,Check_In_Integer
0315 0239 | 9 | Execute Float,Exponentiate
0316 0243 | C | Execute Float,Greater_Equal
0317 6805 |h | Jump_Zero 0x31d
0318 e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x3 = 0x318,0x4
0319 00da | | Load_Top At_Offset_2
031a 0273 | s | Execute Discrete,Plus
031b c402 | | Store 0x2,0x2
031c 7822 |x" | Jump 0x33f
031d e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x4 = 0x31d,0x5
031e 67d1 |g | Indirect_Literal Discrete,0x2f0,{0x00000000, 0x00000400}
031f 027c | | | Execute Discrete,Less
0320 680f |h | Jump_Zero 0x330
0321 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x5 = 0x321,0x6
0322 5fbd |_ | Indirect_Literal Float,0x2e0,2.0
0323 e402 | | Load 0x2,0x2
0324 e602 | | Load 0x3,0x2
0325 0272 | r | Execute Discrete,Minus
0326 0a01 | | Execute_Immediate Plus,0x1
0327 0248 | H | Execute Discrete,Check_In_Integer
0328 0239 | 9 | Execute Float,Exponentiate
0329 0244 | D | Execute Float,Less
032a 6814 |h | Jump_Zero 0x33f
032b e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x6 = 0x32b,0x7
032c 00da | | Load_Top At_Offset_2
032d 0272 | r | Execute Discrete,Minus
032e c402 | | Store 0x2,0x2
032f 780f |x | Jump 0x33f
0330 e5ff | | Load 0x2,-0x1 ; Debug Table 0x9.0x7 = 0x330,0x8
0331 5fae |_ | Indirect_Literal Float,0x2e0,2.0
0332 023a | : | Execute Float,Divide
0333 5fac |_ | Indirect_Literal Float,0x2e0,2.0
0334 e402 | | Load 0x2,0x2
0335 e602 | | Load 0x3,0x2
0336 0272 | r | Execute Discrete,Minus
0337 0248 | H | Execute Discrete,Check_In_Integer
0338 0239 | 9 | Execute Float,Exponentiate
0339 0244 | D | Execute Float,Less
033a 6804 |h | Jump_Zero 0x33f
033b e402 | | Load 0x2,0x2 ; Debug Table 0x9.0x8 = 0x33b,0x9
033c 00da | | Load_Top At_Offset_2
033d 0272 | r | Execute Discrete,Minus
033e c402 | | Store 0x2,0x2
033f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x9 = 0x33f,0xa
0340 09ff | | Execute_Immediate Binary_Scale,-0x1
0341 005a | Z | Store_Top Discrete,At_Offset_2
0342 00c9 | | Action Pop_Auxiliary_Loop
0343 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0xa = 0x343,0x2
0344 77c6 |w | Jump_Nonzero 0x30b
0345 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0346 0000 0000 | | .XXX[0x2]
0348 ; --------------------------------------------------------------------------------------
0348 ; Debug Table
0348 ; --------------------------------------------------------------------------------------
0348 0003 000a | | .CONST 0x0003,0x000a
034a 000b 039a | | .DEBUG 0x000b,0x039a,0x8000,0x0000,0x0035,0x1864,0x0000,0x0007
0352 001e 03a8 | | .DEBUG 0x001e,0x03a8,0x8000,0x0000,0x0035,0x1984,0x0000,0x0003
035a 004b 03c2 | K | .DEBUG 0x004b,0x03c2,0x0002,0x0000,0x0035,0x1864,0x0000,0x0014
0362 0093 03e8 | | .DEBUG 0x0093,0x03e8,0x0002,0x0000,0x0035,0x1864,0x0000,0x0021
036a 011b 042a | *| .DEBUG 0x011b,0x042a,0x0002,0x0000,0x0035,0x1864,0x0000,0x003a
0372 016b 0450 | k P| .DEBUG 0x016b,0x0450,0x0002,0x0000,0x0035,0x1864,0x0000,0x0047
037a 01fb 0490 | | .DEBUG 0x01fb,0x0490,0x0002,0x0000,0x0035,0x1984,0x0000,0x0051
0382 024b 04ba | K | .DEBUG 0x024b,0x04ba,0x0004,0x0000,0x0035,0x1984,0x0000,0x0228
038a 0283 04ca | | .DEBUG 0x0283,0x04ca,0x0004,0x0000,0x0035,0x1984,0x0000,0x049f
0392 0303 04da | | .DEBUG 0x0303,0x04da,0x0001,0x0000,0x0035,0x1984,0x0000,0x0065
039a ; --------------------------------------------------------------------------------------
039a ; Debug3 Subtable 0x0
039a ; --------------------------------------------------------------------------------------
039a 0006 0000 | | .DBG3TAB 0x0006,0x0000
039c 000b ffff | | .CONST 0x000b,0xffff
039e 0010 fffe | | .CONST 0x0010,0xfffe
03a0 0012 fffd | | .CONST 0x0012,0xfffd
03a2 0014 fffc | | .CONST 0x0014,0xfffc
03a4 0019 fffb | | .CONST 0x0019,0xfffb
03a6 001b fffa | | .CONST 0x001b,0xfffa
03a8 ; --------------------------------------------------------------------------------------
03a8 ; Debug3 Subtable 0x1
03a8 ; --------------------------------------------------------------------------------------
03a8 000c 0000 | | .DBG3TAB 0x000c,0x0000
03aa 001e ffff | | .CONST 0x001e,0xffff
03ac 001f fffe | | .CONST 0x001f,0xfffe
03ae 0021 fffd | ! | .CONST 0x0021,0xfffd
03b0 0025 fffc | % | .CONST 0x0025,0xfffc
03b2 0029 fffb | ) | .CONST 0x0029,0xfffb
03b4 002d fffa | - | .CONST 0x002d,0xfffa
03b6 0031 fff9 | 1 | .CONST 0x0031,0xfff9
03b8 0038 fff8 | 8 | .CONST 0x0038,0xfff8
03ba 003a fff7 | : | .CONST 0x003a,0xfff7
03bc 003c fff6 | < | .CONST 0x003c,0xfff6
03be 003e fff5 | > | .CONST 0x003e,0xfff5
03c0 0040 fff4 | @ | .CONST 0x0040,0xfff4
03c2 ; --------------------------------------------------------------------------------------
03c2 ; Debug3 Subtable 0x2
03c2 ; --------------------------------------------------------------------------------------
03c2 0006 000c | | .DBG3TAB 0x0006,0x000c
03c4 004b ffff | K | .CONST 0x004b,0xffff
03c6 0050 fffe | P | .CONST 0x0050,0xfffe
03c8 0052 fffd | R | .CONST 0x0052,0xfffd
03ca 0054 fffc | T | .CONST 0x0054,0xfffc
03cc 0056 fffb | V | .CONST 0x0056,0xfffb
03ce 0058 fffa | X | .CONST 0x0058,0xfffa
03d0 005b 0001 | [ | .CONST 0x005b,0x0001
03d2 005c 0002 | \ | .CONST 0x005c,0x0002
03d4 0061 0003 | a | .CONST 0x0061,0x0003
03d6 0064 0004 | d | .CONST 0x0064,0x0004
03d8 0067 0005 | g | .CONST 0x0067,0x0005
03da 006b 0006 | k | .CONST 0x006b,0x0006
03dc 0077 0007 | w | .CONST 0x0077,0x0007
03de 0079 0008 | y | .CONST 0x0079,0x0008
03e0 0081 0009 | | .CONST 0x0081,0x0009
03e2 0083 000a | | .CONST 0x0083,0x000a
03e4 0085 000b | | .CONST 0x0085,0x000b
03e6 0088 000c | | .CONST 0x0088,0x000c
03e8 ; --------------------------------------------------------------------------------------
03e8 ; Debug3 Subtable 0x3
03e8 ; --------------------------------------------------------------------------------------
03e8 0006 001a | | .DBG3TAB 0x0006,0x001a
03ea 0093 ffff | | .CONST 0x0093,0xffff
03ec 0097 fffe | | .CONST 0x0097,0xfffe
03ee 0099 fffd | | .CONST 0x0099,0xfffd
03f0 009b fffc | | .CONST 0x009b,0xfffc
03f2 009d fffb | | .CONST 0x009d,0xfffb
03f4 009f fffa | | .CONST 0x009f,0xfffa
03f6 00a1 0001 | | .CONST 0x00a1,0x0001
03f8 00a4 0002 | | .CONST 0x00a4,0x0002
03fa 00a6 0003 | | .CONST 0x00a6,0x0003
03fc 00a9 0004 | | .CONST 0x00a9,0x0004
03fe 00ab 0005 | | .CONST 0x00ab,0x0005
0400 00ad 0006 | | .CONST 0x00ad,0x0006
0402 00b0 0007 | | .CONST 0x00b0,0x0007
0404 00b4 0008 | | .CONST 0x00b4,0x0008
0406 00b6 0009 | | .CONST 0x00b6,0x0009
0408 00ba 000a | | .CONST 0x00ba,0x000a
040a 00c2 000b | | .CONST 0x00c2,0x000b
040c 00c6 000c | | .CONST 0x00c6,0x000c
040e 00c8 000d | | .CONST 0x00c8,0x000d
0410 00cb 000e | | .CONST 0x00cb,0x000e
0412 00d0 000f | | .CONST 0x00d0,0x000f
0414 00d8 0010 | | .CONST 0x00d8,0x0010
0416 00e1 0011 | | .CONST 0x00e1,0x0011
0418 00e5 0012 | | .CONST 0x00e5,0x0012
041a 00e8 0013 | | .CONST 0x00e8,0x0013
041c 00f1 0014 | | .CONST 0x00f1,0x0014
041e 00f7 0015 | | .CONST 0x00f7,0x0015
0420 00fb 0016 | | .CONST 0x00fb,0x0016
0422 0103 0017 | | .CONST 0x0103,0x0017
0424 010b 0018 | | .CONST 0x010b,0x0018
0426 010d 0019 | | .CONST 0x010d,0x0019
0428 0115 001a | | .CONST 0x0115,0x001a
042a ; --------------------------------------------------------------------------------------
042a ; Debug3 Subtable 0x4
042a ; --------------------------------------------------------------------------------------
042a 0006 000c | | .DBG3TAB 0x0006,0x000c
042c 011b ffff | | .CONST 0x011b,0xffff
042e 011d fffe | | .CONST 0x011d,0xfffe
0430 0122 fffd | " | .CONST 0x0122,0xfffd
0432 0124 fffc | $ | .CONST 0x0124,0xfffc
0434 0126 fffb | & | .CONST 0x0126,0xfffb
0436 0128 fffa | ( | .CONST 0x0128,0xfffa
0438 012b 0001 | + | .CONST 0x012b,0x0001
043a 012c 0002 | , | .CONST 0x012c,0x0002
043c 0132 0003 | 2 | .CONST 0x0132,0x0003
043e 0136 0004 | 6 | .CONST 0x0136,0x0004
0440 0139 0005 | 9 | .CONST 0x0139,0x0005
0442 013d 0006 | = | .CONST 0x013d,0x0006
0444 014c 0007 | L | .CONST 0x014c,0x0007
0446 014e 0008 | N | .CONST 0x014e,0x0008
0448 015b 0009 | [ | .CONST 0x015b,0x0009
044a 015d 000a | ] | .CONST 0x015d,0x000a
044c 015f 000b | _ | .CONST 0x015f,0x000b
044e 0162 000c | b | .CONST 0x0162,0x000c
0450 ; --------------------------------------------------------------------------------------
0450 ; Debug3 Subtable 0x5
0450 ; --------------------------------------------------------------------------------------
0450 0006 0019 | | .DBG3TAB 0x0006,0x0019
0452 016b ffff | k | .CONST 0x016b,0xffff
0454 016f fffe | o | .CONST 0x016f,0xfffe
0456 0171 fffd | q | .CONST 0x0171,0xfffd
0458 0173 fffc | s | .CONST 0x0173,0xfffc
045a 0175 fffb | u | .CONST 0x0175,0xfffb
045c 0177 fffa | w | .CONST 0x0177,0xfffa
045e 0179 0001 | y | .CONST 0x0179,0x0001
0460 017c 0002 | | | .CONST 0x017c,0x0002
0462 017e 0003 | ~ | .CONST 0x017e,0x0003
0464 0181 0004 | | .CONST 0x0181,0x0004
0466 0183 0005 | | .CONST 0x0183,0x0005
0468 0185 0006 | | .CONST 0x0185,0x0006
046a 0188 0007 | | .CONST 0x0188,0x0007
046c 018c 0008 | | .CONST 0x018c,0x0008
046e 018e 0009 | | .CONST 0x018e,0x0009
0470 0192 000a | | .CONST 0x0192,0x000a
0472 019a 000b | | .CONST 0x019a,0x000b
0474 019e 000c | | .CONST 0x019e,0x000c
0476 01a0 000d | | .CONST 0x01a0,0x000d
0478 01a3 000e | | .CONST 0x01a3,0x000e
047a 01a6 000f | | .CONST 0x01a6,0x000f
047c 01ae 0010 | | .CONST 0x01ae,0x0010
047e 01b7 0011 | | .CONST 0x01b7,0x0011
0480 01bc 0012 | | .CONST 0x01bc,0x0012
0482 01bf 0013 | | .CONST 0x01bf,0x0013
0484 01ca 0014 | | .CONST 0x01ca,0x0014
0486 01d3 0015 | | .CONST 0x01d3,0x0015
0488 01e1 0016 | | .CONST 0x01e1,0x0016
048a 01e9 0017 | | .CONST 0x01e9,0x0017
048c 01eb 0018 | | .CONST 0x01eb,0x0018
048e 01f3 0019 | | .CONST 0x01f3,0x0019
0490 ; --------------------------------------------------------------------------------------
0490 ; Debug3 Subtable 0x6
0490 ; --------------------------------------------------------------------------------------
0490 0003 0011 | | .DBG3TAB 0x0003,0x0011
0492 01fb ffff | | .CONST 0x01fb,0xffff
0494 01fd fffe | | .CONST 0x01fd,0xfffe
0496 01ff fffd | | .CONST 0x01ff,0xfffd
0498 0201 0001 | | .CONST 0x0201,0x0001
049a 0206 0002 | | .CONST 0x0206,0x0002
049c 020a 0003 | | .CONST 0x020a,0x0003
049e 020e 0005 | | .CONST 0x020e,0x0005
04a0 0211 0006 | | .CONST 0x0211,0x0006
04a2 0216 0004 | | .CONST 0x0216,0x0004
04a4 021f 0007 | | .CONST 0x021f,0x0007
04a6 0221 0008 | ! | .CONST 0x0221,0x0008
04a8 0225 0009 | % | .CONST 0x0225,0x0009
04aa 0229 000b | ) | .CONST 0x0229,0x000b
04ac 022c 000c | , | .CONST 0x022c,0x000c
04ae 0230 000d | 0 | .CONST 0x0230,0x000d
04b0 0231 000e | 1 | .CONST 0x0231,0x000e
04b2 0236 000a | 6 | .CONST 0x0236,0x000a
04b4 023d 000f | = | .CONST 0x023d,0x000f
04b6 023f 0010 | ? | .CONST 0x023f,0x0010
04b8 0241 0011 | A | .CONST 0x0241,0x0011
04ba ; --------------------------------------------------------------------------------------
04ba ; Debug3 Subtable 0x7
04ba ; --------------------------------------------------------------------------------------
04ba 0000 0007 | | .DBG3TAB 0x0000,0x0007
04bc 024b 0001 | K | .CONST 0x024b,0x0001
04be 0250 0002 | P | .CONST 0x0250,0x0002
04c0 0252 0003 | R | .CONST 0x0252,0x0003
04c2 025a 0004 | Z | .CONST 0x025a,0x0004
04c4 0265 0005 | e | .CONST 0x0265,0x0005
04c6 026e 0006 | n | .CONST 0x026e,0x0006
04c8 0271 0007 | q | .CONST 0x0271,0x0007
04ca ; --------------------------------------------------------------------------------------
04ca ; Debug3 Subtable 0x8
04ca ; --------------------------------------------------------------------------------------
04ca 0000 0007 | | .DBG3TAB 0x0000,0x0007
04cc 0283 0001 | | .CONST 0x0283,0x0001
04ce 0288 0002 | | .CONST 0x0288,0x0002
04d0 028a 0003 | | .CONST 0x028a,0x0003
04d2 0291 0004 | | .CONST 0x0291,0x0004
04d4 029c 0005 | | .CONST 0x029c,0x0005
04d6 02a5 0006 | | .CONST 0x02a5,0x0006
04d8 02a8 0007 | | .CONST 0x02a8,0x0007
04da ; --------------------------------------------------------------------------------------
04da ; Debug3 Subtable 0x9
04da ; --------------------------------------------------------------------------------------
04da 0001 000a | | .DBG3TAB 0x0001,0x000a
04dc 0303 ffff | | .CONST 0x0303,0xffff
04de 0305 0001 | | .CONST 0x0305,0x0001
04e0 030b 0003 | | .CONST 0x030b,0x0003
04e2 0318 0004 | | .CONST 0x0318,0x0004
04e4 031d 0005 | | .CONST 0x031d,0x0005
04e6 0321 0006 | ! | .CONST 0x0321,0x0006
04e8 032b 0007 | + | .CONST 0x032b,0x0007
04ea 0330 0008 | 0 | .CONST 0x0330,0x0008
04ec 033b 0009 | ; | .CONST 0x033b,0x0009
04ee 033f 000a | ? | .CONST 0x033f,0x000a
04f0 0343 0002 | C | .CONST 0x0343,0x0002
04f2 0000 0000 | | .BLANK 0000[0x10e]