From a38b44f172bbf888b4f47422fc60119d5f20e041 Mon Sep 17 00:00:00 2001
From: ika <ika@opencascade.com>
Date: Tue, 27 Mar 2018 11:17:54 +0300
Subject: [PATCH] 0029650: Data Exchange - possible exception in shape tool

---
 src/XCAFDoc/XCAFDoc_ShapeTool.cxx | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/XCAFDoc/XCAFDoc_ShapeTool.cxx b/src/XCAFDoc/XCAFDoc_ShapeTool.cxx
index b39e3b0b5f..29edcfbdae 100644
--- a/src/XCAFDoc/XCAFDoc_ShapeTool.cxx
+++ b/src/XCAFDoc/XCAFDoc_ShapeTool.cxx
@@ -1038,8 +1038,10 @@ Standard_Boolean XCAFDoc_ShapeTool::IsSubShape (const TDF_Label &shapeL,
   Handle(XCAFDoc_ShapeMapTool) A;
   if (!shapeL.FindAttribute(XCAFDoc_ShapeMapTool::GetID(), A))
   {
-    A = XCAFDoc_ShapeMapTool::Set(shapeL);
     TopoDS_Shape aShape = GetShape(shapeL);
+    if (aShape.IsNull())
+      return Standard_False;
+    A = XCAFDoc_ShapeMapTool::Set(shapeL);
     A->SetShape(aShape);
   }