update tests (localization) some messages aren't exactly the same than before ...

10 files changed, 208 insertions, 207 deletions

diff --git a/tests/basic_tests/algebra.dia.ref b/tests/basic_tests/algebra.dia.ref
index 3393941..ea3f57d 100644
--- a/tests/basic_tests/algebra.dia.ref
+++ b/tests/basic_tests/algebra.dia.ref
@@ -1988,6 +1988,7 @@ if U<>[]|S<>[]|V<>[]|rk<>0  then bugmes();quit;end
  
  
 if execstr('[U,S,V,rk]=svd([],'"e'")','errcatch') == 0 then bugmes();quit;end
+
  
  
 //Small dimension
@@ -2434,7 +2435,7 @@ if rk<>30 then bugmes();quit;end
 function c=cond(A)
   if A==[] then c=1,else S=svd(A);c=S($)/S(1),end
 endfunction
-Warning :redefining function: cond                    
+Warning : redefining function : cond                    
  
  
  
@@ -3022,7 +3023,7 @@ if Err(x*A*A'-b*A')>1000*%eps then bugmes();quit;end
 //==========================================================================
  
 function x=ldiv(A,B),x=A\B,endfunction
-Warning :redefining function: ldiv                    
+Warning : redefining function : ldiv                    
  
  
 //scalar division
@@ -3335,7 +3336,7 @@ A=testmat3(10000,5);
 if Err(diag(diag(X))-X)>200*%eps then bugmes();quit;end
  
 if Err(Ab-inv(X)*A*X)>200*%eps then bugmes();quit;end
- warning
+ Warning : 
  matrix is close to singular or badly scaled. rcond =    8.8818D-16
  
  
@@ -3349,7 +3350,7 @@ A=testmat3(10000+0.01*%i,5);
 if Err(diag(diag(X))-X)>200*%eps then bugmes();quit;end
  
 if Err(Ab-inv(X)*A*X)>200*%eps then bugmes();quit;end
- warning
+ Warning : 
  matrix is close to singular or badly scaled. rcond =    8.8818D-16
  
  
@@ -3363,7 +3364,7 @@ A=testmat3(10000,30);
 if Err(diag(diag(X))-X)>200*%eps then bugmes();quit;end
  
 if Err(Ab-inv(X)*A*X)>1000*%eps then bugmes();quit;end
- warning
+ Warning : 
  matrix is close to singular or badly scaled. rcond =    1.6313D-55
  
  
@@ -3377,7 +3378,7 @@ A=testmat3(10000+0.01*%i,30);
 if Err(diag(diag(X))-X)>200*%eps then bugmes();quit;end
  
 if Err(Ab-inv(X)*A*X)>1000*%eps then bugmes();quit;end
- warning
+ Warning : 
  matrix is close to singular or badly scaled. rcond =    1.6313D-55
  
  
diff --git a/tests/basic_tests/basiclink.dia.ref b/tests/basic_tests/basiclink.dia.ref
index 2339a35..ea60c01 100644
--- a/tests/basic_tests/basiclink.dia.ref
+++ b/tests/basic_tests/basiclink.dia.ref
@@ -25,7 +25,7 @@ if ~c_link('foo') then
    building shared library (be patient)
   exec loader.sce ;
 shared archive loaded
-Link done
+Link done.
   chdir(path)
  ans  =
  
diff --git a/tests/basic_tests/breakpoints.dia.ref b/tests/basic_tests/breakpoints.dia.ref
index 511ac67..ea9701f 100644
--- a/tests/basic_tests/breakpoints.dia.ref
+++ b/tests/basic_tests/breakpoints.dia.ref
@@ -79,91 +79,91 @@ MACRO NOT COMPILED
 lig()
 ligne 2
 ligne 8
-Stop after row     8 in function lig :
+Stop after row     8 in function lig.
  
  
 resume
 ligne 9
 ligne 11
-Stop after row    11 in function lig :
+Stop after row    11 in function lig.
  
  
 resume
 ligne 11
-Stop after row    11 in function lig :
+Stop after row    11 in function lig.
  
  
 resume
 ligne 11
-Stop after row    11 in function lig :
+Stop after row    11 in function lig.
  
  
 resume
 ligne 12
-Stop after row    12 in function lig :
+Stop after row    12 in function lig.
  
  
 resume
 ligne 17
-Stop after row    17 in function lig :
+Stop after row    17 in function lig.
  
  
 resume
 ligne 18
 ligne 23
-Stop after row    23 in function lig :
+Stop after row    23 in function lig.
  
  
 resume
 ligne 28
-Stop after row    28 in function lig :
+Stop after row    28 in function lig.
  
  
 resume
 ligne 29
 ligne 38
