X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fx86-bsd-os.c;h=bde0ac0bf1c80fe92fb3a4b0bfb2047617c54150;hb=42f9c07927666c353a5eaf395718da5b6d12ce04;hp=f1b66c79054080f46a76019b741338d5c7f68974;hpb=bd455348d39bee562296741689882dcb97c46ba3;p=sbcl.git diff --git a/src/runtime/x86-bsd-os.c b/src/runtime/x86-bsd-os.c index f1b66c7..bde0ac0 100644 --- a/src/runtime/x86-bsd-os.c +++ b/src/runtime/x86-bsd-os.c @@ -36,21 +36,21 @@ os_context_register_addr(os_context_t *context, int offset) { switch(offset) { case 0: - return CONTEXT_ADDR_FROM_STEM(eax); + return (int *)CONTEXT_ADDR_FROM_STEM(eax); case 2: - return CONTEXT_ADDR_FROM_STEM(ecx); + return (int *)CONTEXT_ADDR_FROM_STEM(ecx); case 4: - return CONTEXT_ADDR_FROM_STEM(edx); + return (int *)CONTEXT_ADDR_FROM_STEM(edx); case 6: - return CONTEXT_ADDR_FROM_STEM(ebx); + return (int *)CONTEXT_ADDR_FROM_STEM(ebx); case 8: - return CONTEXT_ADDR_FROM_STEM(esp); + return (int *)CONTEXT_ADDR_FROM_STEM(esp); case 10: - return CONTEXT_ADDR_FROM_STEM(ebp); + return (int *)CONTEXT_ADDR_FROM_STEM(ebp); case 12: - return CONTEXT_ADDR_FROM_STEM(esi); + return (int *)CONTEXT_ADDR_FROM_STEM(esi); case 14: - return CONTEXT_ADDR_FROM_STEM(edi); + return (int *)CONTEXT_ADDR_FROM_STEM(edi); default: return 0; } @@ -59,7 +59,7 @@ os_context_register_addr(os_context_t *context, int offset) int * os_context_sp_addr(os_context_t *context) { - return CONTEXT_ADDR_FROM_STEM(esp); + return (int *)CONTEXT_ADDR_FROM_STEM(esp); } #endif /* __FreeBSD__ || __OpenBSD__ */ @@ -109,7 +109,7 @@ int *os_context_pc_addr(os_context_t *context) #elif defined __NetBSD__ return CONTEXT_ADDR_FROM_STEM(EIP); #elif defined(LISP_FEATURE_DARWIN) && defined(LISP_FEATURE_X86) - return CONTEXT_ADDR_FROM_STEM(eip); + return (int *)CONTEXT_ADDR_FROM_STEM(eip); #elif defined LISP_FEATURE_DARWIN return &context->uc_mcontext->ss.srr0; #else