diff options
author | Eric Wong <e@yhbt.net> | 2020-08-07 10:15:04 +0000 |
---|---|---|
committer | Eric Wong <e@yhbt.net> | 2020-08-07 23:44:55 +0000 |
commit | 62068fafcb40c2f91d31cf3fa5e775ecc52a6ba8 (patch) | |
tree | 64416de947b897e8ce15c4c91423bb8639e21669 /t | |
parent | 9968a955fd7881155bd4938116b98d2ffba192e6 (diff) | |
download | public-inbox-62068fafcb40c2f91d31cf3fa5e775ecc52a6ba8.tar.gz |
Thanks to the GCC compile farm project, we can wire up syscalls for sparc64 and set system-specific SFD_* constants properly. I've FINALLY figured out how to use POSIX::SigSet to generate a usable buffer for the syscall perlfunc. This is required for endian-neutral behavior and relevant to sparc64, at least. There's no need for signalfd-related stuff to be constants, either. signalfd initialization is never a hot path and a stub subroutine for constants uses several KB of memory in the interpreter. We'll drop the needless SEEK_CUR import while we're importing O_NONBLOCK, too.
Diffstat (limited to 't')
-rw-r--r-- | t/sigfd.t | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -4,7 +4,7 @@ use Test::More; use IO::Handle; use POSIX qw(:signal_h); use Errno qw(ENOSYS); -use PublicInbox::Syscall qw(SFD_NONBLOCK); +use PublicInbox::Syscall qw($SFD_NONBLOCK); require_ok 'PublicInbox::Sigfd'; SKIP: { @@ -42,8 +42,8 @@ SKIP: { } $sigfd = undef; - my $nbsig = PublicInbox::Sigfd->new($sig, SFD_NONBLOCK); - ok($nbsig, 'Sigfd->new SFD_NONBLOCK works'); + my $nbsig = PublicInbox::Sigfd->new($sig, $SFD_NONBLOCK); + ok($nbsig, 'Sigfd->new $SFD_NONBLOCK works'); is($nbsig->wait_once, undef, 'nonblocking ->wait_once'); ok($! == Errno::EAGAIN, 'got EAGAIN'); kill('HUP', $$) or die "kill $!"; |