APREPRO: Clear possibly bad status of input stream

IF using istringstream, then stream will be at end-of-string due to being parsed; clear the bad state before seeking.
sandialabs · Oct 11, 2023 · 7db7fd4 · 7db7fd4
1 parent d0c1aaf
commit 7db7fd4
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 0 deletions.
diff --git a/packages/seacas/libraries/aprepro_lib/apr_scanner.cc b/packages/seacas/libraries/aprepro_lib/apr_scanner.cc
@@ -3643,6 +3643,8 @@ namespace SEAMS {
     if (len <= 0)
       return;
 
+    // Clear any possible end-of-stream if e.g., reading from a istringstream.
+    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
@@ -1191,6 +1191,8 @@ integer {D}+({E})?
     if (len <= 0)
       return;
 
+    // Clear any possible end-of-stream if e.g., reading from a istringstream.
+    yyin->clear(); 
     // Go back in the stream to where we started keeping history.
     yyin->seekg(hist_start);
     if (!yyin->good()) {