bug 11079 fixed: tlist(['r','num','den','dt'] replaced by rlist
[scilab.git] / scilab / modules / core / tests / unit_tests / macro.tst
index f5fd184..5a8879a 100644 (file)
@@ -495,28 +495,28 @@ deff('[f]=%p_r_p(p1,p2)',['[l,c]=size(p2);';
                         'if l*c <>1 then f=p1*invr(p2),return,end;';
                         '[l,c]=size(p1);';
                         '[p1 p2]=simp(p1,p2*ones(l,c));';
-                        'f=tlist([''r'',''num'',''den'',''dt''],p1,p2,[]);'],'n')
+                        'f=rlist(p1,p2,[]);'],'n')
  
  
  
 horn=horner;
 h=1/s;
-if cplist(h,tlist(['r','num','den','dt'],1,s,[]))==0 then pause,end
+if cplist(h,rlist(1,s,[]))==0 then pause,end
 h1=(z-1)/(z+1);
 hrn=horner(h,h1);
-if cplist(hrn , tlist(['r','num','den','dt'],z+1,z-1,[]))==0 then pause,end
+if cplist(hrn , rlist(z+1,z-1,[]))==0 then pause,end
 //
 hrn=horner(h,h1);
-if cplist(hrn , tlist(['r','num','den','dt'],z+1,z-1,[]))==0 then pause,end
+if cplist(hrn , rlist(z+1,z-1,[]))==0 then pause,end
 //
 h=1/s;
-if cplist(h,tlist(['r','num','den','dt'],1,s,[]))==0 then pause,end
+if cplist(h,rlist(1,s,[]))==0 then pause,end
 h1=(z-1)/(z+1);
 hrn=horn(h,h1);
-if cplist(hrn , tlist(['r','num','den','dt'],z+1,z-1,[]))==0 then pause,end
+if cplist(hrn , rlist(z+1,z-1,[]))==0 then pause,end
 //
 hrn=horn(h,h1);
-if cplist(hrn , tlist(['r','num','den','dt'],z+1,z-1,[]))==0 then pause,end
+if cplist(hrn , rlist(z+1,z-1,[]))==0 then pause,end
 //
 //
 //