Explorar el Código

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

Sven/Sarah Barth hace 1 mes
padre
commit
d87edcd4be
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  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