/[cmucl]/src/bootfiles/20b/boot-2010-12.lisp
ViewVC logotype

Contents of /src/bootfiles/20b/boot-2010-12.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (show annotations)
Tue Dec 14 00:26:42 2010 UTC (3 years, 4 months ago) by rtoy
Branch: MAIN
CVS Tags: GIT-CONVERSION, cross-sol-x86-base, cross-sol-x86-2010-12-20, cross-sol-x86-merged, snapshot-2011-09, snapshot-2011-06, snapshot-2011-07, snapshot-2011-04, snapshot-2011-02, snapshot-2011-03, snapshot-2011-01, HEAD
Branch point for: cross-sol-x86-branch
compiler/generic/new-genesis.lisp:
o More cleanups.  Basically back to rev 1.93 with a couple more
  cleanups, but this works on sparc.

bootfiles/20b/boot-2010-12.lisp:
o Use this to bootstrap the necessary values in the compiler backend
  for the foreign-linkage-space.
1 ;; Setup backend-foreign-linkage-space-start/entry-size for each
2 ;; architecture.
3
4 #+x86
5 (setf (c::backend-foreign-linkage-space-start c:*target-backend*)
6 #+linux #x58000000
7 #-linux #xB0000000
8 (c::backend-foreign-linkage-entry-size c:*target-backend*)
9 8)
10
11 #+sparc
12 (setf (c::backend-foreign-linkage-space-start c:*target-backend*)
13 ;; This better match the value in sparc-validate.h!
14 #x0f800000
15 (c::backend-foreign-linkage-entry-size c:*target-backend*)
16 ;; This better agree with what sparc-arch.c thinks it is! Right now,
17 ;; it's 4 instructions, so 16 bytes.
18 16)
19 #+ppc
20 (setf (c::backend-foreign-linkage-space-start c:*target-backend*)
21 #x17000000
22 (c::backend-foreign-linkage-entry-size c:*target-backend*)
23 32)

  ViewVC Help
Powered by ViewVC 1.1.5