ui: some cleanup of old factor code

[factor.git] / extra / models / combinators / templates / templates.factor

diff --git a/extra/models/combinators/templates/templates.factor b/extra/models/combinators/templates/templates.factor
index 525ee8f144319c63bd918dbeab9fe93b87fb60f3..ae757be7d507c470798d53ffda8177597252e88c 100644 (file)
--- a/extra/models/combinators/templates/templates.factor
+++ b/extra/models/combinators/templates/templates.factor
@@ -13,11 +13,13 @@ w-2*     DEFINES 2${W}*
 w-3*     DEFINES 3${W}*
 w-4*     DEFINES 4${W}*
 WHERE
-MACRO: w-n ( int -- quot ) dup '[ [ _ narray <collection> ] dip [ _ firstn ] prepend W ] ;
+MACRO: w-n ( int -- quot )
+    dup '[ [ _ narray <collection> ] dip [ _ firstn ] prepend W ] ;
 : w-2 ( a b quot -- mapped ) 2 w-n ; inline
 : w-3 ( a b c quot -- mapped ) 3 w-n ; inline
 : w-4 ( a b c d quot -- mapped ) 4 w-n ; inline
-MACRO: w-n* ( int -- quot ) dup '[ [ _ narray <collection> #1 ] dip [ _ firstn ] prepend W ] ;
+MACRO: w-n* ( int -- quot )
+    dup '[ [ _ narray <collection> #1 ] dip [ _ firstn ] prepend W ] ;
 : w-2* ( a b quot -- mapped ) 2 w-n* ; inline
 : w-3* ( a b c quot -- mapped ) 3 w-n* ; inline
 : w-4* ( a b c d quot -- mapped ) 4 w-n* ; inline