steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'master' of git://factorcode.org/git/factor

db4
Slava Pestov 2009-10-15 23:30:29 -05:00
parent 982a8fa411 0518294479
commit 98a2f5152c
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
extra/benchmark/terrain-generation/terrain-generation.factor
View File

@ -1,10 +1,12 @@
! (c)Joe Groff bsd license ! (c)Joe Groff bsd license
USING: io kernel terrain.generation threads ; USING: io kernel math.vectors.simd terrain.generation threads ;
FROM: alien.c-types => float ;
SIMD: float
IN: benchmark.terrain-generation IN: benchmark.terrain-generation
: terrain-generation-benchmark ( -- ) : terrain-generation-benchmark ( -- )
"Generating terrain segment..." write flush yield "Generating terrain segment..." write flush yield
<terrain> { 0 0 } terrain-segment drop <terrain> float-4{ 0 0 0 1 } terrain-segment drop
"done" print ; "done" print ;
MAIN: terrain-generation-benchmark MAIN: terrain-generation-benchmark