Ticket #121: trac121-t-pmc-eval.patch

t/pmc/eval.t

@@ -316 +316 @@
 2 1 1 1
 OUTPUT
 
+TODO: {
+local $TODO = "TT#121 rm \$temp_pbc permission denied" if $^O eq 'cygwin';
 pir_output_is( <<"CODE", <<'OUTPUT', "eval.get_string - same file" );
 .sub main :main
 
@@ -356 +358 @@
 CODE
 hello from foo_1
 OUTPUT
+}
 
 my (undef, $temp_file) = create_tempfile( UNLINK => 1 );