Eliminate a warning for compiler/basicTypes/OccName.lhs
authorThorkil Naur <naur@post11.tele.dk>
Sun, 4 May 2008 19:15:11 +0000 (19:15 +0000)
committerThorkil Naur <naur@post11.tele.dk>
Sun, 4 May 2008 19:15:11 +0000 (19:15 +0000)
compiler/basicTypes/OccName.lhs

index 6739ba3..ba17c02 100644 (file)
@@ -83,6 +83,7 @@ import Data.Char
 -- Unicode TODO: put isSymbol in libcompat
 #if !defined(__GLASGOW_HASKELL__) || __GLASGOW_HASKELL__ > 604
 #else
 -- Unicode TODO: put isSymbol in libcompat
 #if !defined(__GLASGOW_HASKELL__) || __GLASGOW_HASKELL__ > 604
 #else
+isSymbol :: a -> Bool
 isSymbol = const False
 #endif
 
 isSymbol = const False
 #endif