hs2ats-0.2.1.10: test/data/HigherOrder.hs
data GenericSum a b = GenericL a
| GenericR b
newtype GenericSumInt = GenericSumInt (GenericSum String Int)
data GenericSum a b = GenericL a
| GenericR b
newtype GenericSumInt = GenericSumInt (GenericSum String Int)