testsuite/tests/rename/should_compile/Rn066_A.hs


1
2
3
4
5
6
7
8
9
10

module Rn066_A where

{-# WARNING C "Are you sure you want to do that?" #-}
{-# WARNING op "Is that really a good idea?" #-}

data T = C | D

class Foo a where
  op :: a -> a
  bop :: a -> a