From fd8f2c1da75ae333c4081ef2f13c93b0b9ad5b74 Mon Sep 17 00:00:00 2001
From: martin <laz.git@mfriebe.de>
Date: Wed, 26 Feb 2014 22:40:55 +0000
Subject: [PATCH] FPDebug: mem leak

git-svn-id: trunk@44270 -
---
 components/fpdebug/fppascalparser.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/components/fpdebug/fppascalparser.pas b/components/fpdebug/fppascalparser.pas
index c736276ff3..599d9d24de 100644
--- a/components/fpdebug/fppascalparser.pas
+++ b/components/fpdebug/fppascalparser.pas
@@ -2121,8 +2121,8 @@ begin
   end;
   {$POP}
 
- if Result <> nil then
-   Result.AddReference{$IFDEF WITH_REFCOUNT_DEBUG}(nil, 'DoGetResultValue'){$ENDIF};
+ {$IFDEF WITH_REFCOUNT_DEBUG}if Result <> nil then
+   Result.DbgRenameReference(nil, 'DoGetResultValue');{$ENDIF}
 end;
 
 { TFpPascalExpressionPartOperatorMulDiv }