[svn:parrot] r48263 - branches/gsoc_instrument/src/dynpmc

[khairul at svn.parrot.org]

Author: khairul
Date: Tue Aug  3 03:13:36 2010
New Revision: 48263
URL: https://trac.parrot.org/parrot/changeset/48263

Log:
Updated to initialise using an Instrument instance.

Modified:
   branches/gsoc_instrument/src/dynpmc/instrumentop.pmc

Modified: branches/gsoc_instrument/src/dynpmc/instrumentop.pmc
==============================================================================
--- branches/gsoc_instrument/src/dynpmc/instrumentop.pmc	Tue Aug  3 03:11:58 2010	(r48262)
+++ branches/gsoc_instrument/src/dynpmc/instrumentop.pmc	Tue Aug  3 03:13:36 2010	(r48263)
@@ -22,6 +22,8 @@
 #include "parrot/parrot.h"
 #include "parrot/opsenum.h"
 
+#include "pmc_instrument.h"
+
 pmclass InstrumentOp auto_attrs dynpmc group instrument_group {
     ATTR Parrot_Interp  interp; /* Interpreter to get op values from. */
     ATTR opcode_t      *pc;     /* Current progam counter of interp above. */
@@ -51,10 +53,10 @@
 
 */
 
-    VTABLE void init_pmc(PMC *interp_pmc) {
+    VTABLE void init_pmc(PMC *instrument) {
         Parrot_InstrumentOp_attributes * const attr = PARROT_INSTRUMENTOP(SELF);
 
-        attr->interp = (Parrot_Interp) VTABLE_get_pointer(INTERP, interp_pmc);
+        GETATTR_Instrument_supervised(INTERP, instrument, attr->interp);
         attr->pc     = NULL;
     }