[svn:parrot] r48763 - trunk/src

[nwellnhof at svn.parrot.org]

Author: nwellnhof
Date: Thu Sep  2 11:40:28 2010
New Revision: 48763
URL: https://trac.parrot.org/parrot/changeset/48763

Log:
Add n_regs_used to packdump

Modified:
   trunk/src/packdump.c

Modified: trunk/src/packdump.c
==============================================================================
--- trunk/src/packdump.c	Thu Sep  2 08:40:27 2010	(r48762)
+++ trunk/src/packdump.c	Thu Sep  2 11:40:28 2010	(r48763)
@@ -318,15 +318,16 @@
                     namespace_description = null;
                 }
                 Parrot_io_printf(interp,
-                            "\t\tclass => %Ss,\n"
-                            "\t\tstart_offs => %d,\n"
-                            "\t\tend_offs => %d,\n"
-                            "\t\tname    => '%Ss',\n"
-                            "\t\tsubid   => '%Ss',\n"
-                            "\t\tmethod  => '%Ss',\n"
-                            "\t\tnsentry => '%Ss',\n"
-                            "\t\tnamespace => %Ss\n"
-                            "\t\tHLL_id => %d,\n",
+                            "\t\tclass       => %Ss,\n"
+                            "\t\tstart_offs  => %d,\n"
+                            "\t\tend_offs    => %d,\n"
+                            "\t\tname        => '%Ss',\n"
+                            "\t\tsubid       => '%Ss',\n"
+                            "\t\tmethod      => '%Ss',\n"
+                            "\t\tnsentry     => '%Ss',\n"
+                            "\t\tnamespace   => %Ss,\n"
+                            "\t\tHLL_id      => %d,\n"
+                            "\t\tn_regs_used => [ %d, %d, %d, %d ],\n",
                             pmc->vtable->whoami,
                             sub->start_offs,
                             sub->end_offs,
@@ -335,7 +336,11 @@
                             sub->method_name,
                             sub->ns_entry_name,
                             namespace_description,
-                            sub->HLL_id);
+                            sub->HLL_id,
+                            sub->n_regs_used[0],
+                            sub->n_regs_used[1],
+                            sub->n_regs_used[2],
+                            sub->n_regs_used[3]);
                 break;
               case enum_class_FixedIntegerArray:
                 Parrot_io_printf(interp,