a stupid mistake in the ENGLISH IMPOSED tag
Yann Collette [Tue, 30 Jun 2009 12:59:37 +0000 (14:59 +0200)]
13 files changed:
scilab/modules/core/tests/unit_tests/argn.dia.ref
scilab/modules/core/tests/unit_tests/argn.tst
scilab/modules/core/tests/unit_tests/clause.dia.ref
scilab/modules/core/tests/unit_tests/clause.tst
scilab/modules/core/tests/unit_tests/comand.dia.ref
scilab/modules/core/tests/unit_tests/comand.tst
scilab/modules/core/tests/unit_tests/comp.dia.ref
scilab/modules/core/tests/unit_tests/comp.tst
scilab/modules/core/tests/unit_tests/errcatch.tst
scilab/modules/core/tests/unit_tests/fptr.dia.ref
scilab/modules/core/tests/unit_tests/fptr.tst
scilab/modules/core/tests/unit_tests/funcprot.dia.ref
scilab/modules/core/tests/unit_tests/funcprot.tst

index f25c74a..f003b31 100644 (file)
@@ -4,8 +4,9 @@
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
 //argn
+funcprot(0);
 deff("[x,y]=foo(a,b)','[lhs,rhs]=argn(0);x=[lhs,rhs];y=-1')
 if or(foo(1)<>[1 1]) then bugmes();quit;end
 if or(foo(1,2)<>[1 2]) then bugmes();quit;end
@@ -14,15 +15,11 @@ if or(foo()<>[1 0]) then bugmes();quit;end
 [x,y]=foo(1,1);if or(x<>[2 2]) then bugmes();quit;end
 [x,y]=foo();if or(x<>[2 0]) then bugmes();quit;end
 deff('[x,y]=foo(a,b)','lhs=argn(0);x=lhs;y=-1')
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if foo(1)<>1 then bugmes();quit;end
 if foo(1,2)<>1 then bugmes();quit;end
 [x,y]=foo(1);if x<>2 then bugmes();quit;end
 //
 deff('[x,y]=foo(a,b)','[lhs,rhs]=argn();x=[lhs,rhs];y=-1')
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if or(foo(1)<>[1 1]) then bugmes();quit;end
 if or(foo(1,2)<>[1 2]) then bugmes();quit;end
 if or(foo()<>[1 0]) then bugmes();quit;end
@@ -30,8 +27,6 @@ if or(foo()<>[1 0]) then bugmes();quit;end
 [x,y]=foo(1,1);if or(x<>[2 2]) then bugmes();quit;end
 [x,y]=foo();if or(x<>[2 0]) then bugmes();quit;end
 deff('[x,y]=foo(a,b)','lhs=argn();x=lhs;y=-1')
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if foo(1)<>1 then bugmes();quit;end
 if foo(1,2)<>1 then bugmes();quit;end
 [x,y]=foo(1);if x<>2 then bugmes();quit;end
index 573cbd9..d03f43c 100644 (file)
@@ -5,10 +5,12 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
 
 //argn
 
+funcprot(0);
+
 deff("[x,y]=foo(a,b)','[lhs,rhs]=argn(0);x=[lhs,rhs];y=-1')
 if or(foo(1)<>[1 1]) then pause,end
 if or(foo(1,2)<>[1 2]) then pause,end
index 472b7c2..f94a5aa 100644 (file)
@@ -4,7 +4,8 @@
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
+funcprot(0);
 deff('[y]=t(x)',[
 'y=0'
 'if x>0 then'
@@ -36,8 +37,6 @@ if t(-1)<>1 then bugmes();quit;end
 //
 t1=t;
 comp(t1)
-Attention: redéfinition de la fonction: t1                      . Utilisez funcprot(0) pour éviter ce message
-
 if t(0)-t1(0)<>0 then bugmes();quit;end
 if t(1)-t1(1)<>0 then bugmes();quit;end
 if t(-1)-t1(-1)<>0 then bugmes();quit;end
@@ -73,8 +72,6 @@ if tt1()<>4 then bugmes();quit;end
 // while
 //----------------------------------------
 deff('[k]=tt1()','k=0,while k<10 ,k=k+1;if k==3 then break,end,end,k=k+1','n')
-Attention: redéfinition de la fonction: tt1                     . Utilisez funcprot(0) pour éviter ce message
-
 if tt1()<>4 then bugmes();quit;end
 if tt1()<>4 then bugmes();quit;end
 clear tt1
@@ -137,8 +134,6 @@ deff('c=foo(n)','c=[];for k=1:5,if k==n then continue,end,c=[c,k],end','n')
 if or(foo(3)<>[1 2 4 5]) then bugmes();quit;end
 if or(foo(5)<>[1 2 3 4]) then bugmes();quit;end
 comp(foo)
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if or(foo(3)<>[1 2 4 5]) then bugmes();quit;end
 if or(foo(5)<>[1 2 3 4]) then bugmes();quit;end
 n=3;
@@ -148,13 +143,9 @@ n=4;
 c=[];for i=1:3,for k=1:4,if k==n&i==2 then continue,end,c=[c,k];end;end
 if or(c<> [1,2,3,4, 1,2,3, 1,2,3,4]) then bugmes();quit;end
 deff('c=foo(n)','c=[];for i=1:3,for k=1:4,if k==n&i==2 then continue,end,c=[c,k];end;end','n')
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if or(foo(3)<>[1,2,3,4, 1,2,4, 1,2,3,4]) then bugmes();quit;end
 if or(foo(4)<>[1,2,3,4, 1,2,3, 1,2,3,4]) then bugmes();quit;end
 comp(foo)
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if or(foo(3)<>[1,2,3,4, 1,2,4, 1,2,3,4]) then bugmes();quit;end
 if or(foo(4)<>[1,2,3,4, 1,2,3, 1,2,3,4]) then bugmes();quit;end
 //in a while
@@ -167,13 +158,9 @@ n=5;
 c=[];k=0;while k<5,k=k+1;if k==n then continue,end,c=[c,k];end
 if or(c<>[1 2 3 4]) then bugmes();quit;end
 deff('c=foo(n)','c=[];k=0;while k<5,k=k+1;if k==n then continue,end,c=[c,k],end','n')
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if or(foo(3)<>[1 2 4 5]) then bugmes();quit;end
 if or(foo(5)<>[1 2 3 4]) then bugmes();quit;end
 comp(foo)
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if or(foo(3)<>[1 2 4 5]) then bugmes();quit;end
 if or(foo(5)<>[1 2 3 4]) then bugmes();quit;end
 n=3;
@@ -187,7 +174,5 @@ deff('c=foo(n)','c=[];for i=1:3,k=0;while k<4,k=k+1;if k==n&i==2 then continue,e
 if or(foo(3)<>[1,2,3,4, 1,2,4, 1,2,3,4]) then bugmes();quit;end
 if or(foo(4)<>[1,2,3,4, 1,2,3, 1,2,3,4]) then bugmes();quit;end
 comp(foo)
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if or(foo(3)<>[1,2,3,4, 1,2,4, 1,2,3,4]) then bugmes();quit;end
 if or(foo(4)<>[1,2,3,4, 1,2,3, 1,2,3,4]) then bugmes();quit;end
index ef88682..5d180e7 100644 (file)
@@ -5,7 +5,9 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
+
+funcprot(0);
 
 deff('[y]=t(x)',[
 'y=0'
index 106cb84..deba8c9 100644 (file)
@@ -5,6 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 // <!-- ENGLISH IMPOSED -->
+funcprot(0);
 clear //sdfdgd
 clear//sdfdgd
 a=1;
@@ -38,8 +39,6 @@ foo aaa bbb cc//qdsddfd
  aaabbbcc   
 if ans<>'aaabbbcc' then bugmes();quit;end
 deff('y=foo(a,b,c)','y=a+b+c')
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 foo aaa bbb   cc
  ans  =
  
index 7881e28..67c9ff6 100644 (file)
@@ -7,6 +7,8 @@
 
 // <!-- ENGLISH IMPOSED -->
 
+funcprot(0);
+
 clear //sdfdgd
 clear//sdfdgd
 a=1;
index e2f96ef..8c48c33 100644 (file)
@@ -6,8 +6,7 @@
 // =============================================================================
 // <!-- ENGLISH IMPOSED -->
 // comp
+funcprot(0);
 deff("[a]=foo()","a=1","n")
 comp(foo);
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if foo()<>1 then bugmes();quit;end
index c88c7f5..5ae5d1d 100644 (file)
@@ -9,6 +9,8 @@
 
 // comp
 
+funcprot(0);
+
 deff("[a]=foo()","a=1","n")
 comp(foo);
 if foo()<>1 then pause,end
index becfdaf..beaf51e 100644 (file)
@@ -5,7 +5,9 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
+
+funcprot(0);
 
 clear;
 
index d4709fa..c75d47a 100644 (file)
@@ -4,8 +4,9 @@
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
 //tests on functions pointer usage
+funcprot(0);
 f=exp
  f  =
  
@@ -29,15 +30,9 @@ if l.fun(1)<> exp(1) then bugmes();quit;end
 function y=foo(fun,x),y=fun(x),endfunction
 if foo(exp,1)<>exp(1) then bugmes();quit;end
 function y=foo(fun,x,y),y=fun(x,y),endfunction
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if foo(atan,1,0)<>atan(1,0) then bugmes();quit;end
 function y=foo(fun),y=[],for x=1:3,y=[y,fun(x)],end,endfunction
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if foo(exp)<>exp(1:3) then bugmes();quit;end
 l=tlist(['foo','funs'],list(exp,sin,cos));
 function y=foo(l),y=[],for k=1:3,y=[y,l.funs(k)(1)],end,endfunction
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
-
 if or(foo(l)<>[exp(1),sin(1),cos(1)]) then bugmes();quit;end
index 344712d..dc031c1 100644 (file)
@@ -5,10 +5,12 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
 
 //tests on functions pointer usage
 
+funcprot(0);
+
 f=exp
 if type(f)<>130 then pause,end
 if f(1)<>exp(1) then pause,end
index ce1cd1c..aad9fc5 100644 (file)
@@ -4,7 +4,7 @@
 //
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
 //funcprot
 deff("foo()","a=1");
 funcprot(0);
@@ -14,10 +14,10 @@ deff("foo()","a=2");
 funcprot(1);
 if funcprot() <> 1 then bugmes();quit;end
 if execstr("deff(""foo()"",""a=3"");","errcatch") <> 0 then bugmes();quit;end
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
+Warning : redefining function: foo                     . Use funcprot(0) to avoid this message
 
 deff("foo()","a=4")
-Attention: redéfinition de la fonction: foo                     . Utilisez funcprot(0) pour éviter ce message
+Warning : redefining function: foo                     . Use funcprot(0) to avoid this message
 
 funcprot(2);
 if funcprot() <> 2 then bugmes();quit;end
index d5bbad3..81a8557 100644 (file)
@@ -5,7 +5,7 @@
 //  This file is distributed under the same license as the Scilab package.
 // =============================================================================
 
-// <!-- ENGLISH IMPOSED -->
+// <-- ENGLISH IMPOSED -->
 
 //funcprot