Код: Выделить всё
C:\lazarus\components\GLScene\Source\Experimental\GLSRedBlackTree.pas(62,5) Fatal: Syntax error, "=" expected but "TYPE" found
И номер строки:
Код: Выделить всё
type
TRBColor = (clRed, clBlack);
// TRedBlackTree
//
{$IFDEF FPC}
generic
{$ENDIF}
GRedBlackTree < K, V > = class
{ Public Declarations }
[b] public
type[/b]
TKeyCompareFunc = function(const Item1, Item2: K): Integer;
TValueCompareFunc = function(const Item1, Item2: V): Integer;
TForEachProc = procedure (AKey: K; AValue: V; out AContinue: Boolean);
{ Private Declarations }
private Место ошибки выделено жирным. В чем дело?
Версия GLscene: 1.1 August 2010
Версия лазаря: 0.9.28.2