From 7d116edc22c7aa687d04c9424079da4cac0f9255 Mon Sep 17 00:00:00 2001 From: Father Chrysostomos Date: Wed, 16 Nov 2011 18:21:16 -0800 Subject: =?UTF-8?q?Document=20S=5Fdoeval=E2=80=99s=20calling=20convention?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit This should make it easier for future maintainers, who now will not have to figure out what I figured out. --- pp_ctl.c | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'pp_ctl.c') diff --git a/pp_ctl.c b/pp_ctl.c index 23e4d9d596..547a33e033 100644 --- a/pp_ctl.c +++ b/pp_ctl.c @@ -3455,6 +3455,13 @@ S_try_yyparse(pTHX_ int gramtype) * pushes undef (also croaks if startop != NULL). */ +/* This function is called from three places, sv_compile_2op, pp_return + * and pp_entereval. These can be distinguished as follows: + * sv_compile_2op - startop is non-null + * pp_require - startop is null; in_require is true + * pp_entereval - stortop is null; in_require is false + */ + STATIC bool S_doeval(pTHX_ int gimme, OP** startop, CV* outside, U32 seq, HV *hh) { -- cgit v1.2.1