I now officially feel stupid, this now works with the ; in place, I could have sworn that I have tried this......

But two lines deeper I end up with a new problem now:

TSpecialFunctionRegisterComparer = class(TComparer<TSpecialFunctionRegister>) function Compare(constref Left, Right: TSpecialFunctionRegister): Integer; override;
  end;

Error: class type expected, but got "TComparer"
Fatal: class type expected, but got "TComparer"

Is this a similar problem?

If yes then I guess I will need to stay with -Mdelphi the specialize syntax is not availabe in delphi mode (identifier not found "specialize") and the generics library where TComparer comes from explicitly sets delphi mode.

Michael

Am 27.04.15 um 22:34 schrieb Jeppe Johansen:
There's a missing ; after the specialization
,
On 04/27/2015 09:46 PM, Michael Ring wrote:
Did not work, now I get

Fatal: Syntax error, ";" expected but "identifier PUBLIC" found

I did a cut & paste of your code into my code

Michael

Am 27.04.15 um 21:19 schrieb Sven Barth:
On 27.04.2015 20:31, Michael Ring wrote:
Argh, soory, cut & waste error, this is the correct thing:

   TSpecialFunctionRegister = record
     name: String;
     device: String;
     address: longWord;
     bits: TList<TSpecialFunctionBits>;
     constructor create(theName: String; theAddress: longWord);
   end;


As I expected. Try this:

=== code begin ===

TSpecialFunctionRegister = record
public type
  TSpecialFunctionBitsList = specialize TList<TSpecialFunctionBits>
// alternatively you could declare that outside of the record as well if you need it more often
public
  name: String;
  device: String;
  address: LongWord;
  bits: TSpecialFunctionBitsList;
  constructor Create(theName: String; theAddress: LongWord);
end;

=== code end ===

Regards,
Sven
_______________________________________________
fpc-devel maillist  -  [email protected]
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

_______________________________________________
fpc-devel maillist  -  [email protected]
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel


_______________________________________________
fpc-devel maillist  -  [email protected]
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

_______________________________________________
fpc-devel maillist  -  [email protected]
http://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-devel

Reply via email to