From 15b21f26851863e55b1ed4edb5482f373ae0d05f Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Tue, 28 Nov 2023 14:56:15 +0000 Subject: t/cindex*: require SCM_RIGHTS for these tests Code search will require SCM_RIGHTS, and Inline::C on BSDs probably isn't too onerous a dependency for new features as all the ones I've tested have it packaged. Furthermore, requiring SCM_RIGHTS isn't far off since OpenBSD's Perl is patched to route the `syscall' perlop through libc[1], while NetBSD[2] and FreeBSD[3] actually do strive for backwards compatibility. We'd just need to use the numbers and not rely on syscall.ph shipped with Perl since the macro names themselves are unstable. [1] https://cvsweb.openbsd.org/src/gnu/usr.bin/perl/gen_syscall_emulator.pl [2] https://www.netbsd.org/docs/internals/en/chap-processes.html#syscall_versioning [3] https://wiki.freebsd.org/AddingSyscalls#Backward_compatibily --- t/cindex-join.t | 2 +- t/cindex.t | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 't') diff --git a/t/cindex-join.t b/t/cindex-join.t index 2836eb6c..ac90cd64 100644 --- a/t/cindex-join.t +++ b/t/cindex-join.t @@ -12,7 +12,7 @@ use autodie; use File::Spec; $ENV{TEST_REMOTE_JOIN} or plan skip_all => 'TEST_REMOTE_JOIN unset'; local $ENV{TAIL_ALL} = $ENV{TAIL_ALL} // 1; # while features are unstable -require_mods(qw(json Xapian DBD::SQLite)); +require_mods(qw(json Xapian DBD::SQLite +SCM_RIGHTS)); my @code = qw(https://80x24.org/mwrap-perl.git https://80x24.org/mwrap.git); my @inboxes = qw(https://80x24.org/mwrap-public 2 inbox.comp.lang.ruby.mwrap diff --git a/t/cindex.t b/t/cindex.t index 1a9e564a..261945bf 100644 --- a/t/cindex.t +++ b/t/cindex.t @@ -6,7 +6,7 @@ use PublicInbox::TestCommon; use Cwd qw(getcwd abs_path); use List::Util qw(sum); use autodie qw(close open rename); -require_mods(qw(json Xapian)); +require_mods(qw(json Xapian +SCM_RIGHTS)); use_ok 'PublicInbox::CodeSearchIdx'; use PublicInbox::Import; my ($tmp, $for_destroy) = tmpdir(); -- cgit v1.2.3-24-ge0c7