X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flibpspp%2Ffloat-format.c;h=623d299ca6e901c49e86fa22a7bacc7c52061705;hb=8c2899d61c204069f4372c8163c77fa60559d1bc;hp=03f9411613938addd72905bb1dae5ab48c28760d;hpb=96227a55f3948833ebf2619ba98631a8c47d59d7;p=pspp

diff --git a/src/libpspp/float-format.c b/src/libpspp/float-format.c
index 03f9411613..623d299ca6 100644
--- a/src/libpspp/float-format.c
+++ b/src/libpspp/float-format.c
@@ -480,11 +480,7 @@ extract_hex (const char *s, struct fp *fp)
           if (fp->fraction == 0)
             fp->class = ZERO;
           else if (*s == 'p')
-            {
-              char *tail;
-              fp->exponent += strtol (s + 1, &tail, 10);
-              s = tail;
-            }
+            fp->exponent += strtol (s + 1, NULL, 10);
         }
     }
 }