The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
?RCS: $Id: d_sigvec.U,v 3.0.1.1 1997/02/28 15:45:37 ram Exp $
?RCS:
?RCS: Copyright (c) 1991-1993, Raphael Manfredi
?RCS: 
?RCS: You may redistribute only under the terms of the Artistic Licence,
?RCS: as specified in the README file that comes with the distribution.
?RCS: You may reuse parts of this distribution only within the terms of
?RCS: that same Artistic Licence; a copy of which may be found at the root
?RCS: of the source tree for dist 3.0.
?RCS:
?RCS: $Log: d_sigvec.U,v $
?RCS: Revision 3.0.1.1  1997/02/28  15:45:37  ram
?RCS: patch61: there is now a separate routine for sigaction()
?RCS:
?RCS: Revision 3.0  1993/08/18  12:07:24  ram
?RCS: Baseline for dist 3.0 netwide release.
?RCS:
?X: d_sigvec.U, from d_ftime.U 1.0
?X:
?MAKE:d_sigvec d_sigvectr d_sigintrp: Csym Inlibc Setvar
?MAKE:	-pick add $@ %<
?S:d_sigvec:
?S:	This variable conditionally defines the HAS_SIGVEC symbol, which indicates
?S:	that BSD reliable signals are supported.
?S:.
?S:d_sigvectr:
?S:	This variable conditionally defines the HAS_SIGVECTOR symbol, which
?S:	indicates that the sigvec() routine is called sigvector() instead, for
?S:	reasons known only to Hewlett-Packard.
?S:.
?S:d_sigintrp:
?S:	This variable conditionally defines the HAS_SIGINTRP symbol, which
?S:	indicates that the siginterrupt() routine is available.
?S:.
?C:HAS_SIGVEC (SIGVEC):
?C:	This symbol, if defined, indicates that BSD reliable signals are
?C:	supported.
?C:.
?C:HAS_SIGVECTOR (SIGVECTOR):
?C:	This symbol, if defined, indicates that the sigvec() routine is called
?C:	sigvector() instead, and that sigspace() is provided instead of
?C:	sigstack().  This is probably only true for HP-UX.
?C:.
?C:HAS_SIGINTRP (SIGINTRP):
?C:	This symbol, if defined, indicates that the siginterrupt() routine
?C:	is available.
?C:.
?H:#$d_sigvec HAS_SIGVEC	/**/
?H:#$d_sigvectr HAS_SIGVECTOR	/**/
?H:#$d_sigintrp HAS_SIGINTRP	/**/
?H:.
?T:val
?LINT:set d_sigvec d_sigintrp
echo " "
@if d_sigvectr || d_sigvec || HAS_SIGVEC || HAS_SIGVECTOR
: see if sigvector exists -- since sigvec will match the substring
if set sigvector val -f d_sigvectr; eval $csym; $val; then
	echo 'sigvector() found--you must be running HP-UX.' >&4
	val="$define"; set d_sigvectr; eval $setvar
	val="$define"; set d_sigvec; eval $setvar
else
: try the original name
	d_sigvectr="$undef"
	if set sigvec val -f d_sigvec; eval $csym; $val; then
		echo 'sigvec() found.' >&4
		val="$define"; set d_sigvec; eval $setvar
	else
		echo 'sigvec() not found--race conditions with signals may occur.' >&4
		val="$undef"; set d_sigvec; eval $setvar
	fi
fi

@end
@if d_sigintrp || HAS_SIGINTRP
: see if we have siginterrupt
set siginterrupt d_sigintrp
eval $inlibc

@end