X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fbreakpoint.c;h=5ff8509e65bb675081d94be3aff8eba0558037c9;hb=2495095104de841f12a17aeb94207055f75ed897;hp=d69e9c2fbd53fa981e0501fc2f48b937ef8e7a13;hpb=6e662062162ad5a6f09d6d3a5ec1249520e813a5;p=sbcl.git diff --git a/src/runtime/breakpoint.c b/src/runtime/breakpoint.c index d69e9c2..5ff8509 100644 --- a/src/runtime/breakpoint.c +++ b/src/runtime/breakpoint.c @@ -21,6 +21,9 @@ #include "globals.h" #include "alloc.h" #include "breakpoint.h" +#include "thread.h" +#include "genesis/code.h" +#include "genesis/fdefn.h" #define REAL_LRA_SLOT 0 #ifndef __i386__ @@ -62,7 +65,7 @@ void breakpoint_do_displaced_inst(os_context_t* context, * * -dan 2001.08.09 */ -#if !(defined(hpux) || defined(irix) || defined(__i386__) || defined(alpha)) +#if (defined(sparc) && defined (solaris)) undo_fake_foreign_function_call(context); #endif arch_do_displaced_inst(context, orig_inst);