Robert Swindells <rjs@...> writes:
> Attached are diffs and new files to add support for NetBSD/sparc.
Speaking of NetBSD support, I've successfully built SBCL 220.127.116.11 on
NetBSD i386 -current, using CLISP to do the initial cross-build. SBCL
happily builds itself on the platform afterwards. I had to make a
couple of small changes to get CLISP to build it first, though. Two
of them are trivial, and a patch is attached below.
However, in src/code/early-type.lisp, we find this:
(defun make-member-type (&key members)
(let ((singlep (and (member 0.0f0 singles)
(member n-single singles)
(or (aver (= 2 (length singles))) t)))
(doublep (and (member 0.0d0 doubles)
(member n-double doubles)
(or (aver (= 2 (length doubles))) t)))
(longp (and (member 0.0l0 longs)
(member n-long longs)
(or (aver (= 2 (lenght longs))) t))))
Now, that "(aver (= 2 (length doubles)))" fails on CLISP, and I couldn't
understand why, so I just disabled it while doing the initial cross
build, reinstated it afterwards, and checked that SBCL can build itself.
Note also that there's a typo in that last line: "lenght" for "length".
RCS file: /cvsroot/sbcl/sbcl/build-order.lisp-expr,v
retrieving revision 1.80
diff -u -r1.80 build-order.lisp-expr
--- build-order.lisp-expr 29 Apr 2007 21:57:39 -0000 1.80
+++ build-order.lisp-expr 9 Dec 2007 12:36:15 -0000
@@ -511,7 +511,12 @@
+ ;; The following file triggers function/macro redefinition
+ ;; warnings in clisp during make-host-2; as a workaround, we ignore
+ ;; the failure values from COMPILE-FILE under clisp.
+ ("src/compiler/seqtran" #+clisp :ignore-failure-p)
RCS file: /cvsroot/sbcl/sbcl/src/compiler/policy.lisp,v
retrieving revision 1.18
diff -u -r1.18 policy.lisp
--- src/compiler/policy.lisp 30 Jun 2007 09:21:26 -0000 1.18
+++ src/compiler/policy.lisp 9 Dec 2007 12:36:15 -0000
@@ -37,7 +37,7 @@
bodies of code with eg. a known minimum safety.
EXPERIMENTAL INTERFACE: Subject to change."
- (declare (policy-quality min))
+ #-clisp (declare (policy-quality min))
(aver (policy-quality-name-p quality))
(if (zerop min)
"I think I understand, but I'm sure I don't." --Schmendrick the Magician