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

[rurban at svn.parrot.org]

Author: rurban
Date: Tue Feb 17 18:14:34 2009
New Revision: 36824
URL: https://trac.parrot.org/parrot/changeset/36824

Log:
[t] TT #281. more needed exceptions for 1,7-8

Modified:
   trunk/t/op/debuginfo.t

Modified: trunk/t/op/debuginfo.t
==============================================================================
--- trunk/t/op/debuginfo.t	Tue Feb 17 18:06:46 2009	(r36823)
+++ trunk/t/op/debuginfo.t	Tue Feb 17 18:14:34 2009	(r36824)
@@ -28,7 +28,7 @@
     ? "\\(unknown file\\)\n-1" : "debuginfo_\\d+\\.pasm\n\\d";
 
 SKIP: {
-skip "disabled on fast-core",1 if $ENV{TEST_PROG_ARGS} =~ /-f/;
+skip "disabled on fast-core",1 if $ENV{TEST_PROG_ARGS} =~ /[^-]?-[fg]/;
 
 pasm_output_like( <<'CODE', <<"OUTPUT", "getline, getfile" );
 .pcc_sub main:
@@ -168,7 +168,7 @@
     ? '\(\(unknown file\):-1\)' : '\(xyz.pir:126\)';
 
 SKIP: {
-skip "disabled on fast-core",2 if $ENV{TEST_PROG_ARGS} =~ /-f/;
+skip "disabled on this core",2 if $ENV{TEST_PROG_ARGS} =~ /[^-]?-[fgjS]/;
 
 # See "RT #43269 and .annotate
 pir_error_output_like( <<'CODE', <<"OUTPUT", "setfile and setline" );