From 8b915ea977747776604b73dec5e9b8aedda3b0db Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Mon, 5 Dec 2016 09:59:07 -0500 Subject: [PATCH] Avoid uninitialized-variable warning. --- racket/src/racket/src/optimize.c | 2 ++ 1 file changed, 2 insertions(+) diff --git a/racket/src/racket/src/optimize.c b/racket/src/racket/src/optimize.c index 521bae73c7..8a08d2d081 100644 --- a/racket/src/racket/src/optimize.c +++ b/racket/src/racket/src/optimize.c @@ -921,6 +921,8 @@ static Scheme_Object *optimize_ignored(Scheme_Object *e, Optimize_Info *info, int i; body = head->body; + if (0 == head->num_clauses) + lv = (Scheme_IR_Let_Value *)body; for (i = head->num_clauses; i--; ) { lv = (Scheme_IR_Let_Value *)body; body = lv->body;