In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/bce4a2abeb8652d19e97d3bf07dd2580a3cc2e6c?hp=3137772c897ec8154ca0048b7c37cf5dc360242e>

- Log -----------------------------------------------------------------
commit bce4a2abeb8652d19e97d3bf07dd2580a3cc2e6c
Author: Hugo van der Sanden <[email protected]>
Date:   Sat Feb 25 10:42:17 2017 +0000

    fix VMS test fail
    
    d7186add added a runperl() test that breaks command line length limits for
    VMS. Switch to fresh_perl() instead, so the prog is put in a file for us.
-----------------------------------------------------------------------

Summary of changes:
 t/comp/parser_run.t | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/t/comp/parser_run.t b/t/comp/parser_run.t
index 2543f499b5..e74644d3fb 100644
--- a/t/comp/parser_run.t
+++ b/t/comp/parser_run.t
@@ -14,14 +14,14 @@ plan(1);
 
 # [perl #130814] can reallocate lineptr while looking ahead for
 # "Missing $ on loop variable" diagnostic.
-my $result = runperl(
-    prog => " foreach m0\n\$" . ("0" x 0x2000),
-    stderr => 1,
+my $result = fresh_perl(
+    " foreach m0\n\$" . ("0" x 0x2000),
+    { stderr => 1 },
 );
-is($result, <<EXPECT);
-syntax error at -e line 3, near "foreach m0
+is($result . "\n", <<EXPECT);
+syntax error at - line 3, near "foreach m0
 "
-Identifier too long at -e line 3.
+Identifier too long at - line 3.
 EXPECT
 
 __END__

--
Perl5 Master Repository

Reply via email to