[fpc-devel] [patch] - fpcUnit testreport.pp

Micha Nelissen micha at neli.hopto.org
Thu Oct 26 13:47:37 CEST 2006


Graeme Geldenhuys wrote:
> +begin
> +  sString := '';
> +  for i := 1 to pIntLen do
> +    sString := sString + ' ';
> +  Result := sString;
> +end;

I object to the inefficiency of this implementation. Isn't there a 
routine in system to generate a string of X characters ?

Micha



More information about the fpc-devel mailing list