diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-14 01:27:13 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-14 01:27:13 +0000 |
commit | 192587c2153e5b0fa4ed545cdd3fa7fef8fc0d8b (patch) | |
tree | 23c4d17163d0c727b113962137cc49dcb7697c9c /op.h | |
parent | 9740c8380c47f3138ea60459cef1e748515e656d (diff) | |
download | perl-192587c2153e5b0fa4ed545cdd3fa7fef8fc0d8b.tar.gz |
avoid spurious "Useless use of variable" warning on C<our $foo;>
p4raw-id: //depot/perl@4800
Diffstat (limited to 'op.h')
-rw-r--r-- | op.h | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -136,7 +136,9 @@ typedef U32 PADOFFSET; #define OPpEARLY_CV 32 /* foo() called before sub foo was parsed */ /* OP_?ELEM only */ #define OPpLVAL_DEFER 16 /* Defer creation of array/hash elem */ - /* for OP_RV2?V, lower bits carry hints */ + /* OP_RV2?V only */ +#define OPpOUR_INTRO 16 /* Defer creation of array/hash elem */ + /* for OP_RV2?V, lower bits carry hints (currently only HINT_STRICT_REFS) */ /* Private for OPs with TARGLEX */ /* (lower bits may carry MAXARG) */ |