]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/benchmark/mandel/mandel.factor
Fixing everything for mandatory stack effects
[factor.git] / extra / benchmark / mandel / mandel.factor
index b9b139d7e344835da1aaccd382b2d39cad76c602..5adbb7c66844704d795ee7d350c46029b75fe37b 100755 (executable)
@@ -54,7 +54,7 @@ SYMBOL: cols
 : ppm-header ( w h -- )
     "P6\n" % swap # " " % # "\n255\n" % ;
 
-: buf-size width height * 3 * 100 + ;
+: buf-size ( -- n ) width height * 3 * 100 + ;
 
 : mandel ( -- data )
     [