pike.git / src / array.c

version» Context lines:

pike.git/src/array.c:1005:    int a_subtype, b_subtype, res;    struct svalue tmp_a, tmp_b;       assert ((a->type == T_OBJECT && b->type == T_OBJECT) ||    (a->type == T_FUNCTION && b->type == T_FUNCTION));       if (a->u.object == b->u.object)    return a->subtype - b->subtype;       /* Destructed objects are considered equal to each other, and -  * (arbitrarily chosen) greater than others. */ +  * greater than others. That makes them sort close to real zeroes, +  * which are sorted after objects without compare functions. */    if (!a->u.object->prog)    return !b->u.object->prog ? 0 : 1;    else if (!b->u.object->prog)    return -1;       if (a->type == T_FUNCTION) {    if (a->u.object->prog != b->u.object->prog)    return a->u.object->prog < b->u.object->prog ? -1 : 1;    if (a->subtype != b->subtype)    return a->subtype - b->subtype;