diff options
| author | qrczak <unknown> | 2001-08-18 11:55:48 +0000 |
|---|---|---|
| committer | qrczak <unknown> | 2001-08-18 11:55:48 +0000 |
| commit | 9a6f4dd7cca2100a0108f88c7669e7df3422a155 (patch) | |
| tree | 05229943429eceba143c1e1644c22fc02e8edfee | |
| parent | aea9f10b02b9653c6a0f887ecc87db9aa2cda516 (diff) | |
| download | haskell-9a6f4dd7cca2100a0108f88c7669e7df3422a155.tar.gz | |
[project @ 2001-08-18 11:55:48 by qrczak]
Use char * instead of void * for pointer arithmetic.
| -rw-r--r-- | ghc/includes/PrimOps.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/includes/PrimOps.h b/ghc/includes/PrimOps.h index 5994453260..9c975bd10b 100644 --- a/ghc/includes/PrimOps.h +++ b/ghc/includes/PrimOps.h @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: PrimOps.h,v 1.81 2001/08/17 17:18:53 apt Exp $ + * $Id: PrimOps.h,v 1.82 2001/08/18 11:55:48 qrczak Exp $ * * (c) The GHC Team, 1998-2000 * @@ -243,8 +243,8 @@ typedef union { -------------------------------------------------------------------------- */ #define nullAddrzh(r,i) r=(A_)(0) -#define plusAddrzh(r,a,i) r=((void *)(a)) + (i) -#define minusAddrzh(r,a,b) r=((void *)(a)) - ((void *)(b)) +#define plusAddrzh(r,a,i) r=((char *)(a)) + (i) +#define minusAddrzh(r,a,b) r=((char *)(a)) - ((char *)(b)) #define remAddrzh(r,a,i) r=((W_)(a))%(i) #define int2Addrzh(r,a) r=(A_)(a) #define addr2Intzh(r,a) r=(I_)(a) |