OpenCascade/occt
1
0
Fork 0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
Code Packages Releases Activity

0024822: Solve selection fails after copying

Browse Source 
The method ::Paste() copies myIndex now.
Test case for issue CR24822
This commit is contained in:
vro 2014-04-17 16:18:38 +04:00 committed by apn
parent 46aed280cc
commit f18ccc8cd6
2 changed files with 26 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/TNaming/TNaming_Name.cxx
View File

@ -308,7 +308,7 @@ TopAbs_ShapeEnum TNaming_Name::ShapeType() const
}
//=======================================================================
//function : Append
//function : Paste
//purpose :
//=======================================================================
@ -317,7 +317,8 @@ void TNaming_Name::Paste (TNaming_Name& into,
{
into.myType = myType;
into.myShapeType = myShapeType;
into.myShape = myShape;
into.myShape = myShape;
into.myIndex = myIndex;
into.myArgs.Clear();
// into.myOrientation = myOrientation;
Handle(TNaming_NamedShape) NS;

23
tests/bugs/caf/bug24822 Normal file
View File

@ -0,0 +1,23 @@
puts "=========="
puts "OCC24822"
puts "=========="
puts ""
###################################################
# Solve selection fails after copying
###################################################
restore [locate_data_file bug24822_face.brep] f
explode f w
NewDocument D XmlOcaf
ImportShape D 0:1 f
SelectShape D 0:2 f_1 f
SolveSelection D 0:2
CopyLabel D 0:2 0:3
if [catch { SolveSelection D 0:3 } ] {
puts "Error: Solve selection fails after copying"
} else {
puts "OK: Solve selection is good after copying"
}