object *name; /* String; NULL if unknown */
{
classobject *op;
+ if (bases == NULL) {
+ bases = newtupleobject(0);
+ if (bases == NULL)
+ return err_nomem();
+ }
+ else
+ INCREF(bases);
op = NEWOBJ(classobject, &Classtype);
- if (op == NULL)
+ if (op == NULL) {
+ DECREF(bases);
return NULL;
- XINCREF(bases);
+ }
op->cl_bases = bases;
INCREF(methods);
op->cl_methods = methods;
class_dealloc(op)
classobject *op;
{
- XDECREF(op->cl_bases);
+ int i;
+ DECREF(op->cl_bases);
DECREF(op->cl_methods);
XDECREF(op->cl_name);
free((ANY *)op);
return op->cl_methods;
}
if (strcmp(name, "__bases__") == 0) {
- if (op->cl_bases == NULL)
- return newtupleobject(0);
INCREF(op->cl_bases);
return op->cl_bases;
}
INCREF(v);
return v;
}
- if (op->cl_bases != NULL) {
+ {
int n = gettuplesize(op->cl_bases);
int i;
for (i = 0; i < n; i++) {
err_clear();
}
}
- err_setstr(NameError, name);
+ err_setstr(AttributeError, name);
return NULL;
}
return w;
}
DECREF(v);
- err_setstr(NameError, name);
+ err_setstr(AttributeError, name);
return NULL;
}