From: Thorkil Naur Date: Sun, 4 May 2008 19:15:11 +0000 (+0000) Subject: Eliminate a warning for compiler/basicTypes/OccName.lhs X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=7df9b88b9e0565f438f16d8005526ffda80a1dbe;hp=c14c7b82c82806bf9c8333e50c6648c3a58cd951 Eliminate a warning for compiler/basicTypes/OccName.lhs --- diff --git a/compiler/basicTypes/OccName.lhs b/compiler/basicTypes/OccName.lhs index 6739ba3..ba17c02 100644 --- a/compiler/basicTypes/OccName.lhs +++ b/compiler/basicTypes/OccName.lhs @@ -83,6 +83,7 @@ import Data.Char -- Unicode TODO: put isSymbol in libcompat #if !defined(__GLASGOW_HASKELL__) || __GLASGOW_HASKELL__ > 604 #else +isSymbol :: a -> Bool isSymbol = const False #endif