This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Generate the virtual entries at Config.pm build time, as they
[perl5.git] / embed.h
diff --git a/embed.h b/embed.h
index 9c5ae61..0587801 100644 (file)
--- a/embed.h
+++ b/embed.h
 #ifdef PERL_CORE
 #define op_clear               Perl_op_clear
 #endif
+#define op_refcnt_lock         Perl_op_refcnt_lock
+#define op_refcnt_unlock       Perl_op_refcnt_unlock
 #ifdef PERL_CORE
 #define linklist               Perl_linklist
 #endif
 #ifdef PERL_CORE
 #define op_clear(a)            Perl_op_clear(aTHX_ a)
 #endif
+#define op_refcnt_lock()       Perl_op_refcnt_lock(aTHX)
+#define op_refcnt_unlock()     Perl_op_refcnt_unlock(aTHX)
 #ifdef PERL_CORE
 #define linklist(a)            Perl_linklist(aTHX_ a)
 #endif
 #endif
 #  if defined(DEBUGGING)
 #ifdef PERL_CORE
-#define tokereport(a,b,c)      S_tokereport(aTHX_ a,b,c)
+#define tokereport(a,b)                S_tokereport(aTHX_ a,b)
 #endif
 #  endif
 #ifdef PERL_CORE
 #endif
 #if defined(DEBUGGING)
 #ifdef PERL_CORE
-#define get_debug_opts(a)      Perl_get_debug_opts(aTHX_ a)
+#define get_debug_opts(a,b)    Perl_get_debug_opts(aTHX_ a,b)
 #endif
 #endif
 #define save_set_svflags(a,b,c)        Perl_save_set_svflags(aTHX_ a,b,c)