math.integers: Bignum hashcode* -- call bignum>fixnum to avoid a dispatch.
parent
f38247b7c3
commit
6994b0eed8
|
@ -64,7 +64,7 @@ M: bignum >fixnum bignum>fixnum ; inline
|
||||||
M: bignum >bignum ; inline
|
M: bignum >bignum ; inline
|
||||||
M: bignum integer>fixnum bignum>fixnum ; inline
|
M: bignum integer>fixnum bignum>fixnum ; inline
|
||||||
|
|
||||||
M: bignum hashcode* nip >fixnum ;
|
M: bignum hashcode* nip bignum>fixnum ;
|
||||||
|
|
||||||
M: bignum equal?
|
M: bignum equal?
|
||||||
over bignum? [ bignum= ] [
|
over bignum? [ bignum= ] [
|
||||||
|
|
Loading…
Reference in New Issue