summaryrefslogtreecommitdiff
path: root/makedef.pl
diff options
context:
space:
mode:
Diffstat (limited to 'makedef.pl')
-rw-r--r--makedef.pl4
1 files changed, 4 insertions, 0 deletions
diff --git a/makedef.pl b/makedef.pl
index 858c1eb46a..b4d76ea699 100644
--- a/makedef.pl
+++ b/makedef.pl
@@ -1223,6 +1223,10 @@ if ($define{'MULTIPLICITY'}) {
my $glob = readvar($f, sub { "Perl_" . $_[1] . $_[2] . "_ptr" });
emit_symbols $glob;
}
+ unless ($define{'USE_ITHREADS'}) {
+ # XXX needed for XS extensions that define PERL_CORE
+ emit_symbol("PL_curinterp");
+ }
# XXX AIX seems to want the perlvars.h symbols, for some reason
if ($PLATFORM eq 'aix' or $PLATFORM eq 'os2') { # OS/2 needs PL_thr_key
my $glob = readvar($perlvars_h);