From 525c3ea1e1ede7d571f386fa033bfad8285673d5 Mon Sep 17 00:00:00 2001
From: Basile Burg <basile.burg@gmx.com>
Date: Wed, 26 Nov 2014 04:31:04 +0100
Subject: [PATCH] removed irrelevant warning under linux

---
 src/ce_synmemo.pas | 17 ++++++++++-------
 1 file changed, 10 insertions(+), 7 deletions(-)

diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas
index 98b03f91..92a03ee7 100644
--- a/src/ce_synmemo.pas
+++ b/src/ce_synmemo.pas
@@ -94,29 +94,32 @@ end;
 procedure TCESynMemoPositions.back;
 begin
   Inc(fPos);
+  {$WARNINGS OFF}
   if fPos < fList.Count then
-    fMemo.CaretY := Integer(fList.Items[fPos])
+    fMemo.CaretY := NativeInt(fList.Items[fPos])
+  {$WARNINGS ON}
   else Dec(fPos);
 end;
 
 procedure TCESynMemoPositions.next;
 begin
   Dec(fPos);
+  {$WARNINGS OFF}
   if fPos > -1 then
-    fMemo.CaretY := Integer(fList.Items[fPos])
+    fMemo.CaretY := NativeInt(fList.Items[fPos])
+  {$WARNINGS ON}
   else Inc(fPos);
 end;
 
 procedure TCESynMemoPositions.store;
 begin
   fPos := 0;
+  {$WARNINGS OFF}
   if fList.Count > 0 then
-    {$WARNINGS OFF}
-    if Integer(fList.Items[fPos]) = fMemo.CaretY then
+    if NativeInt(fList.Items[fPos]) = fMemo.CaretY then
       exit;
-    {$WARNINGS ON}
-  //
-  fList.Insert(0, Pointer(fMemo.CaretY));
+  fList.Insert(0, Pointer(NativeInt(fMemo.CaretY)));
+  {$WARNINGS ON}
   while fList.Count > fMax do
     fList.Delete(fList.Count-1);
 end;