> On Oct 6, 2019, at 5:42 PM, Mattias Gaertner via fpc-pascal 
> <fpc-pascal@lists.freepascal.org> wrote:
> 
> I meant:
> 
> generic procedure DoThis<T>(param1: T; param2: word = 100);
> begin
> end;

That works then. Added a test:

{$mode objfpc}
{$modeswitch implicitfunctionspecialization}

program timpfuncspez15;

generic procedure DoThis<T>(param1: T; param2: integer = 100);
begin
  writeln(param1, ' = ', param2);
end;

begin
  DoThis('hello');
end.

Regards,
        Ryan Joseph

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to