Changeset 7868

Timestamp:

Dec 10, 2007, 8:24:16 AM (17 years ago)

Author:

Gary Byers

Message:

Fix absolute pc if relative PC was adjusted in lisp handler in
handle_error (code was misparenthesized.)

File:

• branches/working-0711/ccl/lisp-kernel/x86-exceptions.c (modified) (1 diff)

branches/working-0711/ccl/lisp-kernel/x86-exceptions.c

@@ -493 +493 @@
         xpPC(xp) = rpc;
       } else {
-        xpPC(xp) = (LispObj)((&(deref(container,1)))+rpc);
+        xpPC(xp) = (LispObj)(&(deref(container,1)))+rpc;
       }