fix build on x64
This commit is contained in:
parent
d5882f6d6d
commit
70a4432d20
|
@ -480,6 +480,7 @@ double PIC_CSTRING_TO_DOUBLE(const char *);
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#if __x86_64__ && (defined(__GNUC__) || defined(__clang__)) && ! defined(__STRICT_ANSI__)
|
#if __x86_64__ && (defined(__GNUC__) || defined(__clang__)) && ! defined(__STRICT_ANSI__)
|
||||||
|
# include <stdint.h>
|
||||||
# define PIC_NAN_BOXING 1
|
# define PIC_NAN_BOXING 1
|
||||||
#else
|
#else
|
||||||
# define PIC_NAN_BOXING 0
|
# define PIC_NAN_BOXING 0
|
||||||
|
|
|
@ -1,4 +1,6 @@
|
||||||
(import (picrin base))
|
(import (scheme base)
|
||||||
|
(scheme read)
|
||||||
|
(scheme write))
|
||||||
|
|
||||||
(define (with-output-to-string thunk)
|
(define (with-output-to-string thunk)
|
||||||
(let ((port (open-output-string)))
|
(let ((port (open-output-string)))
|
||||||
|
|
Loading…
Reference in New Issue