From 8a2bc0e50765e5f12eee3524aeb01f16b45d92af Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Mon, 24 Jan 2005 08:17:00 +0000
Subject: [PATCH]   * 1.0.x fix

---
 rtl/i386/fastmove.inc | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/rtl/i386/fastmove.inc b/rtl/i386/fastmove.inc
index 4922c32946..4a94eb04b4 100644
--- a/rtl/i386/fastmove.inc
+++ b/rtl/i386/fastmove.inc
@@ -25,8 +25,13 @@ the following restrictions:
 Version: 1.40 - 16-SEP-2004
 }
 
+{$ifndef VER1_0}
+  {$if (FPC_VERSION>1) or ((FPC_RELEASE>=9) and (FPC_PATCH>6))}
+    {$define USE_FASTMOVE}
+  {$endif}
+{$endif}
 
-{$if (FPC_VERSION>1) or ((FPC_RELEASE>=9) and (FPC_PATCH>6))}
+{$ifdef USE_FASTMOVE}
 
 {$ifndef FPC_SYSTEM_HAS_MOVE}
 {$define FPC_SYSTEM_HAS_MOVE}