Adjusting testing cases for current state of OCCT

diff --git a/src/DrawResources/TestCommands.tcl b/src/DrawResources/TestCommands.tcl
index 7aeaa81..ccc0727 100644 (file)
--- a/src/DrawResources/TestCommands.tcl
+++ b/src/DrawResources/TestCommands.tcl
@@ -1872,6 +1872,7 @@ proc _check_file_format {file} {
 proc load_data_file {file format shape} {
     switch $format {
     BREP { uplevel restore $file $shape }
 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 }
     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 }

diff --git a/tests/bugs/moddata/bug23475 b/tests/bugs/moddata/bug23475
index 30150d5..7b306f3 100755 (executable)
--- a/tests/bugs/moddata/bug23475
+++ b/tests/bugs/moddata/bug23475
@@ -6,7 +6,7 @@ puts ""
 # Wrong result of Geom_BSpline_Surface::IsVClosed()
 ###############################################################################
 
 # 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} {
 set info [dump s1]
 
 if { [regexp "BSplineSurface vclosed" $info] != 1} {

diff --git a/tests/mesh/data/standard/W5 b/tests/mesh/data/standard/W5
index 110464e..586c0fa 100755 (executable)
--- a/tests/mesh/data/standard/W5
+++ b/tests/mesh/data/standard/W5
@@ -11,6 +11,6 @@ if { [string compare $command "shading"] == 0 } {
 } else {
   set nbwithouttri(All) 91
   set nbcross(All) 11
 } 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

 }
 }