~mdw
/
clg
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
be0a901
)
Updated due to API changes
author
espen
<espen>
Sun, 21 Oct 2001 23:24:09 +0000
(23:24 +0000)
committer
espen
<espen>
Sun, 21 Oct 2001 23:24:09 +0000
(23:24 +0000)
hello-world.lisp
patch
|
blob
|
blame
|
history
diff --git
a/hello-world.lisp
b/hello-world.lisp
index
d89a585
..
0f4b5ec
100644
(file)
--- a/
hello-world.lisp
+++ b/
hello-world.lisp
@@
-1,15
+1,15
@@
-(
use
-package "GTK")
+(
in
-package "GTK")
(make-instance 'window
:type :toplevel
:title "Test"
:border-width 5
(make-instance 'window
:type :toplevel
:title "Test"
:border-width 5
- :
visible
t
+ :
show-all
t
:child (make-instance 'button
:label "Hello World!"
:child (make-instance 'button
:label "Hello World!"
- :
visible t
- :signals
-
(list (list 'clicked #'(lambda () (write-line "Button clicked"))))
))
-
+ :
signal (list 'clicked
+ #'(lambda (button)
+
(print button) (write-line "clicked"
))
+ :object t)))