[Chicken-janitors] #17: use of `define-foreign-record-type' expands into incorrect result type identifier

[Chicken Trac]

#17: use of  `define-foreign-record-type' expands into incorrect result type
identifier
---------------------+------------------------------------------------------
Reporter:  felix     |       Owner:            
    Type:  defect    |      Status:  new       
Priority:  critical  |   Component:  extensions
 Version:  4.0.1     |    Keywords:  foreigners
---------------------+------------------------------------------------------
 Shawn Rutledge reported this problem:

 {{{
 (module foo *

 (import scheme chicken foreign)
 (use foreigners)

 (define-foreign-record-type (vtable "struct DBusObjectPathVTable")
   (c-pointer dbus_internal_pad4 vtable-dbus_internal_pad4 vtable-
 dbus_internal_pad4-set!))

 )
 }}}

 gives:

 {{{
 Error: illegal foreign return type `#%void'
 }}}

 I assume that there is some bug in either the `foreigners` extension or
 the interplay of `define-foreign-record-type`
 and the core FFI is wrong, or that the compiler does not
 strip-syntax a type-identifier somewhere.

-- 
Ticket URL: <http://www.irp.oist.jp/trac/chicken/ticket/17>
Chicken Scheme <http://www.call-with-current-continuation.org/>
Chicken Scheme is a compiler for the Scheme programming language.