diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2004-02-09 21:48:15 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2004-02-09 21:48:15 +0000 |
commit | fbb0b3b383a878902acf90a09bf05a52493ef56c (patch) | |
tree | 40c2bb309b99466871da1e2970df52d54f120356 /op.h | |
parent | 6c94ec8ba7f0b5a05c74409397b9f1735413262d (diff) | |
download | perl-fbb0b3b383a878902acf90a09bf05a52493ef56c.tar.gz |
Implement stacked filetest operators (-f -w -x $file).
p4raw-id: //depot/perl@22294
Diffstat (limited to 'op.h')
-rw-r--r-- | op.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -209,6 +209,7 @@ Deprecated. Use C<GIMME_V> instead. /* Private of OP_FTXXX */ #define OPpFT_ACCESS 2 /* use filetest 'access' */ +#define OPpFT_STACKED 4 /* stacked filetest, as in "-f -x $f" */ #define OP_IS_FILETEST_ACCESS(op) \ (((op)->op_type) == OP_FTRREAD || \ ((op)->op_type) == OP_FTRWRITE || \ |