module Text.Parser.HOCON
  ( parseHOCON
  , ParseError(..)
  )
where

import Data.HOCON (Config(..))
import Text.Parser.HOCON.Internal
import Text.ParserCombinators.Parsec (ParseError, parse)

parseHOCON :: String -> Either ParseError Config
parseHOCON :: String -> Either ParseError Config
parseHOCON = Parsec String () Config
-> String -> String -> Either ParseError Config
forall s t a.
Stream s Identity t =>
Parsec s () a -> String -> s -> Either ParseError a
parse Parsec String () Config
hoconParser String
"hocon" (String -> Either ParseError Config)
-> (String -> String) -> String -> Either ParseError Config
forall b c a. (b -> c) -> (a -> b) -> a -> c
. String -> String
preProcessing