ghc/compiler/tests/reader/OneA.hi

   1 interface OneA where
   2
   3 import OneB ( fB ) renaming ( fB to fBa )
   4
   5 type SynA = Float
   6
   7 data DataAA
   8 data (Ord a) => DataAB a = ConAB1 a | ConAB2 deriving Text
   9
  10 class (Ord a) => ClassA a where
  11     clsA :: a -> String
  12
  13 instance ClassA Int
  14
  15 fA :: a -> a