config file was overwritten and corrupted when testing - it's now backed up/restored...
[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 // <-- JVM NOT MANDATORY -->
8 load("SCI/modules/atoms/macros/atoms_internals/lib");
9 // If previous test did not end properly, restore, else backup config file
10 atomsRestoreConfig(%T);
11 atomsSaveConfig();
12 // Do not use the autoload system
13 atomsSetConfig("autoloadAddAfterInstall","False");
14 atomsSetConfig("Verbose" ,"False");
15 // Load the 2nd scenario : See scene11.test.atoms.scilab.org.txt
16 // =============================================================================
17 atomsRepositorySetOfl("http://scene10.test.atoms.scilab.org");
18 // Install toolbox N°2
19 atomsInstall(["toolbox_2","2.0"],"user");
20 // Check installation
21 if ~ atomsIsInstalled(["toolbox_1","1.0","user"]) then bugmes();quit;end
22 if ~ atomsIsInstalled(["toolbox_2","2.0","user"]) then bugmes();quit;end
23 atomsLoad(["toolbox_2","2.0","user"]);
24
25 Start Toolbox 2
26         Load macros
27
28 Start Toolbox 1
29         Load macros
30         Load gateways
31
32 if ~ atomsIsLoaded("toolbox_2")                  then bugmes();quit;end
33 if ~ atomsIsLoaded(["toolbox_2","2.0"])          then bugmes();quit;end
34 if ~ atomsIsLoaded(["toolbox_2","2.0","user"])   then bugmes();quit;end
35 if ~ atomsIsLoaded("toolbox_1")                  then bugmes();quit;end
36 if ~ atomsIsLoaded(["toolbox_1","1.0"])          then bugmes();quit;end
37 if ~ atomsIsLoaded(["toolbox_1","1.0","user"])   then bugmes();quit;end
38 if atomsIsLoaded(["toolbox_1","1.0","allusers"]) then bugmes();quit;end
39 if atomsIsLoaded(["toolbox_2","2.0","allusers"]) then bugmes();quit;end
40 A = [ "toolbox_1" "1.0" "user"     ; ..
41       "toolbox_2" "2.0" "user"     ; ..
42       "toolbox_2" ""    "user"     ; ..
43       "toolbox_2" "2.0" ""         ; ..
44       "toolbox_2" ""    ""         ; ..
45       "toolbox_2" "2.0" "allusers" ];
46 if or(atomsIsLoaded(A) <> [%T ; %T ; %T ; %T ; %T ; %F]) then bugmes();quit;end
47 // Remove toolbox_2
48 // =============================================================================
49 atomsRemove("toolbox_2","user");
50         the package toolbox_2 (2.0-1) is currently loaded, It will be removed at next Scilab start
51         the package toolbox_1 (1.0-1) is currently loaded, It will be removed at next Scilab start
52 // Restore original values
53 // =============================================================================
54 atomsRestoreConfig(%T);
55 atomsRepositorySetOfl(mgetl(SCI+"/modules/atoms/tests/unit_tests/repositories.orig"));