pike.git / src / pike_types.cmod

version» Context lines:

pike.git/src/pike_types.cmod:2498:    fprintf(stderr, "object(%s %"PRINTPTRDIFFT"d)",    s->car?"is":"implements",    CDR_TO_INT(s));    break;    case T_FUNCTION:    case T_MANY:    fprintf(stderr, "function(");    while(s->type == T_FUNCTION) {    simple_describe_type(s->car);    s = s->cdr; -  if ((s->type == T_FUNCTION) || -  ((s->type == T_MANY) && (s->car->type != T_VOID))) { +  if (s && +  ((s->type == T_FUNCTION) || +  ((s->type == T_MANY) && (s->car->type != T_VOID)))) {    fprintf(stderr, ", ");    }    } -  if (s->type != T_MANY) { +  if (!s || (s->type != T_MANY)) {    fprintf(stderr, ", @");    simple_describe_type(s);    fprintf(stderr, ")");    } else {    if (!s->car || (s->car->type != T_VOID)) {    simple_describe_type(s->car);    fprintf(stderr, "...");    }    fprintf(stderr, ":");    simple_describe_type(s->cdr);