// =============================================================================
// 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://scene10.test.atoms.scilab.org";
	rep2 = "http://scene11.test.atoms.scilab.org";
	
	if atomsRepositoryAdd(rep1,"user")     <> 1 then bugmes();quit;end
	if atomsRepositoryAdd(rep2,"allusers") <> 1 then bugmes();quit;end
	
	if or(atomsRepositoryList("user")     <> [rep1,"user"]) then bugmes();quit;end
	if or(atomsRepositoryList("allusers") <> [rep2,"allusers"]) then bugmes();quit;end
	
	if find( atomsRepositoryList("all") == [rep1]) == [] then bugmes();quit;end
	if find( atomsRepositoryList("all") == [rep2]) == [] then bugmes();quit;end
	
	if atomsRepositoryDel(rep1,"user") <> 1 then bugmes();quit;end
	if atomsRepositoryDel(rep2,"allusers") <> 1 then bugmes();quit;end
	
	if atomsRepositoryAdd( [rep1;rep2],"user") <> 2 then bugmes();quit;end
	if or(atomsRepositoryList("user")     <> [rep1 "user";rep2 "user"]) then bugmes();quit;end
	if or(atomsRepositoryList("allusers") <> []) then bugmes();quit;end
	if atomsRepositoryDel([rep1;rep2],"user") <> 2 then bugmes();quit;end
	
	if ~isempty([ atomsRepositoryList("user") ; atomsRepositoryList("allusers")]) then bugmes();quit;end
end