Revision 9cb4a2a33ffaf8c93958e021a5558aa3eafb6d56 authored by Mohamed Barakat on 12 September 2021, 12:47:39 UTC, committed by Mohamed Barakat on 12 September 2021, 12:47:39 UTC
1 parent d4384af
Raw File
ci_gaprc
# Prefer GAPInfo.UserGapRoot over other package directories to prevent accidentally testing package
# versions distributed with GAP.
(function()
  local name, package_info, pos;
    for name in RecNames( GAPInfo.PackagesInfo ) do
        package_info := GAPInfo.PackagesInfo.(name);
        pos := PositionProperty( package_info, info -> StartsWith( info.InstallationPath, GAPInfo.UserGapRoot ) );
        if pos <> fail then
            SetPackagePath( name, package_info[pos].InstallationPath );
        fi;
    od;
end)();
back to top