From 689b7a3ac2fb56202536300f234c5cc9aabf2eee Mon Sep 17 00:00:00 2001
From: Martijn Laan <martijnlaan@gmail.com>
Date: Thu, 10 Dec 2020 15:37:56 +0100
Subject: [PATCH] Fix ReadParameters not setting parameter parser positions
 even though ValidateParameters does use them.

---
 Source/uPSCompiler.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Source/uPSCompiler.pas b/Source/uPSCompiler.pas
index 5808aaa..e2b52f5 100644
--- a/Source/uPSCompiler.pas
+++ b/Source/uPSCompiler.pas
@@ -9132,6 +9132,7 @@ begin
           result := false;
           exit;
         end;
+        Val.SetParserPos(FParser);
       end;
       if FParser.CurrTokenId = cr then
       begin