From 79072805bf63abe5b5978b5928ab00d360ea3e7f Mon Sep 17 00:00:00 2001 From: Larry Wall Date: Thu, 7 Oct 1993 23:00:00 +0000 Subject: perl 5.0 alpha 2 [editor's note: from history.perl.org. The sparc executables originally included in the distribution are not in this commit.] --- t/op/eval.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) mode change 100644 => 100755 t/op/eval.t (limited to 't/op/eval.t') diff --git a/t/op/eval.t b/t/op/eval.t old mode 100644 new mode 100755 index 7bca608137..6d0a67b533 --- a/t/op/eval.t +++ b/t/op/eval.t @@ -1,6 +1,6 @@ #!./perl -# $RCSfile: eval.t,v $$Revision: 4.0.1.1 $$Date: 91/11/05 18:43:19 $ +# $RCSfile: eval.t,v $$Revision: 4.1 $$Date: 92/08/07 18:27:48 $ print "1..16\n"; @@ -15,7 +15,7 @@ eval "\$foo\n = # this is a comment\n'ok 4\n';"; print $foo; print eval ' -$foo ='; # this tests for a call through yyerror() +$foo =;'; # this tests for a call through yyerror() if ($@ =~ /line 2/) {print "ok 5\n";} else {print "not ok 5\n";} print eval '$foo = /'; # this tests for a call through fatal() -- cgit v1.2.1