From 99b153d655bc142bec0fd5b6ace27642bb52a6b3 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sat, 23 Jan 1999 17:44:40 +0000
Subject: [PATCH] [project @ 1999-01-23 17:44:40 by sof] Removed workaround
 for bug - fixed (a while ago.)

---
 ghc/lib/std/cbits/openFile.c |    7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/ghc/lib/std/cbits/openFile.c b/ghc/lib/std/cbits/openFile.c
index 5c5848b..2d5afe5 100644
--- a/ghc/lib/std/cbits/openFile.c
+++ b/ghc/lib/std/cbits/openFile.c
@@ -1,7 +1,7 @@
 /* 
  * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
  *
- * $Id: openFile.c,v 1.4 1999/01/07 15:48:40 simonm Exp $
+ * $Id: openFile.c,v 1.5 1999/01/23 17:44:40 sof Exp $
  *
  * openFile Runtime Support
  */
@@ -68,11 +68,6 @@ StgInt flags;
     struct stat sb;
     IOFileObject* fo;
 
-#ifdef __CONCURRENT_HASKELL__
-#warning FixMe: Ignoring bogus bit 7 in openFiles 2nd argument
-    how = how & 0x7f;
-#endif
-
     /*
      * Since we aren't supposed to succeed when we're opening for writing and
      * there's another writer, we can't just do an open() with O_WRONLY.
-- 
1.7.10.4