This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
reentr.h: Add clarifying comment
authorKarl Williamson <khw@cpan.org>
Mon, 16 Mar 2020 17:52:59 +0000 (11:52 -0600)
committerKarl Williamson <khw@cpan.org>
Thu, 19 Mar 2020 00:05:49 +0000 (18:05 -0600)
reentr.h
regen/reentr.pl

index 34e3c22..51e19b8 100644 (file)
--- a/reentr.h
+++ b/reentr.h
 /* If compiling for a threaded perl, we will macro-wrap the system/library
  * interfaces (e.g. getpwent()) which have threaded versions
  * (e.g. getpwent_r()), which will handle things correctly for
- * the Perl interpreter, but otherwise (for XS) the wrapping does
- * not take place.  See L<perlxs/Thread-aware system interfaces>.
+ * the Perl interpreter.  This is done automatically for the perl core and
+ * extensions, but not generally for XS modules unless they
+ *    #define PERL_REENTRANT
+ * See L<perlxs/Thread-aware system interfaces>.
  */
 
 #ifndef PERL_REENTR_API
index 2ca40ea..49c6ee8 100644 (file)
@@ -68,8 +68,10 @@ print $h <<EOF;
 /* If compiling for a threaded perl, we will macro-wrap the system/library
  * interfaces (e.g. getpwent()) which have threaded versions
  * (e.g. getpwent_r()), which will handle things correctly for
- * the Perl interpreter, but otherwise (for XS) the wrapping does
- * not take place.  See L<perlxs/Thread-aware system interfaces>.
+ * the Perl interpreter.  This is done automatically for the perl core and
+ * extensions, but not generally for XS modules unless they
+ *    #define PERL_REENTRANT
+ * See L<perlxs/Thread-aware system interfaces>.
  */
 
 #ifndef PERL_REENTR_API