+26
-8
lines changedFilter options
+26
-8
lines changed Original file line number Diff line number Diff line change
@@ -1685,8 +1685,8 @@ Apd |void |setdefout |NN GV* gv
1685
1685
Ap |HEK* |share_hek |NN const char* str|SSize_t len|U32 hash
1686
1686
#if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
1687
1687
: Used in perl.c
1688
-
Tp |Signal_t |sighandler |int sig|NULLOK siginfo_t *info|NULLOK void *uap
1689
-
ATp |Signal_t |csighandler |int sig|NULLOK siginfo_t *info|NULLOK void *uap
1688
+
Tp |Signal_t |sighandler |int sig|NULLOK Siginfo_t *info|NULLOK void *uap
1689
+
ATp |Signal_t |csighandler |int sig|NULLOK Siginfo_t *info|NULLOK void *uap
1690
1690
#else
1691
1691
Tp |Signal_t |sighandler |int sig
1692
1692
ATp |Signal_t |csighandler |int sig
Original file line number Diff line number Diff line change
@@ -52,7 +52,7 @@
52
52
53
53
#ifndef Sighandler_t
54
54
# if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
55
-
typedef Signal_t (*Sighandler_t) (int, siginfo_t*, void*);
55
+
typedef Signal_t (*Sighandler_t) (int, Siginfo_t*, void*);
56
56
# else
57
57
typedef Signal_t (*Sighandler_t) (int);
58
58
# endif
Original file line number Diff line number Diff line change
@@ -63,7 +63,7 @@ tie.
63
63
#endif
64
64
65
65
#if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
66
-
Signal_t Perl_csighandler(int sig, siginfo_t *, void *);
66
+
Signal_t Perl_csighandler(int sig, Siginfo_t *, void *);
67
67
#else
68
68
Signal_t Perl_csighandler(int sig);
69
69
#endif
@@ -1488,7 +1488,7 @@ Perl_magic_clearsig(pTHX_ SV *sv, MAGIC *mg)
1488
1488
1489
1489
Signal_t
1490
1490
#if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
1491
-
Perl_csighandler(int sig, siginfo_t *sip PERL_UNUSED_DECL, void *uap PERL_UNUSED_DECL)
1491
+
Perl_csighandler(int sig, Siginfo_t *sip PERL_UNUSED_DECL, void *uap PERL_UNUSED_DECL)
1492
1492
#else
1493
1493
Perl_csighandler(int sig)
1494
1494
#endif
@@ -3319,7 +3319,7 @@ Perl_whichsig_pvn(pTHX_ const char *sig, STRLEN len)
3319
3319
3320
3320
Signal_t
3321
3321
#if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
3322
-
Perl_sighandler(int sig, siginfo_t *sip, void *uap)
3322
+
Perl_sighandler(int sig, Siginfo_t *sip, void *uap)
3323
3323
#else
3324
3324
Perl_sighandler(int sig)
3325
3325
#endif
Original file line number Diff line number Diff line change
@@ -2793,6 +2793,24 @@ typedef struct padname PADNAME;
2793
2793
# define USE_ENVIRON_ARRAY
2794
2794
#endif
2795
2795
2796
+
2797
+
/* Siginfo_t:
2798
+
* This is an alias for the OS's siginfo_t, except that where the OS
2799
+
* doesn't support it, declare a dummy version instead. This allows us to
2800
+
* have signal handler functions which always have a Siginfo_t parameter
2801
+
* regardless of platform, (and which will just be passed a NULL value
2802
+
* where the OS doesn't support HAS_SIGACTION).
2803
+
*/
2804
+
2805
+
#if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
2806
+
typedef siginfo_t Siginfo_t;
2807
+
#else
2808
+
typedef struct {
2809
+
int si_signo;
2810
+
} Siginfo_t;
2811
+
#endif
2812
+
2813
+
2796
2814
/*
2797
2815
* initialise to avoid floating-point exceptions from overflow, etc
2798
2816
*/
Original file line number Diff line number Diff line change
@@ -4565,9 +4565,9 @@ PERL_CALLCONV int Perl_PerlProc_pipe_cloexec(pTHX_ int *pipefd)
4565
4565
4566
4566
#endif
4567
4567
#if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
4568
-
PERL_CALLCONV Signal_t Perl_csighandler(int sig, siginfo_t *info, void *uap);
4568
+
PERL_CALLCONV Signal_t Perl_csighandler(int sig, Siginfo_t *info, void *uap);
4569
4569
#define PERL_ARGS_ASSERT_CSIGHANDLER
4570
-
PERL_CALLCONV Signal_t Perl_sighandler(int sig, siginfo_t *info, void *uap);
4570
+
PERL_CALLCONV Signal_t Perl_sighandler(int sig, Siginfo_t *info, void *uap);
4571
4571
#define PERL_ARGS_ASSERT_SIGHANDLER
4572
4572
#endif
4573
4573
#if defined(HAS_SOCKET)
You can’t perform that action at this time.
RetroSearch is an open source project built by @garambo | Open a GitHub Issue
Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo
HTML:
3.2
| Encoding:
UTF-8
| Version:
0.7.4