From ab462a0e475f8b3696289e7b7b11e56b8e0b07c2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Bj=C3=B6rn-Egil=20Dahlberg?= <egil@erlang.org>
Date: Tue, 22 Jan 2013 18:26:29 +0100
Subject: erts: Force windows to use two-digit exponent

sprintf on windows uses a three-digit exponent default
---
 erts/emulator/beam/erl_init.c | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/erts/emulator/beam/erl_init.c b/erts/emulator/beam/erl_init.c
index 8cdf954dd2..44735ba425 100644
--- a/erts/emulator/beam/erl_init.c
+++ b/erts/emulator/beam/erl_init.c
@@ -1520,6 +1520,14 @@ erl_start(int argc, char **argv)
 	i++;
     }
 
+/* Output format on windows for sprintf defaults to three exponents.
+ * We use two-exponent to mimic normal sprintf behaviour.
+ */
+
+#if defined(__WIN32__) && defined(_TWO_DIGIT_EXPONENT)
+    _set_output_format(_TWO_DIGIT_EXPONENT);
+#endif
+
    /* Restart will not reinstall the break handler */
 #ifdef __WIN32__
     if (ignore_break)
-- 
cgit v1.2.3