From 9fb036811a326eedd152fe105e2940f240f114b4 Mon Sep 17 00:00:00 2001 From: Guido van Rossum Date: Mon, 1 Jul 1991 18:48:04 +0000 Subject: Change cmpobject() to coerce numerical values before comparing them --- Objects/object.c | 19 +++++++++++++++++-- 1 file changed, 17 insertions(+), 2 deletions(-) diff --git a/Objects/object.c b/Objects/object.c index b63f067..79c12f2 100644 --- a/Objects/object.c +++ b/Objects/object.c @@ -117,11 +117,26 @@ cmpobject(v, w) return -1; if (w == NULL) return 1; - if ((tp = v->ob_type) != w->ob_type) + if ((tp = v->ob_type) != w->ob_type) { + if (tp->tp_as_number != NULL && + w->ob_type->tp_as_number != NULL) { + if (coerce(&v, &w) != 0) { + err_clear(); + /* XXX Should report the error, + XXX but the interface isn't there... */ + } + else { + int cmp = (*v->ob_type->tp_compare)(v, w); + DECREF(v); + DECREF(w); + return cmp; + } + } return strcmp(tp->tp_name, w->ob_type->tp_name); + } if (tp->tp_compare == NULL) return (v < w) ? -1 : 1; - return ((*tp->tp_compare)(v, w)); + return (*tp->tp_compare)(v, w); } object * -- cgit v0.12