haskell#24, comment out a failing test

bgamari · Oct 26, 2014 · 396d8b8 · 396d8b8
1 parent 9e9f9cf
commit 396d8b8
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/System/FilePath/Internal.hs b/System/FilePath/Internal.hs
@@ -640,7 +640,7 @@ splitPath x = [drive | drive /= ""] ++ f path
 -- >          splitDirectories "test/file" == ["test","file"]
 -- >          splitDirectories "/test/file" == ["/","test","file"]
 -- > Windows: splitDirectories "C:\\test\\file" == ["C:\\", "test", "file"]
--- > Valid x => joinPath (splitDirectories x) `equalFilePath` x
+-- > Posix:   Valid x => joinPath (splitDirectories x) `equalFilePath` x
 -- > splitDirectories "" == []
 splitDirectories :: FilePath -> [FilePath]
 splitDirectories path =