[commit: testsuite] ghc-7.6: Make T7037 work on both Windows and other platforms (eb380cf)

[Ian Lynagh]

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

On branch  : ghc-7.6

http://hackage.haskell.org/trac/ghc/changeset/eb380cf832298ee1f6e15302dddd034dc04c39ce

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

commit eb380cf832298ee1f6e15302dddd034dc04c39ce
Author: Ian Lynagh <ian at well-typed.com>
Date:   Fri Jan 25 23:35:28 2013 +0000

    Make T7037 work on both Windows and other platforms

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

 tests/rts/T7037_main.c |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/tests/rts/T7037_main.c b/tests/rts/T7037_main.c
index cca6681..c195834 100644
--- a/tests/rts/T7037_main.c
+++ b/tests/rts/T7037_main.c
@@ -2,6 +2,9 @@
 #include <unistd.h>
 
 int main(int argc, char *argv[]) {
-    const char *args[2] = {"T7037", NULL};
+#ifdef __MINGW32__
+    const
+#endif
+    char * args[2] = {"T7037", NULL};
     execv("./T7037", args);
 }