[Bese-devel] UCW 0.3.5 with aserve and SBCL?

[Alan Shutko]

Tim Lavoie <tim at fractaldragon.net> writes:

> debugger invoked on a COMMON-LISP:UNDEFINED-FUNCTION in thread 32608:
>   The function :FIND-PACKAGE is undefined.

This is caused by lines like this in aserve.lisp:

#+#.(if (find-package "PURI") `(and) `(or))

I think this isn't strictly ANSI.  

http://www.lispworks.com/documentation/HyperSpec/Body/02_dhq.htm

says that the test is read in the keyword package.  Changing these
lines to 

#+#.(cl:if (cl:find-package "PURI") `(and) `(or))

corrects it for SBCL.  Does that look correct to others?

-- 
Alan Shutko <ats at acm.org> - I am the rocks.
It is easier to resist at the beginning than at the end.