# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 828728153 0
# Node ID 4cd74c2aca7968b893f122c7f1336e5eb8edb6cf
# Parent  e7e0c6d13f2432ecb967390dee130d9c99d45e4f
(init_lread): Specify LC_NUMERIC locale.

diff -r e7e0c6d13f24 -r 4cd74c2aca79 src/lread.c
--- a/src/lread.c	Fri Apr 05 18:11:00 1996 +0000
+++ b/src/lread.c	Fri Apr 05 18:15:53 1996 +0000
@@ -2233,6 +2233,11 @@
   char *normal;
   int turn_off_warning = 0;
 
+#ifdef HAVE_SETLOCALE
+  /* Make sure numbers are parsed as we expect.  */
+  setlocale (LC_NUMERIC, "C");
+#endif /* HAVE_SETLOCALE */
+
   /* Compute the default load-path.  */
 #ifdef CANNOT_DUMP
   normal = PATH_LOADSEARCH;