develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34468 - trunk/src/pmc

From:
petdance
Date:
December 27, 2008 22:32
Subject:
[svn:parrot] r34468 - trunk/src/pmc
Message ID:
20081228063231.1CF51CB9B0@x12.develooper.com
Author: petdance
Date: Sat Dec 27 22:32:30 2008
New Revision: 34468

Modified:
   trunk/src/pmc/slice.pmc

Log:
remove an unused arg in a static function

Modified: trunk/src/pmc/slice.pmc
==============================================================================
--- trunk/src/pmc/slice.pmc	(original)
+++ trunk/src/pmc/slice.pmc	Sat Dec 27 22:32:30 2008
@@ -174,7 +174,7 @@
  * next range PMC in Key chain
  */
 static void
-set_slice_next(PARROT_INTERP, PMC *self, PMC *agg)
+set_slice_next(PARROT_INTERP, ARGMOD(PMC *self))
 {
     parrot_range_t * const r = (parrot_range_t *)PMC_struct_val(self);
 
@@ -396,7 +396,7 @@
 
                 /* we are passed now the new PMC we created above */
             case ITERATE_GET_NEXT:
-                set_slice_next(INTERP, SELF, agg);
+                set_slice_next(INTERP, SELF);
                 break;
             default:
                 Parrot_ex_throw_from_c_args(INTERP, NULL,



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About