1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-03 17:56:21 +03:00
occt/tests/bugs/modalg_4/bug745_12
apn 9aa684edf4 0025987: Integration part of modified unstable test cases
Unstable test cases were reviewed
Modified test cases using checktrend command
Modified test cases for Linux platform
Modified test cases for Debug mode
2015-03-26 18:10:29 +03:00

44 lines
1.4 KiB
Plaintext
Executable File

puts "TODO OCC23748 ALL: Error: Offset is not done."
puts "TODO OCC23748 ALL: Faulty OCC745"
puts "========"
puts "OCC745"
puts "========"
puts ""
##################################################
# Exception thrown: Standard_ConstructionError: Offset wire is not closed.
##################################################
restore [locate_data_file OCC745_nb3.brep] w
checkshape w
if { [catch { mkoffset result w 1 10 } status] } {
puts "Faulty OCC745"
} else {
renamevar result_1 result
set nb_info [nbshapes result]
regexp {VERTEX +: +([-0-9.+eE]+)} $nb_info full ve
puts [format "Result shape result contains %s vertexes" $ve]
if { $ve == 0 } {
puts [format "Faulty : Result shape is NULL shape"]
} else {
regexp {WIRE +: +([-0-9.+eE]+)} $nb_info full wi
if {$wi > 1 } {
set ll [explode result w]
set num [llength $ll]
puts [format "Faulty : Result shape result is COMPOUND and contains %s wires" $num]
foreach {k} $ll {
checkshape $k
regexp {nb alone Vertices : ([-0-9.+eE]+)} [checksection $k] full cs
if { $cs != 0 } {
puts [format "Faulty : Result shape is UNclosed wire !!! " $k]
} else {
puts [format "OK: Result shape is CLOSED wire !!! "]
}
}
}
}
set length 0
set 2dviewer 0
}