basis/extra: removing '[ @ ] in favor of _ for fried quotations.

[factor.git] / basis / math / matrices / matrices.factor

diff --git a/basis/math/matrices/matrices.factor b/basis/math/matrices/matrices.factor
index 55105965a594734cb726c0dac428235c521afe38..5eb5a6cde1ee9d3300b80310d3dacb2795742a93 100644 (file)
--- a/basis/math/matrices/matrices.factor
+++ b/basis/math/matrices/matrices.factor
@@ -237,7 +237,7 @@ M: sequence square-cols
     [ length ] keep [ <array> ] with { } map-as ;
 
 : make-matrix-with-indices ( m n quot -- matrix )
-    [ [ <iota> ] bi@ ] dip '[ @ ] cartesian-map ; inline
+    [ [ <iota> ] bi@ ] dip cartesian-map ; inline
 
 : null-matrix? ( matrix -- ? ) empty? ; inline