X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=equal.lisp;h=eb9474ce5ec7f7deb2e9ffb2355181ee43c152c6;hb=f7b10efb816059b2dc9a6b63da2756b0364e50d1;hp=da246bd5860849b15ac3a0d84d3b5fb468cbf3d4;hpb=d11d6cc43fd9227a8aeed28dc2cfecdbc587ec4a;p=kmrcl.git diff --git a/equal.lisp b/equal.lisp index da246bd..eb9474c 100644 --- a/equal.lisp +++ b/equal.lisp @@ -17,8 +17,7 @@ ;;;; ************************************************************************* -(in-package :kmrcl) -(declaim (optimize (speed 3) (safety 1) (compilation-speed 0) (debug 3))) +(in-package #:kmrcl) (defun generalized-equal (obj1 obj2)