Date: Wednesday, December 15, 2010 @ 07:45:52 Author: rtoy Path: /project/cmucl/cvsroot/src/lisp Tag: cross-sol-x86-branch
Modified: solaris-os.c
Ifdef out solaris_register_address if we're on an x86, since this isn't used.
--------------+ solaris-os.c | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-)
Index: src/lisp/solaris-os.c diff -u src/lisp/solaris-os.c:1.26.4.1 src/lisp/solaris-os.c:1.26.4.2 --- src/lisp/solaris-os.c:1.26.4.1 Mon Dec 13 23:25:11 2010 +++ src/lisp/solaris-os.c Wed Dec 15 07:45:51 2010 @@ -1,5 +1,5 @@ /* - * $Header: /project/cmucl/cvsroot/src/lisp/solaris-os.c,v 1.26.4.1 2010-12-14 04:25:11 rtoy Exp $ + * $Header: /project/cmucl/cvsroot/src/lisp/solaris-os.c,v 1.26.4.2 2010-12-15 12:45:51 rtoy Exp $ * * OS-dependent routines. This file (along with os.h) exports an * OS-independent interface to the operating system VM facilities. @@ -298,6 +298,7 @@
/* function definitions for register lvalues */
+#ifndef i386 int * solaris_register_address(struct ucontext *context, int reg) { @@ -316,6 +317,7 @@ } else return 0; } +#endif
/* function defintions for backward compatibilty and static linking */
@@ -499,6 +501,8 @@ unsigned long * os_sigcontext_reg(ucontext_t *scp, int index) { + fprintf(stderr, "os_sigcontext_reg index = %d\n", index); + switch (index) { case 0: return (unsigned long *) &scp->uc_mcontext.gregs[EAX]; @@ -523,6 +527,7 @@ unsigned long * os_sigcontext_pc(ucontext_t *scp) { + fprintf(stderr, "os_sigcontext_pc = %p\n", scp->uc_mcontext.gregs[EIP]); return (unsigned long *) &scp->uc_mcontext.gregs[EIP]; }