MERGE-REQUEST Re: [Bese-devel] UCW 0.3.5 with aserve and SBCL?

[Alan Shutko]

I've put an arch archive with this change at
http://www.springies.com/~ats/2005-oss 

Marco, could you take a look at my change and merge it if it looks ok?

Alan Shutko <ats at acm.org> writes:

> 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.
Sounds good to me.... yeee hah! Your corral or mine....