summaryrefslogtreecommitdiff
path: root/testsuite/tests/parser/should_compile/read030.hs
blob: 26883024ee8416c1faf6fda82f94953f36260d8b (plain)
1
2
3
4
5
6
7
8
9
10
-- !!! Infix decls w/ infix data constructors

-- GHC used to barf on this...

module ShouldCompile where

infix 2 |-, |+

ps  |-  q:qs   = undefined
ps  |+  p:q:qs = undefined