mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-19 05:39:18 +02:00
fix typo not handling uppercase I in some complex numbers
This commit is contained in:
parent
7c333f43da
commit
5a7094e2ef
1 changed files with 1 additions and 1 deletions
2
sexp.c
2
sexp.c
|
@ -2386,7 +2386,7 @@ sexp sexp_read_float_tail (sexp ctx, sexp in, double whole, int negp) {
|
||||||
#endif
|
#endif
|
||||||
if (!is_precision_indicator(c)) {
|
if (!is_precision_indicator(c)) {
|
||||||
#if SEXP_USE_COMPLEX
|
#if SEXP_USE_COMPLEX
|
||||||
if (c=='i' || c=='i' || c=='+' || c=='-') {
|
if (c=='i' || c=='I' || c=='+' || c=='-') {
|
||||||
sexp_push_char(ctx, c, in);
|
sexp_push_char(ctx, c, in);
|
||||||
res = sexp_read_complex_tail(ctx, in, res);
|
res = sexp_read_complex_tail(ctx, in, res);
|
||||||
} else
|
} else
|
||||||
|
|
Loading…
Add table
Reference in a new issue