add a couple of VTABLE declarations

bschmalhofer · Mar 24, 2009 · 39013da · 39013da
1 parent 536d3c1
commit 39013da
Show file tree

Hide file tree

Showing 7 changed files with 9 additions and 9 deletions.
diff --git a/src/pmc/php.pmc b/src/pmc/php.pmc
@@ -68,11 +68,11 @@ information see F<src/pmc.c>.
 =cut
 
 */
-    void* get_pointer() {
+    VTABLE void* get_pointer() {
         return Php_PMC;
     }
 
-    void set_pointer(void *ptr) {
+    VTABLE void set_pointer(void *ptr) {
         Php_PMC = (PMC *)ptr;
     }
 

diff --git a/src/pmc/phpboolean.pmc b/src/pmc/phpboolean.pmc
@@ -38,7 +38,7 @@ Return the string 'boolean'.
 =cut
 
 */
-    STRING* name() {
+    VTABLE STRING* name() {
         return Parrot_str_new_constant(INTERP, "boolean");
     }
 
@@ -51,7 +51,7 @@ Return the string '1' or ''.
 =cut
 
 */
-    STRING* get_string() {
+    VTABLE STRING* get_string() {
         if (SELF.get_integer())
             return Parrot_str_new_constant(INTERP, "1");
         else

diff --git a/src/pmc/phpfloat.pmc b/src/pmc/phpfloat.pmc
@@ -35,7 +35,7 @@ Return the string 'double'.
 =cut
 
 */
-    STRING* name() {
+    VTABLE STRING* name() {
         return Parrot_str_new_constant(INTERP, "double");
     }
 

diff --git a/src/pmc/phpinteger.pmc b/src/pmc/phpinteger.pmc
@@ -33,7 +33,7 @@ Return the string 'integer'.
 =cut
 
 */
-    STRING* name() {
+    VTABLE STRING* name() {
         return Parrot_str_new_constant(INTERP, "integer");
     }
 

diff --git a/src/pmc/phpnull.pmc b/src/pmc/phpnull.pmc
@@ -32,7 +32,7 @@ Return the string 'NULL'.
 =cut
 
 */
-    STRING* name() {
+    VTABLE STRING* name() {
         return Parrot_str_new_constant(INTERP, "NULL");
     }
 

diff --git a/src/pmc/phpresource.pmc b/src/pmc/phpresource.pmc
@@ -32,7 +32,7 @@ Raises an exception. Use C<init_pmc()>.
 =cut
 
 */
-    void init() {
+    VTABLE void init() {
         Parrot_ex_throw_from_c_args(INTERP, NULL, EXCEPTION_INVALID_OPERATION,
                        "PhpResource init without pmc");
     }

diff --git a/src/pmc/phpstring.pmc b/src/pmc/phpstring.pmc
@@ -35,7 +35,7 @@ Return the string 'string'.
 =cut
 
 */
-    STRING* name() {
+    VTABLE STRING* name() {
         return Parrot_str_new_constant(INTERP, "string");
     }