Updating code for make and fry changes

[factor.git] / basis / persistent / hashtables / hashtables-tests.factor

diff --git a/basis/persistent/hashtables/hashtables-tests.factor b/basis/persistent/hashtables/hashtables-tests.factor
index ac6aa240ccd44faa85e25b19ceeac4900fa674fb..5ed72e5d599904f61a92983ef5aa6ca181510635 100644 (file)
--- a/basis/persistent/hashtables/hashtables-tests.factor
+++ b/basis/persistent/hashtables/hashtables-tests.factor
@@ -85,7 +85,7 @@ M: hash-0-b hashcode* 2drop 0 ;
 
 : random-assocs ( -- hash phash )
     [ random-string ] replicate
-    [ H{ } clone [ '[ swap , set-at ] each-index ] keep ]
+    [ H{ } clone [ '[ swap _ set-at ] each-index ] keep ]
     [ PH{ } clone swap [ spin new-at ] each-index ]
     bi ;