From 2d7eb8b13b33c08b003c38facf61a6e81b088c0d Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Tue, 6 Nov 2001 00:19:05 +0000
Subject: [PATCH] ...

original commit: f90c62d4efd06edfe52937bd3fa64fddbe857d3f
---
 collects/framework/specs.ss | 1 +
 1 file changed, 1 insertion(+)

diff --git a/collects/framework/specs.ss b/collects/framework/specs.ss
index fb536d1..e779927 100644
--- a/collects/framework/specs.ss
+++ b/collects/framework/specs.ss
@@ -34,6 +34,7 @@
          (and (identifier? (syntax name))
               (identifier? (syntax neg-blame))
               (identifier? (syntax pos-blame)))
+         
          (syntax-case (syntax type) (-> number union boolean interface tst)
            [(-> funs ...)
             (with-syntax ([(doms ...) (all-but-last (syntax->list (syntax (funs ...))))]