Changeset 10492


Ignore:
Timestamp:
Aug 19, 2008, 10:19:35 AM (11 years ago)
Author:
gb
Message:

If we return from a callback with "skip == -1", set the absolute PC
from the relative PC differently on x8632.

File:
1 edited

Legend:

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

    r10385 r10492  
    612612        xpPC(xp) = rpc;
    613613      } else {
    614         xpPC(xp) = (LispObj)(&(deref(container,1)))+rpc;
     614        xpPC(xp) = (LispObj)(&(deref(container,
     615#ifdef X8664
     616                                     1
     617#else
     618                                     0
     619#endif
     620)))+rpc;
    615621      }
    616622       
Note: See TracChangeset for help on using the changeset viewer.