Changeset 10085


Ignore:
Timestamp:
Jul 18, 2008, 6:08:03 PM (11 years ago)
Author:
rme
Message:

Merge x8632 changes.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lisp-kernel/image.c

    r9536 r10085  
    2929
    3030
    31 #ifdef PPC64
     31#if defined(PPC64) || defined(X8632)
    3232#define RELOCATABLE_FULLTAG_MASK \
    3333  ((1<<fulltag_cons)|(1<<fulltag_misc))
     
    291291#endif
    292292#endif
     293#ifdef X86
    293294#ifdef X8664
    294295        image_nil = (LispObj)(a->low) + (1024*4) + fulltag_nil;
     296#else
     297        image_nil = (LispObj)(a->low) + (1024*4) + fulltag_cons;
     298#endif
    295299#endif
    296300        set_nil(image_nil);
Note: See TracChangeset for help on using the changeset viewer.