guile-gobject problem

[Andreas Rottmann <a dot rottmann at gmx dot at>]

Hi!

Trying to use guile-gobject to create bindings for a library of mine,
I always get C compiler errors, since there is a mapping generated
from c-type none to <none>, which causes the return type type in the
wrapper to be declared of type 'none'.

So I have in the log file:

,----
| Opaque types in the gw-dstw wrapset: c-name scm-name
|  
| DSTWService* <dstwservice*>
| gboolean <gboolean>
| GType <gtype>
| char* <char*>
| none <none>
| gunichar* <gunichar*>
| ...
`----

Which leads to C code like this:

,----
| static char * gw__tmp246_dstw_servicetype_add_namestr = "dstw-servicetype-add";
| static SCM gw__tmp245_dstw_servicetype_add_wrapper  (SCM gw__scm_arg0, SCM gw__scm_arg1 ) {
|   SCM gw__scm_result = SCM_UNSPECIFIED;
|   enum GW__ErrorStatus gw__error_status = GW__ERR_NONE;
|   SCM gw__error_data = SCM_UNSPECIFIED;
|   unsigned int gw__arg_pos = 0;
|   const char *gw__error_misc_msg = NULL;
| none gw__c_result;
| ...
`----

My spec file:

,----
| (define-module (distwork server gw-dstw-spec)
|   :use-module (g-wrap)
|   :use-module (gnome gobject gw-glib-spec)
|   :use-module (gnome gobject defs-support)
|   :use-module (gnome gobject gw-spec-utils))
| 
| (let ((ws (gw:new-wrapset "gw-dstw")))
|   
|   (gw:wrapset-set-guile-module! ws '(distwork server gw-dstw))
|   
|   (gw:wrapset-add-cs-declarations!
|    ws
|    (lambda (wrapset client-wrapset)
|      (if (eq? client-wrapset wrapset)
|          '()
|          (list "#include <libdstw/service.h>\n"))))
| 
|   (load-defs ws "distwork/defs/dstw.defs")
| 
|   ws)
`----

Hope somebody has a hint for me :-/

Thanks, An *frustrated* dy
-- 
Andreas Rottmann         | Rotty@ICQ      | 118634484@ICQ | a.rottmann@gmx.at
http://www.8ung.at/rotty | GnuPG Key: http://www.8ung.at/rotty/gpg.asc
Fingerprint              | DFB4 4EB4 78A4 5EEE 6219  F228 F92F CFC5 01FD 5B62

This reality is really just a fucked-up dream -- Papa Roach