From 709ff43174fd91481030cd997686f6beed00b746 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 27 Mar 2014 14:09:56 -0600 Subject: [PATCH] unboxing improvement in the JIT Improve the "can unbox test" to include patterns that were already covered by the more restrictive "can unbox without disturbing N registers" test (which is always tried first, but the weaker test recurs within patterns that the stronger test does not recognize). --- racket/src/racket/src/jitarith.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/racket/src/racket/src/jitarith.c b/racket/src/racket/src/jitarith.c index f3dc0502db..89d7a84bfa 100644 --- a/racket/src/racket/src/jitarith.c +++ b/racket/src/racket/src/jitarith.c @@ -360,7 +360,7 @@ int can_unbox_directly(Scheme_Object *obj, int extfl, int bfuel) obj = ((Scheme_Sequence *)obj)->array[((Scheme_Sequence *)obj)->count - 1]; break; default: - return 0; + return is_unboxing_immediate(obj, 0, extfl); } } }