Преглед изворни кода

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

Sven/Sarah Barth пре 1 месец
родитељ
комит
d87edcd4be
1 измењених фајлова са 1 додато и 1 уклоњено
  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