Correction of unstable testing cases
[occt.git] / tests / bugs / modalg_1 / bug1665
CommitLineData
352ffd73 1puts "========"
2puts "OCC1665"
3puts "========"
4############################################################
5## Geom_BSplineSurface::SetVPeriodic throws an exception
6############################################################
7
8restore [locate_data_file OCC1665.draw] a
9
10if {[catch {setvperiodic a} message]} {
11 puts "OCC1665 FAULTY : setvperiodic"
12} else {
13 if {[catch {mkface result a} message]} {
14 puts "OCC1665 FAULTY : mkface"
15 } else {
352ffd73 16 set nb_e_good 3
17 }
18}
19
20set square 12265.3
21set 3dviewer 2