mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
0e443e130c
Test parse rules are improved to recognize messages with word 'fail' or 'failure' as errors. Test cases are corrected accordingly (TODO or REQUIRED statements added where fail messages were not noticed previously).
48 lines
1.2 KiB
Plaintext
Executable File
48 lines
1.2 KiB
Plaintext
Executable File
puts "TODO OCC25915 ALL: FAILED during Triangulation"
|
|
puts "TODO OCC25915 ALL: Triangulation FAILED for 1 of 2 Faces"
|
|
puts "TODO OCC25915 ALL: Faulty OCC825"
|
|
puts "TODO OCC25915 ALL: Faulty shapes in variables faulty_1 to faulty_"
|
|
|
|
pload QAcommands
|
|
|
|
puts "============"
|
|
puts "OCC825"
|
|
puts "============"
|
|
puts ""
|
|
######################################
|
|
## BRepAlgoAPI_Cut fails on sphere and b-spline face
|
|
######################################
|
|
## (old topology)
|
|
#####################################
|
|
|
|
if { [ catch { set info_result [OCC825 a1 a2 a3 res1 res2] } ] } {
|
|
puts "Faulty OCC825"
|
|
} else {
|
|
if { [regexp {FAILED} $info_result] } {
|
|
puts "Faulty OCC825"
|
|
}
|
|
|
|
set ExplodeList [explode res1]
|
|
if {[llength ${ExplodeList}] < 1} {
|
|
puts "Faulty OCC825"
|
|
}
|
|
|
|
set ExplodeList [explode res2]
|
|
if {[llength ${ExplodeList}] < 1} {
|
|
puts "Faulty OCC825"
|
|
}
|
|
|
|
checkshape res1
|
|
checkprops res1 -s 5890.42
|
|
checknbshapes res1 -face 2 -shell 1 -solid 1 -compsolid 0 -compound 1 -shape 15
|
|
|
|
renamevar res2 result
|
|
}
|
|
|
|
checkshape result
|
|
checkprops result -s 5890.42
|
|
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|
|
|
|
|