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

[jkeenan at svn.parrot.org]

Author: jkeenan
Date: Sat May  8 12:57:57 2010
New Revision: 46409
URL: https://trac.parrot.org/parrot/changeset/46409

Log:
Correct syntax of PIR todo() function.,

Modified:
   trunk/t/pmc/bigint.t
   trunk/t/pmc/class.t

Modified: trunk/t/pmc/bigint.t
==============================================================================
--- trunk/t/pmc/bigint.t	Sat May  8 12:35:03 2010	(r46408)
+++ trunk/t/pmc/bigint.t	Sat May  8 12:57:57 2010	(r46409)
@@ -745,7 +745,7 @@
     ne $S0, $S6, k25
     inc $I1
 k25:
-    todo($I1, 'integer negation of MinInt converts MaxInt+1 to BigInt')
+    todo( $I1, 'integer negation of MinInt converts MaxInt+1 to BigInt', 'TT #1616')
 
     $I1 = 0
     $P0 = new ['Integer']
@@ -760,7 +760,7 @@
     ne $S0, $S6, k27
     inc $I1
 k27:
-    todo($I1, 'integer absolute-value of MinInt converts MaxInt+1 to BigInt')
+    todo( $I1, 'integer absolute-value of MinInt converts MaxInt+1 to BigInt', 'TT #1616')
 
     $P0 = new ['Integer']
     $P0 = $I3

Modified: trunk/t/pmc/class.t
==============================================================================
--- trunk/t/pmc/class.t	Sat May  8 12:35:03 2010	(r46408)
+++ trunk/t/pmc/class.t	Sat May  8 12:57:57 2010	(r46409)
@@ -273,11 +273,7 @@
 
     is(test_string_val, 'bar', 'add_method() invoking method added to class works')
 t_class_meth:
-    todo(
-        0,
-        'add_method() invoking method added to class works',
-        "classes don't seem to call methods yet:  TT #1615"
-    )
+    todo( 0, 'add_method() invoking method added to class works', "classes don't seem to call methods yet:  TT #1615")
 
     obj_inst = class.'new'()
     test_string_val = obj_inst.'foo'()