Steel Bank Common Lisp

Update of /cvsroot/sbcl/sbcl
In directory sc8-pr-cvs1:/tmp/cvs-serv32019

Modified Files:
	NEWS package-data-list.lisp-expr version.lisp-expr 
Log Message:
0.8.3.13:
	Implement better constant multiply routines
	... have a cutoff on Sparc, as measured by Raymond Toy
	... use LEA more on x86, as per cited paper
	... don't do anything at all (yet) on other architectures.  This 
		needs to be fixed before 0.8.4, at least for PPC and 
		Alpha


Index: NEWS
===================================================================
RCS file: /cvsroot/sbcl/sbcl/NEWS,v
retrieving revision 1.389
retrieving revision 1.390
diff -u -d -r1.389 -r1.390
--- NEWS	28 Aug 2003 12:11:48 -0000	1.389
+++ NEWS	29 Aug 2003 17:59:08 -0000	1.390
@@ -2017,6 +2017,8 @@
   * optimization: compiler-internal data structure use has been
     reviewed, and changes have been made that should improve the
     performance of the compiler by about 20%.
+  * microoptimization: the compiler is better able to make use of the
+    x86 LEA instruction for multiplication by constants.
   * bug fix: in some situations compiler did not report usage of
     generic arithmetic in (SPEED 3) policy.
 

Index: package-data-list.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/package-data-list.lisp-expr,v
retrieving revision 1.243
retrieving revision 1.244
diff -u -d -r1.243 -r1.244
--- package-data-list.lisp-expr	26 Aug 2003 08:58:30 -0000	1.243
+++ package-data-list.lisp-expr	29 Aug 2003 17:59:08 -0000	1.244
@@ -1124,6 +1124,7 @@
              "KEY-INFO" "KEY-INFO-NAME"
              "KEY-INFO-P" "KEY-INFO-TYPE"
              "LAYOUT-DEPTHOID" "LAYOUT-INVALID-ERROR"
+	     #!+x86 "%LEA"
 	     "LEXENV" "LEXENV-DESIGNATOR"
              "LINE-LENGTH"
              "ANSI-STREAM"

Index: version.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/version.lisp-expr,v
retrieving revision 1.1197
retrieving revision 1.1198
diff -u -d -r1.1197 -r1.1198
--- version.lisp-expr	29 Aug 2003 12:45:46 -0000	1.1197
+++ version.lisp-expr	29 Aug 2003 17:59:08 -0000	1.1198
@@ -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".)
-"0.8.3.12"
+"0.8.3.13"