module System.Path.Internal.Separator where


extension :: Char
extension :: Char
extension = Char
'.'

searchPath :: Char
searchPath :: Char
searchPath = Char
':'

isExtension :: Char -> Bool
isExtension :: Char -> Bool
isExtension = (Char -> Char -> Bool
forall a. Eq a => a -> a -> Bool
== Char
extension)

isSearchPath :: Char -> Bool
isSearchPath :: Char -> Bool
isSearchPath = (Char -> Char -> Bool
forall a. Eq a => a -> a -> Bool
== Char
searchPath)