X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela_misc.lisp;h=bd7027a182b4fcbf773ad84f203e26e02e91faca;hb=d89eeb0212cedfe8480e080d32db0644dceb7985;hp=0785af78cb07b8273216faf180fcd7ca1626584f;hpb=2fbfb3420ca25c0228e04b5696d42abce5e055ed;p=gacela.git diff --git a/gacela_misc.lisp b/gacela_misc.lisp index 0785af7..bd7027a 100755 --- a/gacela_misc.lisp +++ b/gacela_misc.lisp @@ -14,6 +14,8 @@ ;;; You should have received a copy of the GNU General Public License ;;; along with this program. If not, see . +(in-package :gacela) + (defconstant INFINITY MOST-POSITIVE-LONG-FLOAT) (defun append-if (new test tree &key (key #'first) (test-if #'equal))