avoid compiler warning

This commit is contained in:
Matthew Flatt 2012-03-10 10:52:52 -07:00
parent 8eef24be87
commit 64f21122be

View File

@ -6375,7 +6375,7 @@ static Scheme_Object *do_module(Scheme_Object *form, Scheme_Comp_Env *env,
Scheme_Comp_Env *benv;
Scheme_Module *m;
Scheme_Object *mbval, *orig_ii;
int saw_mb, check_mb = 0, skip_strip;
int saw_mb, check_mb = 0, skip_strip = 0;
Scheme_Object *restore_confusing_name = NULL;
LOG_EXPAND_DECLS;