correction of bugs 3390 & 2914
Sylvestre Koumar [Tue, 26 Aug 2008 11:55:35 +0000 (11:55 +0000)]
scilab/modules/graphics/macros/contour.sci
scilab/modules/graphics/macros/contour2d.sci
scilab/modules/graphics/macros/polarplot.sci
scilab/modules/graphics/tests/nonreg_tests/bug_2914.tst [new file with mode: 0644]
scilab/modules/graphics/tests/nonreg_tests/bug_3390.tst

index b0367a9..2131e60 100644 (file)
@@ -87,7 +87,7 @@ function contour(x,y,z,nz,theta,alpha,leg,flag,ebox,zlev)
     cnt = cnt+1
     if stripblanks(fpf)<>'' then
       xstring(xc(k+1+n/2),yc(k+1+n/2)," "+msprintf(fpf,level))
-      e=gce();e.data(3)=zz
+      e=gce();e.data(3)=zz;e.clip_state = "off"
       cnt=cnt+1
     end
     k=k+n+1;
index 4ab5be2..f7983c7 100644 (file)
@@ -105,6 +105,7 @@ while k < length(xc)
 
    if stripblanks(fpf)<>'' then
       xstring(xc(k+1+n/2),yc(k+1+n/2)," "+msprintf(fpf,level))
+         e = gce();e.clip_state = "off"
       cnt=cnt+1;
    end
    k=k+n+1;
index 5194bcd..188d61d 100644 (file)
@@ -61,11 +61,15 @@ for k=1:4
   xarc(-r,r,2*r,2*r,0,360*64)
   xset("dashes",1)
   xstring((r+dr)*cos(5*%pi/12),(r+dr)*sin(5*%pi/12),string(round(10*r)/10))
+  //clipping off 
+  e = gce();e.clip_state = "off"
   r=r+step
 end
 xset("dashes",1)
 xarc(-r,r,2*r,2*r,0,360*64)
 xstring((r+dr)*cos(5*%pi/12),(r+dr)*sin(5*%pi/12),string(round(10*r)/10))
+//clipping off 
+e = gce();e.clip_state = "off"
 
 rect=xstringl(0,0,'360');w=rect(3);h=rect(4);d=sqrt(w^2+h^2)/1.8
 r=rm+d
@@ -73,7 +77,9 @@ for k=0:11
   xset("dashes",3)
   xsegs([0;rm*cos(k*(%pi/6))],[0;rm*sin(k*(%pi/6))])
   xset("dashes",1)
+  //clipping off 
   xstring(r*cos(k*(%pi/6))-w/2,r*sin(k*(%pi/6))-h/2,string(k*30))
+  e = gce();e.clip_state = "off"
 end
 xset("dashes",1)
 endfunction
diff --git a/scilab/modules/graphics/tests/nonreg_tests/bug_2914.tst b/scilab/modules/graphics/tests/nonreg_tests/bug_2914.tst
new file mode 100644 (file)
index 0000000..726c27e
--- /dev/null
@@ -0,0 +1,43 @@
+// =============================================================================\r
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab\r
+// Copyright (C) 2008-2008 - INRIA - Sylvestre Koumar\r
+//\r
+//  This file is distributed under the same license as the Scilab package.\r
+// =============================================================================\r
+\r
+// <-- TEST WITH GRAPHIC -->\r
+\r
+// <-- Non-regression test for bug 2914 -->\r
+//\r
+// <-- Bugzilla URL -->\r
+// http://bugzilla.scilab.org/show_bug.cgi?id=2914\r
+//\r
+// <-- Short Description -->\r
+// some values on polar axes have been removed (to compare with scilab 4.1.2)\r
+// see help polarplot\r
+// the same bug was reported for "contour()"\r
+\r
+polarplot()\r
+//contour()\r
+a = gca(); \r
\r
+function TextChildren(a)\r
+\r
+    children = a.children;\r
+       for k=1:size(children, 1)\r
+               handle = children(k);\r
+               if(handle.type == "Text") then\r
+                       if(handle.clip_state <> "off") then\r
+                               pause;\r
+                       end\r
+               end\r
+        TextChildren(children(k));\r
+       end     \r
+       \r
+endfunction\r
+\r
+TextChildren(a);\r
+\r
+\r
+\r
+\r
index 676b3d2..1ab0c84 100644 (file)
@@ -1,27 +1,27 @@
-// =============================================================================\r
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab\r
-// Copyright (C) 2006-2008 - INRIA - Sylvestre Koumar <sylvestre.koumar@inria.fr>\r
-//\r
-//  This file is distributed under the same license as the Scilab package.\r
-// =============================================================================\r
-\r
-// <-- TEST WITH GRAPHIC -->\r
-\r
-// <-- Non-regression test for bug 3390 -->\r
-//\r
-// <-- Bugzilla URL -->\r
-// http://bugzilla.scilab.org/show_bug.cgi?id=3390\r
-//\r
-// <-- Short Description -->\r
-//    Scilab 5\r
-//    When sca() is called with a bad number of argument, the returned error is not clear at all.\r
-\r
-//     -->sca()\r
-//  !--error 4 \r
-//  Undefined variable: h\r
-//\r
-//  at line       2 of function sca called by :  \r
-//  sca()\r
-\r
-\r
+// =============================================================================
+// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
+// Copyright (C) 2006-2008 - INRIA - Sylvestre Koumar <sylvestre.koumar@inria.fr>
+//
+//  This file is distributed under the same license as the Scilab package.
+// =============================================================================
+
+// <-- TEST WITH GRAPHIC -->
+
+// <-- Non-regression test for bug 3390 -->
+//
+// <-- Bugzilla URL -->
+// http://bugzilla.scilab.org/show_bug.cgi?id=3390
+//
+// <-- Short Description -->
+//    Scilab 5
+//    When sca() is called with a bad number of argument, the returned error is not clear at all.
+
+//     -->sca()
+//  !--error 4 
+//  Undefined variable: h
+//
+//  at line       2 of function sca called by :  
+//  sca()
+
+
 sca()
\ No newline at end of file