From d4c4ac79375800a9558d4d1c40b06d985d0f8dd8 Mon Sep 17 00:00:00 2001
From: Giles Atkinson <“gatk555@gmail.com”>
Date: Thu, 22 Jun 2023 17:23:57 +0100
Subject: [PATCH] Fix sluggish output of the "Reference value" progress
 indicator on Linux after it switched from stderr to stdout (28a3413).  Add
 fflush().

---
 src/frontend/outitf.c | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/frontend/outitf.c b/src/frontend/outitf.c
index 2ed33d5d4..d557bf5a3 100644
--- a/src/frontend/outitf.c
+++ b/src/frontend/outitf.c
@@ -629,6 +629,7 @@ OUTpData(runDesc *plotPtr, IFvalue *refValue, IFvalue *valuePtr)
                     if ((currclock-lastclock) > (0.25*CLOCKS_PER_SEC)) {
                         fprintf(stdout, " Reference value : % 12.5e\r",
                                 refValue->cValue.real);
+                        fflush(stdout);
                         lastclock = currclock;
                     }
                 }
@@ -642,6 +643,7 @@ OUTpData(runDesc *plotPtr, IFvalue *refValue, IFvalue *valuePtr)
                     if ((currclock-lastclock) > (0.25*CLOCKS_PER_SEC)) {
                         fprintf(stdout, " Reference value : % 12.5e\r",
                                 refValue->rValue);
+                        fflush(stdout);
                         lastclock = currclock;
                     }
                 }
@@ -741,6 +743,7 @@ OUTpData(runDesc *plotPtr, IFvalue *refValue, IFvalue *valuePtr)
                     fprintf(stdout, " Reference value : % 12.5e\r",
                             refValue ? refValue->rValue : NAN);
                 }
+                fflush(stdout);
                 lastclock = currclock;
             }
         }
@@ -1508,6 +1511,7 @@ InterpFileAdd(runDesc *run, IFvalue *refValue, IFvalue *valuePtr)
             if ((currclock-lastclock) > (0.25*CLOCKS_PER_SEC)) {
                 fprintf(stdout, " Reference value : % 12.5e\r",
                         refValue->rValue);
+                fflush(stdout);
                 lastclock = currclock;
             }
         }
@@ -1672,6 +1676,7 @@ InterpPlotAdd(runDesc *run, IFvalue *refValue, IFvalue *valuePtr)
         if ((currclock-lastclock) > (0.25*CLOCKS_PER_SEC)) {
             fprintf(stdout, " Reference value : % 12.5e\r",
                     refValue->rValue);
+            fflush(stdout);
             lastclock = currclock;
         }
     }