diff --git a/basis/fry/fry-tests.factor b/basis/fry/fry-tests.factor
index 27d5430d33..0137e8be22 100644
--- a/basis/fry/fry-tests.factor
+++ b/basis/fry/fry-tests.factor
@@ -58,3 +58,7 @@ sequences eval accessors ;
 
 [ "USING: fry kernel ; f '[ >r _ r> ]" eval ]
 [ error>> >r/r>-in-fry-error? ] must-fail-with
+
+[ { { "a" 1 } { "b" 2 } { "c" 3 } { "d" 4 } } ] [
+    1 2 3 4 '[ "a" _ 2array "b" _ 2array "c" _ 2array "d" _ 2array 4array ] call
+] unit-test
diff --git a/basis/fry/fry.factor b/basis/fry/fry.factor
index bab49de108..ac036f58ad 100644
--- a/basis/fry/fry.factor
+++ b/basis/fry/fry.factor
@@ -17,7 +17,7 @@ ERROR: >r/r>-in-fry-error ;
         { 1 [ [ curry ] ] }
         { 2 [ [ 2curry ] ] }
         { 3 [ [ 3curry ] ] }
-        [ [ curry ] <repetition> ]
+        [ \ curry <repetition> ]
     } case ;
 
 M: >r/r>-in-fry-error summary