Date: Friday, November 12, 2010 @ 07:57:32 Author: rtoy Path: /project/cmucl/cvsroot/src/lisp

Modified: solaris-os.c

Print out the PC when we get a real protection violation.

--------------+ solaris-os.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-)

Index: src/lisp/solaris-os.c diff -u src/lisp/solaris-os.c:1.25 src/lisp/solaris-os.c:1.26 --- src/lisp/solaris-os.c:1.25 Mon Feb 1 11:04:43 2010 +++ src/lisp/solaris-os.c Fri Nov 12 07:57:32 2010 @@ -1,5 +1,5 @@ /* - * $Header: /project/cmucl/cvsroot/src/lisp/solaris-os.c,v 1.25 2010-02-01 16:04:43 rtoy Rel $ + * $Header: /project/cmucl/cvsroot/src/lisp/solaris-os.c,v 1.26 2010-11-12 12:57:32 rtoy Exp $ * * OS-dependent routines. This file (along with os.h) exports an * OS-independent interface to the operating system VM facilities. @@ -260,7 +260,9 @@ }

/* a *real* protection fault */ - fprintf(stderr, "segv_handler: Real protection violation: %p\n", addr); + fprintf(stderr, "segv_handler: Real protection violation: %p, PC = %p\n", + addr, + context->uc_mcontext.gregs[1]); segv_handle_now(signal, code, context); } #else