diff options
author | panne <unknown> | 1999-08-04 17:03:41 +0000 |
---|---|---|
committer | panne <unknown> | 1999-08-04 17:03:41 +0000 |
commit | c01bd74591f8e7b5d9c90100a9f64b1c4bfb9238 (patch) | |
tree | 70cdb3e9bb5d8e7398772fd410439444a60bfca8 /ghc/lib/posix/cbits/signal.c | |
parent | bf8c3203b46f7a679466427c101e894aecbc619c (diff) | |
download | haskell-c01bd74591f8e7b5d9c90100a9f64b1c4bfb9238.tar.gz |
[project @ 1999-08-04 17:03:20 by panne]
Some small pedantic changes to get function prototypes right.
Diffstat (limited to 'ghc/lib/posix/cbits/signal.c')
-rw-r--r-- | ghc/lib/posix/cbits/signal.c | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/ghc/lib/posix/cbits/signal.c b/ghc/lib/posix/cbits/signal.c index 9811306a79..e4d71127f0 100644 --- a/ghc/lib/posix/cbits/signal.c +++ b/ghc/lib/posix/cbits/signal.c @@ -7,21 +7,23 @@ * and it is not posible to do the inline (_casm_). These functions * aren't inline because it causes gcc to run out of registers on x86. * + * Ugly casting added by SUP to avoid C compiler warnings about + * incompatible pointer types. */ #include "Rts.h" #include "libposix.h" void -stg_sigaddset(sigset_t *newset, sigset_t *oldset, int signum) +stg_sigaddset(StgByteArray newset, StgByteArray oldset, int signum) { - *newset = *oldset; - sigaddset(newset, signum); + *((sigset_t *)newset) = *((sigset_t *)oldset); + sigaddset((sigset_t *)newset, signum); } void -stg_sigdelset(sigset_t *newset, sigset_t *oldset, int signum) +stg_sigdelset(StgByteArray newset, StgByteArray oldset, int signum) { - *newset = *oldset; - sigdelset(newset, signum); + *((sigset_t *)newset) = *((sigset_t *)oldset); + sigdelset((sigset_t *)newset, signum); } |