suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix uninitialized variable messages

Browse Source
This commit is contained in:
Kevin Tew 2011-09-27 10:26:30 -06:00
parent d1007842bb
commit 3e830712aa
2 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/racket/src/env.c
View File

@ -1667,8 +1667,10 @@ static Scheme_Object *do_variable_namespace(const char *who, int tl, int argc, S
Scheme_Env *env;
intptr_t ph;
if (!SAME_TYPE(SCHEME_TYPE(argv[0]), scheme_global_ref_type))
if (!SAME_TYPE(SCHEME_TYPE(argv[0]), scheme_global_ref_type)) {
v = NULL;
env = NULL;
}
else {
v = SCHEME_PTR1_VAL(argv[0]);
env = scheme_get_bucket_home((Scheme_Bucket *)v);

4
src/racket/src/jit.c
View File

@ -1806,8 +1806,10 @@ int scheme_generate(Scheme_Object *obj, mz_jit_state *jitter, int is_tail, int w
memcpy(for_branch_copy, for_branch, sizeof(Branch_Info));
addrs = scheme_malloc_atomic(sizeof(Branch_Info_Addr) * for_branch->addrs_size);
memcpy(addrs, for_branch->addrs, sizeof(Branch_Info_Addr) * for_branch->addrs_count);
} else
} else {
for_branch_copy = NULL;
addrs = NULL;
}
p->ku.k.p1 = (void *)obj;
p->ku.k.p2 = (void *)jitter_copy;