From 560a064920ce0f3428f220e28fa61a494c19bfc4 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Mon, 1 Mar 1999 09:27:49 +0000
Subject: [PATCH] [project @ 1999-03-01 09:27:49 by sof] mingw32 tweak

---
 ghc/lib/std/cbits/renameFile.c |    7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/ghc/lib/std/cbits/renameFile.c b/ghc/lib/std/cbits/renameFile.c
index 1ad3e48..630e4d4 100644
--- a/ghc/lib/std/cbits/renameFile.c
+++ b/ghc/lib/std/cbits/renameFile.c
@@ -1,7 +1,7 @@
 /* 
  * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
  *
- * $Id: renameFile.c,v 1.3 1998/12/02 13:27:51 simonm Exp $
+ * $Id: renameFile.c,v 1.4 1999/03/01 09:27:49 sof Exp $
  *
  * renameFile Runtime Support
  */
@@ -21,6 +21,11 @@
 #include <fcntl.h>
 #endif
 
+#ifdef mingw32_TARGET_OS
+#define O_NOCTTY 0
+#endif
+
+
 StgInt
 renameFile(opath, npath)
 StgByteArray opath;
-- 
1.7.10.4