Remove duplicate code in scheme_omittable_expr

This commit is contained in:
Gustavo Massaccesi 2015-04-22 20:47:19 -03:00
parent dcf73f6bca
commit e8ad90a14d

View File

@ -350,16 +350,6 @@ int scheme_omittable_expr(Scheme_Object *o, int vals, int fuel, int resolved,
} }
} }
if (vtype == scheme_case_lambda_sequence_type) {
note_match(1, vals, warn_info);
return 1;
}
if (vtype == scheme_compiled_quote_syntax_type) {
note_match(1, vals, warn_info);
return ((vals == 1) || (vals < 0));
}
if (vtype == scheme_branch_type) { if (vtype == scheme_branch_type) {
Scheme_Branch_Rec *b; Scheme_Branch_Rec *b;
b = (Scheme_Branch_Rec *)o; b = (Scheme_Branch_Rec *)o;