X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FbasicTypes%2FOccName.lhs;h=ba17c0229c2c5938e67268faedfb4503ddcefa0f;hp=6739ba3d2e99bbbdaa08d809b8b267812147b271;hb=7df9b88b9e0565f438f16d8005526ffda80a1dbe;hpb=c14c7b82c82806bf9c8333e50c6648c3a58cd951 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