X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=cop.h;h=84afd58967d0115446665a5f03dfbef171f9a486;hb=9394203c9c91af30a21f8e1e6ad98183a3989990;hp=0f029ca77dd02fa43cde7f299b74692029da2885;hpb=faef01704ba77a858827d4e793b056731d6e6832;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/cop.h b/cop.h
index 0f029ca..84afd58 100644
--- a/cop.h
+++ b/cop.h
@@ -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.