From eea46a8ce8c8d0f80608e627ae05d7de76baf967 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 1 Jul 1999 13:12:09 +0000
Subject: [PATCH] [project @ 1999-07-01 13:12:09 by simonmar] 8-bit clarity
---
ghc/lib/std/cbits/readFile.c | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/ghc/lib/std/cbits/readFile.c b/ghc/lib/std/cbits/readFile.c
index 8949ba28fbed..8956e98f2665 100644
--- a/ghc/lib/std/cbits/readFile.c
+++ b/ghc/lib/std/cbits/readFile.c
@@ -1,7 +1,7 @@
/*
* (c) The GRASP/AQUA Project, Glasgow University, 1994-1998
*
- * $Id: readFile.c,v 1.4 1999/05/05 10:33:16 sof Exp $
+ * $Id: readFile.c,v 1.5 1999/07/01 13:12:09 simonmar Exp $
*
* hGetContents Runtime Support
*/
@@ -278,7 +278,7 @@ StgForeignPtr ptr;
{
IOFileObject* fo= (IOFileObject*)ptr;
int count,rc=0;
- char c;
+ unsigned char c;
/* Check if someone hasn't zapped us */
if ( fo == NULL || fo->fd == -1)
--
GitLab