diff --git a/src/racket/src/error.c b/src/racket/src/error.c index 7114938f2e..8779ae97b1 100644 --- a/src/racket/src/error.c +++ b/src/racket/src/error.c @@ -2623,6 +2623,7 @@ static Scheme_Object *do_raise_type_error(const char *name, int argc, Scheme_Obj case 0: wrong = scheme_wrong_type; break; case 1: wrong = scheme_wrong_contract; break; case 2: wrong = scheme_wrong_contract; negate = 1; break; + default: wrong = NULL; break; } if (argc == 3) {