Re: guile-gnome 2.7.91 compilation attempt, issues [WORKS!]

[Greg Troxel]

  > poblano gdt 605 
/usr/pkgsrc/wip/guile-gnome/work/guile-gnome-platform-2.7.91/glib/gnome/gw > 
gmake
  > guile  -c \
  >   "(debug-set! stack 400000) \
  >    (use-modules (g-wrap)) \
  >    (use-modules (gnome gw gobject-spec)) \
  >    (generate-wrapset 'guile 'gnome-gobject \"guile-gnome-gw-gobject\")"
  > <unnamed port>: In procedure scm-error in expression (scm-error (quote 
misc-error) #f ...):
  > <unnamed port>: no wrapset registered for guile standard
  >
  This is probably the result of applying the above patch...

I backed out the patch, and fixed up Makefile.in to do mkdir -p of
guile/ws, so (g-wrap guile ws standard) got installed.
I rebuilt g-wrap, and then guile-gnome built and worked.
I was able to run guile-gtk-demo demo, calc, canvas, and some others.
Some of them failed, but I suspec that's demo rot rather than
guile-gnome problems.

I did need to patch the distribution (2.7.91) to get it to build:

$NetBSD$

--- configure.orig      2004-10-14 16:01:26.000000000 -0400
+++ configure
@@ -23256,7 +23256,12 @@ done
  ;;
     glib/gnome/gobject/guile-gnome-gobject )
  rm -f glib/gnome/gobject/guile-gnome-gobject
- ln -s `readlink -f $srcdir`/glib/gnome/gobject/ 
glib/gnome/gobject/guile-gnome-gobject
+ echo "top srcdir is $top_srcdir"
+ if [ "$top_srcdir" = "" ]; then
+  ln -s . glib/gnome/gobject/guile-gnome-gobject
+ else
+  ln -s `readlink $top_srcdir`/glib/gnome/gobject/ 
glib/gnome/gobject/guile-gnome-gobject
+ fi
  ;;
   esac
 done

The problem is that the readlink on my system is from teTex, takes
only one argument, and that argument must be a symlink.

calc.scm works, but the eval button does not.  R5RS/guile-16
compliance patch:

--- 
/usr/pkgsrc/wip/guile-gnome/work/guile-gnome-platform-2.7.91/gtk/examples/calc.scm
  2004-09-30 15:54:56.000000000 -0400
+++ calc.scm    2004-10-20 19:44:39.000000000 -0400
@@ -482,7 +482,7 @@
     ("swap"  (lambda (a b) (list b a)) 2 push-list)
     ("dup"   (lambda (a) (list a a)) 1 push-list)
     ("clear" (lambda args '()) all push-list)
-    ("eval"  eval 1))))
+    ("eval"  (lambda (e) (eval e (current-module))) 1))))
 
 ;; The digit-pad has to implement insertion/deletion in the entry
 ;; field.  We need some helper functions for that.  INS produces an



Does the auto-corba part that used to be in guile-gobject really work?
I played with the demo (which is BTW installed as part of the build,
not sure that's right), and was able to run the code from the info
file, so that's very encouraging.  What would be really cool is a
panel applet demo.  My reason for trying guile-gnome at the moment is
to write a panel applet, so I'll see if I can do that first.


Thanks for all your help (and Andy too) over the last few weeks.

    Greg