[svn:parrot] r19083 - trunk/t/pdd15oo

[chromatic]

Author: chromatic
Date: Mon Jun 18 00:38:24 2007
New Revision: 19083

Modified:
   trunk/t/pdd15oo/dumper.t

Log:
[PDD 15] Get this test one step closer to passing.

It needs find_method to be able to find methods defined in the appropriate 
namespace.

Modified: trunk/t/pdd15oo/dumper.t
==============================================================================
--- trunk/t/pdd15oo/dumper.t    (original)
+++ trunk/t/pdd15oo/dumper.t    Mon Jun 18 00:38:24 2007
@@ -512,6 +512,7 @@
 pir_output_is( <<'CODE', <<'OUT', "dumping objects" );
 
 .sub test :main
+    .local pmc o
     .local pmc temp
     .local pmc array
 
@@ -519,10 +520,10 @@
 
     find_type I0, "TestClass"
     new array, .ResizablePMCArray
-    new temp, I0
-    push array, temp
-    new temp, I0
-    push array, temp
+    o = temp.'new'()
+    push array, o
+    o = temp.'new'()
+    push array, o
 
     _dumper( array )
 .end
@@ -544,7 +545,7 @@
 
     print subindent
     print "_"
-    classname name, self
+    name = self
     print name
     print "::__dump\n"
 
@@ -553,18 +554,17 @@
 
     dumper."deleteIndent"()
 
-    .pcc_begin_return
-    .pcc_end_return
+    .return()
 .end
 .namespace
 .include "library/dumper.pir"
 CODE
 "VAR1" => ResizablePMCArray (size:2) [
-    PMC 'TestClass' {
+    PMC 'Object' {
         this is
         _TestClass::__dump
     },
-    PMC 'TestClass' {
+    PMC 'Object' {
         this is
         _TestClass::__dump
     }