This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Teach makedef.pl that PL_op_exec_cnt is only available with -DPERL_TRACE_OPS.
authorNicholas Clark <nick@ccl4.org>
Tue, 2 Jul 2013 19:23:46 +0000 (21:23 +0200)
committerNicholas Clark <nick@ccl4.org>
Tue, 2 Jul 2013 19:23:46 +0000 (21:23 +0200)
makedef.pl

index ae3b510..8523455 100644 (file)
@@ -540,6 +540,9 @@ if ($define{'PERL_GLOBAL_STRUCT'}) {
     ++$skip{$_} foreach qw(Perl_init_global_struct Perl_free_global_struct);
 }
 
+++$skip{PL_op_exec_cnt}
+    unless $define{PERL_TRACE_OPS};
+
 # functions from *.sym files
 
 my @syms = qw(globvar.sym);