Parcourir la source

* we don't want N-commas for the name of a generic, but N-1 (as the comment suggests)

Sven/Sarah Barth il y a 1 mois
Parent
commit
d87edcd4be
1 fichiers modifiés avec 1 ajouts et 1 suppressions
  1. 1 1
      compiler/symdef.pas

+ 1 - 1
compiler/symdef.pas

@@ -4969,7 +4969,7 @@ implementation
                   split_generic_name(objrealname^,nongeneric,paramcount);
                   rttistring:=rttistring+nongeneric+'<';
                   { we don't want any ',' if there is only one parameter }
-                  for i:=0 to paramcount-0 do
+                  for i:=0 to paramcount-1 do
                     rttistring:=rttistring+',';
                   rttistring:=rttistring+'>';
                 end