math.hashcodes: try and fix tests on 32-bit.

2013-03-19 17:22:25 -07:00 · 2013-03-19 17:22:25 -07:00 · 6308e25f6e
parent e172a081a4
commit 6308e25f6e
1 changed files with 5 additions and 1 deletions
--- a/extra/math/hashcodes/hashcodes-tests.factor
+++ b/extra/math/hashcodes/hashcodes-tests.factor
@ -12,5 +12,9 @@ IN: math.hashcodes

 { t } [
    1.5 3/2 1.5 0 complex boa 3/2 0 complex boa 4array
-    [ number-hashcode 3458764513820540928 = ] all?
+    [
+        number-hashcode
+        cell-bits 64 = 3458764513820540928 3221225472 ?
+        =
+    ] all?
 ] unit-test