diff --git a/src/racket/src/jitinline.c b/src/racket/src/jitinline.c index a9da05260d..6d2a39c3b6 100644 --- a/src/racket/src/jitinline.c +++ b/src/racket/src/jitinline.c @@ -2931,8 +2931,10 @@ int scheme_generate_inlined_binary(mz_jit_state *jitter, Scheme_App3_Rec *app, i scheme_signal_error("internal error: bad depth for flvector-ref"); } can_chaperone = 0; - if (MZ_LONG_DOUBLE_AND(IS_NAMED_PRIM(rator, "extflvector-ref"))) + if (MZ_LONG_DOUBLE_AND(IS_NAMED_PRIM(rator, "extflvector-ref"))) { extfl = 1; + base_offset = ((int)&SCHEME_EXTFLVEC_ELS(0x0)); + } } else if (IS_NAMED_PRIM(rator, "unsafe-struct*-ref")) { which = 0; unsafe = 1;