Remove duplicate case in infer.

This commit is contained in:
Eric Dobson 2014-04-29 23:42:05 -07:00
parent 03373d1189
commit e5d4aed2fb

View File

@ -570,8 +570,6 @@
(for/or ([t (in-list (list -Byte -Index -NonNegFixnum -Nat))]) (for/or ([t (in-list (list -Byte -Index -NonNegFixnum -Nat))])
(and (subtype S t) t))) (and (subtype S t) t)))
(% cg type t*)] (% cg type t*)]
[((Vector: t) (Sequence: (list t*)))
(cg t t*)]
[((Hashtable: k v) (Sequence: (list k* v*))) [((Hashtable: k v) (Sequence: (list k* v*)))
(cgen/list V X Y (list k v) (list k* v*))] (cgen/list V X Y (list k v) (list k* v*))]
[((Set: t) (Sequence: (list t*))) [((Set: t) (Sequence: (list t*)))