atoms modules tests fixed
[scilab.git] / scilab / modules / atoms / tests / unit_tests / atomsIsLoaded.dia.ref
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 // <-- ENGLISH IMPOSED -->
8 // <-- CLI SHELL MODE -->
9 load("SCI/modules/atoms/macros/atoms_internals/lib");
10 // If previous test did not end properly, restore, else backup config file
11 atomsRestoreConfig(%T);
12 atomsSaveConfig();
13 // Do not use the autoload system
14 atomsSetConfig("autoloadAddAfterInstall","False");
15 atomsSetConfig("Verbose" ,"False");
16 //force official ATOMS repository
17 atomsRepositorySetOfl(mgetl(SCI+"/modules/atoms/tests/unit_tests/repositories.orig"));
18 Scanning repository http://atoms.scilab.org/6.0 ... Done
19 // Install toolbox N°2
20 atomsInstall(["toolbox_2V6","2.1"],"user");
21 // Check installation
22 if ~ atomsIsInstalled(["toolbox_1V6","2.0","user"]) then bugmes();quit;end
23 if ~ atomsIsInstalled(["toolbox_2V6","2.1","user"]) then bugmes();quit;end
24 atomsLoad(["toolbox_2V6","2.1","user"]);
25 Start Toolbox 1
26         Load macros
27 Start Toolbox 2
28         Load macros
29 if ~ atomsIsLoaded("toolbox_2V6")                  then bugmes();quit;end
30 if ~ atomsIsLoaded(["toolbox_2V6","2.1"])          then bugmes();quit;end
31 if ~ atomsIsLoaded(["toolbox_2V6","2.1","user"])   then bugmes();quit;end
32 if ~ atomsIsLoaded("toolbox_1V6")                  then bugmes();quit;end
33 if ~ atomsIsLoaded(["toolbox_1V6","2.0"])          then bugmes();quit;end
34 if ~ atomsIsLoaded(["toolbox_1V6","2.0","user"])   then bugmes();quit;end
35 if atomsIsLoaded(["toolbox_1V6","2.0","allusers"]) then bugmes();quit;end
36 if atomsIsLoaded(["toolbox_2V6","2.1","allusers"]) then bugmes();quit;end
37 A = [ "toolbox_1V6" "2.0" "user"     ; ..
38 "toolbox_2V6" "2.1" "user"     ; ..
39 "toolbox_2V6" ""    "user"     ; ..
40 "toolbox_2V6" "2.1" ""         ; ..
41 "toolbox_2V6" ""    ""         ; ..
42 "toolbox_2V6" "2.1" "allusers" ];
43 if or(atomsIsLoaded(A) <> [%T ; %T ; %T ; %T ; %T ; %F]) then bugmes();quit;end
44 // Remove toolbox_2
45 // =============================================================================
46 atomsRemove("toolbox_2V6","user");
47         the package toolbox_2V6 (2.1-1) is currently loaded, It will be removed at next Scilab start
48         the package toolbox_1V6 (2.0-4) is currently loaded, It will be removed at next Scilab start
49 // Restore original values
50 // =============================================================================
51 atomsRestoreConfig(%T);