Changeset 5649


Ignore:
Timestamp:
Dec 29, 2006, 10:32:39 PM (13 years ago)
Author:
gb
Message:

Static area (including NIL) now one page higher on ppc32, as well.

Location:
trunk/ccl
Files:
6 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/compiler/PPC/PPC32/ppc32-arch.lisp

    r5471 r5649  
    134134
    135135
    136 (defconstant nil-value #x00002015)
     136(defconstant nil-value #x00003015)
    137137;;; T is almost adjacent to NIL: since NIL is a misaligned CONS, it spans
    138138;;; two doublewords.  The arithmetic difference between T and NIL is
     
    606606
    607607
    608 (defconstant reservation-discharge #x1004)
     608(defconstant reservation-discharge #x2004)
    609609
    610610
  • trunk/ccl/lisp-kernel/area.h

    r5637 r5649  
    178178#define STATIC_RESERVE heap_segment_size
    179179
    180 #ifdef PPC64
     180#ifdef PPC
    181181#define STATIC_BASE_ADDRESS 0x00002000
    182182#else
  • trunk/ccl/lisp-kernel/darwinppc/Makefile

    r4764 r5649  
    4747RM = /bin/rm
    4848LD = ld
    49 LDFLAGS = -arch ppc -dynamic  -o $@ -e start -seg1addr 0x00004000 -sectalign __TEXT __text 0x1000 -pagezero_size 0x4000
     49LDFLAGS = -arch ppc -dynamic  -o $@ -e start -pagezero_size 0x1000 -seg1addr 0x00001000 -sectalign __TEXT __text 0x1000
    5050AS = as
    5151M4 = gm4
  • trunk/ccl/lisp-kernel/ppc-constants32.h

    r5366 r5649  
    416416
    417417
    418 #define nil_value 0x00002015
     418#define nil_value 0x00003015
    419419
    420420#define TCR_BIAS (0)
  • trunk/ccl/lisp-kernel/ppc-constants32.s

    r5464 r5649  
    7676fulltag_immheader = 7   /* Header of heap-allocated object that contains unboxed data. */
    7777
    78 nil_value = 0x00002015
     78nil_value = 0x00003015
    7979misc_bias = fulltag_misc
    8080cons_bias = tag_list       
     
    673673define([TCR_STATE_EXCEPTION_RETURN],4)
    674674
    675 define([RESERVATION_DISCHARGE],0x1004)
    676 
    677 lisp_globals_limit = 0x2010
     675define([RESERVATION_DISCHARGE],0x2004)
     676
     677lisp_globals_limit = 0x3010
    678678       
    679679INTERRUPT_LEVEL_BINDING_INDEX = fixnumone
  • trunk/ccl/xdump/xppcfasload.lisp

    r5644 r5649  
    112112   :static-space-init-function 'ppc32-initialize-static-space
    113113   :purespace-reserve (ash 64 20)
    114    :static-space-address (ash 1 12)
     114   :static-space-address (ash 2 12)
    115115))
    116116
Note: See TracChangeset for help on using the changeset viewer.