[Solved] Is it FGL unit error?

[Alextp]

https://github.com/graemeg/freepascal/blob/master/rtl/objpas/fgl.pp

Code: Pascal  [Select][+][-]

1. class function TFPGList.ItemIsManaged: Boolean;
2. begin
3. {$IFNDEF VER3_0}
4.   Result:=IsManagedType(T);
5. {$ELSE}
6.   Result:=True; // Fallback to old behaviour  
7. {$ENDIF}
8. end;
9.  

Here IsManagedType is called for older FPC before 3.0? is it correct?

[Bart]

Weel, since pre-3.0 is not supported anymore, this is OK.
It simply won't compile in 2.x.

Bart

[marcov]

I wonder about the use of this if it is virtual method anyway

[Alextp]

Don't we need to use
Result:=IsManagedType(T);
for 3.2 and 3.3? Now it's failed to do so.

[Bart]

ver3_0 is not defined for 3.2 I would guess, so it would indeed use IsManagedType?

Bart

[Alextp]

Sorry, my bad, It's OK.