{-# LANGUAGE CPP #-}

module GhcTags.Utils
  ( endOfLine
  , notNewLine
  ) where

-- | Platform dependent eol:
--
-- * Windows      "CRNL"
-- * MacOS        "CR"
-- * Linux (unit) "NL"
--
endOfLine :: String
#if defined(mingw32_HOST_OS)
endOfLine = "\r\n"
#elif defined(darwin_HIST_OS)
endOfLine = "\r"
#else
endOfLine :: String
endOfLine = String
"\n"
#endif


notNewLine :: Char -> Bool
notNewLine :: Char -> Bool
notNewLine = \Char
x -> Char
x forall a. Eq a => a -> a -> Bool
/= Char
'\n' Bool -> Bool -> Bool
&& Char
x forall a. Eq a => a -> a -> Bool
/= Char
'\r'