From: simonm <unknown>
Date: Fri, 29 Jan 1999 13:52:09 +0000 (+0000)
Subject: [project @ 1999-01-29 13:52:09 by simonm]
X-Git-Tag: Approximately_9120_patches~6651
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=c837c7ef0990071a3f64a35a62072d5b97269bc7;p=ghc-hetmet.git

[project @ 1999-01-29 13:52:09 by simonm]
A couple of underscore got lost a long time ago.
---

diff --git a/ghc/lib/misc/cbits/ByteOps.c b/ghc/lib/misc/cbits/ByteOps.c
index 11ee7b2..77e017f 100644
--- a/ghc/lib/misc/cbits/ByteOps.c
+++ b/ghc/lib/misc/cbits/ByteOps.c
@@ -26,7 +26,7 @@ returns the number of bytes taken.
     /* need the ANSI arg decl, so "short" and "float" args dont get promoted */
 #define X2BYTES(type)				\
 I_						\
-type##2bytes(type in, unsigned char *arr)	\
+type##2bytes__(type in, unsigned char *arr)	\
 { 						\
     union {					\
 	type i;					\
@@ -44,7 +44,7 @@ type##2bytes(type in, unsigned char *arr)	\
 #else /* not STDC */
 #define X2BYTES(type)				\
 I_						\
-type##2bytes(type in, unsigned char *arr)	\
+type##2bytes__(type in, unsigned char *arr)	\
 { 						\
     union {					\
 	type i;					\