]> gitweb.factorcode.org Git - factor.git/commitdiff
hashtables: Don't test word's hashcode as a bignum after all. It's not allowed.
authorDoug Coleman <doug.coleman@gmail.com>
Sat, 18 Jul 2015 16:17:34 +0000 (09:17 -0700)
committerDoug Coleman <doug.coleman@gmail.com>
Sat, 18 Jul 2015 16:17:34 +0000 (09:17 -0700)
core/hashtables/hashtables-tests.factor

index 63c7c506ac3cebc666683155750ad2be2f730b62..a3700dbd6ec9780ab78475a403d2a3a05d0edd9c 100644 (file)
@@ -185,16 +185,3 @@ H{ } "x" set
 
 ! Random test case
 { "A" } [ 100 iota [ dup ] H{ } map>assoc 32 over delete-at "A" 32 pick set-at 32 of ] unit-test
-
-! Bug 1392, word's hashcode was declared a fixnum
-! It fails depending on hash growth, so test in a loop
-SYMBOL: +bignum-hashcode+
--405534154 +bignum-hashcode+ 1 set-slot
-{ t } [
-    100 iota [
-        drop
-        H{ } clone
-        f +bignum-hashcode+ pick set-at
-        +bignum-hashcode+ +bignum-hashcode+ pick set-at assoc-size 1 =
-    ] all?
-] unit-test