[Guile-commits] 05/07: Minor 32-bit untag-fixnum optimization

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit 7c0bfcb097ae707f5edb417c91d11fbd73cf14ff
Author: Andy Wingo <address@hidden>
Date:   Sat Sep 1 10:29:05 2018 +0200

    Minor 32-bit untag-fixnum optimization
    
    * libguile/jit.c (compile_untag_fixnum): Minor optimization in 32-bit
      case.
---
 libguile/jit.c | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/libguile/jit.c b/libguile/jit.c
index d8d9677..fffd71d 100644
--- a/libguile/jit.c
+++ b/libguile/jit.c
@@ -3303,8 +3303,7 @@ compile_untag_fixnum (scm_jit_state *j, uint16_t dst, 
uint16_t a)
   emit_sp_set_s64 (j, dst, T0);
 #else
   /* FIXME: Untested!  */
-  emit_movi (j, T1, T0);
-  emit_rshi (j, T1, T1, 31);
+  emit_rshi (j, T1, T0, 31);
   emit_sp_set_s64 (j, dst, T0, T1);
 #endif
 }