[Sbcl-commits] CVS: sbcl/src/compiler fndb.lisp,1.173,1.174

[Nikodemus S. <de...@us...>]

Update of /cvsroot/sbcl/sbcl/src/compiler
In directory sfp-cvsdas-3.v30.ch3.sourceforge.com:/tmp/cvs-serv27095/src/compiler

Modified Files:
	fndb.lisp 
Log Message:
1.0.43.56: make %INSTANCE-TYPEP always-translatable

 One way to make an SBCL that builds but cannot build itself is
 to change the compiler so that it fails to eliminate a full call
 to %INSTANCE-TYPEP.

 This doesn't change that, but at least makes such hosts fail in a
 place where the issue is easier to figure out than hitting "undefined
 function: %INSTANCE-TYPEP" during cold-init.


Index: fndb.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/compiler/fndb.lisp,v
retrieving revision 1.173
retrieving revision 1.174
diff -u -d -r1.173 -r1.174
--- fndb.lisp	30 Sep 2010 07:03:25 -0000	1.173
+++ fndb.lisp	14 Oct 2010 11:40:39 -0000	1.174
@@ -1408,7 +1408,7 @@
 (defknown %typep (t (or type-specifier ctype)) boolean
   (movable flushable explicit-check))
 (defknown %instance-typep (t (or type-specifier ctype)) boolean
-  (movable flushable explicit-check))
+  (movable flushable explicit-check always-translatable))
 
 (defknown %cleanup-point () t)
 (defknown %special-bind (t t) t)