Am 25.11.2013 15:13 schrieb "Juha Manninen" <[email protected]>:
> unit Unit2;
> {$mode delphi}
> interface
>
> type
> TRootMove = record
> score: integer;
> node_count: uint64;
> end;
>
> operator < (m1, m2: TRootMove) LessThan : Boolean;
>
> implementation
>
> operator < (m1, m2: TRootMove) LessThan : Boolean;
> begin
> if m1.score <> m2.score then
> result := m1.score < m2.score
> else
> result := m1.node_count < m2.node_count;
> end;
>
> end.
Neither global operators nor symbolic (<, >, etc.) operator names are
supported by Delphi.
Regards,
Sven
_______________________________________________
fpc-devel maillist - [email protected]
http://lists.freepascal.org/mailman/listinfo/fpc-devel
