1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33
|
// =============================================================================
// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
// Copyright (C) 2009 - DIGITEO - Pierre MARECHAL <pierre.marechal@scilab.org>
//
// This file is distributed under the same license as the Scilab package.
// =============================================================================
// <-- JVM NOT MANDATORY -->
if isempty([ atomsRepositoryList("user") ; atomsRepositoryList("allusers")]) then
rep1 = "http://scene1.test.atoms.scilab.org";
rep2 = "http://scene2.test.atoms.scilab.org";
if atomsRepositoryAdd(rep1,"user") <> 1 then pause, end
if atomsRepositoryAdd(rep2,"allusers") <> 1 then pause, end
if or(atomsRepositoryList("user") <> [rep1,"user"]) then pause, end
if or(atomsRepositoryList("allusers") <> [rep2,"allusers"]) then pause, end
if find( atomsRepositoryList("all") == [rep1]) == [] then pause, end
if find( atomsRepositoryList("all") == [rep2]) == [] then pause, end
if atomsRepositoryDel(rep1,"user") <> 1 then pause, end
if atomsRepositoryDel(rep2,"allusers") <> 1 then pause, end
if atomsRepositoryAdd( [rep1;rep2],"user") <> 2 then pause, end
if or(atomsRepositoryList("user") <> [rep1 "user";rep2 "user"]) then pause, end
if or(atomsRepositoryList("allusers") <> []) then pause, end
if atomsRepositoryDel([rep1;rep2],"user") <> 2 then pause, end
if ~isempty([ atomsRepositoryList("user") ; atomsRepositoryList("allusers")]) then pause, end
end
|