File tree 3 files changed +8
-8
lines changed
3 files changed +8
-8
lines changed Original file line number Diff line number Diff line change @@ -359,7 +359,7 @@ static int debug_initialization = 0;
359
359
/* Automatically include the caller's file, and line number in debugging output;
360
360
* and the errno (and/or extended errno) if non-zero. On threaded perls add
361
361
* the aTHX too. */
362
- # if defined(USE_ITHREADS ) && ! defined(NO_LOCALE_THREADS )
362
+ # if defined(USE_THREADS ) && ! defined(NO_LOCALE_THREADS )
363
363
# define DEBUG_PRE_STMTS \
364
364
DEBUG_ERRNO; \
365
365
PerlIO_printf(Perl_debug_log, "\n%s: %" LINE_Tf ": 0x%p%s: ", \
Original file line number Diff line number Diff line change @@ -120,15 +120,15 @@ BEGIN
120
120
# perl.h logic duplication begins
121
121
122
122
123
- if ($define {USE_ITHREADS }) {
123
+ if ($define {USE_THREADS }) {
124
124
if (!$define {MULTIPLICITY }) {
125
125
$define {MULTIPLICITY } = 1;
126
126
}
127
127
}
128
128
129
129
$define {MULTIPLICITY } ||= $define {PERL_IMPLICIT_CONTEXT } ;
130
130
131
- if ($define {USE_ITHREADS } && ! $define {WIN32 }) {
131
+ if ($define {USE_THREADS } && ! $define {WIN32 }) {
132
132
$define {USE_REENTRANT_API } = 1;
133
133
}
134
134
@@ -149,7 +149,7 @@ BEGIN
149
149
150
150
# https://en.wikipedia.org/wiki/Microsoft_Visual_C%2B%2B#Internal_version_numbering
151
151
my $cctype = $ARGS {CCTYPE } =~ s / MSVC// r ;
152
- if ( $define {USE_ITHREADS }
152
+ if ( $define {USE_THREADS }
153
153
&& $define {USE_LOCALE }
154
154
&& ! $define {NO_LOCALE_THREADS })
155
155
{
Original file line number Diff line number Diff line change @@ -120,7 +120,7 @@ no normal arguments, and used by L</C<comma_pDEPTH>> itself.
120
120
/* See L<perlguts/"The Perl API"> for detailed notes on
121
121
* MULTIPLICITY and PERL_IMPLICIT_SYS */
122
122
123
- #ifdef USE_ITHREADS
123
+ #ifdef USE_THREADS
124
124
# if !defined(MULTIPLICITY)
125
125
# define MULTIPLICITY
126
126
# endif
@@ -1226,7 +1226,7 @@ typedef enum {
1226
1226
* The defines from here to the following ===== line are unfortunately
1227
1227
* duplicated in makedef.pl, and changes here MUST also be made there */
1228
1228
1229
- # if defined(USE_ITHREADS ) && ! defined(NO_LOCALE_THREADS)
1229
+ # if defined(USE_THREADS ) && ! defined(NO_LOCALE_THREADS)
1230
1230
# define USE_LOCALE_THREADS
1231
1231
# endif
1232
1232
@@ -5223,7 +5223,7 @@ typedef Sighandler_t Sigsave_t;
5223
5223
5224
5224
#if defined(USE_PERLIO)
5225
5225
EXTERN_C void PerlIO_teardown (void );
5226
- # ifdef USE_ITHREADS
5226
+ # ifdef USE_THREADS
5227
5227
# define PERLIO_INIT MUTEX_INIT (&PL_perlio_mutex)
5228
5228
# define PERLIO_TERM \
5229
5229
STMT_START { \
@@ -6911,7 +6911,7 @@ typedef struct am_table_short AMTS;
6911
6911
6912
6912
#define PERLDB_LINE_OR_SAVESRC (PL_perldb & (PERLDBf_LINE | PERLDBf_SAVESRC))
6913
6913
6914
- #ifdef USE_ITHREADS
6914
+ #ifdef USE_THREADS
6915
6915
# define KEYWORD_PLUGIN_MUTEX_INIT MUTEX_INIT (&PL_keyword_plugin_mutex)
6916
6916
# define KEYWORD_PLUGIN_MUTEX_LOCK MUTEX_LOCK (&PL_keyword_plugin_mutex)
6917
6917
# define KEYWORD_PLUGIN_MUTEX_UNLOCK MUTEX_UNLOCK (&PL_keyword_plugin_mutex)
You can’t perform that action at this time.
0 commit comments