diff --git a/core/hashtables/hashtables.factor b/core/hashtables/hashtables.factor
index 5327d122d7..606b819ddc 100644
--- a/core/hashtables/hashtables.factor
+++ b/core/hashtables/hashtables.factor
@@ -94,8 +94,8 @@ TUPLE: hashtable
     [ swapd (set-at) ] curry assoc-each ; inline
 
 : hash-large? ( hash -- ? )
-    [ count>> 3 fixnum*fast 1 fixnum+fast ]
-    [ array>> length>> ] bi fixnum> ; inline
+    [ count>> 3 fixnum*fast ]
+    [ array>> length>> ] bi fixnum>= ; inline
 
 : each-pair ( array quot: ( key value -- ) -- )
     [