From mboxrd@z Thu Jan  1 00:00:00 1970
From: Ariel Rios <ariel@linuxppc.org>
To: David Pirotte <david@altosw.be>
Cc: guile-gtk <guile-gtk@sourceware.cygnus.com>
Subject: Re: gnome-guile compilation problem
Date: Mon, 23 Apr 2001 07:24:00 -0000
Message-id: <988028229.677.1.camel@soleil>
References: <3AE41749.5093FB9A@altosw.be>
X-SW-Source: 2001-q2/msg00026.html

El 23 Apr 2001 13:51:37 +0200, David Pirotte escribió:


> guile -l ./gtk/config.scm -s ./build-guile-gtk -I . glue gtk-1.2.defs >tmpt && mv tmpt gtk-glue.c
> (reading "gtk-1.2.defs")
> (reading "gdk-1.2.defs")
> 
>  0* [#<procedure ()>]
>  1  (case opsym ((glue) (let* (# #) (emit-glue defs-file defs))) ...)
>     ...
>  2  [emit-glue "gtk-1.2.defs" (# # # # ...)]
>  3* [emit-funcs (# # # # ...)]
>  4  (letrec (# # # # ...) (register-type # #) (register-type # #) ...)
>     ...
>  5  [for-each #<procedure (form)> (# # # # ...)]
>  6* [#<procedure (form)> (define-func gtk_toolbar_set_space_style none ...)]
>  7* (let ((name #) (options #)) (case (car form) (# #) (# #) ...))
>  8  (case (car form) ((define-type-alias) (register-type name #)) ...)
>     ...
>  9  (let* (# # # # ...) (if # #) (set! cur-protection prot) ...)
> 10* [emit-func (none) ("gtk" "toolbar" "set" ...) ...]
> 11  (let* (# # # # ...) (for-each # parms) (for-each # multiple-values) ...)
> 12* [map #<procedure (p)> ((GtkToolbar toolbar) (GtkToolBarSpaceStyle style))]
> 13* [#<procedure (p)> (GtkToolBarSpaceStyle style)]
> 14* [lookup-type GtkToolBarSpaceStyle]
> 15  (let* ((cell #) (def #)) (cond (# def) (# #) (#t #)))
> 
> ./build-guile-gtk:805:5: In expression (let* (# #) (cond # # ...)):
> ./build-guile-gtk:805:5: unknown type GtkToolBarSpaceStyle
> guile-snarf -DHAVE_CONFIG_H -I. -I. -I. -I/usr/local/lib/glib/include -I/usr/local/include -D_REENTRANT -I/usr/X11R6/include
> -I/usr/local/include -I/usr/local/include  -g -O2 guile-gtk.c >guile-gtk.c.tmp && mv guile-gtk.c.tmp guile-gtk.x
> guile-snarf -DHAVE_CONFIG_H -I. -I. -I. -I/usr/local/lib/glib/include -I/usr/local/include -D_REENTRANT -I/usr/X11R6/include
> -I/usr/local/include -I/usr/local/include  -g -O2 gtk-support.c >gtk-support.c.tmp && mv gtk-support.c.tmp gtk-support.x
> guile -l ./gtk/config.scm -s ./build-guile-gtk -I . main gtk-1.2.defs gdk-1.2.defs >tmpm && mv tmpm main.c
> (reading "gtk-1.2.defs")
> (reading "gdk-1.2.defs")
> (reading "gdk-1.2.defs")

I cannot reproduce the error here. It seems that your anoncvs server is
outdated =/

ariel