diff options
author | Andy Wingo <wingo@pobox.com> | 2020-01-06 22:00:53 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2020-01-06 22:00:53 +0100 |
commit | 9f2b70310151388791638bf1b7fe8b5237516376 (patch) | |
tree | cde2c833011eafc0ad7b4efad102adcf71e4df19 | |
parent | ba05f1dd6d87abf3d1e9f8b11ca5b7b7632290bc (diff) | |
parent | 2db2b12e857a2694b5a70e108055e2c902051247 (diff) | |
download | guile-9f2b70310151388791638bf1b7fe8b5237516376.tar.gz |
Merge remote-tracking branch 'lightening/master'
-rw-r--r-- | libguile/lightening/lightening/mips-cpu.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/libguile/lightening/lightening/mips-cpu.c b/libguile/lightening/lightening/mips-cpu.c index 7ab58b873..704a2cd4a 100644 --- a/libguile/lightening/lightening/mips-cpu.c +++ b/libguile/lightening/lightening/mips-cpu.c @@ -379,7 +379,11 @@ static void _nop(jit_state_t*,int32_t); # define BGTZ(rs,im) hrri(MIPS_BGTZ,rs,_ZERO_REGNO,im) # define BNE(rs,rt,im) hrri(MIPS_BNE,rs,rt,im) # define JALR(r0) hrrrit(MIPS_SPECIAL,r0,0,_RA_REGNO,0,MIPS_JALR) -# define JR(r0) hrrrit(MIPS_SPECIAL,r0,0,0,0,MIPS_JR) +# if 1 /* supports MIPS32 R6 */ +# define JR(r0) hrrrit(MIPS_SPECIAL,r0,0,0,0,MIPS_JALR) +# else /* does not support MIPS32 R6 */ +# define JR(r0) hrrrit(MIPS_SPECIAL,r0,0,0,0,MIPS_JR) +# endif # define J(i0) hi(MIPS_J,i0) # define MOVZ(rd,rs,rt) hrrrit(0,rs,rt,rd,0,MIPS_MOVZ) # define comr(r0,r1) xori(r0,r1,-1) |