mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
fcdb829c25
XCAFDoc_ShapeTool::Expand method now avoids creation of subshapes under assemblies. XCAFDoc_ShapeTool::AddSubShape now avoids creation subshapes under all labels except for simple parts.
20 lines
394 B
Plaintext
20 lines
394 B
Plaintext
puts "=========="
|
|
puts "OCC29890"
|
|
puts "=========="
|
|
puts ""
|
|
##############################
|
|
# Problem in Expand Compounds
|
|
##############################
|
|
pload ALL
|
|
|
|
# Open file and expand
|
|
XOpen [locate_data_file bug29890.xbf] D
|
|
XExpand D 1 0:1:1:1238
|
|
|
|
# Check
|
|
set children [Children D 0:1:1:1239]
|
|
if {$children != "0:1:1:1239:1 0:1:1:1239:3 "} {
|
|
puts "Error: wrong expand compounds."
|
|
}
|
|
Close D
|