[svn:parrot] r38311 - branches/pmc_pct/src/dynpmc

cotto at svn.parrot.org cotto at svn.parrot.org
Fri Apr 24 14:19:32 UTC 2009


Author: cotto
Date: Fri Apr 24 14:19:32 2009
New Revision: 38311
URL: https://trac.parrot.org/parrot/changeset/38311

Log:
[PMC] fix a couple more dynpmcs to use proper VTABLE function declarations

Modified:
   branches/pmc_pct/src/dynpmc/rotest.pmc
   branches/pmc_pct/src/dynpmc/subproxy.pmc

Modified: branches/pmc_pct/src/dynpmc/rotest.pmc
==============================================================================
--- branches/pmc_pct/src/dynpmc/rotest.pmc	Fri Apr 24 14:15:45 2009	(r38310)
+++ branches/pmc_pct/src/dynpmc/rotest.pmc	Fri Apr 24 14:19:32 2009	(r38311)
@@ -9,9 +9,9 @@
  */
 
 pmclass ROTest dynpmc provides scalar extends Integer {
-    void set_integer_native(INTVAL value) :read {
+    VTABLE void set_integer_native(INTVAL value) :read {
     }
-    INTVAL get_integer() :write {
+    VTABLE INTVAL get_integer() :write {
         return 42;
     }
 

Modified: branches/pmc_pct/src/dynpmc/subproxy.pmc
==============================================================================
--- branches/pmc_pct/src/dynpmc/subproxy.pmc	Fri Apr 24 14:15:45 2009	(r38310)
+++ branches/pmc_pct/src/dynpmc/subproxy.pmc	Fri Apr 24 14:19:32 2009	(r38311)
@@ -25,7 +25,7 @@
         PMC_data(SELF) = key;
     }
 
-    opcode_t* invoke(void* next) {
+    VTABLE opcode_t* invoke(void* next) {
         if (PObj_get_FLAGS(SELF) & PObj_private0_FLAG) {
 
             PMC         *key = PMC_data_typed(SELF, PMC *);


More information about the parrot-commits mailing list