- lambda-gtk-devel@common-lisp.net - mailman3.common-lisp.net

[lambda-gtk-devel] some newbie question
by Sergei Klimov 19 Aug '08

19 Aug '08

Hi, i was wondering if someone can, please, help me with one of the function of lambda-gtk or, even better, with better understanding of lambda-gtk? I am new to this this list, so i am sorry if my question is out of line. I am also pretty new to the whole lisp and gtk thing. i am trying to restrict the user ability to resize the main window, more precisely i want the window to keep constant ratio. From the GTK manual i think it is possible to achieve this by: void gdk_window_set_geometry_hints (GdkWindow *window, GdkGeometry *geometry, GdkWindowHints geom_mask); Maybe this should be a function which starts with gtk_ . The function is there, but i have no idea how to pass two additional parameters to the function, geometry and geom_mask. I've found the following definition: (defalien-type GdkGeometry (struct _GdkGeometry (min_width gint) (min_height gint) (max_width gint) (max_height gint) (base_width gint) (base_height gint) (width_inc gint) (height_inc gint) (min_aspect gdouble) (max_aspect gdouble) (win_gravity GdkGravity))) but this not in the export list, i think. the only relevant functions i could find are the function like this one: (defun gdk::Geometry.min-width (ptr &optional (val nil vp)) .... (if vp (setf (slot v587 'min_width) val) (slot v587 'min_width)))) which i think are used to access the specific fields of the geometry structure. How can create this structure? How do I create any alien variable? Again, i am a newbie. i am sure the answer is trivial, but could not figure this one out. Can you at least point me in the right direction? Or even better toss me some example code? If this is relevant: i run linux, debian, sbcl and lambda-gtk from asdf-install. Thanks in advance. Sergei

1 0

[lambda-gtk-devel] Libraries & cm-gtk...
by Dietrich Bollmann 12 Jan '07

12 Jan '07

Hi, I am not sure if the following observation is helpful - but for any case here it comes... On my system (Debian etch) the extension `.so.0' is used for some libraries - and not the extension `.so' cm-gtk was searching for. Example: ls -la /usr/lib/libgtk-x11-2.0.so ls: /usr/lib/libgtk-x11-2.0.so: No such file or directory ls -la /usr/lib/libgtk-x11-2.0* lrwxrwxrwx 1 root root 26 2006-10-27 23:30 /usr/lib/libgtk-x11-2.0.so.0 -> libgtk-x11-2.0.so.0.800.20 -rw-r--r-- 1 root root 3039524 2006-10-14 06:29 /usr/lib/libgtk-x11-2.0.so.0.800.20 In order to load the libraries I made some changes to my version of the code: - cm-gtk now searches the libraries using both extensions - the list of extensions searched for is customizable by setting the variable *gtk-libext* to something different. current value: #+:darwin '("dylib") #-:darwin '("so" "so.0")) Thanks for your wonderful program! Best wishes, Dietrich Here come my changes... File: .../common-music/cm-gtk/gtkffi-cmusbcl.lisp ============================================================ original version: ------------------------------------------------------------ (in-package :cl-user) (eval-when (:compile-toplevel :load-toplevel :execute) #+sbcl (setq sb-alien::*values-type-okay* t) (export '(*gtk-libdir* *gtk-libfiles*) :cl-user) (defvar *gtk-libdir* #+:darwin "/sw/lib/" #-:darwin "/usr/lib/") (defvar *gtk-libfiles* '("libgtk-x11-2.0" "libgdk-x11-2.0" "libatk-1.0" "libgdk_pixbuf-2.0" #-:darwin "libm" #+:darwin "/usr/lib/libm" "libpangoxft-1.0" "libpangox-1.0" "libpango-1.0" "libgobject-2.0" "libgmodule-2.0" #-:darwin "libdl" "libglib-2.0" #+:darwin "libintl" #+:darwin "libiconv" )) (flet ((libpath (lib &aux p) (setq p (namestring (merge-pathnames (format nil "~A.~A" lib #+:darwin "dylib" #-:darwin "so") *gtk-libdir*))) (if (probe-file p) p (error "Library ~S not found. Either GTK is not installed or else cl-user:*gtk-libdir* needs to be set to the directory containing GTK on your machine." p)))) #+:sbcl (dolist (l *gtk-libfiles*) (load-shared-object (libpath l))) #+:cmu (dolist (l *gtk-libfiles*) (ext:load-foreign (libpath l))))) ============================================================ the changed version: ------------------------------------------------------------ (in-package :cl-user) (eval-when (:compile-toplevel :load-toplevel :execute) #+sbcl (setq sb-alien::*values-type-okay* t) (export '(*gtk-libdir* *gtk-libfiles*) :cl-user) (defvar *gtk-libdir* #+:darwin "/sw/lib/" #-:darwin "/usr/lib/") (defvar *gtk-libfiles* '("libgtk-x11-2.0" "libgdk-x11-2.0" "libatk-1.0" "libgdk_pixbuf-2.0" #-:darwin "libm" #+:darwin "/usr/lib/libm" "libpangoxft-1.0" "libpangox-1.0" "libpango-1.0" "libgobject-2.0" "libgmodule-2.0" #-:darwin "libdl" "libglib-2.0" #+:darwin "libintl" #+:darwin "libiconv" )) (defvar *gtk-libext* #+:darwin '("dylib") #-:darwin '("so" "so.0")) (flet ((libpath (lib) (loop for ext in *gtk-libext* for library = (namestring (merge-pathnames (format nil "~A.~A" lib ext) *gtk-libdir*)) for exists = (probe-file library) until exists finally (return (if exists ;; found library - return it library ;; couldn't find library - throw error (error (concatenate 'string (format nil "Library ~S with neither of the extensions ~{~a~^, ~} found. " lib *gtk-libext*) "Either GTK is not installed " "or else cl-user:*gtk-libdir*, cl-user:*gtk-libfiles* or cl-user:*gtk-libext* " "needs to be set to fing the GTK libraries on your machine."))))))) (dolist (l *gtk-libfiles*) (let ((lib (libpath l))) ;; (format t ";;; Loading library ~a~%" lib) #+:sbcl (load-shared-object lib) #+:cmu (ext:load-foreign lib))))) ============================================================

1 0

[lambda-gtk-devel] Last chance: move your files off of common-lisp.net FTP, please.
by eenge＠common-lisp.net 14 Aug '06

14 Aug '06

See http://common-lisp.net/pipermail/users/2006-August/000006.html for more information. Thanks.

1 0

Re: [lambda-gtk-devel] lambda-gtk on CLOS
by Ignas Mikalajunas 03 May '06

03 May '06

> Hi, guys, > > I generated a CLOS extension over lambda-gtk. Here are details > > http://borigen.narod.ru/gtk-on-clos/ > > I rewrote the original examples with CLOS and added a couple of others. > I really interested in what you, guys, think about this. Any comments > and suggestions are very welcome. I also have a plan to document and > post the functions which generates this CLOS extensions, since > currently, I generated only those classes needed for proper functioning > of the examples. > > D. Hi, I am sorry for such a delay, but I have been very busy for the last few months :/ I can't really evaluate the CLOS layer at the moment. Though i can tell you that I don't like the naming scheme you are using :/ (though this is probably my broblem as i am coding-convention nazi ;) I liked "clg" (another common lisp gtk biding package) naming conventions better. All in all it looks nice, and i'll definitely try it out more as soon as i'll get to grips and push the lamdba-gtk cffi port into completion. As at the moment i am having some issues with testing on macs, bitfields and encodings (they are not really supported by cffi and i just don't have the expertise to add the support myself). Thanks a lot for your effort. Ignas Mikalajūnas

1 0

[lambda-gtk-devel] lambda-gtk on CLOS
by Denis Potapov 10 Apr '06

10 Apr '06

Hi, guys, I generated a CLOS extension over lambda-gtk. Here are details http://borigen.narod.ru/gtk-on-clos/ I rewrote the original examples with CLOS and added a couple of others. I really interested in what you, guys, think about this. Any comments and suggestions are very welcome. I also have a plan to document and post the functions which generates this CLOS extensions, since currently, I generated only those classes needed for proper functioning of the examples. D.

1 0

[lambda-gtk-devel] Patch to add support for unicode labels.
by Joslwah 16 Feb '06

16 Feb '06

Dear All, This patch adds support for passing unicode strings to gtk for labels and the like. gtk supports this, and it works on sbcl/x86 and sbcl/ppc (both sbcl-0.9.9). Can't test it on ppc64 since there isn't a version of sbcl that currently runs on it. The patch is in two parts. The first part just adds some functions to the api that I need for some of my code. The second part adds support for passing utf8-encoded strings to gtk. Please apply for sbcl and could someone test for CMUCL etc. Thanks. Joslwah. p.s. Is it possible to increment the version number occasionally? I know of at least two incompatible versions around both carrying the 0.1 label. One works with older versions of sbcl, and one only with newer! -------------Patch follows------------------------------------------------------------ diff -r -u lambda-gtk_0.1-pre/gtk.api lambda-gtk_0.1/gtk.api --- lambda-gtk_0.1-pre/gtk.api 2006-02-16 14:07:04.000000000 +0800 +++ lambda-gtk_0.1/gtk.api 2006-02-13 18:49:04.000000000 +0800 @@ -1091,6 +1091,9 @@ (:function "gdk_threads_enter") (:function "gdk_threads_leave") (:function "gdk_threads_init") +(:function "gdk_display_open") +(:function "gdk_display_get_default_screen") +(:function "gtk_window_set_screen") (:function "gtk_accel_group_get_type") (:function "gtk_accel_group_new") (:function "gtk_accel_group_lock") diff -r -u lambda-gtk_0.1-pre/lambda-gtk-cmusbcl.lisp lambda-gtk_0.1/lambda-gtk-cmusbcl.lisp --- lambda-gtk_0.1-pre/lambda-gtk-cmusbcl.lisp 2006-02-16 14:07:05.000000000 +0800 +++ lambda-gtk_0.1/lambda-gtk-cmusbcl.lisp 2006-02-13 19:10:30.000000000 +0800 @@ -86,7 +86,7 @@ ( (void ()) void) ( (pointer (void ())) (* t)) - ( (pointer (char ())) c-string ) + ( (pointer (char ())) utf8-string ) ( (pointer (gchar ())) c-string ) ( (pointer (guchar ())) c-string ) @@ -417,12 +417,14 @@ (if (eql (car arg) 'pointer) (let ((isa (sbcl-type arg))) (if (or (eql isa 'c-string) + (eql isa 'utf8-string) (equal isa '(* T))) (list isa) (let ((x (second isa))) ;;(print (list :x-> x)) (cond ((symbolp x) ; basic type - (if (eql x 'c-string) + (if (or (eql x 'c-string) + (eql x 'utf8-string)) (list (list '* t)) (list x ':in-out))) ((stringp x)

1 0

[lambda-gtk-devel] Auto-nag: lambda-gtk link verifier failed
by root＠common-lisp.net 30 Jan '06

30 Jan '06

You are being nagged on because your project's name showed up in the nightly Checkbot run. Checkbot checks for broken links etc. This probably means that you are either pointing to a broken link or that someone is pointing to a broken link on your site. Or something else, it check's a bunch of stuff. Update your webpages or you shall be nagged again next week. To find out what's wrong with your webpages, please consult: http://common-lisp.net/checkbot/checkbot-common-lisp.net.html Any questions? You got this email but your webpage doesn't seem to be listed on the checkbot webpage? You can reach the author of this cronjob at clo-devel(a)common-lisp.net Thanks!

1 0

[lambda-gtk-devel] Auto-nag: lambda-gtk link verifier failed
by root＠common-lisp.net 23 Jan '06

23 Jan '06

You are being nagged on because your project's name showed up in the nightly Checkbot run. Checkbot checks for broken links etc. This probably means that you are either pointing to a broken link or that someone is pointing to a broken link on your site. Or something else, it check's a bunch of stuff. Update your webpages or you shall be nagged again next week. To find out what's wrong with your webpages, please consult: http://common-lisp.net/checkbot/checkbot-common-lisp.net.html Any questions? You can reach the author of this cronjob at clo-devel(a)common-lisp.net Thanks!

1 0

[lambda-gtk-devel] Auto-nag: lambda-gtk link verifier failed
by root＠common-lisp.net 18 Jan '06

18 Jan '06

You are being nagged on because your project's name showed up in the nightly Checkbot run. Checkbot checks for broken links etc. This probably means that you are either pointing to a broken link or that someone is pointing to a broken link on your site. Or something else, it check's a bunch of stuff. Update your webpages or you shall be nagged again next week. To find out what's wrong with your webpages, please consult: http://common-lisp.net/checkbot/checkbot-common-lisp.net.html Any questions? You can reach the author of this cronjob at admin(a)common-lisp.net Thanks!

1 0

[lambda-gtk-devel] Re: lambda-gtk wrong return types in the generated ffi
by Rick Taube 15 Dec '05

15 Dec '05

thank you for reporting this. ill try to fix it over the break. ive been remiss updating some things, primarily because im thinking that i shuould now be generating cffi bindings but havent found the time to work on this. --rick On Dec 14, 2005, at 3:41 PM, Peter Gijsels wrote: > Hi, > > I've been playing around with lambda-gtk, and I like it a lot. > Sometimes it's a bit low-level (e.g. valist: yuk), but in general it's > quite usable. > > However, I encountered a bug: the return type of some of the generated > functions are wrong. For gtk_tree_path_to_string the generated return > type is gchar while it should be c-string: > hunk ./gtkffi-cmusbcl.lisp 13134 > - (defalien "gtk_tree_path_to_string" gchar (a (* t))) > + (defalien "gtk_tree_path_to_string" c-string (a (* t))) > > It seems that there are other functions that are suffering from the > same problem: e.g. gtk_tree_path_get_indices. > > I didn't immediately find how to fix this in the generating code. > > Regards, > Peter

1 0

[lambda-gtk-devel] minesweeper example
by Todd Dukes 27 Oct '05

27 Oct '05

I have a simple minesweeper program that may serve as an example program. It is one lisp file of about 750 lines. There are also a bunch of xpm files for the bitmaps. Is there any interest? thanks, Todd.

1 0

[lambda-gtk-devel] problem with button
by Todd Dukes 22 Aug '05

22 Aug '05

I am having a problem being able to use both the button "clicked" event and the "button-press-event" at the same time. The difference between the two is: - with button "clicked" the user must press and release mouse button one over the button. If the mouse moves out of the boundary of the button before the user releases the button, no "click" signal is emitted. - with the "button-press-event" the signal is emitted as soon as the mouse button is pressed over the button. You also get an 'event,' which you can use to determine which mouse button was pressed. I have a small application posted below. The function button-test should cause a window to appear with a single button, mis-labeled "quit" in it. Clicking the button should cause the text button-clicked to print. Pressing any mouse button over the button should cause the "button press" event messages to print. Unfortunatly the "click" events never occur. You can comment the button press event signal connection and see that in the case where this signal is not connected, the button clicks do register. The gtk+ documentation says that if the "button-press-event" handler returns false processing of the event will continue, which is why I am returning gtk:+false+. Can anyone point out how to make this work? thanks, Todd. (gtk:define-signal-handler bye1 :void (widget data) widget data ; stop unused var compiler nagging (format t "bye! ~%") (gtk:main-quit)) (gtk:define-signal-handler delete-event-handler :int (widget event data) widget event data ; stop unused var compiler nagging (format t "delete-event occured~%") gtk:+false+) (gtk:define-signal-handler button-clicked :void (widget data) (format t "button-clicked~%") (force-output t)) (gtk:define-signal-handler button-pressed :void (widget event data) (format t "button press ~a~%" data) (force-output t) (when (eq (gdk:EventButton.type event) gdk:button-press) (format t "button press, event ~a~%" (gdk:EventButton.button event)) (when (eq (gdk:EventButton.type event) gdk:button-press) (format t "button event " (gdk:EventButton.button event)) (force-output t))) (format t "returning ~a~%" gtk:+false+) (force-output t) gtk:+false+) (defun button-test () (gtk:init-ensure) (let ((window (gtk:window-new gtk:window-toplevel)) (hbox (gtk:hbox-new t 1)) (button-quit (gtk:button-new-with-label "quit"))) (gtk:window-set-policy window 0 0 1) (gtk:window-set-title window "button test") (gtk:container-add window hbox) (gtk:box-pack-start hbox button-quit nil nil 0) (g:signal-connect button-quit "clicked" (g:callback button-clicked) window) (g:signal-connect button-quit "button-press-event" (g:callback button-pressed) window) (g:signal-connect window "delete-event" (g:callback delete-event-handler) (g:nullptr)) (g:signal-connect window "destroy" (g:callback bye1) (g:nullptr)) (mapcar (lambda (x) (gtk:widget-show x)) (list button-quit hbox window)) (gtk:main)))

3 4

[lambda-gtk-devel] passing lisp data to signal handlers
by Todd Dukes 29 May '05

29 May '05

I am trying to port a minesweeper game from C to lisp, just to learn a little about lambda-gtk. The buttons for the game are kept in a two dimensional array of these structures: (defstruct minesweeper-button button-state widget bombs-nearby has-bomb row column) I want to connect the button "clicked" signal to a handler like this: (g:signal-connect button "clicked" mine-button-clicked (aref *mines* column row)) The problem is that at runtime I get an error complaining that the data I passed to the signal-handler, ie. the (aref *mines* column row) is not of type (OR NULL SYSTEM-AREA-POINTER (ALIEN (* T))) I looked through the examples.lisp and downloaded cm-2.6.0 and looked at all the signal-connect calls, but found no examples of passing lisp data to the signal handler. I looked through the sb-alien section in the sbcl manual, but it doens't seem that converting lisp to a C representation so it could be accessed by other lisp occurred to them. I wanted to avoid having to create a C structure just to pass a couple of intergers to a signal. I guess for this particular case I could multiply the column by the number of rows and then add the row to that and decode it in the callback, but that seems a little hackish. I wanted to eliminate most of the globals once I got the program to work. Can anyone suggest a better way of sending this data to the callback. I can send the complete code if you would like. It is less than 600 lines without the xpm files. thanks, Todd.

1 0

[lambda-gtk-devel] gdk::pixmap-create-from-xpm-d argument type
by Todd Dukes 20 May '05

20 May '05

What type should the literal xpm data be for a call to gdk::pixmap-create-from-xpm-d. The data in c is shown below. Looking at the types defined with defalien-type in gtkffi-cmusbcl.lisp, the closest I see is: (defalien-type gchararray (* t)) How would this need to be altered to represent an array of character arrays? How then would the literal data appear in the lisp file? Is there any more documentation for sbcl-af other than the comments in the source distribution? Thanks for any help. Todd. /* XPM */ static char * plus_xpm[] = { "64 64 3 1", " c None", ". c #FFFFFF", "+ c #000000", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................", ".......................+++++++++++++++++++......................"};

2 1

[lambda-gtk-devel] re: lambda-gtk with clisp?
by Rick Taube 04 May '05

04 May '05

Hi Alex, my apologies for taking so long to respond. Here is the message I got from kenny tilton, including the tarball of the clisp code i think. you should be able to tell what they are using from clisp's ffi. I am happy to help out once school is out and the dust settles (two weeks or so...) --rick > From: Kenneth Tilton <ktilton(a)nyc.rr.com> > Date: November 30, 2004 2:51:08 PM CST > To: Rick Taube <taube(a)uiuc.edu> > Subject: Fwd: Cells - Gtk > > Rick, > > I switched over to my Mac and was going to send gtk-ffi.lisp when I > got back to my XP box when I noticed this. It is the whole thing, but > only 122k, so what the heck. :) > > kenny > > Begin forwarded message: > >> From: Vasilis Margioulas <vasilism(a)sch.gr> >> Date: November 16, 2004 8:35:59 PM EST >> To: ktilton(a)nyc.rr.com >> Subject: Cells - Gtk >> >> Hi, >> In attached file is my work on gtk powered by cells using Clisp ffi >> (sory no uffi). >> If you find it usefull you can add it in cell-cultures repository >> feel free to contact for any comments or sugestions. >> >> Vasilis Margioulas. >> >> PS: To load cells (cvs) in clisp i need to change >> cells/defpackage.lisp: (:import-from ..... #-clisp >> #:slot-definition-name) >> utils-kt/defpackage.lisp: (:export ...... #+clisp >> #:slot-definition-name) >> so it will be usefull if you change the above in cvs tree. >>

1 0

[lambda-gtk-devel] lambda-gtk with clisp?
by Alex Rudnick 01 May '05

01 May '05

Hello, Rick and anybody else :) My semester's almost over, and once the summer starts, I'd like to try to make lambda-gtk work with clisp... Rick, I think you'd said something about having an email with helpful example code, towards this end? Yeah, but I'm about to have a lot of free time, and I'm going to make productive use of it :) Cheers :) -- -- alexr

1 0

[lambda-gtk-devel] Problem with examples?
by Bruno Loff 01 Feb '05

01 Feb '05

Something wierd when I try to use the examples: * (load (compile-file "gtkffi-cmusbcl")) ....... T * (load "examples") ; Loading #p"/home/bruno/Projects/lambda-gtk/examples.lisp". ; ; Warning: These variables are undefined: ; BYE1 DATA WIDGET ; ; ; Warning: These functions are undefined: ; DATA GTK::DEF-CALLBACK C-CALL:VOID WIDGET Error in KERNEL:%COERCE-TO-FUNCTION: the function GTK::DEF-CALLBACK is undefined. I'll try and figure out what happened. Any hints? Bruno Loff

2 1

[lambda-gtk-devel] Problem with patch sbcl-af and sb-executable ?
by Nicolas Lamirault 22 Jan '05

22 Jan '05

hello, i have make a little prg in cl-lambda-gtk to test it it works, but when i try to make an executable i have an error : sbcl.core is core created like this : $ tar -zxf sbcl-af-2004-10-22.tgz $ cd sbcl-af $ sbcl --load "system" * (sb-ext:save-lisp-and-die "sbcl.core") sbcl --core sbcl.core This is SBCL 0.8.16, an implementation of ANSI Common Lisp. More information about SBCL is available at <http://www.sbcl.org/>. SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. * (require :sb-executable) debugger invoked on a SB-INT:EXTENSION-FAILURE in thread 14174: Don't know how to REQUIRE SB-EXECUTABLE. See also: The SBCL Manual, Variable *MODULE-PROVIDER-FUNCTIONS* The SBCL Manual, Function REQUIRE You can type HELP for debugger help, or (SB-EXT:QUIT) to exit from SBCL. restarts (invokable by number or by possibly-abbreviated name): 0: [ABORT ] Reduce debugger level (leaving debugger, returning to toplevel). 1: [TOPLEVEL] Restart at toplevel READ/EVAL/PRINT loop. (SB-IMPL::REQUIRE-ERROR 3 "Don't know how to ~S ~A.")[:EXTERNAL] 0] 1 with no sbcl.core : sbcl This is SBCL 0.8.16, an implementation of ANSI Common Lisp. More information about SBCL is available at <http://www.sbcl.org/>. SBCL is free software, provided as is, with absolutely no warranty. It is mostly in the public domain; some portions are provided under BSD-style licenses. See the CREDITS and COPYING files in the distribution for more information. * (require :sb-executable) ("SB-EXECUTABLE") does anybody know how can i use sb-executable and sbcl-af patch ? thanks for any help -- Nicolas Lamirault

2 1

[lambda-gtk-devel] .emacs file for lambda-gtk?
by Andrew P. Lentvorski, Jr. 22 Jan '05

22 Jan '05

I have noticed that the examples.lisp file indents much less for gtk:define-signal-handler than my editor defaults. Could someone send me the magic incantations to indent like the examples file? Thanks, -a

2 1

[lambda-gtk-devel] Bug in examples.lisp
by rm＠fabula.de 05 Dec '04

05 Dec '04

Hello list, just stumbled over a small buglet in 'examples.lisp' - the function 'textentry' fails to call gtk::init which results in some nasty openmcl kernel mess when called (this bug only shows up iff '(textentry)' is called before any other demo invocations, once any othjer demo got started gtk (or - more precicely, it's type system - will be properly initialized). BTW, i've started to work on gtk2 support for OpenMCL/Linux - so far i've been able to generate gtk2.ffi and the interface database. I modified openmcl-gtk-support to get a (not-so-good) working openmcl-gtk2-support. I've even managed to frankensteinize Rick Taube's lambda-gtk-openmcl.lisp into a lambda-gtk-openmcl-linux.lisp that _does_ produce a gtkffi-openmcl.lisp. Now, i can load and start the examples but unfortunately the first callback seems to tickle openmcl's kernel in unwanted places. I guess i should first test my gtk2 bindings without the lambdagtk suggar ... :-/ Oh, and as a suggestion: i'd be rather cool to have libglade support in lambda-gtk. Saves a _lot_ of typing ... Cheers Ralf Mattes

2 4

[lambda-gtk-devel] LambdaGTK on Openmcl/Linux ...
by rm＠fabula.de 03 Dec '04

03 Dec '04

Hello list, i further investigated into using LambdaGTK on OpenMCL/PowerPC. On point of concern: lgtk OpenMCL/Darwin distributes a set of interface definitions that use an interface directory called "gtk". Unforunately OpnMCL/Linux does allready come with such an interface directory, but for gtk version _1_. If this is an oversight i recomend to quickly change the inter- face directory's name to 'gtk2' (which would be in sync with the "official" naming of this toolkit, i assume). I'll cc: this to the OpneMCL list just in case there's interest in distributing the gtk2 interface files with OpenMCL in the future (i generated them on my box without problems from the headers). Cheers Ralf Mattes

1 0

[lambda-gtk-devel] Hello and a first question (OpenMCL/Linux)
by rm＠fabula.de 02 Dec '04

02 Dec '04

Hello list, is this really the first message to this list? Anyway, here's my first question: how is the status of LambdaGTK for OpenMCL/PPC? Is there any work done on it? What actually needs to be done? TIA Ralf Mattes

1 0

[lambda-gtk-devel] loading on suse.
by Immanuel Litzroth 01 Dec '04

01 Dec '04

Hi all, on a suse system the gtk libs are installed in /opt/gnome/lib and libm is installed in /lib. This makes it impossible to load lambda-gtk out of the box. I have solved this problem on cmu-19 by using load-object-file and throwing out the *gdk-libdir* variable. Is anyone working on a more general solution to this loading or should I send in patches? I also have problems getting lambda-gtk out of cvs. Can anyone tell me the magic incantations to do an anonymous cvs checkout? This does not work: cvs -d :pserver:anonymous@common-lisp.net:/project/lambda-gtk/cvsroot login Logging in to :pserver:anonymous@common-lisp.net:2401/project/lambda-gtk/cvsroot CVS password: /project/lambda-gtk/cvsroot: no such repository Immanuel *************************************************************************** I can, I can't. Tubbs Tattsyrup -- Immanuel Litzroth Software Development Engineer Enfocus Software Antwerpsesteenweg 41-45 9000 Gent Belgium Voice: +32 9 269 23 90 Fax : +32 9 269 16 91 Email: Immanuell(a)enfocus.be web : www.enfocus.be ***************************************************************************

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

lambda-gtk-devel