Hi!
Andreas Rottmann writes:
> From: Andreas Rottmann
> Subject: Implement R6RS' `fixnum?' in a smarter way
>
> * module/rnrs/arithmetic/fixnums.scm (fixnum?): Implemented using
> bit-twiddling, and using `define-inlinable'.
Fine with me, feel free to commit.
Ludo’.
Andy Wingo writes:
> Hi Andreas,
>
> I applied the first two, thanks.
>
> I am hesitant about this one for three reasons:
>
> 1) I don't want the compiler to import (rnrs arithmetic fixnums).
> Rather, if we were to do this, I would have that module register its
> primitives, as GOOPS do
Hi Andreas,
I applied the first two, thanks.
I am hesitant about this one for three reasons:
1) I don't want the compiler to import (rnrs arithmetic fixnums).
Rather, if we were to do this, I would have that module register its
primitives, as GOOPS does.
2) Something about this sounds
This primitive can be used to significantly speed up the operations in
`(rnrs arithmetic fixnums)'.
* libguile/r6rs-arithmetic.c: New file containing `fixnum?' procedure
implementation as a new extension.
* libguile/r6rs-arithmetic.h: New file with prototypes for the above.
* libguile/Makefile.a