diff --git a/racket/src/racket/src/optimize.c b/racket/src/racket/src/optimize.c index 112329ccde..46ec52c24c 100644 --- a/racket/src/racket/src/optimize.c +++ b/racket/src/racket/src/optimize.c @@ -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) { Scheme_Branch_Rec *b; b = (Scheme_Branch_Rec *)o;