mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-08 18:40:55 +03:00
25 lines
555 B
Plaintext
Executable File
25 lines
555 B
Plaintext
Executable File
|
|
puts "========="
|
|
puts " OCC956 "
|
|
puts "(case 1)"
|
|
puts "========="
|
|
puts ""
|
|
###############################################
|
|
##possible regression in KAS:dev on checkshape. Fails on valid shape
|
|
###############################################
|
|
|
|
restore [locate_data_file OCC956_1.brep] result
|
|
|
|
decho off
|
|
set che [checkshape result]
|
|
decho on
|
|
|
|
if { [regexp {Faulty} $che] } {
|
|
puts "Faulty OCC956 (case 1): Checkshape says that the shape is incorrect, but it is not truth"
|
|
} else {
|
|
puts "OCC956 OK (case 1): Checkshape works properly"
|
|
}
|
|
|
|
set 2dviewer 0
|
|
|