-Stop after row    38 in function lig :
+Stop after row    38 in function lig.
  
  
 resume
 ligne 39
-Stop after row    39 in function lig :
+Stop after row    39 in function lig.
  
  
 resume
 ligne 40
-Stop after row    40 in function lig :
+Stop after row    40 in function lig.
  
  
 resume
 ligne 43
-Stop after row    43 in function lig :
+Stop after row    43 in function lig.
  
  
 resume
 ligne 43
-Stop after row    43 in function lig :
+Stop after row    43 in function lig.
  
  
 resume
 ligne 43
-Stop after row    43 in function lig :
+Stop after row    43 in function lig.
  
  
 resume
 ligne 44
-Stop after row    44 in function lig :
+Stop after row    44 in function lig.
  
  
 resume
 ligne 47
 ligne 48
-Stop after row    48 in function lig :
+Stop after row    48 in function lig.
  
  
 resume
 comp(lig)
-Warning :redefining function: lig                     
+Warning : redefining function : lig                     
  
 write(%io(2),[' ';'COMPILED MACRO';'-----------------';' '])
  
@@ -173,86 +173,86 @@ COMPILED MACRO
 lig()
 ligne 2
 ligne 8
-Stop after row     8 in function lig :
+Stop after row     8 in function lig.
  
  
 resume
 ligne 9
 ligne 11
-Stop after row    11 in function lig :
+Stop after row    11 in function lig.
  
  
 resume
 ligne 11
-Stop after row    11 in function lig :
+Stop after row    11 in function lig.
  
  
 resume
 ligne 11
-Stop after row    11 in function lig :
+Stop after row    11 in function lig.
  
  
 resume
 ligne 12
-Stop after row    12 in function lig :
+Stop after row    12 in function lig.
  
  
 resume
 ligne 17
-Stop after row    17 in function lig :
+Stop after row    17 in function lig.
  
  
 resume
 ligne 18
 ligne 23
-Stop after row    23 in function lig :
+Stop after row    23 in function lig.
  
  
 resume
 ligne 28
-Stop after row    28 in function lig :
+Stop after row    28 in function lig.
  
  
 resume
 ligne 29
 ligne 38
-Stop after row    38 in function lig :
+Stop after row    38 in function lig.
  
  
 resume
 ligne 39
-Stop after row    39 in function lig :
+Stop after row    39 in function lig.
  
  
 resume
 ligne 40
-Stop after row    40 in function lig :
+Stop after row    40 in function lig.
  
  
 resume
 ligne 43
-Stop after row    43 in function lig :
+Stop after row    43 in function lig.
  
  
 resume
 ligne 43
-Stop after row    43 in function lig :
+Stop after row    43 in function lig.
  
  
 resume
 ligne 43
-Stop after row    43 in function lig :
+Stop after row    43 in function lig.
  
  
 resume
 ligne 44
-Stop after row    44 in function lig :
+Stop after row    44 in function lig.
  
  
 resume
 ligne 47
 ligne 48
-Stop after row    48 in function lig :
+Stop after row    48 in function lig.
  
  
 resume
@@ -264,69 +264,69 @@ clear lig shlig
 delbpt(),dispbpt()   // should display no output
 setbpt("foo1",0)    // should spit error 9997
                  !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 setbpt("foo1",-3)   // should spit error 9997
                   !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 setbpt("foo1",3.2)  // should spit error 9997
                    !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 setbpt("foo1"),dispbpt()   // set at line 1 (default)
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          1
  
 setbpt("foo1",5),dispbpt()  // add another bpt to a macro that already has bpts, and that is the last one
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          1
          5
  
 setbpt("foo2",5),setbpt("foo2",8),dispbpt()  // add bpts to a new macro (will always be placed at the end)
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          1
          5
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
  
 setbpt("foo1",9),dispbpt()  // add another bpt to a macro that already has bpts, and that is NOT the last one
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          9
          1
          5
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
  
 setbpt("foo1",5),dispbpt()  // check duplicates removal - line 5 should appear only once in foo1
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          9
          1
          5
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
  
 setbpt("foo2",5),dispbpt()  // check duplicates removal - line 5 should appear only once in foo2
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          9
          1
          5
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
@@ -342,27 +342,27 @@ delbpt(),dispbpt()   // should display no output
  
 setbpt("foo1",[1,0,5])    // should spit error 9997
                        !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 setbpt("foo1",[-3,2,7])   // should spit error 9997
                         !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 setbpt("foo1",[1,3.2])  // should spit error 9997
                        !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 setbpt("foo1",[8,9]),dispbpt()    // add 2 bpts at once to a new macro
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          8
          9
  
 setbpt("foo1",5),setbpt("foo1",[2,3]),dispbpt()  // add further bpts to a macro that already has bpts, and that is the last one
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          8
          9
