Changeset 9979


Ignore:
Timestamp:
Jul 10, 2008, 9:46:50 AM (11 years ago)
Author:
gb
Message:

Use traditional register names on Darwin. New suspend signal number
on Darwin.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/lisp-kernel/ppc-exceptions.h

    r6514 r9979  
    6868
    6969#ifdef DARWIN
    70 #define xpGPRvector(x) (&(UC_MCONTEXT(x)->__ss.__r0))
     70#define xpGPRvector(x) (&(UC_MCONTEXT(x)->ss.r0))
    7171#define xpGPR(x,gprno) ((xpGPRvector(x))[gprno])
    7272#define set_xpGPR(x,gpr,new) xpGPR((x),(gpr)) = (UInt32)(new)
    73 #define xpPC(x) (*((pc*) &(UC_MCONTEXT(x)->__ss.__srr0)))
     73#define xpPC(x) (*((pc*) &(UC_MCONTEXT(x)->ss.srr0)))
    7474#define set_xpPC(x,new) (xpPC(x) = (pc)(new))
    75 #define xpLR(x) (*((pc*)(&(UC_MCONTEXT(x)->__ss.__lr))))
    76 #define xpCTR(x) (*(pc*)(&(UC_MCONTEXT(x)->__ss.__ctr)))
    77 #define xpXER(x) (UC_MCONTEXT(x)->__ss.__xer)
    78 #define xpCCR(x) (UC_MCONTEXT(x)->__ss.__cr)
    79 #define xpMSR(x) (UC_MCONTEXT(x)->__ss.__srr1)
    80 #define xpDSISR(x) (UC_MCONTEXT(x)->__es.__dsisr)
    81 #define xpDAR(x) (UC_MCONTEXT(x)->__es.__dar)
    82 #define xpTRAP(x) (UC_MCONTEXT(x)->__es.__exception)
    83 #define xpFPSCR(x) (UC_MCONTEXT(x)->__fs.__fpscr)
    84 #define xpFPRvector(x) (UC_MCONTEXT(x)->__fs.__fpregs)
     75#define xpLR(x) (*((pc*)(&(UC_MCONTEXT(x)->ss.lr))))
     76#define xpCTR(x) (*(pc*)(&(UC_MCONTEXT(x)->ss.ctr)))
     77#define xpXER(x) (UC_MCONTEXT(x)->ss.xer)
     78#define xpCCR(x) (UC_MCONTEXT(x)->ss.cr)
     79#define xpMSR(x) (UC_MCONTEXT(x)->ss.srr1)
     80#define xpDSISR(x) (UC_MCONTEXT(x)->es.dsisr)
     81#define xpDAR(x) (UC_MCONTEXT(x)->es.dar)
     82#define xpTRAP(x) (UC_MCONTEXT(x)->es.exception)
     83#define xpFPSCR(x) (UC_MCONTEXT(x)->fs.fpscr)
     84#define xpFPRvector(x) (UC_MCONTEXT(x)->fs.fpregs)
    8585#define xpFPR(x,fprno) (xpFPRvector(x)[fprno])
    8686/* There's a bug in some versions of Darwin on G5 processors: FP context
     
    126126#define DarwinSigReturn(x)
    127127#else
    128 #define DarwinSigReturn(x) (UC_MCONTEXT(x)->__ss.__xer)^=0x80
     128#define DarwinSigReturn(x) (UC_MCONTEXT(x)->ss.xer)^=0x80
    129129#endif
    130130#endif
     
    408408
    409409#ifdef DARWIN
    410 #define SIGNAL_FOR_PROCESS_INTERRUPT SIGEMT
     410#define SIGNAL_FOR_PROCESS_INTERRUPT SIGUSR1
    411411#endif
    412412#ifdef LINUX
Note: See TracChangeset for help on using the changeset viewer.