X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fsparc%2Fparms.lisp;h=d3e843ac31ca1228e88ebfbbb6e59bce311bba32;hb=06cc46735ebc73618995281f26fcce096c1110f6;hp=48c236cf4001b3d22130134f19ea5681471eed2d;hpb=1d06300e09f767a38bbe6d5b38232ca334ab1913;p=sbcl.git diff --git a/src/compiler/sparc/parms.lisp b/src/compiler/sparc/parms.lisp index 48c236c..d3e843a 100644 --- a/src/compiler/sparc/parms.lisp +++ b/src/compiler/sparc/parms.lisp @@ -96,7 +96,7 @@ ;;;; Description of the target address space. ;;; Where to put the different spaces. Must match the C code! -#!+linux +#!+(and linux cheneygc) (progn (def!constant linkage-table-space-start #x0f800000) (def!constant linkage-table-space-end #x10000000) @@ -113,6 +113,20 @@ (def!constant dynamic-1-space-start #x40000000) (def!constant dynamic-1-space-end #x48000000)) +#!+(and linux gencgc) ; sensibly small read-only and static spaces +(progn + (def!constant linkage-table-space-start #x0f800000) + (def!constant linkage-table-space-end #x10000000) + + (def!constant read-only-space-start #x11000000) + (def!constant read-only-space-end #x110ff000) + + (def!constant static-space-start #x11100000) + (def!constant static-space-end #x111ff000) + + (def!constant dynamic-space-start #x30000000) + (def!constant dynamic-space-end (!configure-dynamic-space-end))) + #!+(and sunos cheneygc) ; might as well start by trying the same numbers (progn (def!constant linkage-table-space-start #x0f800000)