From d280b47f5f8646072873e299f0552a87d3d5b47e Mon Sep 17 00:00:00 2001
From: kga <kga@opencascade.com>
Date: Wed, 4 Dec 2013 09:36:38 +0000
Subject: [PATCH] IPAL0052197: TC7.3.0 "Fatal error" when try to add new filter
 to filter library

---
 src/SMESH_I/SMESH_Filter_i.cxx | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/SMESH_I/SMESH_Filter_i.cxx b/src/SMESH_I/SMESH_Filter_i.cxx
index 61d8faa5a..5ccc12bff 100644
--- a/src/SMESH_I/SMESH_Filter_i.cxx
+++ b/src/SMESH_I/SMESH_Filter_i.cxx
@@ -3067,8 +3067,8 @@ CORBA::Boolean Filter_i::SetCriteria( const SMESH::Filter::Criteria& theCriteria
   }
 
   SetPredicate( aResPredicate );
-
-  aResPredicate->UnRegister();
+  if ( !aResPredicate->_is_nil() )
+    aResPredicate->UnRegister();
 
   return !aResPredicate->_is_nil();
 }
-- 
2.39.2