Fixing everything for mandatory stack effects

[factor.git] / core / inference / transforms / transforms-tests.factor

diff --git a/core/inference/transforms/transforms-tests.factor b/core/inference/transforms/transforms-tests.factor
index 0e79ed2632d1dfb454fe1523e7b6285a0a301dcd..f90dd2350c5c3e808485e3131f1249675cd9c10f 100755 (executable)
--- a/core/inference/transforms/transforms-tests.factor
+++ b/core/inference/transforms/transforms-tests.factor
@@ -6,7 +6,7 @@ classes ;
 : compose-n-quot ( word -- quot' ) <repetition> >quotation ;
 : compose-n ( quot -- ) compose-n-quot call ;
 \ compose-n [ compose-n-quot ] 2 define-transform
-: compose-n-test ( -- x ) 2 \ + compose-n ;
+: compose-n-test ( a b c -- x ) 2 \ + compose-n ;
 
 [ 6 ] [ 1 2 3 compose-n-test ] unit-test