ghc/compiler/tests/rename/bevan-bug-1/Oberon_Real.hi

   1 interface Oberon_Real where
   2 from_string :: [Char] -> Oberon_Real
   3         {-# ARITY from_string = 0 #-}
   4 data Oberon_Real
   5 instance Eq Oberon_Real
   6         {-# ARITY (==) = 2 #-}
   7         {-# ARITY (/=) = 0 #-}
   8 instance Text Oberon_Real
   9         {-# ARITY readsPrec = 0 #-}
  10         {-# ARITY showsPrec = 2 #-}
  11         {-# ARITY readList = 0 #-}
  12         {-# ARITY showList = 0 #-}
  13