diff options
author | David Mitchell <davem@iabyn.com> | 2016-03-30 15:11:26 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-03-30 15:11:26 +0100 |
commit | c349b9a040f3048e07809d40d2a1c12e8873b4ca (patch) | |
tree | a41b0cc2c8230702254c90f3577c07b2e2da177b /cop.h | |
parent | aea0412a260d9d7295c0a5bebb8bb6978dc02ccd (diff) | |
download | perl-c349b9a040f3048e07809d40d2a1c12e8873b4ca.tar.gz |
Improve code comments for some ctx stuff
* in pp_return(), some comments were out of date about how
leave_adjust_stacks() is called ;
* add a comment to all the functions that pp_return() tail-calls to the
effect that they can be tail-called;
* make it clearer when/why OPf_SPECIAL is set on OP_LEAVE;
* CXt_LOOP_PLAIN can be a while loop as well as a plain block.
Diffstat (limited to 'cop.h')
-rw-r--r-- | cop.h | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -847,12 +847,12 @@ struct context { /* be careful of the ordering of these five. Macros like CxTYPE_is_LOOP, * CxFOREACH compare ranges */ -#define CXt_LOOP_ARY 4 /* for (@ary) {} */ -#define CXt_LOOP_LAZYSV 5 /* for ('a'..'z') {} */ -#define CXt_LOOP_LAZYIV 6 /* for (1..9) {} */ -#define CXt_LOOP_LIST 7 /* for (1,2,3) {} */ -#define CXt_LOOP_PLAIN 8 /* {} */ - +#define CXt_LOOP_ARY 4 /* for (@ary) { ...; } */ +#define CXt_LOOP_LAZYSV 5 /* for ('a'..'z') { ...; } */ +#define CXt_LOOP_LAZYIV 6 /* for (1..9) { ...; } */ +#define CXt_LOOP_LIST 7 /* for (1,2,3) { ...; } */ +#define CXt_LOOP_PLAIN 8 /* while (...) { ...; } + or plain block { ...; } */ #define CXt_SUB 9 #define CXt_FORMAT 10 #define CXt_EVAL 11 |