From bcc6af6b29fdca642e4bb309439ced26ce9a8667 Mon Sep 17 00:00:00 2001
From: dpasukhi <dpasukhi@opencascade.com>
Date: Tue, 10 Sep 2024 18:15:18 +0000
Subject: [PATCH] 0033765: Data Exchange, IGES Export - Missing Model Curves in
 transfer cache

Curve list should be not unique, list is recommended.
One curve can be used by multiple edges.
---
 src/BRepToIGESBRep/BRepToIGESBRep_Entity.cxx | 2 +-
 src/BRepToIGESBRep/BRepToIGESBRep_Entity.hxx | 3 ++-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/BRepToIGESBRep/BRepToIGESBRep_Entity.cxx b/src/BRepToIGESBRep/BRepToIGESBRep_Entity.cxx
index 6d5ab9ad31..aaf3a0f034 100644
--- a/src/BRepToIGESBRep/BRepToIGESBRep_Entity.cxx
+++ b/src/BRepToIGESBRep/BRepToIGESBRep_Entity.cxx
@@ -234,7 +234,7 @@ Standard_Integer BRepToIGESBRep_Entity::AddEdge(const TopoDS_Edge& myedge,
   Standard_Integer index = myEdges.FindIndex(E);
   if (index == 0) {
     index = myEdges.Add(E);
-    myCurves.Add(C);
+    myCurves.Append(C);
   }
   
   return index;
diff --git a/src/BRepToIGESBRep/BRepToIGESBRep_Entity.hxx b/src/BRepToIGESBRep/BRepToIGESBRep_Entity.hxx
index 60332515c3..795884604e 100644
--- a/src/BRepToIGESBRep/BRepToIGESBRep_Entity.hxx
+++ b/src/BRepToIGESBRep/BRepToIGESBRep_Entity.hxx
@@ -23,6 +23,7 @@
 
 #include <TopTools_IndexedMapOfShape.hxx>
 #include <TColStd_IndexedMapOfTransient.hxx>
+#include <TColStd_SequenceOfTransient.hxx>
 #include <BRepToIGES_BREntity.hxx>
 #include <Standard_Integer.hxx>
 #include <Message_ProgressRange.hxx>
@@ -136,7 +137,7 @@ private:
 
   TopTools_IndexedMapOfShape myVertices;
   TopTools_IndexedMapOfShape myEdges;
-  TColStd_IndexedMapOfTransient myCurves;
+  TColStd_SequenceOfTransient myCurves;
   Handle(IGESSolid_EdgeList) myEdgeList;
   Handle(IGESSolid_VertexList) myVertexList;