Some final tweaks to the examples

I promise
This commit is contained in:
dcodeIO
2018-04-20 18:56:51 +02:00
parent 4eade0f319
commit bde13b12cf
15 changed files with 2068 additions and 1487 deletions

View File

@ -3,11 +3,274 @@
(type $FF (func (param f64) (result f64)))
(type $Fi (func (param f64) (result i32)))
(type $FFFF (func (param f64 f64 f64) (result f64)))
(import "JSMath" "log" (func $~lib/math/JSMath.log (param f64) (result f64)))
(import "JSMath" "LN2" (global $~lib/math/JSMath.LN2 f64))
(memory $0 1)
(export "computeLine" (func $../../examples/mandelbrot/assembly/index/computeLine))
(export "memory" (memory $0))
(func $~lib/math/NativeMath.log (; 0 ;) (type $FF) (param $0 f64) (result f64)
(local $1 i32)
(local $2 i32)
(local $3 i64)
(local $4 f64)
(local $5 i32)
(local $6 f64)
(local $7 f64)
(local $8 f64)
(if
(i32.and
(if (result i32)
(tee_local $5
(i32.lt_u
(tee_local $1
(i32.wrap/i64
(i64.shr_u
(tee_local $3
(i64.reinterpret/f64
(get_local $0)
)
)
(i64.const 32)
)
)
)
(i32.const 1048576)
)
)
(get_local $5)
(i32.shr_u
(get_local $1)
(i32.const 31)
)
)
(i32.const 1)
)
(block
(if
(i64.eq
(i64.shl
(get_local $3)
(i64.const 1)
)
(i64.const 0)
)
(return
(f64.div
(f64.const -1)
(f64.mul
(get_local $0)
(get_local $0)
)
)
)
)
(if
(i32.shr_u
(get_local $1)
(i32.const 31)
)
(return
(f64.div
(f64.sub
(get_local $0)
(get_local $0)
)
(f64.const 0)
)
)
)
(set_local $2
(i32.sub
(get_local $2)
(i32.const 54)
)
)
(set_local $1
(i32.wrap/i64
(i64.shr_u
(tee_local $3
(i64.reinterpret/f64
(f64.mul
(get_local $0)
(f64.const 18014398509481984)
)
)
)
(i64.const 32)
)
)
)
)
(if
(i32.ge_u
(get_local $1)
(i32.const 2146435072)
)
(return
(get_local $0)
)
(if
(i32.and
(if (result i32)
(tee_local $5
(i32.eq
(get_local $1)
(i32.const 1072693248)
)
)
(i64.eq
(i64.shl
(get_local $3)
(i64.const 32)
)
(i64.const 0)
)
(get_local $5)
)
(i32.const 1)
)
(return
(f64.const 0)
)
)
)
)
(set_local $2
(i32.add
(get_local $2)
(i32.sub
(i32.shr_s
(tee_local $1
(i32.add
(get_local $1)
(i32.const 614242)
)
)
(i32.const 20)
)
(i32.const 1023)
)
)
)
(set_local $6
(f64.mul
(f64.mul
(f64.const 0.5)
(tee_local $4
(f64.sub
(f64.reinterpret/i64
(i64.or
(i64.shl
(i64.extend_u/i32
(i32.add
(i32.and
(get_local $1)
(i32.const 1048575)
)
(i32.const 1072079006)
)
)
(i64.const 32)
)
(i64.and
(get_local $3)
(i64.const 4294967295)
)
)
)
(f64.const 1)
)
)
)
(get_local $4)
)
)
(set_local $0
(f64.mul
(tee_local $8
(f64.mul
(tee_local $7
(f64.div
(get_local $4)
(f64.add
(f64.const 2)
(get_local $4)
)
)
)
(get_local $7)
)
)
(get_local $8)
)
)
(f64.add
(f64.add
(f64.sub
(f64.add
(f64.mul
(get_local $7)
(f64.add
(get_local $6)
(f64.add
(f64.mul
(get_local $8)
(f64.add
(f64.const 0.6666666666666735)
(f64.mul
(get_local $0)
(f64.add
(f64.const 0.2857142874366239)
(f64.mul
(get_local $0)
(f64.add
(f64.const 0.1818357216161805)
(f64.mul
(get_local $0)
(f64.const 0.14798198605116586)
)
)
)
)
)
)
)
(f64.mul
(get_local $0)
(f64.add
(f64.const 0.3999999999940942)
(f64.mul
(get_local $0)
(f64.add
(f64.const 0.22222198432149784)
(f64.mul
(get_local $0)
(f64.const 0.15313837699209373)
)
)
)
)
)
)
)
)
(f64.mul
(f64.convert_s/i32
(get_local $2)
)
(f64.const 1.9082149292705877e-10)
)
)
(get_local $6)
)
(get_local $4)
)
(f64.mul
(f64.convert_s/i32
(get_local $2)
)
(f64.const 0.6931471803691238)
)
)
)
(func $isFinite<f64> (; 1 ;) (type $Fi) (param $0 f64) (result i32)
(f64.eq
(f64.sub
@ -31,14 +294,12 @@
(local $5 f64)
(local $6 i32)
(local $7 f64)
(local $8 i32)
(local $9 i32)
(local $8 f64)
(local $9 f64)
(local $10 f64)
(local $11 f64)
(local $12 f64)
(local $13 f64)
(local $14 f64)
(set_local $12
(set_local $11
(f64.div
(f64.convert_u/i32
(get_local $1)
@ -46,7 +307,7 @@
(f64.const 1.6)
)
)
(set_local $10
(set_local $9
(f64.mul
(f64.sub
(f64.convert_u/i32
@ -59,7 +320,7 @@
(f64.const 2)
)
)
(tee_local $13
(tee_local $12
(f64.div
(f64.const 10)
(f64.min
@ -80,22 +341,25 @@
)
)
)
(set_local $2
(i32.const 0)
)
(loop $continue|0
(if
(i32.lt_u
(get_local $8)
(get_local $2)
(get_local $1)
)
(block
(set_local $11
(set_local $10
(f64.mul
(f64.sub
(f64.convert_u/i32
(get_local $8)
(get_local $2)
)
(get_local $12)
(get_local $11)
)
(get_local $13)
(get_local $12)
)
)
(set_local $4
@ -112,13 +376,13 @@
(if
(f64.le
(f64.add
(tee_local $14
(tee_local $7
(f64.mul
(get_local $4)
(get_local $4)
)
)
(tee_local $7
(tee_local $8
(f64.mul
(get_local $5)
(get_local $5)
@ -137,16 +401,16 @@
)
(get_local $5)
)
(get_local $10)
(get_local $9)
)
)
(set_local $4
(f64.add
(f64.sub
(get_local $14)
(get_local $7)
(get_local $8)
)
(get_local $11)
(get_local $10)
)
)
(br_if $break|1
@ -166,29 +430,24 @@
)
)
)
(set_local $9
(i32.const 0)
(set_local $7
(f64.min
(f64.const 8)
(f64.convert_u/i32
(get_local $3)
)
)
)
(loop $continue|2
(if
(i32.and
(if (result i32)
(tee_local $2
(i32.lt_s
(get_local $9)
(i32.const 5)
)
)
(i32.lt_u
(get_local $6)
(get_local $3)
)
(get_local $2)
(f64.lt
(f64.convert_u/i32
(get_local $6)
)
(i32.const 1)
(get_local $7)
)
(block
(set_local $7
(set_local $8
(f64.add
(f64.sub
(f64.mul
@ -200,7 +459,7 @@
(get_local $5)
)
)
(get_local $11)
(get_local $10)
)
)
(set_local $5
@ -212,17 +471,11 @@
)
(get_local $5)
)
(get_local $10)
(get_local $9)
)
)
(set_local $4
(get_local $7)
)
(set_local $9
(i32.add
(get_local $9)
(i32.const 1)
)
(get_local $8)
)
(set_local $6
(i32.add
@ -234,27 +487,6 @@
)
)
)
(set_local $7
(f64.div
(call $~lib/math/JSMath.log
(call $~lib/math/JSMath.log
(f64.sqrt
(f64.add
(f64.mul
(get_local $4)
(get_local $4)
)
(f64.mul
(get_local $5)
(get_local $5)
)
)
)
)
)
(get_global $~lib/math/JSMath.LN2)
)
)
(i32.store16
(i32.shl
(i32.add
@ -262,13 +494,33 @@
(get_local $0)
(get_local $1)
)
(get_local $8)
(get_local $2)
)
(i32.const 1)
)
(if (result i32)
(call $isFinite<f64>
(get_local $7)
(tee_local $7
(f64.div
(call $~lib/math/NativeMath.log
(call $~lib/math/NativeMath.log
(f64.sqrt
(f64.add
(f64.mul
(get_local $4)
(get_local $4)
)
(f64.mul
(get_local $5)
(get_local $5)
)
)
)
)
)
(f64.const 0.6931471805599453)
)
)
)
(i32.trunc_u/f64
(f64.mul
@ -293,18 +545,12 @@
)
)
)
(i32.div_s
(i32.mul
(get_local $6)
(i32.const 2047)
)
(get_local $3)
)
(i32.const 2047)
)
)
(set_local $8
(set_local $2
(i32.add
(get_local $8)
(get_local $2)
(i32.const 1)
)
)