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

[bacek at svn.parrot.org]

Author: bacek
Date: Fri Apr 24 14:06:32 2009
New Revision: 38305
URL: https://trac.parrot.org/parrot/changeset/38305

Log:
[cage] Mark vtable methods with VTABLE in dynlexpad.pmc

Modified:
   branches/pmc_pct/src/dynpmc/dynlexpad.pmc

Modified: branches/pmc_pct/src/dynpmc/dynlexpad.pmc
==============================================================================
--- branches/pmc_pct/src/dynpmc/dynlexpad.pmc	Fri Apr 24 14:06:10 2009	(r38304)
+++ branches/pmc_pct/src/dynpmc/dynlexpad.pmc	Fri Apr 24 14:06:32 2009	(r38305)
@@ -38,7 +38,7 @@
 =cut
 
 */
-    void init_pmc(PMC* lexinfo) {
+    VTABLE void init_pmc(PMC* lexinfo) {
         Hash *hash;
 
         Parrot_DynLexPad_attributes *attrs =
@@ -66,7 +66,7 @@
 =cut
 
 */
-    void set_pointer(void* ctx) {
+    VTABLE void set_pointer(void* ctx) {
         PMC *std_pad = PARROT_DYNLEXPAD(SELF)->init;
         if (std_pad)
             VTABLE_set_pointer(interp, std_pad, ctx);
@@ -81,7 +81,7 @@
 =cut
 
 */
-    INTVAL elements() {
+    VTABLE INTVAL elements() {
         return parrot_hash_size(interp, PARROT_DYNLEXPAD(SELF)->hash);
     }
 
@@ -97,12 +97,12 @@
 
 */
 
-    INTVAL exists_keyed(PMC* name) {
+    VTABLE INTVAL exists_keyed(PMC* name) {
         STRING *s = VTABLE_get_string(interp, name);
         return SELF.exists_keyed_str(s);
     }
 
-    INTVAL exists_keyed_str(STRING* name) {
+    VTABLE INTVAL exists_keyed_str(STRING* name) {
         PMC *std_pad;
         if (parrot_hash_exists(interp, PARROT_DYNLEXPAD(SELF)->hash, name))
             return 1;
@@ -124,7 +124,7 @@
 =cut
 
 */
-    PMC* get_pmc_keyed_str(STRING* name) {
+    VTABLE PMC* get_pmc_keyed_str(STRING* name) {
         HashBucket *b = parrot_hash_get_bucket(interp,
             PARROT_DYNLEXPAD(SELF)->hash, name);
 
@@ -140,7 +140,7 @@
         return (PMC *)b->value;
     }
 
-    PMC* get_pmc_keyed(PMC* name) {
+    VTABLE PMC* get_pmc_keyed(PMC* name) {
         STRING *s = VTABLE_get_string(interp, name);
         return SELF.get_pmc_keyed_str(s);
     }
@@ -159,12 +159,12 @@
 
 */
 
-    void set_pmc_keyed(PMC* name, PMC* value) {
+    VTABLE void set_pmc_keyed(PMC* name, PMC* value) {
         STRING *s = VTABLE_get_string(interp, name);
         SELF.set_pmc_keyed_str(s, value);
     }
 
-    void set_pmc_keyed_str(STRING* name, PMC* value) {
+    VTABLE void set_pmc_keyed_str(STRING* name, PMC* value) {
         PMC *std_pad = PARROT_DYNLEXPAD(SELF)->init;
 
         if (std_pad && VTABLE_exists_keyed_str(interp, std_pad, name))