[svn:parrot] r38168 - trunk/t/pmc

[cotto at svn.parrot.org]

Author: cotto
Date: Thu Apr 16 22:58:07 2009
New Revision: 38168
URL: https://trac.parrot.org/parrot/changeset/38168

Log:
[PMC] TODO some failing nci tests that fail on jitcapable platforms

Modified:
   trunk/t/pmc/nci.t

Modified: trunk/t/pmc/nci.t
==============================================================================
--- trunk/t/pmc/nci.t	Thu Apr 16 22:36:12 2009	(r38167)
+++ trunk/t/pmc/nci.t	Thu Apr 16 22:58:07 2009	(r38168)
@@ -2647,6 +2647,11 @@
 3
 OUTPUT
 
+{
+    local $TODO = 0;
+    if ($PConfig{jitcapable}){
+        $TODO = "TT #551 - jitted NCI sig with V is broken";
+    }
 pir_output_is( << 'CODE', << 'OUTPUT', "nci_vVi - void** out parameter" );
 .sub test :main
     .local string library_name
@@ -2669,6 +2674,7 @@
 CODE
 got 10
 OUTPUT
+}
 
 pir_output_is( << 'CODE', << 'OUTPUT', "nci_ttt - t_tt parameter" );
 .sub test :main
@@ -2706,6 +2712,11 @@
 1
 OUTPUT
 
+{
+    local $TODO = 0;
+    if ($PConfig{jitcapable}){
+        $TODO = "TT #551 - jitted NCI sig with V is broken";
+    }
 pir_output_is( << 'CODE', << 'OUTPUT', "nci_vV - char** out parameter" );
 .sub test :main
     .local string library_name
@@ -2753,6 +2764,7 @@
 It is a beautiful day!
 Go suck a lemon.
 OUTPUT
+}
 
 # Local Variables:
 #   mode: cperl