Don't use IO package in tests

gap-packages · Sep 5, 2024 · 80e8def · 80e8def
1 parent f011b51
commit 80e8def
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 8 deletions.
diff --git a/tst/testall.g b/tst/testall.g
@@ -1,9 +1,7 @@
 #
-#
 # This file runs package tests. It is also referenced in the package
 # metadata in PackageInfo.g.
 #
-LoadPackage( "io" );
 LoadPackage( "ferret" );
 
 # Sanity check that we loaded ferret correctly
@@ -17,4 +15,4 @@ dirs := DirectoriesPackageLibrary( "ferret", "tst" );
 
 TestDirectory(dirs, rec(exitGAP := true));
 
-IO_exit(1);
+FORCE_QUIT_GAP(1);
diff --git a/tst/testlong.g b/tst/testlong.g
@@ -3,7 +3,6 @@
 # This file runs a longer version of tests
 #
 #
-LoadPackage( "io" );
 LoadPackage( "ferret" );
 
 
@@ -21,4 +20,4 @@ dirs := DirectoriesPackageLibrary( "ferret", "tst" );
 
 TestDirectory(dirs, rec(exitGAP := true));
 
-IO_exit(1);
+FORCE_QUIT_GAP(1);
diff --git a/tst/testvalgrind.g b/tst/testvalgrind.g
@@ -1,9 +1,8 @@
 # This file is designed to just run one test, 'testvalgrind.tst', which we run
 # through the 'valgrind' system, to check for memory issues
 
-LoadPackage("io");
 if Test( Filename(DirectoriesPackageLibrary( "ferret", "tst/tstfiles" ),"testvalgrind.tst"), rec(showProgress := true) ) = true then
-  IO_exit(0);
+  FORCE_QUIT_GAP(0);
 else
-  IO_exit(1);
+  FORCE_QUIT_GAP(1);
 fi;