From e7a236970f85b469c85ca351c79896f47902bcb0 Mon Sep 17 00:00:00 2001
From: davidpfister <david.pfister@ypso-facto.com>
Date: Sat, 10 Feb 2024 22:39:53 +0100
Subject: [PATCH] Update FEQParse.F90

---
 src/FEQParse.F90 | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/FEQParse.F90 b/src/FEQParse.F90
index d2d1233..670825d 100644
--- 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