[svn:parrot] r46363 - trunk/runtime/parrot/library/Test

[bacek at svn.parrot.org]

Author: bacek
Date: Thu May  6 15:00:46 2010
New Revision: 46363
URL: https://trac.parrot.org/parrot/changeset/46363

Log:
Don't use concat_s_s in Test::More at all.

Modified:
   trunk/runtime/parrot/library/Test/More.pir

Modified: trunk/runtime/parrot/library/Test/More.pir
==============================================================================
--- trunk/runtime/parrot/library/Test/More.pir	Thu May  6 15:00:29 2010	(r46362)
+++ trunk/runtime/parrot/library/Test/More.pir	Thu May  6 15:00:46 2010	(r46363)
@@ -1335,14 +1335,16 @@
     get_hll_global test, [ 'Test'; 'More' ], '_test'
 
     .local pmc description
-    .local string diagnostic
+    .local pmc diagnostic
     description = new ['StringBuilder']
+    diagnostic  = new ['StringBuilder']
 
     description = "The object"
     unless got_name goto keep_default
     description = object_name
   keep_default:
-    diagnostic = description
+    $S0 = description
+    diagnostic = $S0
     description .= " isa "
     $S0 = class_name
     description .= $S0