X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela.lisp;h=7a054bb1d7a96235122327402244f8668bdfa284;hb=00abf12486704814b6aa12d8b162135df6637141;hp=e009ec3187c5482c7294a491535e5bfd3d6a3e6a;hpb=f517b3fade078f0c4f00c0a665ea1fe04e3e1da5;p=gacela.git diff --git a/gacela.lisp b/gacela.lisp index e009ec3..7a054bb 100644 --- a/gacela.lisp +++ b/gacela.lisp @@ -15,7 +15,12 @@ ;;; along with this program. If not, see . -(in-package :gacela :nicknames '(gg)) +(eval-when (compile load) (make-package 'gacela :nicknames '(gg) :use '(lisp))) + +(eval-when (compile load eval) + (when (not (find-package 'gacela)) (make-package 'gacela :nicknames '(gg) :use '(lisp))) + (in-package 'gacela :nicknames '(gg) :use '(lisp))) + ;;; Default values for Gacela (defvar *width-screen* 640)