Commit 0a3e4d65 authored by Jim Blandy's avatar Jim Blandy

* data.c (Fstring_to_number): Declare p to be an unsigned char, to

	match the data field of strings.

	* data.c (Fstring_to_number): Just skip tabs and spaces; don't use
	the <ctype.h> macros.  The <ctype.h> stuff apparently varies from
	locale to locale more than we'd like.  Don't include <ctype.h>.
parent c39e6cc2
......@@ -19,7 +19,6 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
#include <signal.h>
#include <ctype.h>
#include "config.h"
#include "lisp.h"
......@@ -1456,7 +1455,7 @@ This parses both integers and floating point numbers.")
(str)
register Lisp_Object str;
{
char *p;
unsigned char *p;
CHECK_STRING (str, 0);
......@@ -1464,7 +1463,7 @@ This parses both integers and floating point numbers.")
/* Skip any whitespace at the front of the number. Some versions of
atoi do this anyway, so we might as well make Emacs lisp consistent. */
while (isspace (*p))
while (*p == ' ' || *p == '\t')
p++;
#ifdef LISP_FLOAT_TYPE
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment