projects
/
cl-gtk2.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add support for saving images with Clozure
[cl-gtk2.git]
/
glib
/
glib.lisp
diff --git
a/glib/glib.lisp
b/glib/glib.lisp
index
1ee33f6
..
13f3dfe
100755
(executable)
--- a/
glib/glib.lisp
+++ b/
glib/glib.lisp
@@
-56,9
+56,13
@@
#+sbcl
(pushnew 'run-initializers sb-ext:*init-hooks*)
#+sbcl
(pushnew 'run-initializers sb-ext:*init-hooks*)
+#+openmcl
+(pushnew 'run-initializers ccl:*restore-lisp-functions*)
#+sbcl
(pushnew 'run-finalizers sb-ext:*save-hooks*)
#+sbcl
(pushnew 'run-finalizers sb-ext:*save-hooks*)
+#+openmcl
+(pushnew 'run-finalizers ccl:*save-exit-functions*)
(defmacro at-init ((&rest keys) &body body)
"
(defmacro at-init ((&rest keys) &body body)
"