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

allison at svn.parrot.org allison at svn.parrot.org
Thu Aug 13 03:16:33 UTC 2009


Author: allison
Date: Thu Aug 13 03:16:27 2009
New Revision: 40511
URL: https://trac.parrot.org/parrot/changeset/40511

Log:
[cage] Don't depend on PGE in core tests, use 'substr' instead of 'like'.

Modified:
   trunk/t/pmc/capture.t
   trunk/t/pmc/resizablestringarray.t

Modified: trunk/t/pmc/capture.t
==============================================================================
--- trunk/t/pmc/capture.t	Thu Aug 13 02:54:32 2009	(r40510)
+++ trunk/t/pmc/capture.t	Thu Aug 13 03:16:27 2009	(r40511)
@@ -231,7 +231,8 @@
     .get_results (exception)
 
     message = exception['message']
-    like(message, ':s get_integer\(\) not implemented', 'get_integer not implemented')
+    message = substr message, 0, 29
+    is(message, 'get_integer() not implemented', 'get_integer not implemented')
     .return ()
 .end
 
@@ -251,7 +252,8 @@
     .get_results (exception)
 
     message = exception['message']
-    like(message, ':s get_number\(\) not implemented', 'get_number not implemented')
+    message = substr message, 0, 28
+    is(message, 'get_number() not implemented', 'get_number not implemented')
     .return ()
 .end
 

Modified: trunk/t/pmc/resizablestringarray.t
==============================================================================
--- trunk/t/pmc/resizablestringarray.t	Thu Aug 13 02:54:32 2009	(r40510)
+++ trunk/t/pmc/resizablestringarray.t	Thu Aug 13 03:16:27 2009	(r40511)
@@ -1354,7 +1354,8 @@
     .get_results (exception)
     message = exception
 still_ok:
-    like(message, 'illegal\ type\ for\ splice', "splice with a different type")
+    message = substr message, 22, 23
+    is(message, 'illegal type for splice', "splice with a different type")
 .end
 
 #


More information about the parrot-commits mailing list