[commit: packages/filepath] master: #24, turn back on the splitDirectories test (72543cc)

git at git.haskell.org git at git.haskell.org
Thu Mar 19 11:35:00 UTC 2015


Repository : ssh://git@git.haskell.org/filepath

On branch  : master
Link       : http://git.haskell.org/packages/filepath.git/commitdiff/72543cc23359c78dee147d48c56e953e0a2eb794

>---------------------------------------------------------------

commit 72543cc23359c78dee147d48c56e953e0a2eb794
Author: Neil Mitchell <ndmitchell at gmail.com>
Date:   Sun Oct 26 21:36:43 2014 +0000

    #24, turn back on the splitDirectories test


>---------------------------------------------------------------

72543cc23359c78dee147d48c56e953e0a2eb794
 System/FilePath/Internal.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/System/FilePath/Internal.hs b/System/FilePath/Internal.hs
index 997af79..1c0e012 100644
--- a/System/FilePath/Internal.hs
+++ b/System/FilePath/Internal.hs
@@ -636,8 +636,8 @@ splitPath x = [drive | drive /= ""] ++ f path
 -- >          splitDirectories "test/file" == ["test","file"]
 -- >          splitDirectories "/test/file" == ["/","test","file"]
 -- > Windows: splitDirectories "C:\\test\\file" == ["C:\\", "test", "file"]
--- > Posix:   Valid x => joinPath (splitDirectories x) `equalFilePath` x
--- > splitDirectories "" == []
+-- >          Valid x => joinPath (splitDirectories x) `equalFilePath` x
+-- >          splitDirectories "" == []
 splitDirectories :: FilePath -> [FilePath]
 splitDirectories = map dropTrailingPathSeparator . splitPath
 



More information about the ghc-commits mailing list