From 2e1cf9d4f4a72a9e3979509937a183fd05e92f0d Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Wed, 22 Sep 2010 17:51:18 -0400 Subject: [PATCH] Explained a design decision. original commit: 4aa7bc8439195addb172976253054ca1d41c72a1 --- collects/typed-scheme/utils/tc-utils.rkt | 1 + 1 file changed, 1 insertion(+) diff --git a/collects/typed-scheme/utils/tc-utils.rkt b/collects/typed-scheme/utils/tc-utils.rkt index 4a21c083..04b8e729 100644 --- a/collects/typed-scheme/utils/tc-utils.rkt +++ b/collects/typed-scheme/utils/tc-utils.rkt @@ -83,6 +83,7 @@ don't depend on any other portion of the system (define (reset!) (set! delayed-errors null)) (match (reverse delayed-errors) [(list) (void)] + ;; if there's only one, we don't need multiple-error handling [(list (struct err (msg stx))) (reset!) (raise-typecheck-error msg stx)]