Changeset 4107

Show
Ignore:
Timestamp:
2006年07月14日 19時33分20秒 (2 years ago)
Author:
shirai
Message:

[meadow-develop:7371], [meadow-develop:7374] Sync up Emacs CVS HEAD for VC++.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/src/ChangeLog.Meadow

    r4106 r4107  
    112006-07-14  Hideyuki SHIRAI  <shirai@meadowy.org> 
    22 
    3         * lisp.h (VALBITS): [MD:7371] Sync up Emacs CVS HEAD for 
    4         VC++. 
     3        * lisp.h (VALBITS): [MD:7371], [MD:7374] Sync up Emacs CVS HEAD 
     4        for VC++. 
    55        (ARRAY_MARK_FLAG): Ditto. 
    66 

  • trunk/src/lisp.h

    r4106 r4107  
    181181/* These values are overridden by the m- file on some machines.  */ 
    182182#ifndef VALBITS 
     183#if defined (MEADOW) || defined (_MSC_VER) 
    183184#define VALBITS (BITS_PER_EMACS_INT - GCTYPEBITS) 
    184 #endif 
     185#else 
     186#define VALBITS (BITS_PER_EMACS_INT - (GCTYPEBITS + 1)) 
     187#endif 
     188#endif /* no VALBITS */ 
    185189 
    186190#ifndef NO_UNION_TYPE 
    …… 
    264268 
    265269#ifndef ARRAY_MARK_FLAG 
     270#if defined (MEADOW) || defined (_MSC_VER) 
    266271#define ARRAY_MARK_FLAG ((EMACS_INT) ((EMACS_UINT) 1 << (VALBITS + GCTYPEBITS - 1))) 
     272#else 
     273#define ARRAY_MARK_FLAG ((EMACS_INT) ((EMACS_UINT) 1 << (VALBITS + GCTYPEBITS - 2))) 
     274#endif 
    267275#endif /* no ARRAY_MARK_FLAG */ 
    268276