X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela_misc.lisp;h=e19f3a2fe5e4aa0213ee8fd9e7710ff312109244;hb=6a3d1ffb69036e6d4f1c239fd7d52f9bfc48d50c;hp=6e3e4ff0da07e867afb9baf31a1a64ecd866ad08;hpb=985f70ebe19ce02926a46cf524be1152c29a44f1;p=gacela.git diff --git a/gacela_misc.lisp b/gacela_misc.lisp index 6e3e4ff..e19f3a2 100755 --- a/gacela_misc.lisp +++ b/gacela_misc.lisp @@ -14,10 +14,11 @@ ;;; You should have received a copy of the GNU General Public License ;;; along with this program. If not, see . -(when (not (find-package 'gacela)) - (make-package 'gacela :nicknames '(gg) :use '(lisp))) -(eval-when (eval) (in-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))) + (defconstant INFINITY MOST-POSITIVE-LONG-FLOAT)