Repository : ssh://darcs.haskell.org//srv/darcs/testsuite

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/4e5cccfd4eff6492fc4a2dd12811099312376095

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

commit 4e5cccfd4eff6492fc4a2dd12811099312376095
Author: Ian Lynagh <[email protected]>
Date:   Thu Apr 14 20:26:44 2011 +0100

    Fix ffi022 on Windows

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

 tests/ghc-regress/ffi/should_run/ffi022.hs |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/tests/ghc-regress/ffi/should_run/ffi022.hs 
b/tests/ghc-regress/ffi/should_run/ffi022.hs
index dab4cad..5313f71 100644
--- a/tests/ghc-regress/ffi/should_run/ffi022.hs
+++ b/tests/ghc-regress/ffi/should_run/ffi022.hs
@@ -26,6 +26,7 @@ unpackProgName argv = do
 
    isPathSeparator :: Char -> Bool
    isPathSeparator '/'  = True
+   isPathSeparator '\\' = True
    isPathSeparator _    = False
 
 foreign import ccall unsafe "getProgArgv"



_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to