diff options
author | Eric Wong <e@80x24.org> | 2021-10-28 11:15:00 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-10-28 19:17:11 +0000 |
commit | 0de5ec392999835027db8512c6a0e00406fa4dce (patch) | |
tree | 1d79a2627439aa8e28573f17d319e72f54e0c158 /lib/PublicInbox | |
parent | e163539064b4da5f742697c1f778e7b2c82c40a6 (diff) | |
download | public-inbox-0de5ec392999835027db8512c6a0e00406fa4dce.tar.gz |
Some bugs are triggered with more CPUs, some with 1 CPU.
Diffstat (limited to 'lib/PublicInbox')
-rw-r--r-- | lib/PublicInbox/LeiSucks.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/PublicInbox/LeiSucks.pm b/lib/PublicInbox/LeiSucks.pm index e832f95e..8e866fc9 100644 --- a/lib/PublicInbox/LeiSucks.pm +++ b/lib/PublicInbox/LeiSucks.pm @@ -11,6 +11,7 @@ use Digest::SHA (); use Config; use POSIX (); use PublicInbox::Config; +use PublicInbox::IPC; sub lei_sucks { my ($lei, @argv) = @_; @@ -22,9 +23,10 @@ sub lei_sucks { } eval { require PublicInbox }; my $pi_ver = eval('$PublicInbox::VERSION') // '(???)'; + my $nproc = PublicInbox::IPC::detect_nproc() // '?'; my @out = ("lei $pi_ver\n", "perl $Config{version} / $os $rel / $mac ". - "ptrsize=$Config{ptrsize}\n"); + "ptrsize=$Config{ptrsize} nproc=$nproc\n"); chomp(my $gv = `git --version` || "git missing"); $gv =~ s/ version / /; my $json = ref(PublicInbox::Config->json); |