Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-20 22:29:16 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

fixing uninitialized variable bug

Browse source
This commit is contained in:
Alex Shinn 2010-11-22 21:58:24 -08:00
parent c01721e110
commit 19dc018d35
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
eval.c
View file

@ -1435,9 +1435,9 @@ sexp sexp_define_foreign_aux (sexp ctx, sexp env, const char *name, int num_args
return res; return res;
} }
sexp sexp_define_foreign_param (sexp ctx, sexp env, const char *name, int num_args, sexp sexp_define_foreign_param (sexp ctx, sexp env, const char *name,
sexp_proc1 f, const char *param) { int num_args, sexp_proc1 f, const char *param) {
sexp res; sexp res = SEXP_FALSE;
sexp_gc_var1(tmp); sexp_gc_var1(tmp);
sexp_gc_preserve1(ctx, tmp); sexp_gc_preserve1(ctx, tmp);
tmp = sexp_intern(ctx, param, -1); tmp = sexp_intern(ctx, param, -1);