Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/df04d2d875f4f17b04cd8bd396b62b1eadd932e8 >--------------------------------------------------------------- commit df04d2d875f4f17b04cd8bd396b62b1eadd932e8 Author: Iavor S. Diatchki <diatchki@Perun.(none)> Date: Sat Nov 10 12:24:25 2012 -0800 Allow '-' to be used as an infix type constructor. >--------------------------------------------------------------- compiler/parser/Parser.y.pp | 1 + 1 files changed, 1 insertions(+), 0 deletions(-) diff --git a/compiler/parser/Parser.y.pp b/compiler/parser/Parser.y.pp index 3c18498..3029930 100644 --- a/compiler/parser/Parser.y.pp +++ b/compiler/parser/Parser.y.pp @@ -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 "-") } ----------------------------------------------------------------------------- _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc
