mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-20 22:29:16 +02:00
forgot to initialize variable in sqrt
This commit is contained in:
parent
7a04cf809d
commit
e79ce582ce
1 changed files with 1 additions and 1 deletions
2
eval.c
2
eval.c
|
@ -1177,7 +1177,7 @@ define_math_op(sexp_floor, floor)
|
||||||
define_math_op(sexp_ceiling, ceil)
|
define_math_op(sexp_ceiling, ceil)
|
||||||
|
|
||||||
static sexp sexp_sqrt (sexp ctx sexp_api_params(self, n), sexp z) {
|
static sexp sexp_sqrt (sexp ctx sexp_api_params(self, n), sexp z) {
|
||||||
int negativep;
|
int negativep = 0;
|
||||||
double d, r;
|
double d, r;
|
||||||
sexp_gc_var1(res);
|
sexp_gc_var1(res);
|
||||||
if (sexp_flonump(z))
|
if (sexp_flonump(z))
|
||||||
|
|
Loading…
Add table
Reference in a new issue