38d2602fc1
the function naming problem for complex double function i've recently aksed for in -committers. (The recently committed rev 1.5 of proc.c was actually also part of this update.) Should the mailing lists come to an agreement that f2c better belongs into the ports, this could be done nevertheless. For the time being, we've at least got a current version now. Thanks, Steve! Submitted by: Steve Kargl <sgk@troutmask.apl.washington.edu>
38 lines
821 B
C
38 lines
821 B
C
/* You may need to adjust the definition of signal1 to supply a */
|
|
/* cast to the correct argument type. This detail is system- and */
|
|
/* compiler-dependent. The #define below assumes signal.h declares */
|
|
/* type SIG_PF for the signal function's second argument. */
|
|
|
|
#include <signal.h>
|
|
|
|
#ifndef Sigret_t
|
|
#define Sigret_t void
|
|
#endif
|
|
#ifndef Sigarg_t
|
|
#ifdef KR_headers
|
|
#define Sigarg_t
|
|
#else
|
|
#ifdef __cplusplus
|
|
#define Sigarg_t ...
|
|
#else
|
|
#define Sigarg_t int
|
|
#endif
|
|
#endif
|
|
#endif /*Sigarg_t*/
|
|
|
|
#ifdef USE_SIG_PF /* compile with -DUSE_SIG_PF under IRIX */
|
|
#define sig_pf SIG_PF
|
|
#else
|
|
typedef Sigret_t (*sig_pf)(Sigarg_t);
|
|
#endif
|
|
|
|
#define signal1(a,b) signal(a,(sig_pf)b)
|
|
|
|
#ifdef __cplusplus
|
|
#define Sigarg ...
|
|
#define Use_Sigarg
|
|
#else
|
|
#define Sigarg Int n
|
|
#define Use_Sigarg n = n /* shut up compiler warning */
|
|
#endif
|