mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
f523acf0b4
Correct filling of the history of the modifications of the shapes in ShapeUpgrade_UnifySameDomain algorithm. Test cases for the issue.
74 lines
2.9 KiB
Plaintext
74 lines
2.9 KiB
Plaintext
puts "=========="
|
|
puts "OCC28226"
|
|
puts "=========="
|
|
puts ""
|
|
#####################################################################
|
|
# Incorrect history support in ShapeUpgrade_UnifySameDomain algorithm
|
|
#####################################################################
|
|
|
|
restore [locate_data_file bug28228_face.brep] a
|
|
|
|
explode a f
|
|
explode a_1 v
|
|
explode a e
|
|
|
|
unifysamedom result a a_3 a_1_3 a_1_4
|
|
|
|
set bug_info [unifysamedommod res a_9]
|
|
set bug_info [string trim [string range $bug_info 0 [expr {[string first "\n" $bug_info] - 1}]]]
|
|
if {$bug_info != "The shape has not been modified"} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedommod does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedommod res a_10]
|
|
if {$bug_info != ""} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedommod does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedommod res a_11]
|
|
if {$bug_info != ""} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedommod does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedommod res a_3]
|
|
set bug_info [string trim [string range $bug_info 0 [expr {[string first "\n" $bug_info] - 1}]]]
|
|
if {$bug_info != ""} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedommod does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedomisdel a_3]
|
|
set bug_info [string trim [string range $bug_info 0 [expr {[string first "\n" $bug_info] - 1}]]]
|
|
if {$bug_info != "The shape has not been deleted"} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedomisdel does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedomisdel a_9]
|
|
set bug_info [string trim [string range $bug_info 0 [expr {[string first "\n" $bug_info] - 1}]]]
|
|
if {$bug_info != "The shape has been deleted"} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedomisdel does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedomisdel a_1_8]
|
|
set bug_info [string trim [string range $bug_info 0 [expr {[string first "\n" $bug_info] - 1}]]]
|
|
if {$bug_info != "The shape has been deleted"} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedomisdel does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedomisdel a_1_9]
|
|
set bug_info [string trim [string range $bug_info 0 [expr {[string first "\n" $bug_info] - 1}]]]
|
|
if {$bug_info != "The shape has been deleted"} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedomisdel does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedomisdel a_10]
|
|
set bug_info [string trim [string range $bug_info 0 [expr {[string first "\n" $bug_info] - 1}]]]
|
|
if {$bug_info != "The shape has not been deleted"} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedomisdel does not work correctly."
|
|
}
|
|
|
|
set bug_info [unifysamedomisdel a_11]
|
|
set bug_info [string trim [string range $bug_info 0 [expr {[string first "\n" $bug_info] - 1}]]]
|
|
if {$bug_info != "The shape has not been deleted"} {
|
|
puts "ERROR: OCC28226 is reproduced. Command unifysamedomisdel does not work correctly."
|
|
}
|