0.pre7.10:

	added DEFKNOWN .. NIL for DO-ARG-COUNT-ERROR, to suppress
		lotso undefined warnings and to let the compiler
		identify lotso dead code
	bumped default GC interval up to 4M bytes (from 2M bytes)

diff --git a/NEWS b/NEWS
index 38ff4a8..91ebcc3 100644 (file)
--- a/NEWS
+++ b/NEWS
@@ -827,6 +827,10 @@ changes in sbcl-0.7.0 relative to sbcl-0.6.13:
   is no longer part of the base system. The files which used to 
   be in the doc/cmucl/ directory are now available as
     <ftp://sbcl.sourceforge.net/pub/sbcl/cmucl-docs.tar.bz2>.
+* The default value of *BYTES-CONSED-BETWEEN-GCS* has been 
+  doubled, to 4 million. (If your application spends a lot of time
+  GCing and you have a lot of RAM, you might want to experiment with
+  increasing it even more.)
 ?? lots of tidying up internally: renaming things so that names are
   more systematic and consistent, converting C macros to inline
   functions, systematizing indentation

diff --git a/src/code/gc.lisp b/src/code/gc.lisp
index 5ed0b35..30cd93d 100644 (file)
--- a/src/code/gc.lisp
+++ b/src/code/gc.lisp
@@ -140,7 +140,7 @@ and submit it as a patch."
 ;;;
 ;;; Unlike CMU CL, we don't export this variable. (There's no need to,
 ;;; since our BYTES-CONSED-BETWEEN-GCS function is SETFable.)
-(defvar *bytes-consed-between-gcs* (* 2 (expt 10 6)))
+(defvar *bytes-consed-between-gcs* (* 4 (expt 10 6)))
 (declaim (type index *bytes-consed-between-gcs*))
 
 ;;;; GC hooks

diff --git a/src/compiler/fndb.lisp b/src/compiler/fndb.lisp
index b40f453..684550e 100644 (file)
--- a/src/compiler/fndb.lisp
+++ b/src/compiler/fndb.lisp
@@ -1318,6 +1318,8 @@
 ;;; ordinary functions.
 (defknown %slot-accessor (t) t (flushable))
 (defknown %slot-setter (t t) t (unsafe))
+
+(defknown sb!kernel::do-arg-count-error (t t t t t t) nil (unsafe))
 \f
 ;;;; SETF inverses
 

diff --git a/version.lisp-expr b/version.lisp-expr
index c6a13a5..7c92abc 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -16,4 +16,4 @@
 ;;; four numeric fields, is used for versions which aren't released
 ;;; but correspond only to CVS tags or snapshots.
 
-"0.pre7.9"
+"0.pre7.10"