From dca528eaef4fa5cab9262642ed6c697394a627e1 Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Sat, 29 Aug 2009 22:09:51 -0500
Subject: [PATCH] benchmark.terrain-generation: fix type error

---
 extra/benchmark/terrain-generation/terrain-generation.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/extra/benchmark/terrain-generation/terrain-generation.factor b/extra/benchmark/terrain-generation/terrain-generation.factor
index 7fbb0ff43f..623a905bbc 100644
--- a/extra/benchmark/terrain-generation/terrain-generation.factor
+++ b/extra/benchmark/terrain-generation/terrain-generation.factor
@@ -4,7 +4,7 @@ IN: benchmark.terrain-generation
 
 : terrain-generation-benchmark ( -- )
     "Generating terrain segment..." write flush yield
-    <terrain> { 0.0 0.0 } terrain-segment drop
+    <terrain> { 0 0 } terrain-segment drop
     "done" print ;
 
 MAIN: terrain-generation-benchmark