diff options
author | Karl Williamson <khw@cpan.org> | 2019-10-02 14:47:24 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-11-06 21:22:24 -0700 |
commit | 482bf6150109082d5b3f93aca376c4ca258a597c (patch) | |
tree | 356e3d108bbfc6e4050157f2470fd53719c48556 /op.h | |
parent | f534d5462959256391e14ee587e98cbc036c9e4a (diff) | |
download | perl-482bf6150109082d5b3f93aca376c4ca258a597c.tar.gz |
op.c, doop.c Use mnemonics instead of numeric values
For legibility and maintainability
Diffstat (limited to 'op.h')
-rw-r--r-- | op.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -1109,6 +1109,11 @@ C<sib> is non-null. For a higher-level interface, see C<L</op_sibling_splice>>. "Use of strings with code points over 0xFF as arguments to " \ "%s operator is not allowed" #endif +#if defined(PERL_IN_OP_C) || defined(PERL_IN_DOOP_C) +# define TR_UNMAPPED (UV)-1 +# define TR_DELETE (UV)-2 +# define TR_R_EMPTY (UV)-3 /* rhs (replacement) is empty */ +#endif #if defined(PERL_IN_OP_C) || defined(PERL_IN_TOKE_C) #define RANGE_INDICATOR ILLEGAL_UTF8_BYTE #endif |