diff --git a/ghc/lib/std/cbits/openFile.c b/ghc/lib/std/cbits/openFile.c index 5c5848b2eabaaa4b0c738e1e32993b77f337c048..2d5afe516b53ff3b59fc40977a7ea36b0592338b 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.