[svn:parrot] r47755 - trunk/src

[chromatic at svn.parrot.org]

Author: chromatic
Date: Tue Jun 22 14:31:34 2010
New Revision: 47755
URL: https://trac.parrot.org/parrot/changeset/47755

Log:
[src] Fixed compilation warnings in src/pmc_freeze.c.  No functional changes.

Modified:
   trunk/src/pmc_freeze.c

Modified: trunk/src/pmc_freeze.c
==============================================================================
--- trunk/src/pmc_freeze.c	Tue Jun 22 14:31:18 2010	(r47754)
+++ trunk/src/pmc_freeze.c	Tue Jun 22 14:31:34 2010	(r47755)
@@ -78,9 +78,10 @@
 {
     ASSERT_ARGS(Parrot_freeze_pbc)
     PMC *visitor;
-
     PMC * const pf_pmc = Parrot_pmc_new(interp, enum_class_UnManagedStruct);
-    VTABLE_set_pointer(interp, pf_pmc, (void *)pf);
+    DECL_CONST_CAST;
+
+    VTABLE_set_pointer(interp, pf_pmc, PARROT_const_cast(void *, pf));
 
     visitor  = Parrot_pmc_new_init(interp, enum_class_ImageIO, pf_pmc);
     VTABLE_set_pmc(interp, visitor, pmc);
@@ -131,10 +132,11 @@
 Parrot_freeze_pbc_size(PARROT_INTERP, ARGIN(PMC *pmc), ARGIN(const PackFile_ConstTable *pf))
 {
     ASSERT_ARGS(Parrot_freeze_pbc_size)
-    PMC     *pf_pmc, *visitor, *pmc_result;
+    PMC *pf_pmc = Parrot_pmc_new(interp, enum_class_UnManagedStruct);
+    PMC *visitor, *pmc_result;
+    DECL_CONST_CAST;
 
-    pf_pmc = Parrot_pmc_new(interp, enum_class_UnManagedStruct);
-    VTABLE_set_pointer(interp, pf_pmc, (void *)pf);
+    VTABLE_set_pointer(interp, pf_pmc, PARROT_const_cast(void *, pf));
 
     visitor = Parrot_pmc_new_init(interp, enum_class_ImageIOSize, pf_pmc);
     VTABLE_set_pmc(interp, visitor, pmc);