cvsuser 04/12/21 16:02:13
Modified: dynclasses pybuiltin.pmc
Log:
Stomp a warning in pybuiltin.pmc
Patch submitted by Simon Glover
Revision Changes Path
1.30 +4 -4 parrot/dynclasses/pybuiltin.pmc
Index: pybuiltin.pmc
===================================================================
RCS file: /cvs/public/parrot/dynclasses/pybuiltin.pmc,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -r1.29 -r1.30
--- pybuiltin.pmc 21 Dec 2004 17:37:41 -0000 1.29
+++ pybuiltin.pmc 22 Dec 2004 00:02:13 -0000 1.30
@@ -1,6 +1,6 @@
/*
Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-$Id: pybuiltin.pmc,v 1.29 2004/12/21 17:37:41 rubys Exp $
+$Id: pybuiltin.pmc,v 1.30 2004/12/22 00:02:13 rubys Exp $
=head1 NAME
@@ -57,8 +57,7 @@
static PMC* make_type(Interp* interpreter, INTVAL class, STRING* name) {
STRING *pmcname = Parrot_base_vtables[class]->whoami;
PMC *type = pmc_new(interpreter, dynclass_PyProxyType);
- PMC *nameprop = pmc_new(interpreter, dynclass_PyString);
- PMC *stash, *iter, *item;
+ PMC *stash, *iter, *item, *nameprop;
STRING *key;
INTVAL n, j;
@@ -73,7 +72,7 @@
item = VTABLE_get_pmc_keyed_str(interpreter, stash, key);
if (item->vtable->base_type == enum_class_NCI) {
- PMC *nameprop = pmc_new(interpreter, dynclass_PyString);
+ nameprop = pmc_new(interpreter, dynclass_PyString);
VTABLE_set_string_native(interpreter, nameprop, key);
VTABLE_setprop(interpreter, item, NAME, nameprop);
item->vtable = Parrot_base_vtables[dynclass_PyNCI];
@@ -82,6 +81,7 @@
VTABLE_add_method(interpreter, type, key, item);
}
+ nameprop = pmc_new(interpreter, dynclass_PyString);
VTABLE_set_string_native(interpreter, nameprop, name);
VTABLE_setprop(interpreter, type, NAME, nameprop);
