Update FEQParse.F90

FluidNumerics · Feb 10, 2024 · e7a2369 · e7a2369
1 parent fb7be91
commit e7a2369
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/FEQParse.F90 b/src/FEQParse.F90
@@ -198,7 +198,8 @@ subroutine Tokenize(parser, tokenized, errorMsg)
         integer, allocatable :: maxVarLen, varLen
 
         tokenized = .false.
-
+        errorMsg = ''
+
         call parser%infix%Construct(Stack_Length)
 
         maxVarLen = 0