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
