X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela_FTGL.lisp;fp=gacela_FTGL.lisp;h=fa40fa9e1f9f01639623621ef9f2f784e4daab9d;hb=985f70ebe19ce02926a46cf524be1152c29a44f1;hp=8fa2bd02fa625e9491fdf04b5ed1e5da2299a0f4;hpb=f517b3fade078f0c4f00c0a665ea1fe04e3e1da5;p=gacela.git diff --git a/gacela_FTGL.lisp b/gacela_FTGL.lisp index 8fa2bd0..fa40fa9 100644 --- a/gacela_FTGL.lisp +++ b/gacela_FTGL.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)"))