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:
e2b7854
)
TOPBLOCK: make comment clear its used by goto too
author
David Mitchell
<davem@iabyn.com>
Thu, 17 Dec 2015 17:34:36 +0000
(17:34 +0000)
committer
David Mitchell
<davem@iabyn.com>
Wed, 3 Feb 2016 09:18:35 +0000
(09:18 +0000)
cop.h
patch
|
blob
|
blame
|
history
diff --git
a/cop.h
b/cop.h
index
b88256b
..
347e20e
100644
(file)
--- a/
cop.h
+++ b/
cop.h
@@
-969,7
+969,7
@@
struct block {
PL_tmps_floor = cx->cx_u.cx_blk.blku_old_tmpsfloor; \
PL_curpm = cx->blk_oldpm;
-/* Continue a block elsewhere (
NEXT and RED
O). */
+/* Continue a block elsewhere (
e.g. NEXT, REDO, GOT
O). */
#define TOPBLOCK(cx) \
CX_DEBUG(cx, "TOP"); \
PL_stack_sp = PL_stack_base + cx->blk_oldsp, \