File: fix-test-dir

package info (click to toggle)
gap 4.12.1-2
  • links: PTS
  • area: main
  • in suites: bookworm
  • size: 115,100 kB
  • sloc: ansic: 96,895; xml: 47,380; cpp: 13,899; sh: 4,318; perl: 1,652; makefile: 254; javascript: 155
file content (16 lines) | stat: -rw-r--r-- 670 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
Index: gap-4.11.0/tst/testinstall/dir.tst
===================================================================
--- gap-4.11.0.orig/tst/testinstall/dir.tst
+++ gap-4.11.0/tst/testinstall/dir.tst
@@ -9,11 +9,6 @@ gap> List(dirs, IsDirectoryPath);
 [ true, true, false, false ]
 gap> List(dirs, IsDirectory);
 [ false, true, false, true ]
-gap> DirectoryHome() = Directory("~") or ARCH_IS_WINDOWS();
-true
-gap> ForAll([DirectoryHome, DirectoryDesktop,DirectoryCurrent],
->           x -> (IsDirectoryPath(x()) and IsDirectory(x())) );
-true
 gap> dirTest := Concatenation(base,"/dir-test");;
 gap> SortedList(DirectoryContents(dirTest));
 [ ".", "..", "A", "B", "C", "D" ]