diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-06-07 05:18:34 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-06-07 05:18:34 +0000 |
| commit | 864dbfa3ca8032ef66f7aa86961933b19b962357 (patch) | |
| tree | 4186157b2fc82346ec83e789b065a908a56c1641 /cop.h | |
| parent | fdf134946da249a71c49962435817212b8fa195a (diff) | |
| download | perl-864dbfa3ca8032ef66f7aa86961933b19b962357.tar.gz | |
initial stub implementation of implicit thread/this
pointer argument; builds/tests on Solaris, win32
hasn't been fixed up yet; proto.h, global.sym and
static function decls are now generated from a common
database in proto.pl; some inconsistently named
perl_foo() things are now Perl_foo(), compatibility
#defines provided; perl_foo() (lowercase 'p') reserved
for functions that take an explicit context argument;
next step: generate #define foo(a,b) Perl_foo(aTHX_ a,b)
p4raw-id: //depot/perl@3522
Diffstat (limited to 'cop.h')
| -rw-r--r-- | cop.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -291,7 +291,7 @@ struct context { #define G_ARRAY 1 #define G_VOID 128 /* skip this bit when adding flags below */ -/* extra flags for perl_call_* routines */ +/* extra flags for Perl_call_* routines */ #define G_DISCARD 2 /* Call FREETMPS. */ #define G_EVAL 4 /* Assume eval {} around subroutine call. */ #define G_NOARGS 8 /* Don't construct a @_ array. */ @@ -302,7 +302,7 @@ struct context { #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 */ +#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. |