X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fmips-linux-os.c;h=17450af8f92676a1099f466e5cb417b6dd6540cc;hb=6769a6cdb368694f39f9c0e2b6790f45cf308b91;hp=04e106feac3184b1164cbce7acf1b84ed4dee67f;hpb=05ad80b2794b48ecc96b43c43577ae4a7ba2af6b;p=sbcl.git diff --git a/src/runtime/mips-linux-os.c b/src/runtime/mips-linux-os.c index 04e106f..17450af 100644 --- a/src/runtime/mips-linux-os.c +++ b/src/runtime/mips-linux-os.c @@ -15,24 +15,7 @@ */ #include -#include -#include -#include "sbcl.h" -#include "./signal.h" -#include "os.h" -#include "arch.h" -#include "globals.h" -#include "interrupt.h" -#include "interr.h" -#include "lispregs.h" -#include -#include - -#include #include -#include -#include -#include /* for cacheflush() */ #include @@ -40,7 +23,9 @@ /* for BD_CAUSE */ #include -#include "validate.h" +#include "sbcl.h" +#include "os.h" +#include "arch.h" size_t os_vm_page_size; @@ -119,26 +104,15 @@ os_context_bd_cause(os_context_t *context) os_context_bd_cause is also used to find out if a branch emulation is needed. We work around that by checking if the current instruction is a jump or a branch. */ - unsigned int inst = *((unsigned int *)(unsigned int)(*os_context_pc_addr(context))); - - switch (inst >> 26) { - case 0x0: /* immediate jumps */ - switch (inst & 0x3f) { - case 0x08: - case 0x09: - return CAUSEF_BD; - } - break; - /* branches and register jumps */ - case 0x1: - case 0x2: - case 0x3: - case 0x4: - case 0x5: - case 0x6: - case 0x7: + extern boolean arch_insn_with_bdelay_p(unsigned int insn); + + os_vm_address_t addr + = (os_vm_address_t)(unsigned int)*os_context_pc_addr(context); + unsigned int insn = *(unsigned int *)addr; + + if (arch_insn_with_bdelay_p(insn)) return CAUSEF_BD; - } + return 0; }