]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/beust2/beust2.factor
factor: put inline on same line as ; for experimentation
[factor.git] / extra / benchmark / beust2 / beust2.factor
index 2d37ab48f9a3f0eb02cffb07c231dca88f55b90c..90187c0b77c068b7af787a8f2e4daebfb14a2222 100644 (file)
@@ -28,8 +28,7 @@ IN: benchmark.beust2
     ] any? ; inline recursive
 
 :: count-numbers ( max listener -- )
-    10 iota [ 1 + 1 1 0 max listener (count-numbers) ] any? drop ;
-    inline
+    10 iota [ 1 + 1 1 0 max listener (count-numbers) ] any? drop ; inline
 
 :: beust2-benchmark ( -- )
     0 :> i!