diff --git a/tests/utils/dotest.pp b/tests/utils/dotest.pp
index eef20c6ed9..9cafa099dd 100644
--- a/tests/utils/dotest.pp
+++ b/tests/utils/dotest.pp
@@ -737,7 +737,7 @@ begin
 end;
 
 
-function CheckForMessages(const OutName:string;Msgs:array of longint;var Found:array of boolean):boolean;
+function CheckForMessages(const OutName:string;const Msgs:array of longint;var Found:array of boolean):boolean;
 var
   t : text;
   s,id : string;