Kaynağa Gözat

* Treat 3.2 as 3.0.4

git-svn-id: trunk@43513 -
michael 5 yıl önce
ebeveyn
işleme
37a9cda682
1 değiştirilmiş dosya ile 4 ekleme ve 0 silme
  1. 4 0
      rtl/objpas/fgl.pp

+ 4 - 0
rtl/objpas/fgl.pp

@@ -970,7 +970,11 @@ end;
 class function TFPGList.ItemIsManaged: Boolean;
 begin
 {$IFNDEF VER3_0}
+{$IFNDEF VER3_2}
   Result:=IsManagedType(T);
+{$ELSE}  
+  Result:=True; // Fallback to old behaviour  
+{$ENDIF}
 {$ELSE}
   Result:=True; // Fallback to old behaviour  
 {$ENDIF}