[svn:parrot] r38773 - branches/pmc_pct/compilers/pmcc/src/emitter/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Thu May 14 11:28:37 2009
New Revision: 38773
URL: https://trac.parrot.org/parrot/changeset/38773

Log:
Properly propogate .returns to created default's vtable methods.

Modified:
   branches/pmc_pct/compilers/pmcc/src/emitter/pmc/default.pm

Modified: branches/pmc_pct/compilers/pmcc/src/emitter/pmc/default.pm
==============================================================================
--- branches/pmc_pct/compilers/pmcc/src/emitter/pmc/default.pm	Thu May 14 11:04:36 2009	(r38772)
+++ branches/pmc_pct/compilers/pmcc/src/emitter/pmc/default.pm	Thu May 14 11:28:37 2009	(r38773)
@@ -24,11 +24,11 @@
         if !exists(%vtables, $_.name) {
             my $entry := PAST::Block.new(
                 :name($_.name),
+                :returns($_.returns),
             );
             # FIXME Ugly hack
             $entry<parameters> := PAST::Op.new(
                 PAST::Val.new(
-                    :returns(''),
                     :name($_<parameters>)
                 )
             );