pike.git / src / las.c

version» Context lines:

pike.git/src/las.c:899:       case F_POP_VALUE:    copy_pike_type(res->type, void_type_string);       if(a) res->tree_info |= a->tree_info;    if(b) res->tree_info |= b->tree_info;    break;       case F_MAGIC_SET_INDEX:    res->node_info |= OPT_ASSIGNMENT; -  /* FALL_THROUGH */ +  /* FALLTHRU */    case F_MAGIC_INDEX:    case F_MAGIC_INDICES:    case F_MAGIC_VALUES:    case F_MAGIC_TYPES:    {    int e;    struct program_state *state = Pike_compiler;    res->node_info |= OPT_EXTERNAL_DEPEND;    if (!b) break; /* Paranoia; probably compiler error. */    for(e=0;e<b->u.sval.u.integer;e++)
pike.git/src/las.c:1660:    if (a) {    b = new_get_return_type(a, 0);    free_type(a);    if (b) {    push_finished_type(b);    free_type(b);    break;    }    }    } -  /* FALL_THROUGH */ +  /* FALLTHRU */       default:    if (Pike_compiler->compiler_pass == COMPILER_PASS_FIRST) {    /* The type isn't fully known yet, so do an extra pass. */    struct compilation *c = THIS_COMPILATION;    c->flags |= COMPILER_NEED_EXTRA_PASS;    } else {    my_yyerror("Illegal program identifier: %O.", Pike_sp-1);    }    push_object_type(0, 0);
pike.git/src/las.c:3445:    ref_push_type_value(CAR(n)->type);    ref_push_type_value(soft_type);    yytype_report(REPORT_ERROR, NULL, 0, NULL, NULL, 0, NULL,    2, "Soft cast of %O to %O isn't a valid cast.");    } else {    yytype_report(REPORT_ERROR, NULL, 0, type_type_string,    NULL, 0, CDR(n)->type, 0,    "Soft cast with non-type.");    }    } -  /* FALL_THROUGH */ +  /* FALLTHRU */    case F_CAST:    /* Type-field is correct by definition. */    if (old_type) {    copy_pike_type(n->type, old_type);    } else {    yyerror("Cast to invalid type.");    copy_pike_type(n->type, mixed_type_string);    }    break;   
pike.git/src/las.c:3906:    }    if (CDR(n) && (Pike_compiler->compiler_pass == COMPILER_PASS_LAST)) {    fix_type_field(CDR(n));    if (!match_types(CDR(n)->type, enumerable_type_string)) {    yytype_report(REPORT_WARNING,    NULL, 0, enumerable_type_string,    NULL, 0, CDR(n)->type,    0, "Case value is not an enumerable type.");    }    } -  /* FALL_THROUGH */ +  /* FALLTHRU */    case F_CASE:    if (CAR(n) && (Pike_compiler->compiler_pass == COMPILER_PASS_LAST)) {    fix_type_field(CAR(n));    if (!match_types(CAR(n)->type, enumerable_type_string)) {    yytype_report(REPORT_WARNING,    NULL, 0, enumerable_type_string,    NULL, 0, CAR(n)->type,    0, "Case value is not an enumerable type.");    }    } -  /* FALL_THROUGH */ +  /* FALLTHRU */    case F_INC_LOOP:    case F_DEC_LOOP:    case F_DEC_NEQ_LOOP:    case F_INC_NEQ_LOOP:    case F_LOOP:    case F_CONTINUE:    case F_BREAK:    case F_DEFAULT:    case F_POP_VALUE:    copy_pike_type(n->type, void_type_string);
pike.git/src/las.c:4023:       case F_UNDEFINED:    copy_pike_type(n->type, zero_type_string);    break;       case F_ARG_LIST:    if (n->parent) {    /* Propagate the changed type all the way up to the apply node. */    n->parent->node_info |= OPT_TYPE_NOT_FIXED;    } -  /* FALL_THROUGH */ +  /* FALLTHRU */    case F_COMMA_EXPR:    if(!CAR(n) || CAR(n)->type==void_type_string)    {    if(CDR(n))    copy_pike_type(n->type, CDR(n)->type);    else    copy_pike_type(n->type, void_type_string);    break;    }   
pike.git/src/las.c:4070:    case F_MAGIC_VALUES:    /* FIXME: Could have a stricter type for ::_values. */    MAKE_CONSTANT_TYPE(n->type, tF_MAGIC_VALUES);    break;    case F_MAGIC_TYPES:    /* FIXME: Could have a stricter type for ::_types. */    MAKE_CONSTANT_TYPE(n->type, tF_MAGIC_TYPES);    break;       case F_CATCH: -  /* FALL_THROUGH */ +  /* FALLTHRU */    default:    copy_pike_type(n->type, mixed_type_string);    }       if (n->type != old_type) {    if (n->parent) {    n->parent->node_info |= OPT_TYPE_NOT_FIXED;    }    }    if (old_type) {