From 4abac48880ecdc92800b07c2a3970a324d181761 Mon Sep 17 00:00:00 2001
From: mkr <mkr@opencascade.com>
Date: Thu, 11 Jan 2007 07:58:40 +0000
Subject: [PATCH] Fix crash described in bug PAL12575 : Superv: GNode -
 unexpected abort.

---
 src/GraphBase/DataFlowBase_Graph.cxx | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/GraphBase/DataFlowBase_Graph.cxx b/src/GraphBase/DataFlowBase_Graph.cxx
index a078c05..016498d 100644
--- a/src/GraphBase/DataFlowBase_Graph.cxx
+++ b/src/GraphBase/DataFlowBase_Graph.cxx
@@ -1188,6 +1188,9 @@ bool GraphBase::Graph::AddLink( GraphBase::ComputingNode *fromNode ,
       cdebug_out << "RemoveLink(AddLink) toPort->GetOutPort()->NodeName() RemoveLink Error." << endl ;
       return false ;
     }
+    if ( fromNode->IsGOTONode() && fromPort->IsGate() ) { // mkr : PAL12575
+      ((GraphBase::GOTONode * ) fromNode)->CoupledNode( (GraphBase::InLineNode * ) toNode ) ;
+    }
   }
 
   if ( !fromNode->IsDataFlowNode() && !fromNode->IsDataStreamNode() &&
-- 
2.39.2