math.integers: Bignum hashcode* -- call bignum>fixnum to avoid a dispatch.

diff --git a/core/math/integers/integers.factor b/core/math/integers/integers.factor
index 18281bf88ca0463e2ebe33222fef61aa35b0f26a..fa5d9745d688e4b97c98970dfdfb208ad3c43933 100644 (file)
--- a/core/math/integers/integers.factor
+++ b/core/math/integers/integers.factor
@@ -64,7 +64,7 @@ M: bignum >fixnum bignum>fixnum ; inline
 M: bignum >bignum ; inline
 M: bignum integer>fixnum bignum>fixnum ; inline
 
-M: bignum hashcode* nip >fixnum ;
+M: bignum hashcode* nip bignum>fixnum ;
 
 M: bignum equal?
     over bignum? [ bignum= ] [