diff --git a/utils/tply/lexbase.pas b/utils/tply/lexbase.pas
index 255b9858f7..12191562f3 100644
--- a/utils/tply/lexbase.pas
+++ b/utils/tply/lexbase.pas
@@ -79,7 +79,7 @@ lno  : Integer; (* current line number *)
 
 const
 
-max_elems  = 100;  (* maximum size of integer sets *)
+max_elems  = 1000;  (* maximum size of integer sets *)
 
 type