1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-05 18:16:23 +03:00
ski a8676008f7 Adding of testing cases from subgroups 937 940 and 941 of CHL group
Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing
Correction of end file in group v3d
Small correction of test case
2013-02-08 15:16:15 +04:00

30 lines
583 B
Plaintext
Executable File

puts "============"
puts "OCC12888"
puts "============"
puts ""
#######################################################################
# Wrong result of projection curve on surface
#######################################################################
set BugNumber OCC12888
restore [locate_data_file OCC12888_s1.draw] s1
restore [locate_data_file OCC12888_c2.draw] c2
set BugStatus 0
if [catch { project result c2 s1 } ] {
set BugStatus 1
}
# Resume
puts ""
if { ${BugStatus} != 0 } {
puts "Faulty ${BugNumber}"
} else {
puts "OK ${BugNumber}"
}
set 2dviewer 0