diff options
| author | Hugo van der Sanden <hv@crypt.org> | 1999-05-23 17:35:07 +0100 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-05-24 05:46:20 +0000 |
| commit | faef01704ba77a858827d4e793b056731d6e6832 (patch) | |
| tree | 291268218f13ed645fa5df363050cd6c4cf6e2da /cop.h | |
| parent | d49321e7b7c3f90e1fb44f947dddd8517579dd60 (diff) | |
| download | perl-faef01704ba77a858827d4e793b056731d6e6832.tar.gz | |
name PL_in_eval bits
Message-Id: <199905231535.QAA00032@crypt.compulink.co.uk>
p4raw-id: //depot/perl@3457
Diffstat (limited to 'cop.h')
| -rw-r--r-- | cop.h | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -298,6 +298,12 @@ struct context { #define G_KEEPERR 16 /* Append errors to $@, don't overwrite it */ #define G_NODEBUG 32 /* Disable debugging at toplevel. */ +/* flag bits for PL_in_eval */ +#define EVAL_NULL 0 /* not in an eval */ +#define EVAL_INEVAL 1 /* some enclosing scope is an eval */ +#define EVAL_WARNONLY 2 /* used by yywarn() when calling yyerror() */ +#define EVAL_KEEPERR 4 /* set by perl_call_sv if G_KEEPERR */ + /* Support for switching (stack and block) contexts. * This ensures magic doesn't invalidate local stack and cx pointers. */ |