From ca7a5ef29d14d9f5a7387369d32bdab049ceec5e Mon Sep 17 00:00:00 2001 From: Charles Bailey Date: Thu, 2 Mar 2000 03:42:49 +0000 Subject: [PATCH] Temrinate statements in pp_ctl warning test (Charles Lane) p4raw-id: //depot/vmsperl@5417 --- t/pragma/warn/pp_ctl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/t/pragma/warn/pp_ctl b/t/pragma/warn/pp_ctl index 0deccd3..ea94e9d 100644 --- a/t/pragma/warn/pp_ctl +++ b/t/pragma/warn/pp_ctl @@ -51,7 +51,7 @@ fred() if $a++ < 200 } - fred() + fred(); (in cleanup) foo bar package Foo; @@ -182,7 +182,7 @@ sub fred fred() if $a++ < 200 } -fred() +fred(); EXPECT Deep recursion on subroutine "main::fred" at - line 6. ######## @@ -194,7 +194,7 @@ sub fred fred() if $a++ < 200 } -fred() +fred(); EXPECT ######## # pp_ctl.c -- 2.7.4