]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/tools/test/test.factor
factor: Rename MACRO: and MACRO: to have quot as the output in stack effects.
[factor.git] / basis / tools / test / test.factor
index 762ce061764d7d1d37cd92cab9920fa5fd795b9d..24eb41f4f182701effc8da3d9545eb6559b03774 100644 (file)
@@ -79,7 +79,7 @@ M: did-not-fail summary drop "Did not fail" ;
     "(" ?head drop ")" ?tail drop
     H{ { CHAR: - CHAR: \s } } substitute >title ;
 
-MACRO: <experiment> ( word -- )
+MACRO: <experiment> ( word -- quot )
     [ stack-effect in>> length dup ]
     [ name>> experiment-title ] bi
     '[ _ ndup _ narray _ prefix ] ;