plug leak and improve error handling in dbm_keys()

This commit is contained in:
Guido van Rossum 1995-01-30 12:45:38 +00:00
parent 17448e2408
commit d503913594

View file

@ -168,6 +168,7 @@ dbm_keys(dp, args)
{ {
register object *v, *item; register object *v, *item;
datum key; datum key;
int err;
if (dp == NULL || !is_dbmobject(dp)) { if (dp == NULL || !is_dbmobject(dp)) {
err_badcall(); err_badcall();
@ -179,11 +180,18 @@ dbm_keys(dp, args)
if (v == NULL) if (v == NULL)
return NULL; return NULL;
for (key = dbm_firstkey(dp->di_dbm); key.dptr; for (key = dbm_firstkey(dp->di_dbm); key.dptr;
key = dbm_nextkey(dp->di_dbm) ) { key = dbm_nextkey(dp->di_dbm)) {
item = newsizedstringobject(key.dptr, key.dsize); item = newsizedstringobject(key.dptr, key.dsize);
if ( item == 0 ) if (item == NULL) {
return NULL; DECREF(v);
addlistitem(v, item); return NULL;
}
err = addlistitem(v, item);
DECREF(item);
if (err != 0) {
DECREF(v);
return NULL;
}
} }
return v; return v;
} }