module Text.Toml where
import Data.Text (Text)
import Data.Set (empty)
import Text.Parsec
import Text.Toml.Parser
parseTomlDoc :: String -> Text -> Either ParseError Table
parseTomlDoc :: String -> Text -> Either ParseError Table
parseTomlDoc inputName :: String
inputName input :: Text
input = Parsec Text (Set [Text]) Table
-> Set [Text] -> String -> Text -> Either ParseError Table
forall s t u a.
Stream s Identity t =>
Parsec s u a -> u -> String -> s -> Either ParseError a
runParser Parsec Text (Set [Text]) Table
tomlDoc Set [Text]
forall a. Set a
empty String
inputName Text
input