pike.git / src / pike_types.cmod

version» Context lines:

pike.git/src/pike_types.cmod:3550:    fprintf(stderr, " ==> ");    simple_describe_type(res);    fprintf(stderr, "\n");   #endif    return res;   }      static void even_lower_and_pike_types(struct pike_type *t1,    struct pike_type *t2)   { -  while(t2->type == T_OR) +  while(t2 && (t2->type == T_OR))    {    even_lower_and_pike_types(t1, t2->car);    t2 = t2->cdr;    } -  +  if (!t1 || !t2) { +  return; +  }    if (t1->type == t2->type) {    if (t1->type == T_INT) {    INT32 i1, i2;    INT32 upper_bound, lower_bound;    i1 = CDR_TO_INT(t1);    i2 = CDR_TO_INT(t2);    upper_bound = MINIMUM(i1,i2);       i1 = CAR_TO_INT(t1);    i2 = CAR_TO_INT(t2);