[cmucl-cvs] CMUCL commit: src/lisp (solaris-os.c)
![](https://secure.gravatar.com/avatar/cc13150cabd87c26f35cb4b0ea78d66d.jpg?s=120&d=mm&r=g)
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
participants (1)
-
Raymond Toy