From 0f266666b83be38a5478f6d1d0dffefbfc50ed70 Mon Sep 17 00:00:00 2001
From: inoussa <inoussa@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 7 Apr 2016 09:32:35 +0000
Subject: [PATCH] Memory leak fix, Thanks MVC.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4609 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 wst/trunk/object_serializer.pas | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/wst/trunk/object_serializer.pas b/wst/trunk/object_serializer.pas
index 9b23dc8f9..686a0550d 100644
--- a/wst/trunk/object_serializer.pas
+++ b/wst/trunk/object_serializer.pas
@@ -1358,7 +1358,8 @@ begin
       qualifiedElt := eltFormEmpty or qualifiedElt;
       qualifiedAtt := (trioQualifiedAttribute in regItem.Options) and not(trioUnqualifiedAttribute in regItem.Options);
       qualifiedAtt := not(attFormEmpty) and qualifiedAtt;
-      GetPropList(locTypeInfo,FRawPropList);
+      if (FRawPropList = nil) then
+        GetPropList(locTypeInfo,FRawPropList);
       try
         for i := 0 to Pred(c) do begin
           ppi := FRawPropList^[i];