This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9f51d95
)
In B.xs, move the definition of PMOP_pmnext adjacent to its usage.
author
Nicholas Clark
<nick@ccl4.org>
Thu, 28 Oct 2010 15:36:56 +0000
(16:36 +0100)
committer
Nicholas Clark
<nick@ccl4.org>
Thu, 28 Oct 2010 15:36:56 +0000
(16:36 +0100)
Now it lives within the #ifdef guarding the conditional compilation of the only
code that uses it.
ext/B/B.xs
patch
|
blob
|
blame
|
history
diff --git
a/ext/B/B.xs
b/ext/B/B.xs
index
d8b89e2
..
1208c2e
100644
(file)
--- a/
ext/B/B.xs
+++ b/
ext/B/B.xs
@@
-977,7
+977,6
@@
LISTOP_children(o)
OUTPUT:
RETVAL
-#define PMOP_pmnext(o) o->op_pmnext
#ifdef USE_ITHREADS
#define PMOP_pmoffset(o) o->op_pmoffset
#define PMOP_pmstashpv(o) PmopSTASHPV(o);
@@
-1041,6
+1040,7
@@
PMOP_pmreplstart(o)
B::PMOP o
#if PERL_VERSION < 9
+#define PMOP_pmnext(o) o->op_pmnext
B::PMOP
PMOP_pmnext(o)