diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-01-21 11:50:52 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-01-21 11:50:52 +0000 |
| commit | 2f8edad0d37e91319b6ba10b3745327ea49c179b (patch) | |
| tree | e3631bff088c1a90196228cea1088e9035d208e8 /op.h | |
| parent | 7df0357e86d252406ff52a5b94e0478fc1ccd1be (diff) | |
| download | perl-2f8edad0d37e91319b6ba10b3745327ea49c179b.tar.gz | |
Give G_VOID, G_SCALAR and G_ARRAY the same numeric values as
OPf_WANT_VOID, OPf_WANT_SCALAR and OPf_WANT_LIST.
p4raw-id: //depot/perl@33025
Diffstat (limited to 'op.h')
| -rw-r--r-- | op.h | 5 |
1 files changed, 1 insertions, 4 deletions
@@ -70,10 +70,7 @@ ((op)->op_flags & OPf_WANT) == OPf_WANT_LIST ? G_ARRAY : \ dfl) -#define OP_GIMME_REVERSE(flags) \ - ((flags & G_VOID) ? OPf_WANT_VOID : \ - (flags & G_ARRAY) ? OPf_WANT_LIST : \ - OPf_WANT_SCALAR) +#define OP_GIMME_REVERSE(flags) ((flags) & G_WANT) /* =head1 "Gimme" Values |