From 5e055ebbf2dcf9f3df307641fc4d7a92b7b14825 Mon Sep 17 00:00:00 2001
From: blikblum <blikblum@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Fri, 20 Nov 2015 13:04:37 +0000
Subject: [PATCH] Use pascal PackArray implementation on fpc > 3.0. Issue 28502

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4394 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/virtualtreeview-new/branches/4.8/VTConfig.inc | 3 ++-
 components/virtualtreeview-new/trunk/VTConfig.inc        | 3 ++-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/components/virtualtreeview-new/branches/4.8/VTConfig.inc b/components/virtualtreeview-new/branches/4.8/VTConfig.inc
index 8508c2bea..f026cb508 100644
--- a/components/virtualtreeview-new/branches/4.8/VTConfig.inc
+++ b/components/virtualtreeview-new/branches/4.8/VTConfig.inc
@@ -44,6 +44,7 @@
 {$ifdef Windows}
   {$define EnableThreadSupport}
 {$endif}
-{$ifdef CPU64}
+
+{$if (FPC_FULLVERSION >= 30100) or defined(CPU64)}
   {$define PACKARRAYPASCAL}
 {$endif}
diff --git a/components/virtualtreeview-new/trunk/VTConfig.inc b/components/virtualtreeview-new/trunk/VTConfig.inc
index 55532dce5..93ad27231 100644
--- a/components/virtualtreeview-new/trunk/VTConfig.inc
+++ b/components/virtualtreeview-new/trunk/VTConfig.inc
@@ -44,7 +44,8 @@
 {$ifdef Windows}
   {$define EnableThreadSupport}
 {$endif}
-{$ifdef CPU64}
+{$if (FPC_FULLVERSION >= 30100) or defined(CPU64)}
   {$define PACKARRAYPASCAL}
 {$endif}
+
 {$define CompilerVersion := 19}