From 173d32bb055a8db7689900de5a587115d4c0ef5a Mon Sep 17 00:00:00 2001
From: inoussa <inoussa@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 16 Jul 2009 17:36:49 +0000
Subject: [PATCH] Free WST's generated record RTTI

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

diff --git a/wst/trunk/record_rtti.pas b/wst/trunk/record_rtti.pas
index ab08c0c17..416331cf4 100644
--- a/wst/trunk/record_rtti.pas
+++ b/wst/trunk/record_rtti.pas
@@ -351,7 +351,7 @@ end;
 procedure finalize_record_rtti();
 begin
 {$IFDEF WST_RECORD_RTTI}
-  if ( RawTypeInfoList = nil ) then begin
+  if ( RawTypeInfoList <> nil ) then begin
     while ( RawTypeInfoList.Count > 0 ) do begin
       FreeRawTypeInfo(PTypeInfo(RawTypeInfoList.Items[0]));
       RawTypeInfoList.Delete(0);