2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>

[official-gcc.git] / libf2c / libF77 / signal_.c

#include "f2c.h"
#include "signal1.h"

void *
G77_signal_0 (integer * sigp, sig_pf proc)
{
  int sig;
  sig = (int) *sigp;

  return (void *) signal (sig, proc);
}