No need for this, it's handled by a case lower down (and correctly, so why

force changes in two positions?)
2008-06-18 12:45:08 -04:00 · 2008-06-18 12:45:08 -04:00 · 6a30c9dec9
commit 6a30c9dec9
parent c2a53b316b
1 changed files with 0 additions and 1 deletions
--- a/collects/typed-scheme/private/prims.ss
+++ b/collects/typed-scheme/private/prims.ss
@ -221,7 +221,6 @@ This file defines two sorts of primitives. All of them are provided into any mod
                      'type-dotted 
                      bound))
  (syntax-case stx (:)
-    [[var : ty] (label-one #'var #'ty)]
    [([var : ty] ...)
     (label #'(var ...) #'(ty ...))]
    [([var : ty] ... . [rest : rest-ty star])