Adjusting testing cases for current state of OCCT
authorbugmaster <bugmaster@opencascade.com>
Fri, 16 Nov 2012 08:48:24 +0000 (12:48 +0400)
committerbugmaster <bugmaster@opencascade.com>
Fri, 16 Nov 2012 08:48:24 +0000 (12:48 +0400)
src/DrawResources/TestCommands.tcl
tests/bugs/moddata/bug23475
tests/mesh/data/standard/W5

index 7aeaa81..ccc0727 100644 (file)
@@ -1872,6 +1872,7 @@ proc _check_file_format {file} {
 proc load_data_file {file format shape} {
     switch $format {
     BREP { uplevel restore $file $shape }
+    DRAW { uplevel restore $file $shape }
     IGES { pload XSDRAW; uplevel igesbrep $file $shape * }
     STEP { pload XSDRAW; uplevel stepread $file __a *; uplevel renamevar __a_1 $shape }
     STL  { pload XSDRAW; uplevel readstl $shape $file }
index 30150d5..7b306f3 100755 (executable)
@@ -6,7 +6,7 @@ puts ""
 # Wrong result of Geom_BSpline_Surface::IsVClosed()
 ###############################################################################
 
-restore [locate_data_file bug23475.brep] s1
+restore [locate_data_file bug23475.draw] s1
 set info [dump s1]
 
 if { [regexp "BSplineSurface vclosed" $info] != 1} {
index 110464e..586c0fa 100755 (executable)
@@ -11,6 +11,6 @@ if { [string compare $command "shading"] == 0 } {
 } else {
   set nbwithouttri(All) 91
   set nbcross(All) 11
-  set bug_freenodes "OCC22687"
-  set nbfreenodes(All) 9
+  set bug_freenodes "OCC23473"
+  set nbfreenodes(All) 11
 }