[svn:parrot] r39391 - branches/pmc_pct/compilers/vtdumper

[cotto at svn.parrot.org]

Author: cotto
Date: Thu Jun  4 17:58:47 2009
New Revision: 39391
URL: https://trac.parrot.org/parrot/changeset/39391

Log:
[vtdumper] add code to freeze the past to a file

Modified:
   branches/pmc_pct/compilers/vtdumper/vtdumper.pir

Modified: branches/pmc_pct/compilers/vtdumper/vtdumper.pir
==============================================================================
--- branches/pmc_pct/compilers/vtdumper/vtdumper.pir	Thu Jun  4 13:00:52 2009	(r39390)
+++ branches/pmc_pct/compilers/vtdumper/vtdumper.pir	Thu Jun  4 17:58:47 2009	(r39391)
@@ -25,7 +25,7 @@
     $P0.'removestage'('evalpmc')
 
     #add an extra stage to generate the c, h and dump files
-    #$P0.'addstage'('generate_dump', 'after'=>'past')
+    $P0.'addstage'('generate_dump', 'after'=>'past')
 
 .end
 
@@ -34,6 +34,11 @@
     .param pmc past
     .param pmc adverbs :slurpy :named
 
+    .local string frozen
+
+    frozen = freeze past
+    'write_file'("vtable.dump", frozen)
+
     exit 0
 .end