fix typo not handling uppercase I in some complex numbers

This commit is contained in:
Alex Shinn 2015-09-21 15:23:51 +09:00
parent 7c333f43da
commit 5a7094e2ef

2
sexp.c
View file

@ -2386,7 +2386,7 @@ sexp sexp_read_float_tail (sexp ctx, sexp in, double whole, int negp) {
#endif
if (!is_precision_indicator(c)) {
#if SEXP_USE_COMPLEX
if (c=='i' || c=='i' || c=='+' || c=='-') {
if (c=='i' || c=='I' || c=='+' || c=='-') {
sexp_push_char(ctx, c, in);
res = sexp_read_complex_tail(ctx, in, res);
} else