Allow "1+23" even for F format, for compatibility.

[pspp-builds.git] / src / data-in.c

diff --git a/src/data-in.c b/src/data-in.c
index 3a49fa23706e8537881c204ffaeb9f83b99204d7..945cafd734ae38dc2af3f991776a69a6a29723f3 100644 (file)
--- a/src/data-in.c
+++ b/src/data-in.c
@@ -212,9 +212,7 @@ parse_numeric (struct data_in *i)
       return false;
     }
   
-  if (have_char (i)
-      && (tolower (*i->s) == 'e' || tolower (*i->s) == 'd'
-         || (type == FMT_E && (*i->s == '+' || *i->s == '-'))))
+  if (have_char (i) && strchr ("eEdD-+", *i->s))
     {
       /* Get the exponent specified after the `e' or `E'.  */
       long exp;