hash-sets: Fix stack effect.

diff --git a/core/hash-sets/hash-sets.factor b/core/hash-sets/hash-sets.factor
index a5276658a12f790850b18029a423d1aefa655fdc..f9ed7fdfababc0bdf87c0f246d85986d763842a4 100644 (file)
--- a/core/hash-sets/hash-sets.factor
+++ b/core/hash-sets/hash-sets.factor
@@ -40,7 +40,7 @@ TUPLE: hash-set
 : reset-hash ( n hash -- )
     swap <hash-array> >>array init-hash ; inline
 
-: (new-key@) ( key array i probe# j -- array i j empty? )
+: (new-key@) ( array key i probe# j -- array i j empty? )
     [ 2dup swap array-nth ] 2dip pick tombstone?
     [
         rot +empty+ eq?