Steel Bank Common Lisp

Update of /cvsroot/sbcl/sbcl/src/compiler/sparc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27289/src/compiler/sparc

Modified Files:
	parms.lisp 
Log Message:
0.9.1.5: bigger dynamic space on PPC plus cleanups
   * patch by Cyrus Harmon
   * clean up DYNAMIC-SPACE-START and -END ugliness on cheney-platforms.


Index: parms.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/compiler/sparc/parms.lisp,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -d -r1.17 -r1.18
--- parms.lisp	13 Feb 2005 14:27:10 -0000	1.17
+++ parms.lisp	29 May 2005 15:48:38 -0000	1.18
@@ -101,13 +101,6 @@
   (def!constant static-space-start        #x28000000)
   (def!constant static-space-end          #x2c000000)
 
-  ;; From alpha/parms.lisp:
-  ;; this is used in PURIFY as part of a sloppy check to see if a pointer
-  ;; is in dynamic space.  Chocolate brownie for the first person to fix it
-  ;; -dan 20010502
-  (def!constant dynamic-space-start   #x30000000)
-  (def!constant dynamic-space-end     #x38000000)
-
   (def!constant dynamic-0-space-start #x30000000)
   (def!constant dynamic-0-space-end   #x38000000)
   
@@ -125,9 +118,6 @@
   (def!constant static-space-start        #x28000000)
   (def!constant static-space-end          #x2c000000)
 
-  (def!constant dynamic-space-start       #x30000000)
-  (def!constant dynamic-space-end         #x38000000)
-
   (def!constant dynamic-0-space-start     #x30000000)
   (def!constant dynamic-0-space-end       #x38000000)