X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Flexer%2Fscan.c;h=de75eeef3bd1f519a5508c55924be76cc6a2bd66;hb=23fd25fa0a2fb9d613f4f9445000e49cc3b83db1;hp=caf294a9d123b4aa28192775ba25aa5d53cb9e7e;hpb=afdf3096926b561f4e6511c10fcf73fc6796b9d2;p=pspp

diff --git a/src/language/lexer/scan.c b/src/language/lexer/scan.c
index caf294a9d1..de75eeef3b 100644
--- a/src/language/lexer/scan.c
+++ b/src/language/lexer/scan.c
@@ -27,6 +27,7 @@
 #include "libpspp/cast.h"
 
 #include "gl/c-ctype.h"
+#include "gl/c-strtod.h"
 #include "gl/xmemdup0.h"
 
 enum
@@ -379,7 +380,7 @@ scan_number__ (struct substring s)
   else
     p = xmemdup0 (s.string, s.length);
 
-  number = strtod (p, NULL);
+  number = c_strtod (p, NULL);
 
   if (p != buf)
     free (p);