From 78d10ce46a7d0c60aab9e088a8004f1b6dd435d5 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sun, 12 Sep 1999 16:24:46 +0000
Subject: [PATCH] [project @ 1999-09-12 16:24:46 by sof] inputReady() and
 mingw - always return 1, not 0

---
 ghc/lib/std/cbits/inputReady.c |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/lib/std/cbits/inputReady.c b/ghc/lib/std/cbits/inputReady.c
index 2e07fcf..c1af5cc 100644
--- a/ghc/lib/std/cbits/inputReady.c
+++ b/ghc/lib/std/cbits/inputReady.c
@@ -1,7 +1,7 @@
 /* 
  * (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
  *
- * $Id: inputReady.c,v 1.4 1999/03/01 09:23:58 sof Exp $
+ * $Id: inputReady.c,v 1.5 1999/09/12 16:24:46 sof Exp $
  *
  * hReady Runtime Support
  */
@@ -71,7 +71,7 @@ StgInt msecs;
     }
 
 #ifdef mingw32_TARGET_OS
-    return 0;
+    return 1;
 #else
     fd = fo->fd;
 
-- 
1.7.10.4