This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
devel/mktodo.pl: Get working on threaded perls.
authorKarl Williamson <khw@cpan.org>
Thu, 1 Aug 2019 16:14:39 +0000 (10:14 -0600)
committerNicolas R <atoomic@cpan.org>
Fri, 27 Sep 2019 22:51:27 +0000 (16:51 -0600)
If we don't ignore issues with this libc symbol, pthread_getspecific(),
we don't work on threaded perls.

I don't understand why this is undefined.

(cherry picked from commit dd767ef602ff590b061b8d54d83eaec1945ec473)
Signed-off-by: Nicolas R <atoomic@cpan.org>
dist/Devel-PPPort/devel/mktodo.pl

index 62936bd..05b09a9 100644 (file)
@@ -206,6 +206,12 @@ retry:
       # keys, being all the symbols referred to within it (with their values
       # btw being the count of occurrences in the element).
       for my $m (keys %{$symmap->{$u}}) {
+
+        # pthread_getspecific() is undefined.  khw doesn't know why.  But we
+        # have a bunch of things depending on it, so it doesn't work unless we
+        # ignore this apparently spurious issue.
+        next if $u eq 'pthread_getspecific';
+
         if (!$seen{$m}++) {
           my $pl = $m;
           $pl =~ s/^[Pp]erl_//;