diff options
author | Aaron Crane <arc@cpan.org> | 2016-05-13 12:43:20 +0100 |
---|---|---|
committer | Aaron Crane <arc@cpan.org> | 2016-05-16 13:47:10 +0100 |
commit | b40d1aa27dae20c52bea2ec0d36f57aa37503988 (patch) | |
tree | dd46def5ab5b1170427bcb3f2c7dded63565c661 | |
parent | 9a0b3f3632c5377e7b38bf711f1b2c674649eeed (diff) | |
download | perl-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.pm | 4 | ||||
-rw-r--r-- | ext/POSIX/t/export.t | 5 |
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 |