diff options
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 8 |
1 files changed, 1 insertions, 7 deletions
@@ -2898,13 +2898,7 @@ S_doeval(pTHX_ int gimme, OP** startop, CV* outside, U32 seq) *startop = PL_eval_root; } else SAVEFREEOP(PL_eval_root); - if (gimme & G_VOID && ! PL_in_eval & EVAL_INREQUIRE) - /* - * EVAL_INREQUIRE (the code is being required) is special-cased : - * in this case we want scalar context to be forced, instead - * of void context, so a proper return value is returned from - * C<require> via this leaveeval op. - */ + if (gimme & G_VOID) scalarvoid(PL_eval_root); else if (gimme & G_ARRAY) list(PL_eval_root); |