[project @ 1996-01-08 20:28:12 by partain]

[ghc-hetmet.git] / ghc / compiler / tests / rename / bevan-bug-1 / Lexer_Buffer.hi

diff --git a/ghc/compiler/tests/rename/bevan-bug-1/Lexer_Buffer.hi b/ghc/compiler/tests/rename/bevan-bug-1/Lexer_Buffer.hi
new file mode 100644 (file)
index 0000000..5764f49
--- /dev/null
+++ b/ghc/compiler/tests/rename/bevan-bug-1/Lexer_Buffer.hi
@@ -0,0 +1,13 @@
+interface Lexer_Buffer where
+add :: Char -> Lexer_Buffer -> Lexer_Buffer
+       {-# ARITY add = 2 #-}
+empty :: Lexer_Buffer
+       {-# ARITY empty = 0 #-}
+flush :: Lexer_Buffer -> Lexer_Buffer
+       {-# ARITY flush = 1 #-}
+len :: Lexer_Buffer -> Int
+       {-# ARITY len = 1 #-}
+to_string :: Lexer_Buffer -> [Char]
+       {-# ARITY to_string = 1 #-}
+data Lexer_Buffer 
+