From 2605437617d776b5b109cd64f0c640613ecae1d3 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 6 Dec 2016 14:29:41 -0700 Subject: [PATCH] unbreak no-futures build --- racket/src/racket/src/jitinline.c | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/racket/src/racket/src/jitinline.c b/racket/src/racket/src/jitinline.c index 41f373d875..4258743da7 100644 --- a/racket/src/racket/src/jitinline.c +++ b/racket/src/racket/src/jitinline.c @@ -773,11 +773,11 @@ static Scheme_Object *alloc_structure(Scheme_Object *_stype, int argc) return (Scheme_Object *)inst; } -#ifdef MZ_USE_FUTURES static Scheme_Object *checked_make_vector(int argc) XFORM_SKIP_PROC /* Arguments on runstack */ { +#ifdef MZ_USE_FUTURES Scheme_Object *vec, *val, *c = MZ_RUNSTACK[0]; if (SCHEME_INTP(c) @@ -812,11 +812,9 @@ static Scheme_Object *checked_make_vector(int argc) return vec; } else +#endif return ts_scheme_checked_make_vector(argc, MZ_RUNSTACK); } -#else -# define checked_make_vector ts_scheme_checked_make_vector -#endif Scheme_Structure *scheme_jit_allocate_structure(int argc, Scheme_Struct_Type *stype) {