From 3e82a8d89871d9481092406aa8210cd1978626da Mon Sep 17 00:00:00 2001
From: Rafal <rafal.brzegowy@yahoo.com>
Date: Mon, 23 Dec 2024 11:39:49 +0100
Subject: [PATCH] Fix numeric output format on UCRT64

Source: https://github.com/msys2/MINGW-packages/pull/22849
---
 ccx/src/exo.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/ccx/src/exo.c b/ccx/src/exo.c
index 4a7b7bb3..6f15b2e0 100755
--- a/ccx/src/exo.c
+++ b/ccx/src/exo.c
@@ -21,6 +21,7 @@
 #include <math.h>
 #include <stdio.h>
 #include <string.h>
+#include <locale.h>
 #include "CalculiX.h"
 #ifdef EXODUSII
 #include "exodusII.h"
@@ -49,7 +50,9 @@ void exo(double *co,ITG *nk,ITG *kon,ITG *ipkon,char *lakon,ITG *ne0,
 
 #ifdef EXODUSII
   /* stores the results in exo format
-
+  
+     setlocale(LC_NUMERIC, "C");
+     
      iselect selects which nodes are to be stored:
      iselect=-1 means only those nodes for which inum negative
      ist, i.e. network nodes