tilia-0.1.0.0: corpora/vendored/other/cpp/branches-ending-a-body-differently.hs

{-# LANGUAGE CPP #-}

module Console.Encoding where

unicodeSupported :: Handle -> IO Bool
unicodeSupported h = do
#ifndef __MHS__
  (== Just "UTF-8") . fmap show <$> hGetEncoding h
#else
  return True

canonicalize :: FilePath -> IO FilePath
canonicalize = return
#endif