From 8c2899d61c204069f4372c8163c77fa60559d1bc Mon Sep 17 00:00:00 2001
From: John Darrington <john@darrington.wattle.id.au>
Date: Sat, 10 Apr 2021 08:03:26 +0200
Subject: [PATCH] src/libpspp/float-format.c (extract_hex): Remove useless
 assignment.

Found by cppcheck.
---
 src/libpspp/float-format.c | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

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);
         }
     }
 }
-- 
2.30.2