Updating test for current state of OCCT
authordbv <dbv@opencascade.com>
Thu, 7 Mar 2013 10:23:33 +0000 (14:23 +0400)
committerdbv <dbv@opencascade.com>
Thu, 7 Mar 2013 10:23:33 +0000 (14:23 +0400)
src/QABugs/QABugs_19.cxx
tests/bugs/modalg_3/bug22595 [new file with mode: 0644]
tests/bugs/vis/bug22332 [new file with mode: 0644]

index b3c98a1..6f6265d 100755 (executable)
@@ -277,6 +277,16 @@ Standard_Integer OCC22611 (Draw_Interpretor& di, Standard_Integer argc, const ch
   return 0;
 }
 
+Standard_Integer OCC22595 (Draw_Interpretor& di, Standard_Integer argc, const char ** argv)
+{
+  gp_Mat M0;
+  di << "M0 = "
+  << " {" << M0(1,1) << "} {" << M0(1,2) << "} {" << M0(1,3) <<"}"
+  << " {" << M0(2,1) << "} {" << M0(2,2) << "} {" << M0(2,3) <<"}"
+  << " {" << M0(1,1) << "} {" << M0(1,2) << "} {" << M0(1,3) <<"}";
+  return 0;
+}
+
 void QABugs::Commands_19(Draw_Interpretor& theCommands) {
   const char *group = "QABugs";
 
@@ -287,6 +297,7 @@ void QABugs::Commands_19(Draw_Interpretor& theCommands) {
   theCommands.Add ("OCC22980", "OCC22980", __FILE__, OCC22980, group);
   theCommands.Add ("OCC23595", "OCC23595", __FILE__, OCC23595, group);
   theCommands.Add ("OCC22611", "OCC22611 string nb", __FILE__, OCC22611, group);
+  theCommands.Add ("OCC22595", "OCC22595", __FILE__, OCC22595, group);
 
   return;
 }
diff --git a/tests/bugs/modalg_3/bug22595 b/tests/bugs/modalg_3/bug22595
new file mode 100644 (file)
index 0000000..f587f7a
--- /dev/null
@@ -0,0 +1,51 @@
+puts "============"
+puts "OCC22595"
+puts "============"
+puts ""
+######################################################
+# gp_Mat's constructors incompletely initilize memory
+######################################################
+
+set BugNumber OCC22595
+pload QAcommands
+
+set Min_ListLength 11
+
+set List [ OCC22595 ]
+
+set status 0
+set ListLength [llength ${List}]
+
+if { ${ListLength} != ${Min_ListLength}} {
+   set status 1
+   puts "Error: ListLength = ${ListLength}"
+}
+
+set index0 0
+set M11  [lindex ${List} [expr ${index0} +2]]
+set M12  [lindex ${List} [expr ${index0} + 3 ]]
+set M13  [lindex ${List} [expr ${index0} + 4 ]]
+set M21  [lindex ${List} [expr ${index0} + 5 ]]
+set M22  [lindex ${List} [expr ${index0} + 6 ]]
+set M23  [lindex ${List} [expr ${index0} + 7 ]]
+set M31  [lindex ${List} [expr ${index0} + 8 ]]
+set M32  [lindex ${List} [expr ${index0} + 9 ]]
+set M33  [lindex ${List} [expr ${index0} + 10 ]]
+
+if { ${M11} != 0 || ${M12} != 0 || ${M13} != 0 } {
+   set status 1
+}
+if { ${M21} != 0 || ${M22} != 0 || ${M23} != 0 } {
+   set status 1
+}
+if { ${M31} != 0 || ${M32} != 0 || ${M33} != 0 } {
+   set status 1
+}
+if { $status != 0 } {
+    puts  "Faulty $BugNumber"
+} else {
+    puts  "OK $BugNumber"
+}
+
+
+
diff --git a/tests/bugs/vis/bug22332 b/tests/bugs/vis/bug22332
new file mode 100644 (file)
index 0000000..d5b7e9e
--- /dev/null
@@ -0,0 +1,41 @@
+puts "============"
+puts "OCC22332"
+puts "============"
+puts ""
+
+######################################################
+# 
+######################################################
+
+set BUGNUMBER OCC22332
+
+vinit
+vclear
+box b 100 100 100
+vsetdispmode b 1
+vdisplay b
+vtrihedron tri
+vfit
+vmoveto 0 0
+
+# TEST LINEWIDTH
+# draw a 10px horizontal line at (10,10) - (400,10)
+vlayerline 10 10 400 10 10
+
+checkcolor 15 5 1 0 0
+checkcolor 15 13 1 0 0
+checkcolor 15 14 0 0 0
+
+# TEST LINETYPE
+# draw a slashed 10px horizontal line at (10,10) - (400,10)
+vlayerline 10 10 400 10 10 1
+
+checkcolor 23 10 1 0 0
+checkcolor 25 10 1 0 0
+checkcolor 26 10 0 0 0
+checkcolor 30 10 0 0 0
+checkcolor 32 10 1 0 0
+
+set only_screen 1
+