mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
24 lines
545 B
Plaintext
24 lines
545 B
Plaintext
puts "=========="
|
|
puts "OCC28748"
|
|
puts "=========="
|
|
puts ""
|
|
###########################################################
|
|
# XCAFDoc_GraphNode does not restore child on Undo
|
|
###########################################################
|
|
|
|
pload DCAF
|
|
|
|
ReadStep d [locate_data_file bug21802_as1-oc-214.stp]
|
|
UndoLimit d 1
|
|
OpenCommand d
|
|
XUnSetLayer d 0:1:1:3 256
|
|
CommitCommand d
|
|
Undo d
|
|
|
|
set info [XGetLayerRefs d 0:1:3:1]
|
|
if { [regexp "0:1:1:3" $info] != 1 } {
|
|
puts "Error: child not restored on Undo"
|
|
} else {
|
|
puts "OK: child restored on Undo"
|
|
}
|