From 1d3e3d5a08e9cddee5b57f5d09ee4a6c2f19010b Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Wed, 22 Aug 2018 09:43:22 -0600 Subject: [PATCH] bytecode compiler: fix `set!` repair Fix problem with generated viable in 53a08c065e. --- racket/src/racket/src/letrec_check.c | 1 + 1 file changed, 1 insertion(+) diff --git a/racket/src/racket/src/letrec_check.c b/racket/src/racket/src/letrec_check.c index d1d08a2544..d027e43283 100644 --- a/racket/src/racket/src/letrec_check.c +++ b/racket/src/racket/src/letrec_check.c @@ -901,6 +901,7 @@ static Scheme_Object *letrec_check_set(Scheme_Object *o, Letrec_Check_Frame *fra vars = MALLOC_N(Scheme_IR_Local*, 1); vars[0] = var; var->use_count = 1; + var->non_app_count = 1; lv = MALLOC_ONE_TAGGED(Scheme_IR_Let_Value); lv->iso.so.type = scheme_ir_let_value_type;