[commit: packages/filepath] master: #16, add a specific example of the Windows weirdity (598fa3d)

[git at git.haskell.org]

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

On branch  : master
Link       : http://git.haskell.org/packages/filepath.git/commitdiff/598fa3d3f323bb7ec6b08952223c87e7763c82fd

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

commit 598fa3d3f323bb7ec6b08952223c87e7763c82fd
Author: Neil Mitchell <ndmitchell at gmail.com>
Date:   Sun Oct 26 21:11:57 2014 +0000

    #16, add a specific example of the Windows weirdity


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

598fa3d3f323bb7ec6b08952223c87e7763c82fd
 System/FilePath/Internal.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/System/FilePath/Internal.hs b/System/FilePath/Internal.hs
index fa7d96a..9c9606c 100644
--- a/System/FilePath/Internal.hs
+++ b/System/FilePath/Internal.hs
@@ -683,6 +683,7 @@ joinPath = foldr combine ""
 -- >          not (equalFilePath "foo" "/foo")
 -- > Posix:   not (equalFilePath "foo" "FOO")
 -- > Windows: equalFilePath "foo" "FOO"
+-- > Windows: not (equalFilePath "C:" "C:/")
 equalFilePath :: FilePath -> FilePath -> Bool
 equalFilePath a b = f a == f b
     where