diff --git a/t/op/sub.t b/t/op/sub.t index e703880ec8b6..b00876fb4a01 100644 --- a/t/op/sub.t +++ b/t/op/sub.t @@ -426,6 +426,7 @@ eval ' CORE::state sub b; sub d { sub b {} sub d } '; eval '()=%e; sub e { sub e; eval q|$x| } e;'; +watchdog 0; fresh_perl_like( q#0,shift#,