factor: Rename MACRO: and MACRO: to have quot as the output in stack effects.

[factor.git] / extra / brainfuck / brainfuck.factor

diff --git a/extra/brainfuck/brainfuck.factor b/extra/brainfuck/brainfuck.factor
index e082e511b36a284368874ce72b91530937465a03..b164a669c0894eef0bb7a9656e5371c2afd16403 100644 (file)
--- a/extra/brainfuck/brainfuck.factor
+++ b/extra/brainfuck/brainfuck.factor
@@ -70,7 +70,7 @@ code  = (loop|ops|unknown)*  => [[ compose-all ]]
 
 PRIVATE>
 
-MACRO: run-brainfuck ( code -- )
+MACRO: run-brainfuck ( code -- quot )
     parse-brainfuck '[ <brainfuck> @ drop flush ] ;
 
 : get-brainfuck ( code -- result )