[Guile-commits] 01/01: Fix JIT compilation of shuffle-down

[Andy Wingo]

wingo pushed a commit to branch lightning
in repository guile.

commit 15314fdc07216df883f5735243801e36be8011c6
Author: Andy Wingo <address@hidden>
Date:   Wed Aug 29 20:29:57 2018 +0200

    Fix JIT compilation of shuffle-down
    
    * libguile/jit.c (compile_shuffle_down): Fix compilation.
---
 libguile/jit.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/jit.c b/libguile/jit.c
index e6e8997..8657fc9 100644
--- a/libguile/jit.c
+++ b/libguile/jit.c
@@ -1374,7 +1374,7 @@ compile_shuffle_down (scm_jit_state *j, uint16_t from, 
uint16_t to)
   jit_ldr (t, walk);
   jit_stxi (offset, walk, t);
   jit_subi (walk, walk, sizeof (union scm_vm_stack_element));
-  back = jit_bltr (walk, SP);
+  back = jit_bger (walk, SP);
   jit_patch_at (back, head);
   jit_patch (done);
   jit_addi (SP, SP, offset);