module Text.Jira.Parser
( parse
, doc
, module Text.Jira.Markup
, module Text.Jira.Parser.Core
, module Text.Jira.Parser.Inline
, module Text.Jira.Parser.Block
, module Text.Jira.Parser.PlainText
) where
import Data.Text (Text)
import Text.Jira.Markup
import Text.Jira.Parser.Block
import Text.Jira.Parser.Core
import Text.Jira.Parser.Inline
import Text.Jira.Parser.PlainText
import Text.Parsec hiding (parse)
parse :: Text -> Either ParseError Doc
parse :: Text -> Either ParseError Doc
parse = forall a. JiraParser a -> Text -> Either ParseError a
parseJira JiraParser Doc
doc
doc :: JiraParser Doc
doc :: JiraParser Doc
doc = [Block] -> Doc
Doc forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (forall s u (m :: * -> *) a. ParsecT s u m a -> ParsecT s u m ()
skipMany JiraParser ()
blankline forall (f :: * -> *) a b. Applicative f => f a -> f b -> f b
*> forall s u (m :: * -> *) a. ParsecT s u m a -> ParsecT s u m [a]
many JiraParser Block
block) forall s u (m :: * -> *) a.
ParsecT s u m a -> String -> ParsecT s u m a
<?> String
"doc"