hash-large? ( hash -- ? )


Vocabulary
hashtables.private

Inputs
hashan object


Outputs
?an object


Definition
USING: accessors kernel math.private ;

IN: hashtables.private

: hash-large? ( hash -- ? )
[ count>> 1 fixnum+fast 3 fixnum*fast ] [ array>> length>> ]
bi fixnum>= ; inline