Changeset 9646 for branches

Timestamp:

May 31, 2008, 4:24:59 PM (16 years ago)

Author:

R. Matthew Emerson

Message:

On x8632, we're using the PPC32-style DEFINE-FIXEDSIZE-OBJECT macro,
which doesn't take an &optional fulltag argument (as the x8664 one
does). Therefore, the () was causing the definition of constants
CATCH-FRAME.NIL and CATCH-FRAME.NIL-CELL, throwing off all the others
by 1.

File:

• branches/ia32/compiler/X86/X8632/x8632-arch.lisp (modified) (1 diff)

branches/ia32/compiler/X86/X8632/x8632-arch.lisp

@@ -435 +435 @@
 
 ;;; Need to think about catch frames on x8632, too.
-(define-fixedsized-object catch-frame ()
+(define-fixedsized-object catch-frame
   catch-tag                             ; #<unbound> -> unwind-protect, else catch
   link                                  ; tagged pointer to next older catch frame