From 80652a5579331ea87b517a26b11b4f06cc4aa7d0 Mon Sep 17 00:00:00 2001
From: ross <unknown>
Date: Thu, 8 May 2003 16:06:41 +0000
Subject: [PATCH] [project @ 2003-05-08 16:06:41 by ross] avoid a C compiler
 warning about arithmetic with void *

---
 include/HsBase.h |   10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/include/HsBase.h b/include/HsBase.h
index c3e95db..3c6b051 100644
--- a/include/HsBase.h
+++ b/include/HsBase.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: HsBase.h,v 1.20 2003/04/11 11:43:09 ross Exp $
+ * $Id: HsBase.h,v 1.21 2003/05/08 16:06:41 ross Exp $
  *
  * (c) The University of Glasgow 2001-2002
  *
@@ -377,10 +377,10 @@ __hscore_PrelHandle_write( HsInt fd, HsBool isSock, HsAddr ptr,
 {
 #if defined(__MINGW32__)
   if (isSock) {
-    return send(fd,ptr + off, sz, 0);
+    return send(fd,(char *)ptr + off, sz, 0);
   }
 #endif
-  return write(fd,ptr + off, sz);
+  return write(fd,(char *)ptr + off, sz);
 }
 
 INLINE HsInt
@@ -389,10 +389,10 @@ __hscore_PrelHandle_read( HsInt fd, HsBool isSock, HsAddr ptr,
 {
 #if defined(__MINGW32__)
   if (isSock) {
-    return recv(fd,ptr + off, sz, 0);
+    return recv(fd,(char *)ptr + off, sz, 0);
   }
 #endif
-  return read(fd,ptr + off, sz);
+  return read(fd,(char *)ptr + off, sz);
 
 }
 
-- 
1.7.10.4