Changeset 12679


Ignore:
Timestamp:
Aug 25, 2009, 6:29:57 PM (10 years ago)
Author:
rme
Message:

Add new AREA_WATCHED type code. Bump image, fasl versions. New binaries
to follow.

Location:
trunk/source
Files:
6 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/nfcomp.lisp

    r12605 r12679  
    11151115;These should be constants, but it's too much trouble when need to change 'em.
    11161116(defparameter FASL-FILE-ID #xFF00)  ;Overall file format, shouldn't change much
    1117 (defparameter FASL-VERSION #xFF5a)  ;Fasl block format. ($fasl-vers)
     1117(defparameter FASL-VERSION #xFF5b)  ;Fasl block format. ($fasl-vers)
    11181118
    11191119(defvar *fasdump-hash*)
  • trunk/source/library/lispequ.lisp

    r12219 r12679  
    12841284  tstack                                ; (dynamic-extent) temp stack
    12851285  readonly                              ; readonly section
     1286  watched                               ; static area containing a single object
    12861287  managed-static                        ; growable static area
    12871288  static                                ; static data in application
  • trunk/source/lisp-kernel/area.h

    r11327 r12679  
    3030  AREA_TSTACK = 3<<fixnumshift, /* A temp stack.  It -is- doubleword-aligned */
    3131  AREA_READONLY = 4<<fixnumshift, /* A (cfm) read-only section. */
    32   AREA_MANAGED_STATIC = 5<<fixnumshift, /* A resizable static area */
    33   AREA_STATIC = 6<<fixnumshift, /* A  static section: contains
     32  AREA_WATCHED = 5<<fixnumshift, /* A static area containing a single object. */
     33  AREA_MANAGED_STATIC = 6<<fixnumshift, /* A resizable static area */
     34  AREA_STATIC = 7<<fixnumshift, /* A  static section: contains
    3435                                 roots, but not GCed */
    35   AREA_DYNAMIC = 7<<fixnumshift /* A heap. Only one such area is "the heap."*/
     36  AREA_DYNAMIC = 8<<fixnumshift /* A heap. Only one such area is "the heap."*/
    3637} area_code;
    3738
  • trunk/source/lisp-kernel/image.h

    r12605 r12679  
    9090
    9191
    92 #define ABI_VERSION_MIN 1032
    93 #define ABI_VERSION_CURRENT 1032
    94 #define ABI_VERSION_MAX 1032
     92#define ABI_VERSION_MIN 1033
     93#define ABI_VERSION_CURRENT 1033
     94#define ABI_VERSION_MAX 1033
    9595
    9696#define NUM_IMAGE_SECTIONS 4    /* used to be 3 */
  • trunk/source/xdump/faslenv.lisp

    r12607 r12679  
    4343(defconstant $fasl-file-id #xff00)
    4444(defconstant $fasl-file-id1 #xff01)
    45 (defconstant $fasl-vers #x5a)
    46 (defconstant $fasl-min-vers #x5a)
     45(defconstant $fasl-vers #x5b)
     46(defconstant $fasl-min-vers #x5b)
    4747(defconstant $faslend #xff)
    4848(defconstant $fasl-buf-len 2048)
  • trunk/source/xdump/heap-image.lisp

    r12604 r12679  
    9797
    9898
    99 (defparameter *image-abi-version* 1032)
     99(defparameter *image-abi-version* 1033)
    100100
    101101(defun write-image-file (pathname image-base spaces &optional (abi-version *image-abi-version*))
Note: See TracChangeset for help on using the changeset viewer.