[svn:parrot] r36018 - in trunk/src: . pmc

Author: chromatic
Date: Sun Jan 25 22:52:36 2009
New Revision: 36018

Modified:
   trunk/src/list.c
   trunk/src/pmc/array.pmc

Log:
[src] Removed unused variables from list_new_init(), as well as documentation
which incorrectly referred to this function.  There's more to cut here, but
this satisfies TT #226, reported by dmajnemer.

Modified: trunk/src/list.c
==============================================================================
--- trunk/src/list.c	(original)
+++ trunk/src/list.c	Sun Jan 25 22:52:36 2009
@@ -1347,7 +1347,6 @@
 {
     ASSERT_ARGS(list_new_init)
     List  *list;
-    PMC   *user_array;
     PMC   *multi_key       = NULL;
     INTVAL size            = 0;
     INTVAL item_size       = 0;
@@ -1413,15 +1412,10 @@
     if (size)
         list_set_length(interp, list, size);
 
-    /* set length */
-    VTABLE_set_integer_native(interp, user_array, 2);
-
-    /* store values */
-    VTABLE_set_integer_keyed_int(interp, user_array, 0,  size);
-    VTABLE_set_pmc_keyed_int(interp, user_array, 1, multi_key);
     return list;
 }
 
+
 /*
 
 =item C<void list_pmc_new_init>

Modified: trunk/src/pmc/array.pmc
==============================================================================
--- trunk/src/pmc/array.pmc	(original)
+++ trunk/src/pmc/array.pmc	Sun Jan 25 22:52:36 2009
@@ -149,10 +149,8 @@
 
 =item C<void init_pmc(PMC *init)>
 
-Calls C<list_new_init()> to initialize the underlying list.
-
-C<*init> contains the initialization information specifying initial
-size, number of dimensions, etc.
+C<*init> contains the initialization information specifying initial size,
+number of dimensions, etc.
 
 =cut
 

• [svn:parrot] r36018 - in trunk/src: . pmc by chromatic