Commit df04d2d8 authored by Iavor S. Diatchki's avatar Iavor S. Diatchki

Allow '-' to be used as an infix type constructor.

parent 1b02de8d
......@@ -1887,6 +1887,7 @@ tyconsym :: { Located RdrName }
: CONSYM { L1 $! mkUnqual tcClsName (getCONSYM $1) }
| VARSYM { L1 $! mkUnqual tcClsName (getVARSYM $1) }
| '*' { L1 $! mkUnqual tcClsName (fsLit "*") }
| '-' { L1 $! mkUnqual tcClsName (fsLit "-") }
-----------------------------------------------------------------------------
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment