From bc6d8f98ed08e1f70f1b3ea255869b06533d2372 Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Thu, 9 Sep 2010 14:11:06 -0400 Subject: [PATCH] Avoid printing results of `define-hierarchy' --- collects/typed-scheme/private/base-structs.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/typed-scheme/private/base-structs.rkt b/collects/typed-scheme/private/base-structs.rkt index 03bcb0f339..2fe17fe92c 100644 --- a/collects/typed-scheme/private/base-structs.rkt +++ b/collects/typed-scheme/private/base-structs.rkt @@ -96,4 +96,4 @@ (define-hierarchy exn:fail:user ()))) ;; cce: adding exn:break would require a generic type for continuations - ) \ No newline at end of file + (void))