Revision fd1f090eb9aaec7e35b5a997af4fcb9426cad86c authored by Mohamed Barakat on 12 August 2022, 19:55:55 UTC, committed by Mohamed Barakat on 12 August 2022, 19:58:32 UTC
1 parent 47c276a
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