X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata-in.c;h=945cafd734ae38dc2af3f991776a69a6a29723f3;hb=682e5ee9e871b66d5227468bfa2ae3bc7b7d14cc;hp=3a49fa23706e8537881c204ffaeb9f83b99204d7;hpb=317e6b778833b5dcd5dd195c0b677835a8024b2a;p=pspp

diff --git a/src/data-in.c b/src/data-in.c
index 3a49fa2370..945cafd734 100644
--- 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;