From 70020785b260f3f6a92bf297647e403038675917 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Mon, 16 Apr 2018 06:30:43 -0600
Subject: [PATCH] JIT: fix more misuses of `jit_retval`

Older mistakes that are the same as in 82517622c7.
---
 racket/src/racket/src/jitinline.c | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/racket/src/racket/src/jitinline.c b/racket/src/racket/src/jitinline.c
index 5e1e4f6b5b..597d679b49 100644
--- a/racket/src/racket/src/jitinline.c
+++ b/racket/src/racket/src/jitinline.c
@@ -1854,7 +1854,6 @@ int scheme_generate_inlined_unary(mz_jit_state *jitter, Scheme_App2_Rec *app, in
         else if (can_chaperone) {
           (void)jit_calli(sjc.bad_vector_length_code);
           /* can return with updated R0 */
-          jit_retval(JIT_R0);
         } else {
           (void)jit_calli(sjc.bad_vector_star_length_code);
           /* does not return */
@@ -2037,7 +2036,7 @@ int scheme_generate_inlined_unary(mz_jit_state *jitter, Scheme_App2_Rec *app, in
       __START_TINY_JUMPS__(1);
       ref = mz_bnei_t(jit_forward(), JIT_R0, scheme_chaperone_type, JIT_R1);
       (void)jit_calli(sjc.unbox_code);
-      jit_retval(dest);
+      jit_movr_p(dest, JIT_R0);
       ref2 = jit_jmpi(jit_forward());
       mz_patch_branch(ref);
       CHECK_LIMIT();
@@ -4312,7 +4311,7 @@ int scheme_generate_inlined_binary(mz_jit_state *jitter, Scheme_App3_Rec *app, i
       /* (slow path) */
       refslow = jit_get_ip();
       (void)jit_calli(sjc.make_rectangular_code);
-      jit_retval(dest);
+      jit_movr_p(dest, JIT_R0);
       CHECK_LIMIT();
       refdone = jit_jmpi(jit_forward());
       /* (end of slow path) */