From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Andreas Rottmann Newsgroups: gmane.lisp.guile.user,gmane.comp.gnome.gtk+.devel.general Subject: Re: GLib GObject & Javadot Notation for scheme? Date: Mon, 26 Apr 2004 20:36:03 +0200 Sender: guile-user-bounces+guile-user=m.gmane.org@gnu.org Message-ID: <87oepewprg.fsf@ivanova.rotty.yi.org> References: <20040426152122.GB31886@backlot.linas.org> NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1083005900 18954 80.91.224.253 (26 Apr 2004 18:58:20 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 26 Apr 2004 18:58:20 +0000 (UTC) Cc: gtk-devel-list@gnome.org Original-X-From: guile-user-bounces+guile-user=m.gmane.org@gnu.org Mon Apr 26 20:58:12 2004 Return-path: Original-Received: from monty-python.gnu.org ([199.232.76.173]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1BIBIc-00047W-00 for ; Mon, 26 Apr 2004 20:57:50 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.30) id 1BIBHP-00069e-EH for guile-user@m.gmane.org; Mon, 26 Apr 2004 14:56:35 -0400 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.30) id 1BIBH9-00068L-Vg for guile-user@gnu.org; Mon, 26 Apr 2004 14:56:19 -0400 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.30) id 1BIBAH-0002ju-Tb for guile-user@gnu.org; Mon, 26 Apr 2004 14:49:45 -0400 Original-Received: from [80.91.224.249] (helo=main.gmane.org) by monty-python.gnu.org with esmtp (Exim 4.30) id 1BIB6N-0001D1-5I for guile-user@gnu.org; Mon, 26 Apr 2004 14:45:11 -0400 Original-Received: from list by main.gmane.org with local (Exim 3.35 #1 (Debian)) id 1BIB6L-00043B-00 for ; Mon, 26 Apr 2004 20:45:09 +0200 Original-Received: from chello080109053157.14.14.univie.teleweb.at ([80.109.53.157]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 26 Apr 2004 20:45:09 +0200 Original-Received: from a.rottmann by chello080109053157.14.14.univie.teleweb.at with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 26 Apr 2004 20:45:09 +0200 X-Injected-Via-Gmane: http://gmane.org/ Original-To: guile-user@gnu.org Original-Lines: 55 Original-X-Complaints-To: usenet@sea.gmane.org X-Gmane-NNTP-Posting-Host: chello080109053157.14.14.univie.teleweb.at User-Agent: Gnus/5.1002 (Gnus v5.10.2) Emacs/21.3 (gnu/linux) Cancel-Lock: sha1:ZqRXcg0Ry6qBXYGYOkh2SYM6dvw= X-BeenThere: guile-user@gnu.org X-Mailman-Version: 2.1.4 Precedence: list List-Id: General Guile related discussions List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-user-bounces+guile-user=m.gmane.org@gnu.org Xref: main.gmane.org gmane.lisp.guile.user:3124 gmane.comp.gnome.gtk+.devel.general:5652 X-Report-Spam: http://spam.gmane.org/gmane.lisp.guile.user:3124 linas@linas.org (Linas Vepstas) writes: > Hi, > > I was reading about JScheme and in particular 'javadot notation': > > http://jscheme.sourceforge.net/jscheme/doc/javadot.html > > and I was wondering if anybody had done anything similar for > GLib GObjects for guile? The idea seems pretty slick ... > There is something even better: guile-gobject[0]. Just as an appetizer: (use-modules (gnome gtk)) (define (app) (let* ((window (make #:type 'toplevel)) (button (make #:label "Hello, World!"))) ;; since window is a container, this generic maps onto the function ;; gtk-container-set-border-width (set-border-width window 10) ;; note that we can set the border width with a gobject property as ;; well: (gobject-set-property window 'border-width 15) ;; (gnome gobject generics), re-exported by (gnome gtk), defines a ;; generic `set' method for gobject-set-property, se we can also do ;; it like this: (set window 'border-width 20) ;; this is much less typing :-) (add window button) ;; see (gnome gobject generics) for a full list of gobject generic ;; functions (connect button 'clicked (lambda (b) (gtk-main-quit))) ;; generic functions for .defs apis are defined in the .defs files, ;; not manually (show-all window) (gtk-main))) (app) Cheers, Andy -- Andreas Rottmann | Rotty@ICQ | 118634484@ICQ | a.rottmann@gmx.at http://yi.org/rotty | GnuPG Key: http://yi.org/rotty/gpg.asc Fingerprint | DFB4 4EB4 78A4 5EEE 6219 F228 F92F CFC5 01FD 5B62 The best way to accelerate a Windows machine is at 9.81 m/s^2 _______________________________________________ Guile-user mailing list Guile-user@gnu.org http://mail.gnu.org/mailman/listinfo/guile-user