~ chicken-core (chicken-5) db019db299a7eeec19997c8472eb5609411d8baf
commit db019db299a7eeec19997c8472eb5609411d8baf
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Thu Oct 21 06:45:42 2010 -0400
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Thu Oct 21 06:45:42 2010 -0400
[unsigned-]integer wasn't handled everywhere in ffi (thanks to Moritz)
diff --git a/support.scm b/support.scm
index 4c7520b5..d73dba09 100644
--- a/support.scm
+++ b/support.scm
@@ -1089,7 +1089,7 @@
unsigned-c-string unsigned-c-string* nonnull-unsigned-c-string*
nonnull-c-string c-string* nonnull-c-string* c-string-list c-string-list*) ; pointer and nonnull-pointer are DEPRECATED
(words->bytes 1) )
- ((double number)
+ ((double number integer64 unsigned-integer64)
(words->bytes 2) )
(else
(cond [(and (symbol? t) (##sys#hash-table-ref foreign-type-table t))
Trap