File posix-sigaction.patch of Package perl

Index: perl-5.26.1/ext/POSIX/POSIX.xs
===================================================================
--- perl-5.26.1.orig/ext/POSIX/POSIX.xs
+++ perl-5.26.1/ext/POSIX/POSIX.xs
@@ -3158,6 +3158,10 @@ sigaction(sig, optaction, oldaction = 0)
 		/* Set up any desired flags. */
 		svp = hv_fetchs(action, "FLAGS", FALSE);
 		act.sa_flags = svp ? SvIV(*svp) : 0;
+#ifdef SA_SIGINFO
+		/* Perl_sighandler depends on the extra arguments. */
+		act.sa_flags |= SA_SIGINFO;
+#endif
 
 		/* Don't worry about cleaning up *sigsvp if this fails,
 		 * because that means we tried to disposition a
openSUSE Build Service is sponsored by