guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] 01/01: Re-enable fixnum less-than JIT fast-path


From: Andy Wingo
Subject: [Guile-commits] 01/01: Re-enable fixnum less-than JIT fast-path
Date: Thu, 25 Apr 2019 12:25:06 -0400 (EDT)

wingo pushed a commit to branch lightening
in repository guile.

commit e9a372b0201de0d0f1d6fdcb644acbbf87df2b90
Author: Andy Wingo <address@hidden>
Date:   Thu Apr 25 18:24:20 2019 +0200

    Re-enable fixnum less-than JIT fast-path
    
    * libguile/jit.c (compile_less): Re-enable fast-path for fixnums, now
      that the JIT library works :)
---
 libguile/jit.c | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/libguile/jit.c b/libguile/jit.c
index 86d33a2..d1aa4fc 100644
--- a/libguile/jit.c
+++ b/libguile/jit.c
@@ -3325,9 +3325,7 @@ compile_numerically_equal (scm_jit_state *j, uint16_t a, 
uint16_t b)
 static void
 compile_less (scm_jit_state *j, uint16_t a, uint16_t b)
 {
-#if 0
   jit_reloc_t fast, k2, k3;
-#endif
   jit_reloc_t k1;
   uint32_t *target;
   enum scm_opcode op = fuse_conditional_branch (j, &target);
@@ -3336,10 +3334,8 @@ compile_less (scm_jit_state *j, uint16_t a, uint16_t b)
   emit_sp_ref_scm (j, T0, a);
   emit_sp_ref_scm (j, T1, b);
 
-#if 0
   emit_andr (j, T2, T0, T1);
   fast = jit_bmsi (j->jit, T2, scm_tc2_int);
-#endif
 
   emit_call_2 (j, scm_vm_intrinsics.less_p,
                jit_operand_gpr (JIT_OPERAND_ABI_POINTER, T0),
@@ -3363,7 +3359,6 @@ compile_less (scm_jit_state *j, uint16_t a, uint16_t b)
     default:
       UNREACHABLE ();
     }
-#if 0
   k2 = jit_jmp (j->jit);
 
   jit_patch_here (j->jit, fast);
@@ -3382,12 +3377,9 @@ compile_less (scm_jit_state *j, uint16_t a, uint16_t b)
     }
 
   jit_patch_here (j->jit, k2);
-#endif
 
   add_inter_instruction_patch (j, k1, target);
-#if 0
   add_inter_instruction_patch (j, k3, target);
-#endif
 }
 
 static void



reply via email to

[Prev in Thread] Current Thread [Next in Thread]