I did replace all those conversions within .fs with constants:

1 s>f 2 s>f f/ fconstant _half
1 s>f fconstant _1
2 s>f fconstant _2
4 s>f fconstant _4
8 s>f fconstant _8
10 s>f fconstant _10

it is now 3x faster:
> measure
-3.1415851E-15 
545 ms ok
> 
P.


------------------------------------------------------------------------------
This SF.net Dev2Dev email is sponsored by:

Show off your parallel programming skills.
Enter the Intel(R) Threading Challenge 2010.
http://p.sf.net/sfu/intel-thread-sfd
_______________________________________________
Amforth-devel mailing list
Amforth-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amforth-devel

Reply via email to