Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-12 07:27:33 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fixing handling of [un]signed integer type names in the FFI.

Browse source
This commit is contained in:
Alex Shinn 2012-07-13 06:48:13 +09:00
parent d669b8a788
commit 7e67460770
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
tools/chibi-ffi
View file

@ -675,7 +675,7 @@
(case base (case base
((string env-string non-null-string) (if *c++?* "string" "char*")) ((string env-string non-null-string) (if *c++?* "string" "char*"))
((fileno) "int") ((fileno) "int")
(else (symbol->string base)))) (else (string-replace (symbol->string base) #\- " "))))
(define (type-struct-type type) (define (type-struct-type type)
(let ((type-spec (lookup-type(if (vector? type) (type-base type) type)))) (let ((type-spec (lookup-type(if (vector? type) (type-base type) type))))