@@ -435,9 +435,11 @@ false
435435gap> IsPackageLoaded(" mockpkg" , " >=2.0" );
436436false
437437
438+ #
438439# instruct GAP to load the package, and record all its declarations
439440# the help book of mockpkg might already have been loaded in other tests
440441# -> we suppress a warning about this
442+ # @if IsPackageMarkedForLoading( "gapdoc", "" )
441443gap> old_warning_level := InfoLevel( InfoWarning );;
442444gap> SetInfoLevel( InfoWarning, 0 );
443445gap> PackageVariablesInfo(" mockpkg" , " 0.1" );;
@@ -481,9 +483,14 @@ gap> IsDateFormatValid := function( datestring )
481483> end ;;
482484gap> IsDateFormatValid( GAPInfo.Date );
483485true
486+ # @else
487+ gap> LoadPackage(" mockpkg" , false );
488+ oops, should not print here
489+ true
490+ # @fi
484491
485492# Test the Cite() command (output changed with GAPDoc 1.6.6 and again with 1.6.7)
486- # @if CompareVersionNumbers(InstalledPackageVersion( "gapdoc") , "1.6.7")
493+ # @if IsPackageMarkedForLoading( "gapdoc", "1.6.7" )
487494gap> Cite(" mockpkg" );
488495Please use one of the following samples
489496to cite mockpkg version from this installation
@@ -538,7 +545,7 @@ rg/}}},
538545}
539546
540547
541- # @else
548+ # @elif IsPackageMarkedForLoading( "gapdoc", "" )
542549gap> Cite(" mockpkg" );
543550Please use one of the following samples
544551to cite mockpkg version from this installation
0 commit comments