Merge branch 'master' of git://factorcode.org/git/factor

[factor.git] / core / generic / standard / standard.factor

diff --git a/core/generic/standard/standard.factor b/core/generic/standard/standard.factor
index 499adcc8184592d900e81ae29d4955c7800f2474..87611a76d0a8ab7fa1dce518a1f8015e4969f999 100644 (file)
--- a/core/generic/standard/standard.factor
+++ b/core/generic/standard/standard.factor
@@ -28,7 +28,7 @@ CONSTANT: simple-combination T{ standard-combination f 0 }
         { 0 [ [ dup ] ] }
         { 1 [ [ over ] ] }
         { 2 [ [ pick ] ] }
-        [ 1- (picker) [ dip swap ] curry ]
+        [ 1 - (picker) [ dip swap ] curry ]
     } case ;
 
 M: standard-combination picker