Add asciidoc as an input format.

New exported module Text.Pandoc.Readers.AsciiDoc,
exporting readAsciiDoc [API change].

The bulk of parsing is handled by the asciidoc library.

Closes #1456.

Author: jgm

MANUAL.txt

@@ -233,6 +233,7 @@ header when requesting a document from a URL:
 :   Specify input format.  *FORMAT* can be:
 
     ::: {#input-formats}
+    - `asciidoc` ([AsciiDoc] markup)
     - `bibtex` ([BibTeX] bibliography)
     - `biblatex` ([BibLaTeX] bibliography)
     - `bits` ([BITS] XML, alias for `jats`)

cabal.project

@@ -26,3 +26,8 @@ source-repository-package
   type: git
   location: https://github.com/jgm/djoths.git
   tag: 7dc8da53fc092d2d4d91f5f0988840f4faf90368
+
+source-repository-package
+  type: git
+  location: https://github.com/jgm/asciidoc-hs.git
+  tag: 17df3ccc91102ad74a977d4cb1a43f03b4ef0bda

pandoc.cabal

@@ -275,6 +275,10 @@ extra-source-files:
                  test/command/6466-whole.hs
                  test/command/7861.yaml
                  test/command/7861/metadata/placeholder
+                 test/asciidoc-reader.adoc
+                 test/asciidoc-reader.native
+                 test/asciidoc-reader-include.rb
+                 test/asciidoc-reader-include.adoc
                  test/docbook-chapter.docbook
                  test/docbook-reader.docbook
                  test/docbook-xref.docbook
@@ -566,6 +570,7 @@ library
                  typst                 >= 0.8.0.2  && < 0.9,
                  vector                >= 0.12     && < 0.14,
                  djot                  >= 0.1.2.3  && < 0.2,
+                 asciidoc              >= 0.1      && < 0.2,
                  tls                   >= 2.0.1    && < 2.2,
                  crypton-x509-system   >= 1.6.7    && < 1.7
 
@@ -590,6 +595,7 @@ library
                    Text.Pandoc.Translations,
                    Text.Pandoc.Translations.Types,
                    Text.Pandoc.Readers,
+                   Text.Pandoc.Readers.AsciiDoc,
                    Text.Pandoc.Readers.HTML,
                    Text.Pandoc.Readers.LaTeX,
                    Text.Pandoc.Readers.Markdown,

src/Text/Pandoc/Readers.hs

@@ -25,6 +25,7 @@ module Text.Pandoc.Readers
     -- * Readers: converting /to/ Pandoc format
     Reader (..)
   , readers
+  , readAsciiDoc
   , readDocx
   , readPptx
   , readXlsx
@@ -84,6 +85,7 @@ import Text.Pandoc.Error
 import Text.Pandoc.Extensions
 import qualified Text.Pandoc.Format as Format
 import Text.Pandoc.Options
+import Text.Pandoc.Readers.AsciiDoc
 import Text.Pandoc.Readers.CommonMark
 import Text.Pandoc.Readers.Markdown
 import Text.Pandoc.Readers.Creole
@@ -142,6 +144,7 @@ readers = [("native"       , TextReader readNative)
           ,("markdown_mmd",  TextReader readMarkdown)
           ,("commonmark"   , TextReader readCommonMark)
           ,("commonmark_x" , TextReader readCommonMark)
+          ,("asciidoc"     , TextReader readAsciiDoc)
           ,("creole"       , TextReader readCreole)
           ,("dokuwiki"     , TextReader readDokuWiki)
           ,("gfm"          , TextReader readCommonMark)