@@ -371,21 +371,21 @@ setbpt("foo1",5),setbpt("foo1",[2,3]),dispbpt()  // add further bpts to a macro
          3
  
 setbpt("foo2",[5,8]),setbpt("foo2",7),dispbpt()  // add bpts to a new macro (will always be placed at the end)
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          8
          9
          5
          2
          3
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
          7
  
 setbpt("foo1",[10,15,20]),dispbpt()  // add bpts to a macro that already has bpts, and that is NOT the last one
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
         10
         15
@@ -395,14 +395,14 @@ setbpt("foo1",[10,15,20]),dispbpt()  // add bpts to a macro that already has bpt
          5
          2
          3
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
          7
  
 setbpt("foo1",[50,50,50,60,50,80,60]),dispbpt()  // check duplicates removal in vector input, not the last macro - lines 50 and 60 should appear only once in foo1
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
         50
         60
@@ -415,14 +415,14 @@ setbpt("foo1",[50,50,50,60,50,80,60]),dispbpt()  // check duplicates removal in
          5
          2
          3
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
          7
  
 setbpt("foo1",[9,5,8,100,3,2]),dispbpt()  // check duplicates removal wrt existing bpts, not the last macro - all lines should appear only once in foo1
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
        100
         50
@@ -436,14 +436,14 @@ setbpt("foo1",[9,5,8,100,3,2]),dispbpt()  // check duplicates removal wrt existi
          5
          2
          3
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
          7
  
 setbpt("foo2",[50,50,50,60,50,80,60]),dispbpt()  // check duplicates removal in vector input, last macro - lines 50 and 60 should appear only once in foo1
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
        100
         50
@@ -457,7 +457,7 @@ setbpt("foo2",[50,50,50,60,50,80,60]),dispbpt()  // check duplicates removal in
          5
          2
          3
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
@@ -467,7 +467,7 @@ setbpt("foo2",[50,50,50,60,50,80,60]),dispbpt()  // check duplicates removal in
         80
  
 setbpt("foo2",[9,5,8,100,7,2]),dispbpt()  // check duplicates removal wrt existing bpts, last macro - all lines should appear only once in foo2
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
        100
         50
@@ -481,7 +481,7 @@ setbpt("foo2",[9,5,8,100,7,2]),dispbpt()  // check duplicates removal wrt existi
          5
          2
          3
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          5
          8
@@ -505,17 +505,17 @@ delbpt(),dispbpt()   // should display no output
  
 delbpt("foo1",0)    // should spit error 9997
                  !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 delbpt("foo1",-3)   // should spit error 9997
                   !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 delbpt("foo1",3.2)  // should spit error 9997
                    !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 delbpt("foo1"),dispbpt()   // should display no output
@@ -523,14 +523,14 @@ delbpt("foo1"),dispbpt()   // should display no output
 setbpt("foo1",[5,8,11]),delbpt("foo1"),dispbpt()   // should display no output
  
 setbpt("foo1",[5,8,11]),setbpt("foo2",[55,88,111]),delbpt("foo1"),dispbpt()   // should display the 3 bpts for foo2 only
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
         55
         88
        111
  
 setbpt("foo1",[5,8,11]),setbpt("foo2",[55,88,111]),delbpt("foo2"),dispbpt()   // should display the 3 bpts for foo1 only
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          5
          8
@@ -541,13 +541,13 @@ delbpt()
 setbpt("foo1",5),delbpt("foo1",5),dispbpt()   // should display no output
  
 setbpt("foo1",[5,6,8]),delbpt("foo1",5),dispbpt()    // lines 6 and 8 should appear only
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          6
          8
  
 setbpt("foo1",[5,10,11]),delbpt("foo1",10),dispbpt()    // lines 5, 6, 8 and 11 should appear only
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          6
          8
@@ -555,18 +555,18 @@ setbpt("foo1",[5,10,11]),delbpt("foo1",10),dispbpt()    // lines 5, 6, 8 and 11
         11
  
 delbpt("foo1",11),dispbpt()    // lines 5, 6 and 8 should appear only
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          6
          8
          5
  
 setbpt("foo2",[20,21,22,23]),delbpt("foo1",6),dispbpt()    // lines 5 and 8 for foo1, and 20 to 23 for foo2
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          8
          5
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
         20
         21
@@ -574,11 +574,11 @@ setbpt("foo2",[20,21,22,23]),delbpt("foo1",6),dispbpt()    // lines 5 and 8 for
         23
  
 delbpt("foo2",21),dispbpt()    // lines 5, and 8 for foo1, and 20, 22, 23 for foo2
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          8
          5
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
         20
         22
