|
#
# PackageManager: Easily download and install GAP packages
#
# This file runs package tests. It is also referenced in the package
# metadata in PackageInfo.g.
#
LoadPackage("PackageManager");
# Info levels
SetInfoLevel(InfoPackageManager, 1);
# Use a temporary directory for packages
PKGMAN_SetCustomPackageDir(Filename(DirectoryTemporary(), "pkg"));
# Any files to exclude?
if not IsBound(PKGMAN_ExcludeTestFiles) then
PKGMAN_ExcludeTestFiles := [];
fi;
# For old GAP versions, exclude some cutting edge tests
version := GAPInfo.Version;
if EndsWith(version, "dev") then
# old dev versions are still old versions
version := version{[1 .. Length(version) - 3]};
fi;
if not CompareVersionNumbers(version, ">=4.14") then
Add(PKGMAN_ExcludeTestFiles, "RecentGapOnly.tst");
fi;
# Run tests
TestDirectory(DirectoriesPackageLibrary("PackageManager", "tst"),
rec(exitGAP := true,
exclude := PKGMAN_ExcludeTestFiles));
FORCE_QUIT_GAP(1); # If we ever get here, there was an error
[ Dauer der Verarbeitung: 0.29 Sekunden
(vorverarbeitet)
]
|