From 11563b295981aa14c34ec9fbfba3884f662b88df Mon Sep 17 00:00:00 2001
From: hnb <hnb@lazarus-ide.org>
Date: Sun, 19 Feb 2017 16:43:30 +0000
Subject: [PATCH] codetools: parser: Compatibility with FPC management
 operators: rename Copy to AddRef and Clone to Copy

git-svn-id: trunk@54196 -
---
 components/codetools/pascalparsertool.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/codetools/pascalparsertool.pas b/components/codetools/pascalparsertool.pas
index ac9b0096ae..40a7a9dfb5 100644
--- a/components/codetools/pascalparsertool.pas
+++ b/components/codetools/pascalparsertool.pas
@@ -332,7 +332,7 @@ begin
   if IsOperator then begin
     AtomIsCustomOperator(true,true,true);
     IsFunction:=not (UpAtomIs('INITIALIZE') or UpAtomIs('FINALIZE')
-                  or UpAtomIs('COPY') or UpAtomIs('CLONE'));
+                  or UpAtomIs('ADDREF') or UpAtomIs('COPY'));
   end else
     AtomIsIdentifierSaveE;
 end;