@@ -595,38 +595,38 @@ delbpt(),dispbpt()   // should display no output
  
 delbpt("foo1",[1,0,5])    // should spit error 9997
                        !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 delbpt("foo1",[-3,2,7])   // should spit error 9997
                         !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 delbpt("foo1",[1,3.2])  // should spit error 9997
                        !--error 9997 
-Breakpoint line number must be a positive integer                               
+Breakpoint line number must be a positive integer                              
  
  
 delbpt("foo1",[8,9]),dispbpt()   // should display no output
  
 setbpt("foo1",[5,6,8,9]),delbpt("foo1",[8,5]),dispbpt()    // lines 6 and 9 should appear only
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          6
          9
  
 setbpt("foo1",[5,6,8,9]),delbpt("foo1",[8,5,8,8,6,5]),dispbpt()    // check duplicates removal in vector input - line 9 should appear only
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          9
  
 setbpt("foo1",[5,6,8,9]),setbpt("foo2",[10,12,14,16,18]),delbpt("foo1",[8,5,8,10]),dispbpt()    // not the last macro, check duplicates removal in vector input - lines 6 and 9 should appear for foo1, plus all the 5 bpts for foo2
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          9
          6
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
         10
         12
@@ -635,7 +635,7 @@ setbpt("foo1",[5,6,8,9]),setbpt("foo2",[10,12,14,16,18]),delbpt("foo1",[8,5,8,10
         18
  
 setbpt("foo1",[5,6,8,9]),setbpt("foo2",[10,12,14,16,18]),delbpt("foo1",[8,5,6,9]),dispbpt()    // remove all, not the last macro - should display no bpt for foo1, but all the 5 bpts for foo2
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
         10
         12
@@ -644,11 +644,11 @@ setbpt("foo1",[5,6,8,9]),setbpt("foo2",[10,12,14,16,18]),delbpt("foo1",[8,5,6,9]
         18
  
 setbpt("foo1",[5,6,8,9]),setbpt("foo2",[10,12,14,16,18]),delbpt("foo2",[14,18,10,20]),dispbpt()    // last macro - should display all the 4 bpts for foo1, but only lines 12 and 16 for foo2
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
         12
         16
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          5
          6
@@ -656,7 +656,7 @@ setbpt("foo1",[5,6,8,9]),setbpt("foo2",[10,12,14,16,18]),delbpt("foo2",[14,18,10
          9
  
 setbpt("foo1",[5,6,8,9]),setbpt("foo2",[10,12,14,16,18]),delbpt("foo2",[14,18,10,12,16]),dispbpt()    // remove all, last macro - should display all the 4 bpts for foo1, but no bpt for foo2
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          5
          6
@@ -687,7 +687,7 @@ endfunction
 setbpt("foo2",1)
  
 foo2()
-Stop after row     1 in function foo2 :
+Stop after row     1 in function foo2.
  
  
 delbpt("foo2",1)
@@ -697,14 +697,14 @@ dispbpt
 setbpt("foo1",[1:5]);setbpt("foo2",[1:5]);
  
 dispbpt
- breakpoints of  function :foo1                    
+ breakpoints of function : foo1                   
  
          1
          2
          3
          4
          5
- breakpoints of  function :foo2                    
+ breakpoints of function : foo2                   
  
          1
          2
@@ -719,7 +719,7 @@ dispbpt
 // and not Stop after row     2 in function foo1 :
  
 resume(0)
-Stop after row     2 in function foo2 :
+Stop after row     2 in function foo2.
  
  
 abort
@@ -731,7 +731,7 @@ delbpt()
  
 function foo1
 endfunction
-Warning :redefining function: foo1                    
+Warning : redefining function : foo1                    
  
  
 function foo2
@@ -744,13 +744,13 @@ function foo2
   b=foo3();
   disp("After");
 endfunction
-Warning :redefining function: foo2                    
+Warning : redefining function : foo2                    
  
  
 setbpt("foo2",[1:10]);
  
 foo2()
-Stop after row     1 in function foo2 :
+Stop after row     1 in function foo2.
  
  
 delbpt("foo2",[1:10])
@@ -764,7 +764,7 @@ setbpt("foo1",[1:2]);setbpt("foo2",[1:10]);setbpt("foo3",[1:5]);
 // and not Stop after row     1 in function foo3 :
  
 resume
-Stop after row     6 in function foo2 :
+Stop after row     6 in function foo2.
  
  
  
diff --git a/tests/basic_tests/clause.dia.ref b/tests/basic_tests/clause.dia.ref
index e8820ce..92867dc 100644
--- a/tests/basic_tests/clause.dia.ref
+++ b/tests/basic_tests/clause.dia.ref
@@ -39,7 +39,7 @@ if t(-1)<>1 then bugmes();quit;end
 t1=t;
  
 comp(t1)
-Warning :redefining function: t1                      
+Warning : redefining function : t1                      
  
  
 if t(0)-t1(0)<>0 then bugmes();quit;end
@@ -104,7 +104,7 @@ if tt1()<>4 then bugmes();quit;end
 //----------------------------------------
  
 deff('[k]=tt1()','k=0,while k<10 ,k=k+1;if k==3 then break,end,end,k=k+1','n')
-Warning :redefining function: tt1                     
+Warning : redefining function : tt1                     
  
  
 if tt1()<>4 then bugmes();quit;end
@@ -234,7 +234,7 @@ 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)
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if or(foo(3)<>[1 2 4 5]) then bugmes();quit;end
@@ -257,7 +257,7 @@ 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')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if or(foo(3)<>[1,2,3,4, 1,2,4, 1,2,3,4]) then bugmes();quit;end
@@ -265,7 +265,7 @@ 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)
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if or(foo(3)<>[1,2,3,4, 1,2,4, 1,2,3,4]) then bugmes();quit;end
@@ -293,7 +293,7 @@ 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')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if or(foo(3)<>[1 2 4 5]) then bugmes();quit;end
@@ -302,7 +302,7 @@ if or(foo(5)<>[1 2 3 4]) then bugmes();quit;end
  
  
 comp(foo)
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if or(foo(3)<>[1 2 4 5]) then bugmes();quit;end
@@ -332,7 +332,7 @@ 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)
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if or(foo(3)<>[1,2,3,4, 1,2,4, 1,2,3,4]) then bugmes();quit;end
diff --git a/tests/basic_tests/links.dia.ref b/tests/basic_tests/links.dia.ref
index 00001e6..e2f3197 100644
--- a/tests/basic_tests/links.dia.ref
+++ b/tests/basic_tests/links.dia.ref
@@ -20,7 +20,7 @@ ilib_for_link(routines,'externals.o',[],"f");
  
 exec loader.sce ;
 shared archive loaded
-Link done
+Link done.
  
 //===========================================================
  
diff --git a/tests/basic_tests/matode.dia.ref b/tests/basic_tests/matode.dia.ref
index af5e3e3..7ec843d 100644
--- a/tests/basic_tests/matode.dia.ref
+++ b/tests/basic_tests/matode.dia.ref
@@ -109,7 +109,7 @@ if (y6-yref) > 2*0.00001 then bugmes();quit;end
 a=rand(3,3);ea=expm(a);
  
 deff('[ydot]=f(t,y)','ydot=a*y')
-Warning :redefining function: f                       
+Warning : redefining function : f                       
  
  
 t1=1;y=ode('adams',eye(a),t0,t1,f);
@@ -152,11 +152,11 @@ rand('seed',0);rand('normal');
 nx=20;A=rand(nx,nx);A=A-4.5*eye();
  
 deff('y=f(t,x)','y=A*x')
-Warning :redefining function: f                       
+Warning : redefining function : f                       
  
  
 deff('J=j(t,x)','J=A')
-Warning :redefining function: j                       
+Warning : redefining function : j                       
  
  
 x0=ones(nx,1);t0=0;t=[1,2,3,4,5];
@@ -184,8 +184,8 @@ xf=ode(x0,t0,t,f);   //lsoda
 if norm(xf(:,nt)-eAt*x0)>Leps then bugmes();quit;end
  
 xfj=ode(x0,t0,t,f,j);   //lsoda with jacobian
- Warning: Jacobian external is given, but 
- not used!,  see %ODEOPTIONS(6)
+ Warning: Jacobian external is given, but
+ not used!,  see %ODEOPTIONS(6).
  
  
 if norm(xfj(:,nt)-eAt*x0)>Leps then bugmes();quit;end
@@ -232,7 +232,7 @@ deff('y=fcrit(t,x)',['if t<=tcrit then'
                       ' y=A*x;chk=resume(1);end'])
  
 x42=ode(x0,t0,t,fcrit);
- Warning: integration up to tcrit
+ Warning : integration up to tcrit
  
  
 if chk==1 then bugmes();quit;end
@@ -287,8 +287,8 @@ if norm(x61-xf,1)>10*Leps then bugmes();quit;end
 %ODEOPTIONS(6)=0; // jacobian nor called nor estimated
  
 x60=ode('st',x0,t0,t,f,j);   //Jacobian not used (warning)
- Warning: Jacobian external is given, but 
- not used!,  see %ODEOPTIONS(6)
+ Warning: Jacobian external is given, but
+ not used!,  see %ODEOPTIONS(6).
  
  
 x60=ode('st',x0,t0,t,f);    //Jacobian not used
@@ -300,8 +300,8 @@ if norm(x60-x61,1)>10*Leps then bugmes();quit;end
 %ODEOPTIONS(6)=1;//Jacobian estimated
  
 x60=ode('st',x0,t0,t,f)  ;
- Warning: No Jacobian external given but 
- one is required by %ODEOPTIONS(6) value!
+ Warning: No Jacobian external given but
+ one is required by %ODEOPTIONS(6) value !
  
  
 if norm(x60-x61,1)>10*Leps then bugmes();quit;end
@@ -320,8 +320,8 @@ if norm(x60-x61,1)>10*Leps then bugmes();quit;end
 %ODEOPTIONS(6)=0;// jacobian nor called nor estimated
  
 x60=ode('ad',x0,t0,t,f,j);   //Jacobian not used (warning)
- Warning: Jacobian external is given, but 
- not used!,  see %ODEOPTIONS(6)
+ Warning: Jacobian external is given, but
+ not used!,  see %ODEOPTIONS(6).
  
  
 x60=ode('ad',x0,t0,t,f);    //Jacobian not used
@@ -341,8 +341,8 @@ if norm(x60-x61,1)>10*Leps then bugmes();quit;end
 %ODEOPTIONS(6)=1;//Jacobian estimated
  
 x60=ode(x0,t0,t,f);
- Warning: No Jacobian external given but 
- one is required by %ODEOPTIONS(6) value!
+ Warning: No Jacobian external given but
+ one is required by %ODEOPTIONS(6) value !
  
  
 if norm(x60-x61,1)>10*Leps then bugmes();quit;end
@@ -377,7 +377,7 @@ for k=1:nx-2, A(k+2,k)=2;end
 for k=1:nx-3, A(k+3,k)=-3;end
  
 deff('xd=f(t,x)','xd=A*x')
-Warning :redefining function: f                       
+Warning : redefining function : f                       
  
  
 ml=3;mu=2;
@@ -388,7 +388,7 @@ for i=1:nx;
     for j=1:nx;
 if A(i,j)<>0 then J(i-j+mu+1,j)=A(i,j);end
 end;end;
-Warning :redefining function: j                       
+Warning : redefining function : j                       
  
  
 // J is a ml+mu+1 x ny matrix.
@@ -427,8 +427,8 @@ if norm(xnotband-xband,1)>Leps then bugmes();quit;end
 deff('jj=j(t,x)','jj=J')
  
 xband=ode('st',x0,t0,t,f,j);
- Warning: Jacobian external is given, but 
- not used!,  see %ODEOPTIONS(6)
+ Warning: Jacobian external is given, but
+ not used!,  see %ODEOPTIONS(6).
  
  
 if norm(xnotband-xband,1)>Leps then bugmes();quit;end
@@ -531,7 +531,7 @@ deff('uu=u(t)','uu=sin(t)');
 B=rand(3,1);
  
 deff('y=f(t,x)','y=A*x+B*u(t)')
-Warning :redefining function: f                       
+Warning : redefining function : f                       
  
  
 %ODEOPTIONS(1)=2;
@@ -554,11 +554,11 @@ rand('seed',0);rand('normal');
 nx=20;A=rand(nx,nx);A=A-4.5*eye();
  
 deff('y=f(t,x)','y=A*x')
-Warning :redefining function: f                       
+Warning : redefining function : f                       
  
  
 deff('J=j(t,x)','J=A')
-Warning :redefining function: j                       
+Warning : redefining function : j                       
  
  
 //%ODEOPTIONS(1)=1;
@@ -583,7 +583,7 @@ ysj=ode('stiff',ones(nx,1),0,2,f,j);
  
  
 deff('xd=f(t,x)','xd=A*x+B*sin(3*t)')
-Warning :redefining function: f                       
+Warning : redefining function : f                       
  
  
 A=rand(10,10)-4.5*eye();B=rand(10,1);
diff --git a/tests/basic_tests/matopt.dia.ref b/tests/basic_tests/matopt.dia.ref
index 9c1d108..ff70834 100644
--- a/tests/basic_tests/matopt.dia.ref
+++ b/tests/basic_tests/matopt.dia.ref
@@ -144,7 +144,7 @@ deff('[f,g,ind]=rose(x,ind)', 'a=x(2)-x(1)^2 , b=1-x(2) ,...
 f=50.*a^2 + b^2 , g(1)=-400.*x(1)*a , g(2)=200.*a -2.*b ');
  
 comp(rose);
- Warning: function is already compiled
+ Warning: function is already compiled.
  
  
 //[f,x,g,tr]=optim(rose,x0,'qn','ar',50);if abs(f+norm(x-xopt)) > Leps then bugmes();quit;end
@@ -207,7 +207,7 @@ deff('[fpen,gpen,ind]=sipn(x,ind,sip1,ne,nc,cpen)',...
 ' for i=ne+1:nc, if f(i) > 0 then gpen=gpen + cpen*f(i)*g(:,i),end,end;end;'])
  
 comp(sipn);
- Warning: function is already compiled
+ Warning: function is already compiled.
  
  
 [f,x,g]=optim(list(sipn,sip2,ne,nc,cpen),...
@@ -227,7 +227,7 @@ if norm(X-inv(A))>Leps then bugmes();quit;end
  
  
 deff('[f,g,ind]=ndsim(x,ind)', 'y=A*x-b;f=sum(abs(y));g=A''*sign(y)')
-Warning :redefining function: ndsim                   
+Warning : redefining function : ndsim                   
  
  
 A=rand(2,2);b=[1;0];Ai=inv(A);
@@ -240,7 +240,7 @@ if norm(x-Ai(:,1))>Leps then bugmes();quit;end
 deff('[f,g,ind]=ndsim(x,ind)', [
 'y=A*x-b;f=max(abs(y)),sel=abs(y)==f'
 'g=A(sel,:)''*sign(y(sel))']);
-Warning :redefining function: ndsim                   
+Warning : redefining function : ndsim                   
  
  
 //A=rand(2,2);b=[1;0];Ai=inv(A);
diff --git a/tests/basic_tests/matsys.dia.ref b/tests/basic_tests/matsys.dia.ref
index 41ceb03..b02dfd6 100644
--- a/tests/basic_tests/matsys.dia.ref
+++ b/tests/basic_tests/matsys.dia.ref
@@ -54,7 +54,7 @@ if or(foo()<>[1 0]) 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')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if foo(1)<>1 then bugmes();quit;end
@@ -66,7 +66,7 @@ if foo(1,2)<>1 then bugmes();quit;end
 //
  
 deff('[x,y]=foo(a,b)','[lhs,rhs]=argn();x=[lhs,rhs];y=-1')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if or(foo(1)<>[1 1]) then bugmes();quit;end
@@ -82,7 +82,7 @@ if or(foo()<>[1 0]) 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')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if foo(1)<>1 then bugmes();quit;end
@@ -312,7 +312,7 @@ errclear();errcatch();
  
 //whereis
  
-if whereis('sci2exp')<>'m2scilib' then bugmes();quit;end
+if whereis('sci2exp')<>'stringlib' then bugmes();quit;end
  
 if whereis('aaa')<>[]  then bugmes();quit;end
  
@@ -320,7 +320,7 @@ if whereis('aaa')<>[]  then bugmes();quit;end
 //where
  
 deff('[a,b]=foo()','[a,b]=where()')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 [a,b]=foo();
@@ -337,7 +337,7 @@ deff('foo()','a=1')
 funcprot(1)
  
 deff('foo()','a=2')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 errcatch(111,'continue','nomessage')
@@ -363,11 +363,11 @@ timer();for i=1:100000,end;if timer()<=0 then bugmes();quit;end
 // comp
  
 deff('[a]=foo()','a=1','n')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 comp(foo)
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 if foo()<>1 then bugmes();quit;end
@@ -386,7 +386,7 @@ y=stacksize();if y(1)<>a+1000 then bugmes();quit;end
 //non compiled functions
  
 deff('y=foo(a)','x=a+1000,stacksize(x),y=stacksize();y=y(1)','n')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 a=stacksize();a=a(1);
@@ -421,7 +421,7 @@ a=y;
 // compiled functions
  
 deff('y=foo(a)','x=a+1000,stacksize(x),y=stacksize();y=y(1)')
-Warning :redefining function: foo                     
+Warning : redefining function : foo                     
  
  
 y=foo(a);
@@ -431,7 +431,7 @@ if y<>a+1000 then bugmes();quit;end
 a=y;
  
 deff('y=toto()','a=stacksize();a=a(1);y=foo(a)')
-Warning :redefining function: toto                    
+Warning : redefining function : toto                    
  
  
 y=toto();
@@ -491,7 +491,7 @@ if 1/0<>%inf then bugmes();quit;end
 ieee(1)
  
 if 1/0<>%inf then bugmes();quit;end
-Warning :division by zero...
+Warning : division by zero...
  
  
 ieee(0)
diff --git a/tests/basic_tests/matsys.tst b/tests/basic_tests/matsys.tst
index 8bc723f..8a9b70b 100644
--- a/tests/basic_tests/matsys.tst
+++ b/tests/basic_tests/matsys.tst
@@ -157,7 +157,7 @@ if iserror()<>1 then pause,end
 errclear();errcatch();
 
 //whereis
-if whereis('sci2exp')<>'m2scilib' then pause,end
+if whereis('sci2exp')<>'stringlib' then pause,end
 if whereis('aaa')<>[]  then pause,end
 
 //where
diff --git a/tests/basic_tests/specfun.dia.ref b/tests/basic_tests/specfun.dia.ref
index aedf58b..a5f65eb 100644
--- a/tests/basic_tests/specfun.dia.ref
+++ b/tests/basic_tests/specfun.dia.ref
@@ -1241,7 +1241,7 @@ yref=[ 0
 -%inf];
  
 y=besseli(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -1250,7 +1250,7 @@ yref=[ 0
 -%inf];
  
 y=besseli(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -1576,7 +1576,7 @@ yref=[-%inf
  0];
  
 y=besseli(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -1587,7 +1587,7 @@ yref=[-%inf
  0];
  
 y=besseli(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -1742,7 +1742,7 @@ yref=[-%inf
  0];
  
 y=besseli(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -1754,7 +1754,7 @@ yref=[-%inf
  0];
  
 y=besseli(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -3109,7 +3109,7 @@ yref=[ -0
 -%inf];
  
 y=besselj(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -3118,7 +3118,7 @@ yref=[ -0
 -%inf];
  
 y=besselj(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -3601,7 +3601,7 @@ yref=[-%inf
  -0];
  
 y=besselj(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -3612,7 +3612,7 @@ yref=[-%inf
  -0];
  
 y=besselj(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -3767,7 +3767,7 @@ yref=[-%inf
  -0];
  
 y=besselj(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -3779,7 +3779,7 @@ yref=[-%inf
  -0];
  
 y=besselj(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4088,7 +4088,7 @@ x=[0];
 yref=[%inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4096,7 +4096,7 @@ if testresult() then bugmes();quit;end
 yref=[%inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4245,7 +4245,7 @@ x=[0];
 yref=[%inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4253,7 +4253,7 @@ if testresult() then bugmes();quit;end
 yref=[%inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4402,7 +4402,7 @@ x=[0];
 yref=[%inf %inf %inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4410,7 +4410,7 @@ if testresult() then bugmes();quit;end
 yref=[%inf %inf %inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4527,7 +4527,7 @@ x=[0];
 yref=[%inf %inf %inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4535,7 +4535,7 @@ if testresult() then bugmes();quit;end
 yref=[%inf %inf %inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4658,7 +4658,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4668,7 +4668,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4832,7 +4832,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -4842,7 +4842,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5000,7 +5000,7 @@ x=[0];
 yref=[%inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5008,7 +5008,7 @@ if testresult() then bugmes();quit;end
 yref=[%inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5160,7 +5160,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5169,7 +5169,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5326,7 +5326,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5338,7 +5338,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5499,7 +5499,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5510,7 +5510,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5665,7 +5665,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5677,7 +5677,7 @@ yref=[%inf
 %inf];
  
 y=besselk(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5986,7 +5986,7 @@ x=[0];
 yref=[-%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -5994,7 +5994,7 @@ if testresult() then bugmes();quit;end
 yref=[-%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6143,7 +6143,7 @@ x=[0];
 yref=[-%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6151,7 +6151,7 @@ if testresult() then bugmes();quit;end
 yref=[-%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6300,7 +6300,7 @@ x=[0];
 yref=[-%inf -%inf -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6308,7 +6308,7 @@ if testresult() then bugmes();quit;end
 yref=[-%inf -%inf -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6425,7 +6425,7 @@ x=[0];
 yref=[-%inf -%inf -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6433,7 +6433,7 @@ if testresult() then bugmes();quit;end
 yref=[-%inf -%inf -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6556,7 +6556,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6566,7 +6566,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6730,7 +6730,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6740,7 +6740,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6898,7 +6898,7 @@ x=[0];
 yref=[-%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -6906,7 +6906,7 @@ if testresult() then bugmes();quit;end
 yref=[-%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7058,7 +7058,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7067,7 +7067,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7224,7 +7224,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7236,7 +7236,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7397,7 +7397,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7408,7 +7408,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7560,7 +7560,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7571,7 +7571,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7726,7 +7726,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end
@@ -7738,7 +7738,7 @@ yref=[-%inf
 -%inf];
  
 y=bessely(alpha,x,1);
-Warning :division by zero...
+Warning : division by zero...
  
  
 if testresult() then bugmes();quit;end