ghc/lib/posix/cbits/signal.c

   1 /*
   2  * (c) Juan Quintela, Universidade da Corunha 1998
   3  *
   4  * wrappers for signal funcions
   5  *
   6  * sigset_t is a struct in some UNIXes (LINUX/glibc for instance)
   7  * and it is not posible to do the inline (_casm_). These functions
   8  * aren't inline because it causes gcc to run out of registers on x86.
   9  *
  10  */
  11
  12 #include "Rts.h"
  13 #include "libposix.h"
  14
  15 void
  16 stg_sigaddset(sigset_t *newset, sigset_t *oldset, int signum)
  17 {
  18         *newset = *oldset;
  19         sigaddset(newset, signum);
  20 }
  21
  22 void
  23 stg_sigdelset(sigset_t *newset, sigset_t *oldset, int signum)
  24 {
  25         *newset = *oldset;
  26         sigdelset(newset, signum);
  27 }