APREPRO: Fix double echoing of some output

sandialabs · Oct 13, 2023 · 76e0b77 · 76e0b77
1 parent 1ff5373
commit 76e0b77
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/packages/seacas/libraries/aprepro_lib/apr_scanner.cc b/packages/seacas/libraries/aprepro_lib/apr_scanner.cc
@@ -3655,7 +3655,9 @@ namespace SEAMS {
       return;
 
     // Clear any possible end-of-stream if e.g., reading from a istringstream.
-    yyin->clear();
+    if (aprepro.ap_file_list.top().name == "interactive_input") {
+      yyin->clear();
+    }
     // Go back in the stream to where we started keeping history.
     yyin->seekg(hist_start);
     if (!yyin->good()) {

diff --git a/packages/seacas/libraries/aprepro_lib/aprepro.ll b/packages/seacas/libraries/aprepro_lib/aprepro.ll
@@ -1204,7 +1204,9 @@ integer {D}+({E})?
       return;
 
     // Clear any possible end-of-stream if e.g., reading from a istringstream.
-    yyin->clear(); 
+    if (aprepro.ap_file_list.top().name == "interactive_input") {
+      yyin->clear();
+    }
     // Go back in the stream to where we started keeping history.
     yyin->seekg(hist_start);
     if (!yyin->good()) {