Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/tests/conformance98/infix/derived/Main_exclude.hs
module Main where data T = T1 | T :++ T deriving (Eq,Show,Read) -- infix 9 :++ t :: T t = read "T1" main = print t
