pike.git / src / las.c

version» Context lines:

pike.git/src/las.c:439:    if (pike_types_le(n->type, t)) return 1;    if (!match_types(n->type, t)) {    yytype_report(REPORT_ERROR, NULL, 0, t, NULL, 0, n->type, 0, msg);    return 0;    }    if (THIS_COMPILATION->lex.pragmas & ID_STRICT_TYPES) {    yytype_report(REPORT_WARNING, NULL, 0, t, NULL, 0, n->type, 0, msg);    }    if (runtime_options & RUNTIME_CHECK_TYPES) {    node *p = n->parent; -  if (CAR(p) == n) { +  if (p && (CAR(p) == n)) {    (_CAR(p) = mksoftcastnode(t, mkcastnode(mixed_type_string, n)))    ->parent = p; -  } else if (CDR(p) == n) { +  } else if (p && (CDR(p) == n)) {    (_CDR(p) = mksoftcastnode(t, mkcastnode(mixed_type_string, n)))    ->parent = p;    } else {    yywarning("Failed to find place to insert soft cast.");    }    }    return 1;   }      void init_node_s_blocks() { }