The decimal point must be locale dependent.

diff --git a/ChangeLog b/ChangeLog
index fc237af4e0868c0b6534bf8e4ec818bbb984f95a..c305aa5cc431ae11b0ad2e9f35707957d2f1add2 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-03-09  Bruno Haible  <bruno@clisp.org>
+
+       * lib/vasnprintf.c (VASNPRINTF): For the 'a' and 'A' directives, use
+       a locale dependent decimal point, rather than always '.'.
+
 2007-03-09  Eric Blake  <ebb9@byu.net>
 
        * lib/stdlib_.h (EXIT_FAILURE): GNU code expects this to be 1, in

diff --git a/lib/vasnprintf.c b/lib/vasnprintf.c
index aff0b172ed817eae73768c5af89ffc7240320e03..a0523ec1fb86488f1152e46c751f289902a0d617 100644 (file)
--- a/lib/vasnprintf.c
+++ b/lib/vasnprintf.c
@@ -34,6 +34,7 @@
 # include "vasnprintf.h"
 #endif
 
+#include <locale.h>    /* localeconv() */
 #include <stdio.h>     /* snprintf(), sprintf() */
 #include <stdlib.h>    /* abort(), malloc(), realloc(), free() */
 #include <string.h>    /* memcpy(), strlen() */
@@ -492,7 +493,11 @@ VASNPRINTF (CHAR_T *resultbuf, size_t *lengthp, const CHAR_T *format, va_list ar
                              if ((flags & FLAG_ALT)
                                  || mantissa > 0.0L || precision > 0)
                                {
-                                 *p++ = '.';
+                                 const char *point =
+                                   localeconv () -> decimal_point;
+                                 /* The decimal point is always a single byte:
+                                    either '.' or ','.  */
+                                 *p++ = (point[0] != '\0' ? point[0] : '.');
                                  /* This loop terminates because we assume
                                     that FLT_RADIX is a power of 2.  */
                                  while (mantissa > 0.0L)
@@ -636,7 +641,11 @@ VASNPRINTF (CHAR_T *resultbuf, size_t *lengthp, const CHAR_T *format, va_list ar
                              if ((flags & FLAG_ALT)
                                  || mantissa > 0.0 || precision > 0)
                                {
-                                 *p++ = '.';
+                                 const char *point =
+                                   localeconv () -> decimal_point;
+                                 /* The decimal point is always a single byte:
+                                    either '.' or ','.  */
+                                 *p++ = (point[0] != '\0' ? point[0] : '.');
                                  /* This loop terminates because we assume
                                     that FLT_RADIX is a power of 2.  */
                                  while (mantissa > 0.0)