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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/183d6c8ed66e25e72017e891fc1a07bda937f087

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

commit 183d6c8ed66e25e72017e891fc1a07bda937f087
Author: Ian Lynagh <[email protected]>
Date:   Sun Jun 5 19:16:35 2011 +0100

    Fix Windows build failure
    
    We were calling freeArgv with arguments of the wrong type.
    But actually, we had our own copy of its loop anyway, so
    now we just use that instead.

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

 rts/RtsFlags.c |    2 --
 1 files changed, 0 insertions(+), 2 deletions(-)

diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c
index 9c0ec9e..24181d3 100644
--- a/rts/RtsFlags.c
+++ b/rts/RtsFlags.c
@@ -1585,8 +1585,6 @@ void freeWin32ProgArgv (void);
 void
 freeWin32ProgArgv (void)
 {
-    freeArgv(win32_prog_argc, win32_prog_argv);
-
     int i;
 
     if (win32_prog_argv != NULL) {



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

Reply via email to