From 6022a0f5d9777ac9820fef6677a25f5edec4067d Mon Sep 17 00:00:00 2001 From: Joe Groff Date: Thu, 15 Oct 2009 23:20:05 -0500 Subject: [PATCH] fix benchmark.terrain-generation --- .../benchmark/terrain-generation/terrain-generation.factor | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/extra/benchmark/terrain-generation/terrain-generation.factor b/extra/benchmark/terrain-generation/terrain-generation.factor index 623a905bbc..b158dba5dd 100644 --- a/extra/benchmark/terrain-generation/terrain-generation.factor +++ b/extra/benchmark/terrain-generation/terrain-generation.factor @@ -1,10 +1,12 @@ ! (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 : terrain-generation-benchmark ( -- ) "Generating terrain segment..." write flush yield - { 0 0 } terrain-segment drop + float-4{ 0 0 0 1 } terrain-segment drop "done" print ; MAIN: terrain-generation-benchmark