diff options
author | Nicholas Clark <nick@ccl4.org> | 2011-07-27 15:36:35 +0200 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2011-08-01 11:53:56 +0200 |
commit | 3cf3941efbe7151eded0f3d115e71a544defdf77 (patch) | |
tree | 20c76272111ba8e0db82eda1947ded37eb9a77dd /makedef.pl | |
parent | 01cace463300d82f8da82a3bb6b443463d0ab55b (diff) | |
download | perl-3cf3941efbe7151eded0f3d115e71a544defdf77.tar.gz |
In makedef.pl, tidy up the MYMALLOC logic.
No need to call try_symbols() for PL_malloc_mutex, as it is found in
perlvars.h. Unlike PL_perlio_mutex, PL_malloc_mutex isn't listed in the
main !USE_ITHREADS skip list - perhaps it should be for consistency.
Diffstat (limited to 'makedef.pl')
-rw-r--r-- | makedef.pl | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/makedef.pl b/makedef.pl index 02116942ac..688a3043d5 100644 --- a/makedef.pl +++ b/makedef.pl @@ -309,13 +309,8 @@ if ($define{'MYMALLOC'}) { MallocCfg_ptr MallocCfgP_ptr )); - if ($define{'USE_ITHREADS'}) { - try_symbols(qw( - PL_malloc_mutex - )); - } - else { - ++$skip{PL_malloc_mutex}; + unless ($define{USE_ITHREADS}) { + ++$skip{PL_malloc_mutex} } } else { |