[svn:parrot] r36822 - trunk/t/op

rurban at svn.parrot.org rurban at svn.parrot.org
Tue Feb 17 17:53:51 UTC 2009


Author: rurban
Date: Tue Feb 17 17:53:50 2009
New Revision: 36822
URL: https://trac.parrot.org/parrot/changeset/36822

Log:
TT #281, remove -g from r36820

Modified:
   trunk/t/op/debuginfo.t

Modified: trunk/t/op/debuginfo.t
==============================================================================
--- trunk/t/op/debuginfo.t	Tue Feb 17 17:40:43 2009	(r36821)
+++ trunk/t/op/debuginfo.t	Tue Feb 17 17:53:50 2009	(r36822)
@@ -24,7 +24,7 @@
 =cut
 
 $ENV{TEST_PROG_ARGS} ||= '';
-my $nolineno = $ENV{TEST_PROG_ARGS} =~ /-f|-g/
+my $nolineno = $ENV{TEST_PROG_ARGS} =~ /-f/
     ? "\\(unknown file\\)\n-1" : "debuginfo_\\d+\\.pasm\n\\d";
 
 SKIP: {
@@ -164,7 +164,7 @@
 called from Sub 'main' pc (\d+|-1) \(.*?:(\d+|-1)\)$/
 OUTPUT
 
-$nolineno = $ENV{TEST_PROG_ARGS} =~ /-f|-g/
+$nolineno = $ENV{TEST_PROG_ARGS} =~ /-f/
     ? '\(\(unknown file\):-1\)' : '\(xyz.pir:126\)';
 
 SKIP: {
@@ -183,7 +183,7 @@
 /$nolineno/
 OUTPUT
 
-$nolineno = $ENV{TEST_PROG_ARGS} =~ /-f|-g/
+$nolineno = $ENV{TEST_PROG_ARGS} =~ /-f/
     ? '\(\(unknown file\):-1\)' : '\(foo.p6:128\)';
 # See "RT #43269 and .annotate
 pir_error_output_like( <<'CODE', <<"OUTPUT", "setfile and setline" );


More information about the parrot-commits mailing list