From e94081c5aa5f8bdcf080665aafda0f6aba6cd5c1 Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Mon, 29 Feb 2016 12:21:55 -0500 Subject: [PATCH] Initialize variables to avoid compiler warnings. --- racket/src/racket/src/hash.c | 4 ++-- racket/src/racket/src/optimize.c | 2 ++ 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/racket/src/racket/src/hash.c b/racket/src/racket/src/hash.c index 2766c32b94..f77c5dd215 100644 --- a/racket/src/racket/src/hash.c +++ b/racket/src/racket/src/hash.c @@ -2755,7 +2755,7 @@ Scheme_Object *scheme_hash_tree_next_pos(Scheme_Hash_Tree *tree, mzlonglong pos) /* to avoid unneeded popcount computations */ Scheme_Object *scheme_unsafe_hash_tree_start(Scheme_Hash_Tree *ht) { - Scheme_Object *stack; + Scheme_Object *stack = scheme_null; int j, i, i_n[mzHAMT_MAX_INDEX_LEVEL], level; Scheme_Hash_Tree *ht_n[mzHAMT_MAX_INDEX_LEVEL]; @@ -2849,7 +2849,7 @@ XFORM_NONGCING Scheme_Object *scheme_unsafe_hash_tree_access(Scheme_Hash_Tree *s or the comppressed representation as a fixnum */ Scheme_Object *scheme_unsafe_hash_tree_next(Scheme_Hash_Tree *ht, Scheme_Object *args) { - Scheme_Object *stack; + Scheme_Object *stack = scheme_null; int j, i, i_n[mzHAMT_MAX_INDEX_LEVEL], level; Scheme_Hash_Tree *ht_n[mzHAMT_MAX_INDEX_LEVEL]; diff --git a/racket/src/racket/src/optimize.c b/racket/src/racket/src/optimize.c index 1d98c782c0..84d1af36ee 100644 --- a/racket/src/racket/src/optimize.c +++ b/racket/src/racket/src/optimize.c @@ -8320,6 +8320,8 @@ static Scheme_Object *optimize_info_propagate_local(Scheme_Object *var) { Scheme_Object *last, *val = var; + last = val; /* Avoid compiler warning */ + while (val && SAME_TYPE(SCHEME_TYPE(val), scheme_ir_local_type)) { MZ_ASSERT(SCHEME_VAR(val)->mode == SCHEME_VAR_MODE_OPTIMIZE); MZ_ASSERT(SCHEME_VAR(val)->use_count);