Re: [gambit-list] Simple benchmark of |->integer| and |->flonum| on integer, flonum and rational input. For the further if you have any idea of a definition faster than (inexact->exact (floor n)) feel free to share :)

On 2013-04-24, at 3:32 PM, Mikael mikael.rcv@gmail.com wrote:

Ah, realized that Gambit makes a difference internally between 1e25 and 10000000000000000000000000 . So added a test also for the latter.

Got 6,794,405 per second for |->integer| - fair enough!

And got 384,459 for |->flonum| - could be faster.

...

(->integer-test5)

6794405.8

...

(->flonum-test5)

384459.2

Def: (define (->integer-test5) (test (->integer 10000000000000000000000000)))

(define (->flonum-test5) (test (->flonum 10000000000000000000000000)))

Here are some other options:

(##flonum.->fixnum 1.5e6)

1500000

(##flonum.->exact-int 1.5e20)

150000000000000000000

(##flonum.<-fixnum 123456)

123456.

(##flonum.<-exact-int 1234567890123456)

1.234567890123456e15

Marc