diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2000-09-27 14:54:49 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-03 00:04:00 +0000 |
| commit | 6dc8a9e4bcd53982379e0df712cfc2dd75d92d2f (patch) | |
| tree | 3172594a4993b36d88e40a7e472951cd65840346 /cop.h | |
| parent | b57a092cb822ae32e4804707ff8729ac6bb222b9 (diff) | |
| download | perl-6dc8a9e4bcd53982379e0df712cfc2dd75d92d2f.tar.gz | |
Inside require() $^S was always left undefined.
Subject: Re: Tiny 2-byte change to fix debugger's eval bug
Message-ID: <20000927185449.A24927@monk.mps.ohio-state.edu>
p4raw-id: //depot/perl@7120
Diffstat (limited to 'cop.h')
| -rw-r--r-- | cop.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -433,6 +433,7 @@ L<perlcall>. #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 */ +#define EVAL_INREQUIRE 8 /* The code is being required. */ /* Support for switching (stack and block) contexts. * This ensures magic doesn't invalidate local stack and cx pointers. |