The HCL:MARK-AND-SWEEP function is only available on 32 bit LispWorks. A small patch is below to allow hunchentoot to run on 64 bit versions of LispWorks.
Cheers, Chris Dean
diff -rN -u old-hunchentoot/util.lisp new-hunchentoot/util.lisp --- old-contrib/hunchentoot/util.lisp 2007-04-03 10:13:17.000000000 -0700 +++ new-hunchentoot/util.lisp 2007-04-03 10:13:18.000000000 -0700 @@ -461,7 +461,7 @@ (chunked-stream-input-chunking-p (flexi-stream-stream *hunchentoot-stream*)))
(defun cleanup-function () - "The default for *CLEANUP-FUNCTION*. Invokes a GC on LispWorks and + "The default for *CLEANUP-FUNCTION*. Invokes a GC on 32 bit LispWorks and does nothing on other Lisps." - #+:lispworks - (hcl:mark-and-sweep 2)) \ No newline at end of file + #+:lispworks-32bit + (hcl:mark-and-sweep 2))
On Tue, 03 Apr 2007 10:16:44 -0700, Chris Dean ctdean@sokitomi.com wrote:
The HCL:MARK-AND-SWEEP function is only available on 32 bit LispWorks. A small patch is below to allow hunchentoot to run on 64 bit versions of LispWorks.
Thanks, that will be in the next release.
- #+:lispworks-32bit
I'll change that to
#+(and :lispworks (not :lispworks-64bit))
as I think :LISPWORK-32BIT is not a feature of LW 4.x. (I hope :LISPWORKS-64BIT exists. I don't have a 64-bit Lisp to test with.)
-
Chris Dean -
Edi Weitz