X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela_SDL.lisp;h=502c03a102dff9270436e877ad0a45e30bced6e4;hb=985f70ebe19ce02926a46cf524be1152c29a44f1;hp=da02a84033c2e2752dd57fde05a856028dc2cbf4;hpb=f517b3fade078f0c4f00c0a665ea1fe04e3e1da5;p=gacela.git diff --git a/gacela_SDL.lisp b/gacela_SDL.lisp index da02a84..502c03a 100644 --- a/gacela_SDL.lisp +++ b/gacela_SDL.lisp @@ -15,7 +15,10 @@ ;;; along with this program. If not, see . -(in-package :gacela) +(when (not (find-package 'gacela)) + (make-package 'gacela :nicknames '(gg) :use '(lisp))) + +(eval-when (eval) (in-package 'gacela :nicknames '(gg) :use '(lisp))) (defmacro mapcconst (type c-type name) (let ((c-header (concatenate 'string c-type " gacela_" name " (void)"))