Re: [fpc-pascal] Default record const values

[Sven Barth via fpc-pascal]

Am 28.11.2018 um 20:27 schrieb Benjamin Rosseaux:
program Test123;
{$ifdef fpc}
  {$mode delphi}
{$endif}
type
  TTest = record
  public
    a: LongInt;
    b: LongInt;
  end;

  TTestHelper = record helper for TTest
  public
    const Default: TTest = (a: 1; b: 2);
  end;

var
  Test: TTest;
begin
  Test := TTest.Default;
end.

That is indeed a good idea and with the extension to allow multiple 
helpers there wouldn't even be a negative impact... 🤔

Regards,
Sven
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal