Steel Bank Common Lisp

Update of /cvsroot/sbcl/sbcl
In directory sc8-pr-cvs8.sourceforge.net:/tmp/cvs-serv7229

Modified Files:
	package-data-list.lisp-expr version.lisp-expr 
Log Message:
1.0.18.20: Fewer STYLE-WARNINGs.

* Change definition of UNINTERESTING-ORDINARY-FUNCTION-REDEFINITION-P
  so that replacing an interpreted function is always uninteresting
  when the new definition comes from the same file.

* Monkey with source-locations so that they get created during LOAD of
  a source file when *EVALUATOR-MODE* is :INTERPRET.


Index: package-data-list.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/package-data-list.lisp-expr,v
retrieving revision 1.460
retrieving revision 1.461
diff -u -d -r1.460 -r1.461
--- package-data-list.lisp-expr	11 Jul 2008 18:55:07 -0000	1.460
+++ package-data-list.lisp-expr	16 Jul 2008 19:21:03 -0000	1.461
@@ -272,6 +272,7 @@
                "FUN-INFO-DERIVE-TYPE" "FUN-INFO-IR2-CONVERT"
                "FUN-INFO-LTN-ANNOTATE" "FUN-INFO-OPTIMIZER"
                "GET-VECTOR-SUBTYPE"
+               "GET-TOPLEVELISH-FILE-INFO"
                "HALT"
                "IF-EQ" "INLINE-SYNTACTIC-CLOSURE-LAMBDA"
                "INSERT-STEP-CONDITIONS"

Index: version.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/version.lisp-expr,v
retrieving revision 1.4022
retrieving revision 1.4023
diff -u -d -r1.4022 -r1.4023
--- version.lisp-expr	16 Jul 2008 17:30:02 -0000	1.4022
+++ version.lisp-expr	16 Jul 2008 19:21:03 -0000	1.4023
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.18.19"
+"1.0.18.20"