Incoporate non-regression test files in the scilab source tree

3 files changed, 0 insertions, 117 deletions

diff --git a/tests/nonRegression/bug1590.sci b/tests/nonRegression/bug1590.sci
deleted file mode 100644
index ecacdca..0000000
--- a/tests/nonRegression/bug1590.sci
+++ /dev/null
@@ -1,53 +0,0 @@
-// <-- Non-regression test for bug 1590 -->
-//
-// <-- Bugzilla URL -->
-// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=1590
-//
-// <-- Short Description -->
-//    clipboard function crashes scilab when called from a script
-
-
-if MSDOS then
-   if ( ~or(sciargs()==['-nw']) & ~or(sciargs()==['-nwni']) ) then
-    a="put in clipboard";
-    clipboard('copy',a);
-    a1=clipboard('paste');
-    if (a<>a1) then affich_result(%F,1590),return,end;
-
-    b=123.4;
-    clipboard('copy',b);
-    b1=clipboard('paste');
-    if (string(b)<>b1) then affich_result(%F,1590),return,end;
-
-    c=["put","in","clipboard"];
-    clipboard('copy',c);
-    c1=clipboard('paste');
-    if ("put in clipboard "<>c1) then affich_result(%F,1590),return,end;
-  end
-
-  scf(2);
-  plot();
-  clipboard(2,'EMF');
-  if ( ~or(sciargs()==['-nw']) & ~or(sciargs()==['-nwni']) ) then
-    clipboard('do','empty');
-  end
-
-  scf(3);
-  plot3d();
-  clipboard(3,'DIB');
-  if ( ~or(sciargs()==['-nw']) & ~or(sciargs()==['-nwni']) ) then
-    clipboard('do','empty');
-  end
-
-
-    if ( ~or(sciargs()==['-nw']) & ~or(sciargs()==['-nwni']) ) then
-    d=rand(3,5);
-    clipboard('copy',d);
-    d1=clipboard('paste');
-    da=strcat(string(d)'+' ');
-    db=strsubst(d1',char(10),'');
-    if (da<>db)  then affich_result(%F,1590),return,end;
-  end
-end
-
-affich_result(%T,1590);
diff --git a/tests/nonRegression/bug1602.sci b/tests/nonRegression/bug1602.sci
deleted file mode 100644
index 03f30ff..0000000
--- a/tests/nonRegression/bug1602.sci
+++ /dev/null
@@ -1,34 +0,0 @@
-// <-- Non-regression test for bug 1602 -->
-//
-// <-- Bugzilla URL -->
-// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=1602
-//
-// <-- Short Description -->
-//    contour2d don't work well with frameflag=4 (while the workaround
-//    which consists of providing frameflag=3 + rect=[xmin,ymin,xmax,ymax]
-//    works). This is with a cvs version of yesterday. See an example
-//    in steps to ...
-//
-//     Bruno
-
-// Copyright INRIA
-// Scilab Project - Jean-Baptiste Silvy
-// Copyright INRIA 2006
-// Date : 11 janvier 2006
-
-clf();
-
-x = linspace(-0.95,0.95,80);
-z = x'*x;  // z(x,y) = x*y in fact
-clf()
-contour2d(x,x,z,8,frameflag=4);
-a = gca();
-
-data_boundsRef = [ -0.95, -0.95 ; 0.95, 0.95 ] ;
-
-// check that xfarc fill the arc and don't draw the limit
-if ( a.data_bounds == data_boundsRef ) then
-  affich_result(%T,1602);
-else
-  affich_result(%F,1602);
-end
diff --git a/tests/nonRegression/bug1619.sci b/tests/nonRegression/bug1619.sci
deleted file mode 100644
index bfd9d31..0000000
--- a/tests/nonRegression/bug1619.sci
+++ /dev/null
@@ -1,30 +0,0 @@
-// <-- Non-regression test for bug 1619 -->
-//
-// <-- Bugzilla URL -->
-// http://www.scilab.org/cgi-bin/bugzilla_bug_II/show_bug.cgi?id=1619
-//
-// <-- Short Description -->
-//    macr2tree doesn't like functions compiled for profiling. It hates them 
-//    so much,
-//    that causes spectacular crashes of scilab.
-
-// Copyright INRIA
-// Scilab Project - Serge Steer
-// Copyright INRIA 2006
-// Date : 2 octobre 2006
-
-deff('x=foo(n)',['if n==0 then'
-                 '  x=[]'
-                 'else'
-                 '  x=0'
-                 '  for k=1:n'
-                 '    s=svd(rand(n+10,n+10))'
-                 '    x=x+s(1)'
-                 '  end'
-                 'end'],'p')
-T1=execstr('T=macr2tree(foo)','errcatch')==0;
-clear foo;
-function y=foo(),y=sin(33)+1;endfunction
-foo(); //execution creates a deleted op in the pseudo code of foo
-T2=execstr('macr2tree(foo)','errcatch')==0
-affich_result(T1&T2,1619);