# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 731059861 0
# Node ID cd893024d6b9b4fbc3ab1bb9ac2dbc94685f083f
# Parent  b1bc0b15ca7f686175d842871a01fd263a2c3f3e
	* 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>.

diff -r b1bc0b15ca7f -r cd893024d6b9 src/data.c
--- a/src/data.c	Tue Mar 02 08:10:24 1993 +0000
+++ b/src/data.c	Tue Mar 02 08:11:01 1993 +0000
@@ -19,7 +19,6 @@
 
 
 #include <signal.h>
-#include <ctype.h>
 
 #include "config.h"
 #include "lisp.h"
@@ -1456,7 +1455,7 @@
   (str)
      register Lisp_Object str;
 {
-  char *p;
+  unsigned char *p;
 
   CHECK_STRING (str, 0);
 
@@ -1464,7 +1463,7 @@
 
   /* 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