Changeset 5644

Timestamp:

Dec 29, 2006, 12:37:33 AM (18 years ago)

Author:

Gary Byers

Message:

xload-static-space-address for ppc64 is #x2000; still #x1000 for ppc32.
(need to set this for x86-64)

File:

• trunk/ccl/xdump/xppcfasload.lisp (modified) (2 diffs)

trunk/ccl/xdump/xppcfasload.lisp

@@ -112 +112 @@
    :static-space-init-function 'ppc32-initialize-static-space
    :purespace-reserve (ash 64 20)
+   :static-space-address (ash 1 12)
 ))
 
@@ -135 +136 @@
    :nil-relative-symbols ppc::*ppc-nil-relative-symbols*
    :static-space-init-function 'ppc64-initialize-static-space
-   :purespace-reserve (ash 64 20)   
+   :purespace-reserve (ash 64 20)
+   :static-space-address (ash 2 12)
    ))