From: Armin R. <ar...@us...> - 2001-12-28 14:18:48
|
Update of /cvsroot/psyco/psyco/c/Objects In directory usw-pr-cvs1:/tmp/cvs-serv21240 Modified Files: pintobject.c Log Message: pint_mul fix Index: pintobject.c =================================================================== RCS file: /cvsroot/psyco/psyco/c/Objects/pintobject.c,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** pintobject.c 2001/12/26 16:59:50 1.2 --- pintobject.c 2001/12/28 14:18:45 1.3 *************** *** 227,233 **** /* sequence * int */ a = PsycoInt_AsLong(po, w); ! return Psyco_META2(po, tp->tp_as_sequence->sq_repeat, ! CfReturnRef|CfPyErrIfNull, ! "vv", v, a); } --- 227,237 ---- /* sequence * int */ a = PsycoInt_AsLong(po, w); ! if (a == NULL) ! return NULL; ! x = Psyco_META2(po, tp->tp_as_sequence->sq_repeat, ! CfReturnRef|CfPyErrIfNull, ! "vv", v, a); ! vinfo_decref(a, po); ! return x; } *************** *** 241,247 **** /* int * sequence */ a = PsycoInt_AsLong(po, v); ! return Psyco_META2(po, tp->tp_as_sequence->sq_repeat, ! CfReturnRef|CfPyErrIfNull, ! "vv", w, a); } --- 245,255 ---- /* int * sequence */ a = PsycoInt_AsLong(po, v); ! if (a == NULL) ! return NULL; ! x = Psyco_META2(po, tp->tp_as_sequence->sq_repeat, ! CfReturnRef|CfPyErrIfNull, ! "vv", w, a); ! vinfo_decref(a, po); ! return x; } |