summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAaron Crane <arc@cpan.org>2016-05-13 12:43:20 +0100
committerAaron Crane <arc@cpan.org>2016-05-16 13:47:10 +0100
commitb40d1aa27dae20c52bea2ec0d36f57aa37503988 (patch)
treedd46def5ab5b1170427bcb3f2c7dded63565c661
parent9a0b3f3632c5377e7b38bf711f1b2c674649eeed (diff)
downloadperl-b40d1aa27dae20c52bea2ec0d36f57aa37503988.tar.gz
POSIX: add new :sys_socket_h export tag with missing MSG_* symbols
These symbols were not previously exported at all, despite having been added in the 5.9 cycle.
-rw-r--r--ext/POSIX/lib/POSIX.pm4
-rw-r--r--ext/POSIX/t/export.t5
2 files changed, 9 insertions, 0 deletions
diff --git a/ext/POSIX/lib/POSIX.pm b/ext/POSIX/lib/POSIX.pm
index 2e85ab3cdd..d3755a5e76 100644
--- a/ext/POSIX/lib/POSIX.pm
+++ b/ext/POSIX/lib/POSIX.pm
@@ -439,6 +439,10 @@ my %other_export_tags = ( # cf. exports policy below
stdlib_h_c99 => [ @{$default_export_tags{stdlib_h}}, 'strtold' ],
+ sys_socket_h => [qw(
+ MSG_CTRUNC MSG_DONTROUTE MSG_EOR MSG_OOB MSG_PEEK MSG_TRUNC MSG_WAITALL
+ )],
+
nan_payload => [ qw(getpayload setpayload setpayloadsig issignaling) ],
signal_h_si_code => [qw(
diff --git a/ext/POSIX/t/export.t b/ext/POSIX/t/export.t
index 581af471e1..f82a5919fe 100644
--- a/ext/POSIX/t/export.t
+++ b/ext/POSIX/t/export.t
@@ -130,6 +130,11 @@ my %expect = (
# it is OK to add new constants, but new functions may only go in EXPORT_OK
],
EXPORT_OK => [sort
+ # this stuff was added in 5.9, but not exported until 5.25
+ qw(
+ MSG_CTRUNC MSG_DONTROUTE MSG_EOR MSG_OOB MSG_PEEK
+ MSG_TRUNC MSG_WAITALL
+ ),
# this stuff was added in 5.11, but not exported until 5.25
qw(
EAI_AGAIN EAI_BADFLAGS EAI_FAIL EAI_FAMILY EAI_MEMORY