1// =============================================================================
2// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
3// Copyright (C) 2009 - DIGITEO - Pierre MARECHAL <pierre.marechal@scilab.org>
4//
5//  This file is distributed under the same license as the Scilab package.
6// =============================================================================
7
8// <-- CLI SHELL MODE -->
9load("SCI/modules/atoms/macros/atoms_internals/lib");
10
11if atomsVersionCompare("5.1"        ,"5.1.0")     <> 0 then pause, end
12if atomsVersionCompare("5.1.0"      ,"5.1")       <> 0 then pause, end
13if atomsVersionCompare("5.1.00000"  ,"5.1.0.0")   <> 0 then pause, end
14if atomsVersionCompare("5.1.0.0"    ,"5.1.00000") <> 0 then pause, end
15
16if atomsVersionCompare("5.1.0","5.1.2") <> -1 then pause, end
17if atomsVersionCompare("5.1.2","5.1.0") <>  1 then pause, end
18
19if atomsVersionCompare("10.0","2.6.9") <> 1 then pause, end
20
21A = ["5.1";"5.1.0";"5.1.00000";"5.1.0.0";"05.1"];
22B = [0 ; 0 ; 0 ; 0 ; 0 ];
23
24if or( atomsVersionCompare(A,"5.1")<>B ) then pause, end
25
26if atomsVersionCompare("1.4-1"      ,"1.4")       <>  1 then pause, end
27if atomsVersionCompare("1.4-1"      ,"1.4-3")     <> -1 then pause, end
28if atomsVersionCompare("1.4-10"     ,"1.4-3")     <>  1 then pause, end
29if atomsVersionCompare("1.5-1"      ,"1.4-3")     <>  1 then pause, end
30
31
32A = ["1.4-1";"1.4-3";"1.4.0-2";"1.4-10";"1.5-2";"1.4"];
33B = [   -1  ;   1   ;    0    ;    1   ;   1   ;  -1 ];
34
35if or( atomsVersionCompare(A,"1.4-2")<>B ) then pause, end
36