[svn:parrot] r38064 - in trunk: include/parrot src/pmc

[whiteknight at svn.parrot.org]

Author: whiteknight
Date: Sat Apr 11 13:37:14 2009
New Revision: 38064
URL: https://trac.parrot.org/parrot/changeset/38064

Log:
Remove src/pmc/scalar.pmc:clone(), which only copied the UnionVal of a PMC. However, since UnionVals aren't used anymore, this is essentially a no-op. Also, remove the PMC_union() macro, which was only used in this location

Modified:
   trunk/include/parrot/pobj.h
   trunk/src/pmc/scalar.pmc

Modified: trunk/include/parrot/pobj.h
==============================================================================
--- trunk/include/parrot/pobj.h	Sat Apr 11 13:22:29 2009	(r38063)
+++ trunk/include/parrot/pobj.h	Sat Apr 11 13:37:14 2009	(r38064)
@@ -175,7 +175,6 @@
 #define PMC_metadata(pmc)     PMC_ext_checked(pmc)->_metadata
 #define PMC_next_for_GC(pmc)  PMC_ext_checked(pmc)->_next_for_GC
 #define PMC_sync(pmc)         PMC_ext_checked(pmc)->_synchronize
-#define PMC_union(pmc)        (pmc)->cache
 
 #define POBJ_FLAG(n) ((UINTVAL)1 << (n))
 /* PObj flags */

Modified: trunk/src/pmc/scalar.pmc
==============================================================================
--- trunk/src/pmc/scalar.pmc	Sat Apr 11 13:22:29 2009	(r38063)
+++ trunk/src/pmc/scalar.pmc	Sat Apr 11 13:37:14 2009	(r38064)
@@ -138,23 +138,6 @@
 
 /*
 
-=item C<PMC *clone()>
-
-Creates and returns a clone of the scalar.
-
-=cut
-
-*/
-
-    VTABLE PMC *clone() {
-        PMC * const dest = pmc_new(INTERP, VTABLE_type(INTERP, SELF));
-        memcpy(&PMC_union(dest), &PMC_union(SELF), sizeof (UnionVal));
-        return dest;
-    }
-
-
-/*
-
 =back
 
 =head1 Mathematical Methods