Added Attr field to Header.
Previously header ids were autogenerated by the writers. Now they are generated (unless supplied explicitly) in the markdown parser, if the `header_identifiers` extension is selected. In addition, the textile reader now supports id attributes on headers.
This commit is contained in:
John MacFarlane
parent
7a40fa8c08
commit
d599c4cdab
45 changed files with 454 additions and 389 deletions
|
|
@ -55,7 +55,7 @@ removeLinks (Link l _) = l
|
|||
removeLinks x = [x]
|
||||
|
||||
capitalizeHeaders :: Block -> Block
|
||||
capitalizeHeaders (Header 1 xs) = Header 1 $ bottomUp capitalize xs
|
||||
capitalizeHeaders (Header 1 attr xs) = Header 1 attr $ bottomUp capitalize xs
|
||||
capitalizeHeaders x = x
|
||||
|
||||
capitalize :: Inline -> Inline
|
||||
|
|
@ -63,22 +63,22 @@ capitalize (Str xs) = Str $ map toUpper xs
|
|||
capitalize x = x
|
||||
|
||||
removeSect :: [Inline] -> [Block] -> [Block]
|
||||
removeSect ils (Header 1 x:xs) | normalize x == normalize ils =
|
||||
removeSect ils (Header 1 _ x:xs) | normalize x == normalize ils =
|
||||
dropWhile (not . isHeader1) xs
|
||||
removeSect ils (x:xs) = x : removeSect ils xs
|
||||
removeSect _ [] = []
|
||||
|
||||
extractSect :: [Inline] -> [Block] -> [Block]
|
||||
extractSect ils (Header 1 z:xs) | normalize z == normalize ils =
|
||||
extractSect ils (Header 1 _ z:xs) | normalize z == normalize ils =
|
||||
bottomUp promoteHeader $ takeWhile (not . isHeader1) xs
|
||||
where promoteHeader (Header n x) = Header (n-1) x
|
||||
where promoteHeader (Header n attr x) = Header (n-1) attr x
|
||||
promoteHeader x = x
|
||||
extractSect ils (x:xs) = extractSect ils xs
|
||||
extractSect _ [] = []
|
||||
|
||||
isHeader1 :: Block -> Bool
|
||||
isHeader1 (Header 1 _) = True
|
||||
isHeader1 _ = False
|
||||
isHeader1 (Header 1 _ _ ) = True
|
||||
isHeader1 _ = False
|
||||
|
||||
|
||||
-- | Returns a list of 'dependencies' that have been modified after 'file'.
|
||||
|
|
|
|||
|
|
@ -170,6 +170,7 @@ Extra-Source-Files:
|
|||
tests/writer.rtf,
|
||||
tests/writer.texinfo,
|
||||
tests/lhs-test.native,
|
||||
tests/lhs-test-markdown.native,
|
||||
tests/lhs-test.markdown,
|
||||
tests/lhs-test.markdown+lhs,
|
||||
tests/lhs-test.rst,
|
||||
|
|
|
|||
|
|
@ -723,6 +723,7 @@ data ParserState = ParserState
|
|||
stateDate :: [Inline], -- ^ Date of document
|
||||
stateHeaderTable :: [HeaderType], -- ^ Ordered list of header types used
|
||||
stateHeaders :: [[Inline]], -- ^ List of headers (used for implicit ref links)
|
||||
stateIdentifiers :: [String], -- ^ List of header identifiers used
|
||||
stateNextExample :: Int, -- ^ Number of next example
|
||||
stateExamples :: M.Map String Int, -- ^ Map from example labels to numbers
|
||||
stateHasChapters :: Bool, -- ^ True if \chapter encountered
|
||||
|
|
@ -751,6 +752,7 @@ defaultParserState =
|
|||
stateDate = [],
|
||||
stateHeaderTable = [],
|
||||
stateHeaders = [],
|
||||
stateIdentifiers = [],
|
||||
stateNextExample = 1,
|
||||
stateExamples = M.empty,
|
||||
stateHasChapters = False,
|
||||
|
|
|
|||
|
|
@ -160,7 +160,7 @@ fixPlains inList bs = if any isParaish bs
|
|||
else bs
|
||||
where isParaish (Para _) = True
|
||||
isParaish (CodeBlock _ _) = True
|
||||
isParaish (Header _ _) = True
|
||||
isParaish (Header _ _ _) = True
|
||||
isParaish (BlockQuote _) = True
|
||||
isParaish (BulletList _) = not inList
|
||||
isParaish (OrderedList _ _) = not inList
|
||||
|
|
@ -201,7 +201,9 @@ pHeader = try $ do
|
|||
contents <- liftM concat $ manyTill inline (pCloses tagtype <|> eof)
|
||||
return $ if bodyTitle
|
||||
then [] -- skip a representation of the title in the body
|
||||
else [Header level $ normalizeSpaces contents]
|
||||
else [Header level (fromAttrib "id" $
|
||||
TagOpen tagtype attr, [], []) $
|
||||
normalizeSpaces contents]
|
||||
|
||||
pHrule :: TagParser [Block]
|
||||
pHrule = do
|
||||
|
|
|
|||
|
|
@ -372,10 +372,16 @@ block = choice [ codeBlockFenced
|
|||
header :: MarkdownParser (F Blocks)
|
||||
header = setextHeader <|> atxHeader <?> "header"
|
||||
|
||||
addToHeaderList :: F Inlines -> MarkdownParser ()
|
||||
addToHeaderList text =
|
||||
updateState $ \st -> st{ stateHeaders = B.toList (runF text defaultParserState)
|
||||
: stateHeaders st }
|
||||
-- returns unique identifier
|
||||
addToHeaderList :: F Inlines -> MarkdownParser String
|
||||
addToHeaderList text = do
|
||||
let headerList = B.toList $ runF text defaultParserState
|
||||
updateState $ \st -> st{ stateHeaders = headerList : stateHeaders st }
|
||||
(do guardEnabled Ext_header_identifiers
|
||||
ids <- stateIdentifiers `fmap` getState
|
||||
let id' = uniqueIdent headerList ids
|
||||
updateState $ \st -> st{ stateIdentifiers = id' : ids }
|
||||
return id') <|> return ""
|
||||
|
||||
atxHeader :: MarkdownParser (F Blocks)
|
||||
atxHeader = try $ do
|
||||
|
|
@ -383,8 +389,8 @@ atxHeader = try $ do
|
|||
notFollowedBy (char '.' <|> char ')') -- this would be a list
|
||||
skipSpaces
|
||||
text <- trimInlinesF . mconcat <$> manyTill inline atxClosing
|
||||
addToHeaderList text
|
||||
return $ B.header level <$> text
|
||||
id' <- addToHeaderList text
|
||||
return $ B.headerWith (id',[],[]) level <$> text
|
||||
|
||||
atxClosing :: Parser [Char] st String
|
||||
atxClosing = try $ skipMany (char '#') >> blanklines
|
||||
|
|
@ -399,8 +405,8 @@ setextHeader = try $ do
|
|||
many (char underlineChar)
|
||||
blanklines
|
||||
let level = (fromMaybe 0 $ findIndex (== underlineChar) setextHChars) + 1
|
||||
addToHeaderList text
|
||||
return $ B.header level <$> text
|
||||
id' <- addToHeaderList text
|
||||
return $ B.headerWith (id',[],[]) level <$> text
|
||||
|
||||
--
|
||||
-- hrule block
|
||||
|
|
|
|||
|
|
@ -74,14 +74,14 @@ specialChars = "\\`|*_<>$:/[]{}()-.\"'\8216\8217\8220\8221"
|
|||
--
|
||||
|
||||
isHeader :: Int -> Block -> Bool
|
||||
isHeader n (Header x _) = x == n
|
||||
isHeader _ _ = False
|
||||
isHeader n (Header x _ _) = x == n
|
||||
isHeader _ _ = False
|
||||
|
||||
-- | Promote all headers in a list of blocks. (Part of
|
||||
-- title transformation for RST.)
|
||||
promoteHeaders :: Int -> [Block] -> [Block]
|
||||
promoteHeaders num ((Header level text):rest) =
|
||||
(Header (level - num) text):(promoteHeaders num rest)
|
||||
promoteHeaders num ((Header level attr text):rest) =
|
||||
(Header (level - num) attr text):(promoteHeaders num rest)
|
||||
promoteHeaders num (other:rest) = other:(promoteHeaders num rest)
|
||||
promoteHeaders _ [] = []
|
||||
|
||||
|
|
@ -90,10 +90,10 @@ promoteHeaders _ [] = []
|
|||
-- promote all the other headers.
|
||||
titleTransform :: [Block] -- ^ list of blocks
|
||||
-> ([Block], [Inline]) -- ^ modified list of blocks, title
|
||||
titleTransform ((Header 1 head1):(Header 2 head2):rest) |
|
||||
titleTransform ((Header 1 _ head1):(Header 2 _ head2):rest) |
|
||||
not (any (isHeader 1) rest || any (isHeader 2) rest) = -- both title & subtitle
|
||||
(promoteHeaders 2 rest, head1 ++ [Str ":", Space] ++ head2)
|
||||
titleTransform ((Header 1 head1):rest) |
|
||||
titleTransform ((Header 1 _ head1):rest) |
|
||||
not (any (isHeader 1) rest) = -- title, no subtitle
|
||||
(promoteHeaders 1 rest, head1)
|
||||
titleTransform blocks = (blocks, [])
|
||||
|
|
|
|||
|
|
@ -171,9 +171,14 @@ header :: Parser [Char] ParserState Block
|
|||
header = try $ do
|
||||
char 'h'
|
||||
level <- digitToInt <$> oneOf "123456"
|
||||
optional attributes >> char '.' >> whitespace
|
||||
attr <- option "" attributes
|
||||
let ident = case attr of
|
||||
'#':xs -> xs
|
||||
_ -> ""
|
||||
char '.'
|
||||
whitespace
|
||||
name <- normalizeSpaces <$> manyTill inline blockBreak
|
||||
return $ Header level name
|
||||
return $ Header level (ident,[],[]) name
|
||||
|
||||
-- | Blockquote of the form "bq. content"
|
||||
blockQuote :: Parser [Char] ParserState Block
|
||||
|
|
|
|||
|
|
@ -426,18 +426,17 @@ inlineListToIdentifier =
|
|||
|
||||
-- | Convert list of Pandoc blocks into (hierarchical) list of Elements
|
||||
hierarchicalize :: [Block] -> [Element]
|
||||
hierarchicalize blocks = S.evalState (hierarchicalizeWithIds blocks) ([],[])
|
||||
hierarchicalize blocks = S.evalState (hierarchicalizeWithIds blocks) []
|
||||
|
||||
hierarchicalizeWithIds :: [Block] -> S.State ([Int],[String]) [Element]
|
||||
hierarchicalizeWithIds :: [Block] -> S.State [Int] [Element]
|
||||
hierarchicalizeWithIds [] = return []
|
||||
hierarchicalizeWithIds ((Header level title'):xs) = do
|
||||
(lastnum, usedIdents) <- S.get
|
||||
let ident = uniqueIdent title' usedIdents
|
||||
hierarchicalizeWithIds ((Header level (ident,_,_) title'):xs) = do
|
||||
lastnum <- S.get
|
||||
let lastnum' = take level lastnum
|
||||
let newnum = if length lastnum' >= level
|
||||
then init lastnum' ++ [last lastnum' + 1]
|
||||
else lastnum ++ replicate (level - length lastnum - 1) 0 ++ [1]
|
||||
S.put (newnum, (ident : usedIdents))
|
||||
S.put newnum
|
||||
let (sectionContents, rest) = break (headerLtEq level) xs
|
||||
sectionContents' <- hierarchicalizeWithIds sectionContents
|
||||
rest' <- hierarchicalizeWithIds rest
|
||||
|
|
@ -447,7 +446,7 @@ hierarchicalizeWithIds (x:rest) = do
|
|||
return $ (Blk x) : rest'
|
||||
|
||||
headerLtEq :: Int -> Block -> Bool
|
||||
headerLtEq level (Header l _) = l <= level
|
||||
headerLtEq level (Header l _ _) = l <= level
|
||||
headerLtEq _ _ = False
|
||||
|
||||
-- | Generate a unique identifier from a list of inlines.
|
||||
|
|
@ -466,15 +465,15 @@ uniqueIdent title' usedIdents =
|
|||
|
||||
-- | True if block is a Header block.
|
||||
isHeaderBlock :: Block -> Bool
|
||||
isHeaderBlock (Header _ _) = True
|
||||
isHeaderBlock (Header _ _ _) = True
|
||||
isHeaderBlock _ = False
|
||||
|
||||
-- | Shift header levels up or down.
|
||||
headerShift :: Int -> Pandoc -> Pandoc
|
||||
headerShift n = bottomUp shift
|
||||
where shift :: Block -> Block
|
||||
shift (Header level inner) = Header (level + n) inner
|
||||
shift x = x
|
||||
shift (Header level attr inner) = Header (level + n) attr inner
|
||||
shift x = x
|
||||
|
||||
-- | Detect if a list is tight.
|
||||
isTightList :: [[Block]] -> Bool
|
||||
|
|
|
|||
|
|
@ -35,24 +35,24 @@ import Text.Pandoc.Definition
|
|||
-- level that occurs before a non-header/non-hrule in the blocks).
|
||||
getSlideLevel :: [Block] -> Int
|
||||
getSlideLevel = go 6
|
||||
where go least (Header n _ : x : xs)
|
||||
where go least (Header n _ _ : x : xs)
|
||||
| n < least && nonHOrHR x = go n xs
|
||||
| otherwise = go least (x:xs)
|
||||
go least (_ : xs) = go least xs
|
||||
go least [] = least
|
||||
nonHOrHR (Header _ _) = False
|
||||
nonHOrHR (Header _ _ _) = False
|
||||
nonHOrHR (HorizontalRule) = False
|
||||
nonHOrHR _ = True
|
||||
|
||||
-- | Prepare a block list to be passed to hierarchicalize.
|
||||
prepSlides :: Int -> [Block] -> [Block]
|
||||
prepSlides slideLevel = ensureStartWithH . splitHrule
|
||||
where splitHrule (HorizontalRule : Header n xs : ys)
|
||||
| n == slideLevel = Header slideLevel xs : splitHrule ys
|
||||
splitHrule (HorizontalRule : xs) = Header slideLevel [Str "\0"] :
|
||||
where splitHrule (HorizontalRule : Header n attr xs : ys)
|
||||
| n == slideLevel = Header slideLevel attr xs : splitHrule ys
|
||||
splitHrule (HorizontalRule : xs) = Header slideLevel nullAttr [Str "\0"] :
|
||||
splitHrule xs
|
||||
splitHrule (x : xs) = x : splitHrule xs
|
||||
splitHrule [] = []
|
||||
ensureStartWithH bs@(Header n _:_)
|
||||
ensureStartWithH bs@(Header n _ _:_)
|
||||
| n <= slideLevel = bs
|
||||
ensureStartWithH bs = Header slideLevel [Str "\0"] : bs
|
||||
ensureStartWithH bs = Header slideLevel nullAttr [Str "\0"] : bs
|
||||
|
|
|
|||
|
|
@ -126,10 +126,10 @@ blockToAsciiDoc opts (Para inlines) = do
|
|||
blockToAsciiDoc _ (RawBlock _ _) = return empty
|
||||
blockToAsciiDoc _ HorizontalRule =
|
||||
return $ blankline <> text "'''''" <> blankline
|
||||
blockToAsciiDoc opts (Header level inlines) = do
|
||||
blockToAsciiDoc opts (Header level (ident,_,_) inlines) = do
|
||||
contents <- inlineListToAsciiDoc opts inlines
|
||||
let len = offset contents
|
||||
return $ contents <> cr <>
|
||||
return $ ("[[" <> text ident <> "]]") $$ contents $$
|
||||
(case level of
|
||||
1 -> text $ replicate len '-'
|
||||
2 -> text $ replicate len '~'
|
||||
|
|
|
|||
|
|
@ -190,7 +190,7 @@ blockToConTeXt (DefinitionList lst) =
|
|||
liftM vcat $ mapM defListItemToConTeXt lst
|
||||
blockToConTeXt HorizontalRule = return $ "\\thinrule" <> blankline
|
||||
-- If this is ever executed, provide a default for the reference identifier.
|
||||
blockToConTeXt (Header level lst) = sectionHeader "" level lst
|
||||
blockToConTeXt (Header level (ident,_,_) lst) = sectionHeader ident level lst
|
||||
blockToConTeXt (Table caption aligns widths heads rows) = do
|
||||
let colDescriptor colWidth alignment = (case alignment of
|
||||
AlignLeft -> 'l'
|
||||
|
|
|
|||
|
|
@ -142,7 +142,7 @@ listItemToDocbook opts item =
|
|||
-- | Convert a Pandoc block element to Docbook.
|
||||
blockToDocbook :: WriterOptions -> Block -> Doc
|
||||
blockToDocbook _ Null = empty
|
||||
blockToDocbook _ (Header _ _) = empty -- should not occur after hierarchicalize
|
||||
blockToDocbook _ (Header _ _ _) = empty -- should not occur after hierarchicalize
|
||||
blockToDocbook opts (Plain lst) = inlinesToDocbook opts lst
|
||||
blockToDocbook opts (Para [Image txt (src,_)]) =
|
||||
let alt = inlinesToDocbook opts txt
|
||||
|
|
|
|||
|
|
@ -337,11 +337,13 @@ getUniqueId = liftIO $ (show . (+ 20) . hashUnique) `fmap` newUnique
|
|||
-- | Convert a Pandoc block element to OpenXML.
|
||||
blockToOpenXML :: WriterOptions -> Block -> WS [Element]
|
||||
blockToOpenXML _ Null = return []
|
||||
blockToOpenXML opts (Header lev lst) = do
|
||||
blockToOpenXML opts (Header lev (ident,_,_) lst) = do
|
||||
contents <- withParaProp (pStyle $ "Heading" ++ show lev) $
|
||||
blockToOpenXML opts (Para lst)
|
||||
usedIdents <- gets stSectionIds
|
||||
let bookmarkName = uniqueIdent lst usedIdents
|
||||
let bookmarkName = if null ident
|
||||
then uniqueIdent lst usedIdents
|
||||
else ident
|
||||
modify $ \s -> s{ stSectionIds = bookmarkName : stSectionIds s }
|
||||
id' <- getUniqueId
|
||||
let bookmarkStart = mknode "w:bookmarkStart" [("w:id", id')
|
||||
|
|
|
|||
|
|
@ -119,18 +119,17 @@ writeEPUB opts doc@(Pandoc meta _) = do
|
|||
|
||||
-- add level 1 header to beginning if none there
|
||||
let blocks' = case blocks of
|
||||
(Header 1 _ : _) -> blocks
|
||||
_ -> Header 1 (docTitle meta) : blocks
|
||||
(Header 1 _ _ : _) -> blocks
|
||||
_ -> Header 1 ("",[],[]) (docTitle meta) : blocks
|
||||
|
||||
let chapterHeaderLevel = writerEpubChapterLevel opts
|
||||
|
||||
-- internal reference IDs change when we chunk the file,
|
||||
-- so that '#my-header-1' might turn into 'chap004.xhtml#my-header'.
|
||||
-- the next two lines fix that:
|
||||
let reftable = correlateRefs chapterHeaderLevel blocks'
|
||||
let blocks'' = replaceRefs reftable blocks'
|
||||
|
||||
let isChapterHeader (Header n _) = n <= chapterHeaderLevel
|
||||
let isChapterHeader (Header n _ _) = n <= chapterHeaderLevel
|
||||
isChapterHeader _ = False
|
||||
|
||||
let toChunks :: [Block] -> [[Block]]
|
||||
|
|
@ -145,8 +144,8 @@ writeEPUB opts doc@(Pandoc meta _) = do
|
|||
$ renderHtml
|
||||
$ writeHtml opts'
|
||||
$ case bs of
|
||||
(Header _ xs : _) -> Pandoc (Meta xs [] []) bs
|
||||
_ -> Pandoc (Meta [] [] []) bs
|
||||
(Header _ _ xs : _) -> Pandoc (Meta xs [] []) bs
|
||||
_ -> Pandoc (Meta [] [] []) bs
|
||||
|
||||
let chapterEntries = zipWith chapToEntry [1..] chunks
|
||||
|
||||
|
|
@ -444,7 +443,7 @@ correlateRefs chapterHeaderLevel bs =
|
|||
, chapterIdents = []
|
||||
, identTable = [] }
|
||||
where go :: Block -> State IdentState ()
|
||||
go (Header n ils) = do
|
||||
go (Header n _ ils) = do
|
||||
when (n <= chapterHeaderLevel) $
|
||||
modify $ \s -> s{ chapterNumber = chapterNumber s + 1
|
||||
, chapterIdents = [] }
|
||||
|
|
|
|||
|
|
@ -158,7 +158,7 @@ renderSection level (ttl, body) = do
|
|||
return $ el "section" (title ++ content)
|
||||
where
|
||||
hasSubsections = any isHeader
|
||||
isHeader (Header _ _) = True
|
||||
isHeader (Header _ _ _) = True
|
||||
isHeader _ = False
|
||||
|
||||
-- | Only <p> and <empty-line> are allowed within <title> in FB2.
|
||||
|
|
@ -186,13 +186,13 @@ splitSections level blocks = reverse $ revSplit (reverse blocks)
|
|||
let (lastsec, before) = break sameLevel rblocks
|
||||
(header, prevblocks) =
|
||||
case before of
|
||||
((Header n title):prevblocks') ->
|
||||
((Header n _ title):prevblocks') ->
|
||||
if n == level
|
||||
then (title, prevblocks')
|
||||
else ([], before)
|
||||
_ -> ([], before)
|
||||
in (header, reverse lastsec) : revSplit prevblocks
|
||||
sameLevel (Header n _) = n == level
|
||||
sameLevel (Header n _ _) = n == level
|
||||
sameLevel _ = False
|
||||
|
||||
-- | Make another FictionBook body with footnotes.
|
||||
|
|
@ -361,7 +361,7 @@ blockToXml (DefinitionList defs) =
|
|||
needsBreak (Para _) = False
|
||||
needsBreak (Plain ins) = LineBreak `notElem` ins
|
||||
needsBreak _ = True
|
||||
blockToXml (Header _ _) = -- should never happen, see renderSections
|
||||
blockToXml (Header _ _ _) = -- should never happen, see renderSections
|
||||
error "unexpected header in section text"
|
||||
blockToXml HorizontalRule = return
|
||||
[ el "empty-line" ()
|
||||
|
|
@ -413,7 +413,7 @@ indent = indentBlock
|
|||
let s' = unlines . map (spacer++) . lines $ s
|
||||
in CodeBlock a s'
|
||||
indentBlock (BlockQuote bs) = BlockQuote (map indent bs)
|
||||
indentBlock (Header l ins) = Header l (indentLines ins)
|
||||
indentBlock (Header l attr' ins) = Header l attr' (indentLines ins)
|
||||
indentBlock everythingElse = everythingElse
|
||||
-- indent every (explicit) line
|
||||
indentLines :: [Inline] -> [Inline]
|
||||
|
|
@ -613,4 +613,4 @@ cMap = concatMap
|
|||
|
||||
-- | Monadic equivalent of 'concatMap'.
|
||||
cMapM :: (Monad m) => (a -> m [b]) -> [a] -> m [b]
|
||||
cMapM f xs = concat `liftM` mapM f xs
|
||||
cMapM f xs = concat `liftM` mapM f xs
|
||||
|
|
|
|||
|
|
@ -219,7 +219,10 @@ inTemplate opts tit auths authsMeta date toc body' newvars =
|
|||
|
||||
-- | Like Text.XHtml's identifier, but adds the writerIdentifierPrefix
|
||||
prefixedId :: WriterOptions -> String -> Attribute
|
||||
prefixedId opts s = A.id $ toValue $ writerIdentifierPrefix opts ++ s
|
||||
prefixedId opts s =
|
||||
case s of
|
||||
"" -> mempty
|
||||
_ -> A.id $ toValue $ writerIdentifierPrefix opts ++ s
|
||||
|
||||
-- | Replacement for Text.XHtml's unordList.
|
||||
unordList :: WriterOptions -> ([Html] -> Html)
|
||||
|
|
@ -258,7 +261,10 @@ elementToListItem opts (Sec lev num id' headerText subsecs)
|
|||
let subList = if null subHeads
|
||||
then mempty
|
||||
else unordList opts subHeads
|
||||
return $ Just $ (H.a ! A.href (toValue $ "#" ++ writerIdentifierPrefix opts ++ id')
|
||||
return $ Just
|
||||
$ if null id'
|
||||
then (H.a $ toHtml txt) >> subList
|
||||
else (H.a ! A.href (toValue $ "#" ++ writerIdentifierPrefix opts ++ id')
|
||||
$ toHtml txt) >> subList
|
||||
elementToListItem _ _ = return Nothing
|
||||
|
||||
|
|
@ -273,7 +279,7 @@ elementToHtml slideLevel opts (Sec level num id' title' elements) = do
|
|||
let titleSlide = slide && level < slideLevel
|
||||
header' <- if title' == [Str "\0"] -- marker for hrule
|
||||
then return mempty
|
||||
else blockToHtml opts (Header level' title')
|
||||
else blockToHtml opts (Header level' (id',[],[]) title')
|
||||
let isSec (Sec _ _ _ _ _) = True
|
||||
isSec (Blk _) = False
|
||||
innerContents <- mapM (elementToHtml slideLevel opts)
|
||||
|
|
@ -283,8 +289,7 @@ elementToHtml slideLevel opts (Sec level num id' title' elements) = do
|
|||
else elements
|
||||
let header'' = if (writerSectionDivs opts ||
|
||||
writerSlideVariant opts == S5Slides ||
|
||||
slide ||
|
||||
not (isEnabled Ext_header_identifiers opts))
|
||||
slide)
|
||||
then header'
|
||||
else header' ! prefixedId opts id'
|
||||
let inNl x = mconcat $ nl opts : intersperse (nl opts) x ++ [nl opts]
|
||||
|
|
@ -442,15 +447,16 @@ blockToHtml opts (BlockQuote blocks) =
|
|||
else do
|
||||
contents <- blockListToHtml opts blocks
|
||||
return $ H.blockquote $ nl opts >> contents >> nl opts
|
||||
blockToHtml opts (Header level lst) = do
|
||||
blockToHtml opts (Header level (ident,_,_) lst) = do
|
||||
contents <- inlineListToHtml opts lst
|
||||
secnum <- liftM stSecNum get
|
||||
let contents' = if writerNumberSections opts
|
||||
then (H.span ! A.class_ "header-section-number" $ toHtml $ showSecNum secnum) >>
|
||||
strToHtml " " >> contents
|
||||
else contents
|
||||
let contents'' = if writerTableOfContents opts
|
||||
then H.a ! A.href (toValue $ "#" ++ writerIdentifierPrefix opts ++ "TOC") $ contents'
|
||||
let contents'' = if writerTableOfContents opts && not (null ident)
|
||||
then H.a ! A.href (toValue $
|
||||
'#' : writerIdentifierPrefix opts ++ ident) $ contents'
|
||||
else contents'
|
||||
return $ (case level of
|
||||
1 -> H.h1 contents''
|
||||
|
|
|
|||
|
|
@ -109,8 +109,8 @@ pandocToLaTeX options (Pandoc (Meta title authors date) blocks) = do
|
|||
let (blocks', lastHeader) = if writerCiteMethod options == Citeproc then
|
||||
(blocks, [])
|
||||
else case last blocks of
|
||||
Header 1 il -> (init blocks, il)
|
||||
_ -> (blocks, [])
|
||||
Header 1 _ il -> (init blocks, il)
|
||||
_ -> (blocks, [])
|
||||
blocks'' <- if writerBeamer options
|
||||
then toSlides blocks'
|
||||
else return blocks'
|
||||
|
|
@ -227,7 +227,7 @@ toSlides bs = do
|
|||
|
||||
elementToBeamer :: Int -> Element -> State WriterState [Block]
|
||||
elementToBeamer _slideLevel (Blk b) = return [b]
|
||||
elementToBeamer slideLevel (Sec lvl _num _ident tit elts)
|
||||
elementToBeamer slideLevel (Sec lvl _num ident tit elts)
|
||||
| lvl > slideLevel = do
|
||||
bs <- concat `fmap` mapM (elementToBeamer slideLevel) elts
|
||||
return $ Para ( RawInline "latex" "\\begin{block}{"
|
||||
|
|
@ -235,7 +235,7 @@ elementToBeamer slideLevel (Sec lvl _num _ident tit elts)
|
|||
: bs ++ [RawBlock "latex" "\\end{block}"]
|
||||
| lvl < slideLevel = do
|
||||
bs <- concat `fmap` mapM (elementToBeamer slideLevel) elts
|
||||
return $ (Header lvl tit) : bs
|
||||
return $ (Header lvl (ident,[],[]) tit) : bs
|
||||
| otherwise = do -- lvl == slideLevel
|
||||
-- note: [fragile] is required or verbatim breaks
|
||||
let hasCodeBlock (CodeBlock _ _) = [True]
|
||||
|
|
@ -404,7 +404,7 @@ blockToLaTeX (DefinitionList lst) = do
|
|||
"\\end{description}"
|
||||
blockToLaTeX HorizontalRule = return $
|
||||
"\\begin{center}\\rule{3in}{0.4pt}\\end{center}"
|
||||
blockToLaTeX (Header level lst) = sectionHeader "" level lst
|
||||
blockToLaTeX (Header level (id',_,_) lst) = sectionHeader id' level lst
|
||||
blockToLaTeX (Table caption aligns widths heads rows) = do
|
||||
modify $ \s -> s{ stInTable = True, stTableNotes = [] }
|
||||
headers <- if all null heads
|
||||
|
|
|
|||
|
|
@ -161,7 +161,7 @@ blockToMan opts (Para inlines) = do
|
|||
blockToMan _ (RawBlock "man" str) = return $ text str
|
||||
blockToMan _ (RawBlock _ _) = return empty
|
||||
blockToMan _ HorizontalRule = return $ text ".PP" $$ text " * * * * *"
|
||||
blockToMan opts (Header level inlines) = do
|
||||
blockToMan opts (Header level _ inlines) = do
|
||||
contents <- inlineListToMan opts inlines
|
||||
let heading = case level of
|
||||
1 -> ".SH "
|
||||
|
|
|
|||
|
|
@ -274,7 +274,7 @@ blockToMarkdown opts (RawBlock f str)
|
|||
blockToMarkdown _ (RawBlock _ _) = return empty
|
||||
blockToMarkdown _ HorizontalRule =
|
||||
return $ blankline <> text "* * * * *" <> blankline
|
||||
blockToMarkdown opts (Header level inlines) = do
|
||||
blockToMarkdown opts (Header level attr inlines) = do
|
||||
contents <- inlineListToMarkdown opts inlines
|
||||
st <- get
|
||||
let setext = writerSetextHeaders opts
|
||||
|
|
|
|||
|
|
@ -104,7 +104,7 @@ blockToMediaWiki _ (RawBlock _ _) = return ""
|
|||
|
||||
blockToMediaWiki _ HorizontalRule = return "\n-----\n"
|
||||
|
||||
blockToMediaWiki opts (Header level inlines) = do
|
||||
blockToMediaWiki opts (Header level _ inlines) = do
|
||||
contents <- inlineListToMediaWiki opts inlines
|
||||
let eqs = replicate level '='
|
||||
return $ eqs ++ " " ++ contents ++ " " ++ eqs ++ "\n"
|
||||
|
|
|
|||
|
|
@ -287,7 +287,7 @@ blockToOpenDocument :: WriterOptions -> Block -> State WriterState Doc
|
|||
blockToOpenDocument o bs
|
||||
| Plain b <- bs = inParagraphTags =<< inlinesToOpenDocument o b
|
||||
| Para b <- bs = inParagraphTags =<< inlinesToOpenDocument o b
|
||||
| Header i b <- bs = setFirstPara >>
|
||||
| Header i _ b <- bs = setFirstPara >>
|
||||
(inHeaderTags i =<< inlinesToOpenDocument o b)
|
||||
| BlockQuote b <- bs = setFirstPara >> mkBlockQuote b
|
||||
| DefinitionList b <- bs = setFirstPara >> defList b
|
||||
|
|
|
|||
|
|
@ -131,7 +131,7 @@ blockToOrg (RawBlock f str) | f == "org" || f == "latex" || f == "tex" =
|
|||
return $ text str
|
||||
blockToOrg (RawBlock _ _) = return empty
|
||||
blockToOrg HorizontalRule = return $ blankline $$ "--------------" $$ blankline
|
||||
blockToOrg (Header level inlines) = do
|
||||
blockToOrg (Header level _ inlines) = do
|
||||
contents <- inlineListToOrg inlines
|
||||
let headerStr = text $ if level > 999 then " " else replicate level '*'
|
||||
return $ headerStr <> " " <> contents <> blankline
|
||||
|
|
|
|||
|
|
@ -161,7 +161,7 @@ blockToRST (RawBlock f str) =
|
|||
(nest 3 $ text str) $$ blankline
|
||||
blockToRST HorizontalRule =
|
||||
return $ blankline $$ "--------------" $$ blankline
|
||||
blockToRST (Header level inlines) = do
|
||||
blockToRST (Header level _ inlines) = do
|
||||
contents <- inlineListToRST inlines
|
||||
let headerChar = if level > 5 then ' ' else "=-~^'" !! (level - 1)
|
||||
let border = text $ replicate (offset contents) headerChar
|
||||
|
|
|
|||
|
|
@ -72,7 +72,7 @@ writeRTF options (Pandoc (Meta title authors date) blocks) =
|
|||
datetext = inlineListToRTF date
|
||||
spacer = not $ all null $ titletext : datetext : authorstext
|
||||
body = concatMap (blockToRTF 0 AlignDefault) blocks
|
||||
isTOCHeader (Header lev _) = lev <= writerTOCDepth options
|
||||
isTOCHeader (Header lev _ _) = lev <= writerTOCDepth options
|
||||
isTOCHeader _ = False
|
||||
context = writerVariables options ++
|
||||
[ ("body", body)
|
||||
|
|
@ -91,7 +91,7 @@ tableOfContents :: [Block] -> String
|
|||
tableOfContents headers =
|
||||
let contentsTree = hierarchicalize headers
|
||||
in concatMap (blockToRTF 0 AlignDefault) $
|
||||
[Header 1 [Str "Contents"],
|
||||
[Header 1 nullAttr [Str "Contents"],
|
||||
BulletList (map elementToListItem contentsTree)]
|
||||
|
||||
elementToListItem :: Element -> [Block]
|
||||
|
|
@ -208,7 +208,7 @@ blockToRTF indent alignment (DefinitionList lst) = spaceAtEnd $
|
|||
concatMap (definitionListItemToRTF alignment indent) lst
|
||||
blockToRTF indent _ HorizontalRule =
|
||||
rtfPar indent 0 AlignCenter "\\emdash\\emdash\\emdash\\emdash\\emdash"
|
||||
blockToRTF indent alignment (Header level lst) = rtfPar indent 0 alignment $
|
||||
blockToRTF indent alignment (Header level _ lst) = rtfPar indent 0 alignment $
|
||||
"\\b \\fs" ++ (show (40 - (level * 4))) ++ " " ++ inlineListToRTF lst
|
||||
blockToRTF indent alignment (Table caption aligns sizes headers rows) =
|
||||
(if all null headers
|
||||
|
|
|
|||
|
|
@ -64,7 +64,7 @@ writeTexinfo options document =
|
|||
-- | Add a "Top" node around the document, needed by Texinfo.
|
||||
wrapTop :: Pandoc -> Pandoc
|
||||
wrapTop (Pandoc (Meta title authors date) blocks) =
|
||||
Pandoc (Meta title authors date) (Header 0 title : blocks)
|
||||
Pandoc (Meta title authors date) (Header 0 nullAttr title : blocks)
|
||||
|
||||
pandocToTexinfo :: WriterOptions -> Pandoc -> State WriterState String
|
||||
pandocToTexinfo options (Pandoc (Meta title authors date) blocks) = do
|
||||
|
|
@ -195,14 +195,14 @@ blockToTexinfo HorizontalRule =
|
|||
text (take 72 $ repeat '-') $$
|
||||
text "@end ifnottex"
|
||||
|
||||
blockToTexinfo (Header 0 lst) = do
|
||||
blockToTexinfo (Header 0 _ lst) = do
|
||||
txt <- if null lst
|
||||
then return $ text "Top"
|
||||
else inlineListToTexinfo lst
|
||||
return $ text "@node Top" $$
|
||||
text "@top " <> txt <> blankline
|
||||
|
||||
blockToTexinfo (Header level lst) = do
|
||||
blockToTexinfo (Header level _ lst) = do
|
||||
node <- inlineListForNode lst
|
||||
txt <- inlineListToTexinfo lst
|
||||
idsUsed <- gets stIdentifiers
|
||||
|
|
@ -286,7 +286,7 @@ blockListToTexinfo [] = return empty
|
|||
blockListToTexinfo (x:xs) = do
|
||||
x' <- blockToTexinfo x
|
||||
case x of
|
||||
Header level _ -> do
|
||||
Header level _ _ -> do
|
||||
-- We need need to insert a menu for this node.
|
||||
let (before, after) = break isHeader xs
|
||||
before' <- blockListToTexinfo before
|
||||
|
|
@ -311,14 +311,14 @@ blockListToTexinfo (x:xs) = do
|
|||
return $ x' $$ xs'
|
||||
|
||||
isHeader :: Block -> Bool
|
||||
isHeader (Header _ _) = True
|
||||
isHeader _ = False
|
||||
isHeader (Header _ _ _) = True
|
||||
isHeader _ = False
|
||||
|
||||
collectNodes :: Int -> [Block] -> [Block]
|
||||
collectNodes _ [] = []
|
||||
collectNodes level (x:xs) =
|
||||
case x of
|
||||
(Header hl _) ->
|
||||
(Header hl _ _) ->
|
||||
if hl < level
|
||||
then []
|
||||
else if hl == level
|
||||
|
|
@ -329,7 +329,7 @@ collectNodes level (x:xs) =
|
|||
|
||||
makeMenuLine :: Block
|
||||
-> State WriterState Doc
|
||||
makeMenuLine (Header _ lst) = do
|
||||
makeMenuLine (Header _ _ lst) = do
|
||||
txt <- inlineListForNode lst
|
||||
return $ text "* " <> txt <> text "::"
|
||||
makeMenuLine _ = error "makeMenuLine called with non-Header block"
|
||||
|
|
|
|||
|
|
@ -121,9 +121,10 @@ blockToTextile _ (RawBlock f str) =
|
|||
|
||||
blockToTextile _ HorizontalRule = return "<hr />\n"
|
||||
|
||||
blockToTextile opts (Header level inlines) = do
|
||||
blockToTextile opts (Header level (ident,_,_) inlines) = do
|
||||
contents <- inlineListToTextile opts inlines
|
||||
let prefix = 'h' : (show level ++ ". ")
|
||||
let attribs = if null ident then "" else "(#" ++ ident ++ ")"
|
||||
let prefix = 'h' : show level ++ attribs ++ ". "
|
||||
return $ prefix ++ contents ++ "\n"
|
||||
|
||||
blockToTextile _ (CodeBlock (_,classes,_) str) | any (all isSpace) (lines str) =
|
||||
|
|
|
|||
|
|
@ -81,7 +81,7 @@ arbBlock n = frequency $ [ (10, liftM Plain $ arbInlines (n-1))
|
|||
])
|
||||
, (5, do x1 <- choose (1 :: Int, 6)
|
||||
x2 <- arbInlines (n-1)
|
||||
return (Header x1 x2))
|
||||
return (Header x1 nullAttr x2))
|
||||
, (2, return HorizontalRule)
|
||||
] ++ [x | x <- nesters, n > 0]
|
||||
where nesters = [ (5, liftM BlockQuote $ listOf1 $ arbBlock (n-1))
|
||||
|
|
|
|||
|
|
@ -147,8 +147,11 @@ lhsWriterTests format
|
|||
lhsReaderTest :: String -> Test
|
||||
lhsReaderTest format =
|
||||
testWithNormalize normalizer "lhs" ["-r", format, "-w", "native"]
|
||||
("lhs-test" <.> format) "lhs-test.native"
|
||||
("lhs-test" <.> format) norm
|
||||
where normalizer = writeNative def . normalize . readNative
|
||||
norm = if format == "markdown+lhs"
|
||||
then "lhs-test-markdown.native"
|
||||
else "lhs-test.native"
|
||||
|
||||
writerTests :: String -> [Test]
|
||||
writerTests format
|
||||
|
|
|
|||
|
|
@ -42,7 +42,7 @@ tests = [ testGroup "inline code"
|
|||
]
|
||||
, testGroup "headers"
|
||||
[ "level 1" =:
|
||||
header 1 "My header" =?> "\\section[my-header]{My header}"
|
||||
headerWith ("my-header",[],[]) 1 "My header" =?> "\\section[my-header]{My header}"
|
||||
]
|
||||
, testGroup "bullet lists"
|
||||
[ "nested" =:
|
||||
|
|
|
|||
|
|
@ -1,22 +1,22 @@
|
|||
Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docAuthors = [[Str "John",Space,Str "MacFarlane"],[Str "Anonymous"]], docDate = [Str "July",Space,Str "17,",Space,Str "2006"]})
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "set",Space,Str "of",Space,Str "tests",Space,Str "for",Space,Str "pandoc.",Space,Str "Most",Space,Str "of",Space,Str "them",Space,Str "are",Space,Str "adapted",Space,Str "from",Space,Str "John",Space,Str "Gruber\8217s",Space,Str "markdown",Space,Str "test",Space,Str "suite."]
|
||||
,Header 1 [Str "Headers"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 4 [Str "Level",Space,Str "4"]
|
||||
,Header 5 [Str "Level",Space,Str "5"]
|
||||
,Header 1 ("",[],[]) [Str "Headers"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 ("",[],[]) [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 4 ("",[],[]) [Str "Level",Space,Str "4"]
|
||||
,Header 5 ("",[],[]) [Str "Level",Space,Str "5"]
|
||||
,Para [Str "Hi."]
|
||||
,Header 1 [Str "Level",Space,Str "1"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 [Str "Level",Space,Str "3"]
|
||||
,Header 1 ("",[],[]) [Str "Level",Space,Str "1"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 ("",[],[]) [Str "Level",Space,Str "3"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,Header 2 [Str "Level",Space,Str "2"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,Header 1 [Str "Paragraphs"]
|
||||
,Header 1 ("",[],[]) [Str "Paragraphs"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "regular",Space,Str "paragraph."]
|
||||
,Para [Str "In",Space,Str "Markdown",Space,Str "1.0.0",Space,Str "and",Space,Str "earlier.",Space,Str "Version",Space,Str "8.",Space,Str "This",Space,Str "line",Space,Str "turns",Space,Str "into",Space,Str "a",Space,Str "list",Space,Str "item.",Space,Str "Because",Space,Str "a",Space,Str "hard-wrapped",Space,Str "line",Space,Str "in",Space,Str "the",Space,Str "middle",Space,Str "of",Space,Str "a",Space,Str "paragraph",Space,Str "looked",Space,Str "like",Space,Str "a",Space,Str "list",Space,Str "item."]
|
||||
,Para [Str "Here\8217s",Space,Str "one",Space,Str "with",Space,Str "a",Space,Str "bullet.",Space,Str "*",Space,Str "criminey."]
|
||||
,Header 1 [Str "Block",Space,Str "Quotes"]
|
||||
,Header 1 ("",[],[]) [Str "Block",Space,Str "Quotes"]
|
||||
,Para [Str "E-mail",Space,Str "style:"]
|
||||
,BlockQuote
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "block",Space,Str "quote.",Space,Str "It",Space,Str "is",Space,Str "pretty",Space,Str "short."]]
|
||||
|
|
@ -34,13 +34,13 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[Para [Str "nested"]]]
|
||||
,Para [Str "This",Space,Str "should",Space,Str "not",Space,Str "be",Space,Str "a",Space,Str "block",Space,Str "quote:",Space,Str "2",Space,Str ">",Space,Str "1."]
|
||||
,Para [Str "And",Space,Str "a",Space,Str "following",Space,Str "paragraph."]
|
||||
,Header 1 [Str "Code",Space,Str "Blocks"]
|
||||
,Header 1 ("",[],[]) [Str "Code",Space,Str "Blocks"]
|
||||
,Para [Str "Code:"]
|
||||
,CodeBlock ("",[],[]) "---- (should be four hyphens)\n\nsub status {\n print \"working\";\n}\n\nthis code block is indented by one tab"
|
||||
,Para [Str "And:"]
|
||||
,CodeBlock ("",[],[]) " this code block is indented by two tabs\n\nThese should not be escaped: \\$ \\\\ \\> \\[ \\{"
|
||||
,Header 1 [Str "Lists"]
|
||||
,Header 2 [Str "Unordered"]
|
||||
,Header 1 ("",[],[]) [Str "Lists"]
|
||||
,Header 2 ("",[],[]) [Str "Unordered"]
|
||||
,Para [Str "Asterisks",Space,Str "loose:"]
|
||||
,BulletList
|
||||
[[Para [Str "asterisk",Space,Str "1"]]
|
||||
|
|
@ -56,7 +56,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[[Para [Str "Minus",Space,Str "1"]]
|
||||
,[Para [Str "Minus",Space,Str "2"]]
|
||||
,[Para [Str "Minus",Space,Str "3"]]]
|
||||
,Header 2 [Str "Ordered"]
|
||||
,Header 2 ("",[],[]) [Str "Ordered"]
|
||||
,OrderedList (1,Decimal,DefaultDelim)
|
||||
[[Para [Str "First"]]
|
||||
,[Para [Str "Second"]]
|
||||
|
|
@ -72,7 +72,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Item",Space,Str "1.",Space,Str "graf",Space,Str "two.",Space,Str "The",Space,Str "quick",Space,Str "brown",Space,Str "fox",Space,Str "jumped",Space,Str "over",Space,Str "the",Space,Str "lazy",Space,Str "dog\8217s",Space,Str "back."]]
|
||||
,[Para [Str "Item",Space,Str "2."]]
|
||||
,[Para [Str "Item",Space,Str "3."]]]
|
||||
,Header 2 [Str "Nested"]
|
||||
,Header 2 ("",[],[]) [Str "Nested"]
|
||||
,BulletList
|
||||
[[Para [Str "Tab"]
|
||||
,BulletList
|
||||
|
|
@ -97,14 +97,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,[Para [Str "Fie"]]
|
||||
,[Para [Str "Foe"]]]]
|
||||
,[Para [Str "Third"]]]
|
||||
,Header 2 [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,Header 2 ("",[],[]) [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]]]]]
|
||||
,Header 2 [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,Header 2 ("",[],[]) [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,OrderedList (2,Decimal,DefaultDelim)
|
||||
[[Para [Str "begins",Space,Str "with",Space,Str "2"]]
|
||||
,[Para [Str "and",Space,Str "now",Space,Str "3"]
|
||||
|
|
@ -133,7 +133,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Should",Space,Str "not",Space,Str "be",Space,Str "a",Space,Str "list",Space,Str "item:"]
|
||||
,Para [Str "M.A.\160\&2007"]
|
||||
,Para [Str "B.",Space,Str "Williams"]
|
||||
,Header 1 [Str "Definition",Space,Str "Lists"]
|
||||
,Header 1 ("",[],[]) [Str "Definition",Space,Str "Lists"]
|
||||
,DefinitionList
|
||||
[([Str "apple"],
|
||||
[[Para [Str "red",Space,Str "fruit"]]])
|
||||
|
|
@ -169,7 +169,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,OrderedList (1,Decimal,DefaultDelim)
|
||||
[[Para [Str "sublist"]]
|
||||
,[Para [Str "sublist"]]]]])]
|
||||
,Header 1 [Str "Inline",Space,Str "Markup"]
|
||||
,Header 1 ("",[],[]) [Str "Inline",Space,Str "Markup"]
|
||||
,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ",",Space,Str "and",Space,Str "so",Space,Emph [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "This",Space,Str "is",Space,Strong [Str "strong"],Str ",",Space,Str "and",Space,Str "so",Space,Strong [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "An",Space,Emph [Link [Str "emphasized",Space,Str "link"] ("/url","")],Str "."]
|
||||
|
|
@ -182,14 +182,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Superscripts:",Space,Str "a",Superscript [Str "bc"],Str "d",Space,Str "a",Superscript [Emph [Str "hello"]],Space,Str "a",Superscript [Str "hello\160there"],Str "."]
|
||||
,Para [Str "Subscripts:",Space,Str "H",Subscript [Str "2"],Str "O,",Space,Str "H",Subscript [Str "23"],Str "O,",Space,Str "H",Subscript [Str "many\160of\160them"],Str "O."]
|
||||
,Para [Str "These",Space,Str "should",Space,Str "not",Space,Str "be",Space,Str "superscripts",Space,Str "or",Space,Str "subscripts,",Space,Str "because",Space,Str "of",Space,Str "the",Space,Str "unescaped",Space,Str "spaces:",Space,Str "a^b",Space,Str "c^d,",Space,Str "a~b",Space,Str "c~d."]
|
||||
,Header 1 [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Header 1 ("",[],[]) [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Para [Quoted DoubleQuote [Str "Hello,"],Space,Str "said",Space,Str "the",Space,Str "spider.",Space,Quoted DoubleQuote [Quoted SingleQuote [Str "Shelob"],Space,Str "is",Space,Str "my",Space,Str "name."]]
|
||||
,Para [Quoted DoubleQuote [Str "A"],Str ",",Space,Quoted DoubleQuote [Str "B"],Str ",",Space,Str "and",Space,Quoted DoubleQuote [Str "C"],Space,Str "are",Space,Str "letters."]
|
||||
,Para [Quoted DoubleQuote [Str "He",Space,Str "said,",Space,Quoted SingleQuote [Str "I",Space,Str "want",Space,Str "to",Space,Str "go."]],Space,Str "Were",Space,Str "you",Space,Str "alive",Space,Str "in",Space,Str "the",Space,Str "70\8217s?"]
|
||||
,Para [Str "Some",Space,Str "dashes:",Space,Str "one\8212two",Space,Str "\8212",Space,Str "three\8212four",Space,Str "\8212",Space,Str "five."]
|
||||
,Para [Str "Dashes",Space,Str "between",Space,Str "numbers:",Space,Str "5\8211\&7,",Space,Str "255\8211\&66,",Space,Str "1987\8211\&1999."]
|
||||
,Para [Str "Ellipses\8230and\8230and\8230."]
|
||||
,Header 1 [Str "Special",Space,Str "Characters"]
|
||||
,Header 1 ("",[],[]) [Str "Special",Space,Str "Characters"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "some",Space,Str "unicode:"]
|
||||
,BulletList
|
||||
[[Para [Str "I",Space,Str "hat:",Space,Str "\206"]]
|
||||
|
|
@ -218,8 +218,8 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Bang:",Space,Str "!"]
|
||||
,Para [Str "Plus:",Space,Str "+"]
|
||||
,Para [Str "Minus:",Space,Str "-"]
|
||||
,Header 1 [Str "Links"]
|
||||
,Header 2 [Str "Explicit"]
|
||||
,Header 1 ("",[],[]) [Str "Links"]
|
||||
,Header 2 ("",[],[]) [Str "Explicit"]
|
||||
,Para [Str "Just",Space,Str "a",Space,Link [Str "URL"] ("/url/",""),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/",""),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/",""),Str "."]
|
||||
|
|
@ -229,7 +229,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Link [Str "with_underscore"] ("/url/with_underscore","")]
|
||||
,Para [Link [Str "nobody@nowhere.net"] ("mailto:nobody@nowhere.net","")]
|
||||
,Para [Link [Str "Empty"] ("",""),Str "."]
|
||||
,Header 2 [Str "Reference"]
|
||||
,Header 2 ("",[],[]) [Str "Reference"]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
|
|
@ -242,12 +242,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,CodeBlock ("",[],[]) "[not]: /url"
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "biz"] ("/url/",""),Str "."]
|
||||
,Header 2 [Str "With",Space,Str "ampersands"]
|
||||
,Header 2 ("",[],[]) [Str "With",Space,Str "ampersands"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Link [Str "link",Space,Str "with",Space,Str "an",Space,Str "ampersand",Space,Str "in",Space,Str "the",Space,Str "URL"] ("http://example.com/?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "link",Space,Str "with",Space,Str "an",Space,Str "amersand",Space,Str "in",Space,Str "the",Space,Str "link",Space,Str "text:",Space,Link [Str "AT&T"] ("http://att.com/",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "an",Space,Link [Str "inline",Space,Str "link"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "an",Space,Link [Str "inline",Space,Str "link",Space,Str "in",Space,Str "pointy",Space,Str "braces"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Header 2 [Str "Autolinks"]
|
||||
,Header 2 ("",[],[]) [Str "Autolinks"]
|
||||
,Para [Str "With",Space,Str "an",Space,Str "ampersand:",Space,Link [Str "http://example.com/?foo=1&bar=2"] ("http://example.com/?foo=1&bar=2","")]
|
||||
,BulletList
|
||||
[[Para [Str "In",Space,Str "a",Space,Str "list?"]]
|
||||
|
|
@ -258,18 +258,18 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[Para [Str "Blockquoted:",Space,Link [Str "http://example.com/"] ("http://example.com/","")]]
|
||||
,Para [Str "Auto-links",Space,Str "should",Space,Str "not",Space,Str "occur",Space,Str "here:",Space,Code ("",[],[]) "<http://example.com/>"]
|
||||
,CodeBlock ("",[],[]) "or here: <http://example.com/>"
|
||||
,Header 1 [Str "Images"]
|
||||
,Header 1 ("",[],[]) [Str "Images"]
|
||||
,Para [Str "From",Space,Quoted DoubleQuote [Str "Voyage",Space,Str "dans",Space,Str "la",Space,Str "Lune"],Space,Str "by",Space,Str "Georges",Space,Str "Melies",Space,Str "(1902):"]
|
||||
,Para [Image [Str "lalune"] ("lalune.jpg","")]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "movie",Space,Image [] ("movie.jpg",""),Space,Str "icon."]
|
||||
,Header 1 [Str "Footnotes"]
|
||||
,Header 1 ("",[],[]) [Str "Footnotes"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Note [Para [Str "Here",Space,Str "is",Space,Str "the",Space,Str "footnote.",Space,Str "It",Space,Str "can",Space,Str "go",Space,Str "anywhere",Space,Str "after",Space,Str "the",Space,Str "footnote",Space,Str "reference.",Space,Str "It",Space,Str "need",Space,Str "not",Space,Str "be",Space,Str "placed",Space,Str "at",Space,Str "the",Space,Str "end",Space,Str "of",Space,Str "the",Space,Str "document."]],Space,Str "and",Space,Str "another.",Note [Para [Str "Here\8217s",Space,Str "the",Space,Str "long",Space,Str "note.",Space,Str "This",Space,Str "one",Space,Str "contains",Space,Str "multiple",Space,Str "blocks."],Para [Str "Subsequent",Space,Str "blocks",Space,Str "are",Space,Str "indented",Space,Str "to",Space,Str "show",Space,Str "that",Space,Str "they",Space,Str "belong",Space,Str "to",Space,Str "the",Space,Str "footnote",Space,Str "(as",Space,Str "with",Space,Str "list",Space,Str "items)."],CodeBlock ("",[],[]) " { <code> }",Para [Str "If",Space,Str "you",Space,Str "want,",Space,Str "you",Space,Str "can",Space,Str "indent",Space,Str "every",Space,Str "line,",Space,Str "but",Space,Str "you",Space,Str "can",Space,Str "also",Space,Str "be",Space,Str "lazy",Space,Str "and",Space,Str "just",Space,Str "indent",Space,Str "the",Space,Str "first",Space,Str "line",Space,Str "of",Space,Str "each",Space,Str "block."]],Space,Str "This",Space,Str "should",Space,Emph [Str "not"],Space,Str "be",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Space,Str "because",Space,Str "it",Space,Str "contains",Space,Str "a",Space,Str "space.[^my",Space,Str "note]",Space,Str "Here",Space,Str "is",Space,Str "an",Space,Str "inline",Space,Str "note.",Note [Para [Str "This",Space,Str "is",Space,Emph [Str "easier"],Space,Str "to",Space,Str "type.",Space,Str "Inline",Space,Str "notes",Space,Str "may",Space,Str "contain",Space,Link [Str "links"] ("http://google.com",""),Space,Str "and",Space,Code ("",[],[]) "]",Space,Str "verbatim",Space,Str "characters,",Space,Str "as",Space,Str "well",Space,Str "as",Space,Str "[bracketed",Space,Str "text]."]]]
|
||||
,BlockQuote
|
||||
[Para [Str "Notes",Space,Str "can",Space,Str "go",Space,Str "in",Space,Str "quotes.",Note [Para [Str "In",Space,Str "quote."]]]]
|
||||
,OrderedList (1,Decimal,DefaultDelim)
|
||||
[[Para [Str "And",Space,Str "in",Space,Str "list",Space,Str "items.",Note [Para [Str "In",Space,Str "list."]]]]]
|
||||
,Para [Str "This",Space,Str "paragraph",Space,Str "should",Space,Str "not",Space,Str "be",Space,Str "part",Space,Str "of",Space,Str "the",Space,Str "note,",Space,Str "as",Space,Str "it",Space,Str "is",Space,Str "not",Space,Str "indented."]
|
||||
,Header 1 [Str "Tables"]
|
||||
,Header 1 ("",[],[]) [Str "Tables"]
|
||||
,Para [Str "Simple",Space,Str "table",Space,Str "with",Space,Str "caption:"]
|
||||
,Table [Str "Demonstration",Space,Str "of",Space,Str "simple",Space,Str "table",Space,Str "syntax."] [AlignRight,AlignLeft,AlignCenter,AlignLeft] [0.0,0.0,0.0,0.0]
|
||||
[[Plain [Str "Right"]]
|
||||
|
|
|
|||
|
|
@ -1,25 +1,25 @@
|
|||
Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docAuthors = [], docDate = []})
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "set",Space,Str "of",Space,Str "tests",Space,Str "for",Space,Str "pandoc",Str ".",Space,Str "Most",Space,Str "of",Space,Str "them",Space,Str "are",Space,Str "adapted",Space,Str "from",Space,Str "John",Space,Str "Gruber",Str "'",Str "s",Space,Str "markdown",Space,Str "test",Space,Str "suite",Str "."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Headers"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 4 [Str "Level",Space,Str "4"]
|
||||
,Header 5 [Str "Level",Space,Str "5"]
|
||||
,Header 1 [Str "Level",Space,Str "1"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 [Str "Level",Space,Str "3"]
|
||||
,Header 1 ("",[],[]) [Str "Headers"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 ("",[],[]) [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 4 ("",[],[]) [Str "Level",Space,Str "4"]
|
||||
,Header 5 ("",[],[]) [Str "Level",Space,Str "5"]
|
||||
,Header 1 ("",[],[]) [Str "Level",Space,Str "1"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 ("",[],[]) [Str "Level",Space,Str "3"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,Header 2 [Str "Level",Space,Str "2"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Paragraphs"]
|
||||
,Header 1 ("",[],[]) [Str "Paragraphs"]
|
||||
,Para [Str "Here",Str "'",Str "s",Space,Str "a",Space,Str "regular",Space,Str "paragraph",Str "."]
|
||||
,Para [Str "In",Space,Str "Markdown",Space,Str "1",Str ".",Str "0",Str ".",Str "0",Space,Str "and",Space,Str "earlier",Str ".",Space,Str "Version",Space,Str "8",Str ".",Space,Str "This",Space,Str "line",Space,Str "turns",Space,Str "into",Space,Str "a",Space,Str "list",Space,Str "item",Str ".",Space,Str "Because",Space,Str "a",Space,Str "hard",Str "-",Str "wrapped",Space,Str "line",Space,Str "in",Space,Str "the",Space,Str "middle",Space,Str "of",Space,Str "a",Space,Str "paragraph",Space,Str "looked",Space,Str "like",Space,Str "a",Space,Str "list",Space,Str "item",Str "."]
|
||||
,Para [Str "Here",Str "'",Str "s",Space,Str "one",Space,Str "with",Space,Str "a",Space,Str "bullet",Str ".",Space,Str "*",Space,Str "criminey",Str "."]
|
||||
,Para [Str "There",Space,Str "should",Space,Str "be",Space,Str "a",Space,Str "hard",Space,Str "line",Space,Str "break",LineBreak,Space,Str "here",Str "."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Block",Space,Str "Quotes"]
|
||||
,Header 1 ("",[],[]) [Str "Block",Space,Str "Quotes"]
|
||||
,Para [Str "E",Str "-",Str "mail",Space,Str "style:"]
|
||||
,BlockQuote
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "block",Space,Str "quote",Str ".",Space,Str "It",Space,Str "is",Space,Str "pretty",Space,Str "short",Str "."]]
|
||||
|
|
@ -51,14 +51,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[Para [Str "Don",Str "'",Str "t",Space,Str "quote",Space,Str "me",Str "."]]]
|
||||
,Para [Str "And",Space,Str "a",Space,Str "following",Space,Str "paragraph",Str "."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Code",Space,Str "Blocks"]
|
||||
,Header 1 ("",[],[]) [Str "Code",Space,Str "Blocks"]
|
||||
,Para [Str "Code:"]
|
||||
,CodeBlock ("",[],[]) "---- (should be four hyphens)\n\nsub status {\n print \"working\";\n}\n\nthis code block is indented by one tab"
|
||||
,Para [Str "And:"]
|
||||
,CodeBlock ("",[],[]) " this code block is indented by two tabs\n\nThese should not be escaped: \\$ \\\\ \\> \\[ \\{"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Lists"]
|
||||
,Header 2 [Str "Unordered"]
|
||||
,Header 1 ("",[],[]) [Str "Lists"]
|
||||
,Header 2 ("",[],[]) [Str "Unordered"]
|
||||
,Para [Str "Asterisks",Space,Str "tight:"]
|
||||
,BulletList
|
||||
[[Plain [Str "asterisk",Space,Str "1"]]
|
||||
|
|
@ -89,7 +89,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[[Para [Str "Minus",Space,Str "1"]]
|
||||
,[Para [Str "Minus",Space,Str "2"]]
|
||||
,[Para [Str "Minus",Space,Str "3"]]]
|
||||
,Header 2 [Str "Ordered"]
|
||||
,Header 2 ("",[],[]) [Str "Ordered"]
|
||||
,Para [Str "Tight:"]
|
||||
,OrderedList (1,DefaultStyle,DefaultDelim)
|
||||
[[Plain [Str "First"]]
|
||||
|
|
@ -116,7 +116,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Item",Space,Str "1",Str ".",Space,Str "graf",Space,Str "two",Str ".",Space,Str "The",Space,Str "quick",Space,Str "brown",Space,Str "fox",Space,Str "jumped",Space,Str "over",Space,Str "the",Space,Str "lazy",Space,Str "dog",Str "'",Str "s",Space,Str "back",Str "."]]
|
||||
,[Para [Str "Item",Space,Str "2",Str "."]]
|
||||
,[Para [Str "Item",Space,Str "3",Str "."]]]
|
||||
,Header 2 [Str "Nested"]
|
||||
,Header 2 ("",[],[]) [Str "Nested"]
|
||||
,BulletList
|
||||
[[Plain [Str "Tab"]
|
||||
,BulletList
|
||||
|
|
@ -141,14 +141,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,[Plain [Str "Fie"]]
|
||||
,[Plain [Str "Foe"]]]]
|
||||
,[Para [Str "Third"]]]
|
||||
,Header 2 [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,Header 2 ("",[],[]) [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]]]]]
|
||||
,Header 2 [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,Header 2 ("fancy-list-markers",[],[]) [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,OrderedList (2,Decimal,DefaultDelim)
|
||||
[[Plain [Str "begins",Space,Str "with",Space,Str "2"]]
|
||||
,[Para [Str "and",Space,Str "now",Space,Str "3"]
|
||||
|
|
@ -175,7 +175,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,OrderedList (1,DefaultStyle,DefaultDelim)
|
||||
[[Plain [Str "Nested",Str "."]]]]]
|
||||
,HorizontalRule
|
||||
,Header 2 [Str "Definition"]
|
||||
,Header 2 ("",[],[]) [Str "Definition"]
|
||||
,DefinitionList
|
||||
[([Str "Violin"],
|
||||
[[Plain [Str "Stringed",Space,Str "musical",Space,Str "instrument",Str "."]]
|
||||
|
|
@ -183,7 +183,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,([Str "Cello",LineBreak,Str "Violoncello"],
|
||||
[[Plain [Str "Low",Str "-",Str "voiced",Space,Str "stringed",Space,Str "instrument",Str "."]]])]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Inline",Space,Str "Markup"]
|
||||
,Header 1 ("",[],[]) [Str "Inline",Space,Str "Markup"]
|
||||
,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ",",Space,Str "and",Space,Str "so",Space,Emph [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "This",Space,Str "is",Space,Strong [Str "strong"],Str ",",Space,Str "and",Space,Str "so",Space,Strong [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "An",Space,Emph [Link [Str "emphasized",Space,Str "link"] ("/url","")],Str "."]
|
||||
|
|
@ -193,7 +193,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "So",Space,Str "is",Space,Strong [Emph [Str "this"]],Space,Str "word",Str "."]
|
||||
,Para [Str "This",Space,Str "is",Space,Str "code:",Space,Code ("",[],[]) ">",Str ",",Space,Code ("",[],[]) "$",Str ",",Space,Code ("",[],[]) "\\",Str ",",Space,Code ("",[],[]) "\\$",Str ",",Space,Code ("",[],[]) "<html>",Str "."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Header 1 ("",[],[]) [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Para [Str "\"",Str "Hello,",Str "\"",Space,Str "said",Space,Str "the",Space,Str "spider",Str ".",Space,Str "\"",Str "'",Str "Shelob",Str "'",Space,Str "is",Space,Str "my",Space,Str "name",Str ".",Str "\""]
|
||||
,Para [Str "'",Str "A",Str "'",Str ",",Space,Str "'",Str "B",Str "'",Str ",",Space,Str "and",Space,Str "'",Str "C",Str "'",Space,Str "are",Space,Str "letters",Str "."]
|
||||
,Para [Str "'",Str "Oak,",Str "'",Space,Str "'",Str "elm,",Str "'",Space,Str "and",Space,Str "'",Str "beech",Str "'",Space,Str "are",Space,Str "names",Space,Str "of",Space,Str "trees",Str ".",Space,Str "So",Space,Str "is",Space,Str "'",Str "pine",Str ".",Str "'"]
|
||||
|
|
@ -203,7 +203,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Dashes",Space,Str "between",Space,Str "numbers:",Space,Str "5",Str "-",Str "7,",Space,Str "255",Str "-",Str "66,",Space,Str "1987",Str "-",Str "1999",Str "."]
|
||||
,Para [Str "Ellipses",Str ".",Str ".",Str ".",Str "and",Str ".",Space,Str ".",Space,Str ".",Str "and",Space,Str ".",Space,Str ".",Space,Str ".",Space,Str "."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "LaTeX"]
|
||||
,Header 1 ("",[],[]) [Str "LaTeX"]
|
||||
,BulletList
|
||||
[[Plain [Str "\\cite[22",Str "-",Str "23]{smith",Str ".",Str "1899}"]]
|
||||
,[Plain [Str "\\doublespacing"]]
|
||||
|
|
@ -222,7 +222,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Here",Str "'",Str "s",Space,Str "a",Space,Str "LaTeX",Space,Str "table:"]
|
||||
,Para [Str "\\begin{tabular}{|l|l|}\\hline",Space,Str "Animal",Space,Str "&",Space,Str "Number",Space,Str "\\\\",Space,Str "\\hline",Space,Str "Dog",Space,Str "&",Space,Str "2",Space,Str "\\\\",Space,Str "Cat",Space,Str "&",Space,Str "1",Space,Str "\\\\",Space,Str "\\hline",Space,Str "\\end{tabular}"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Special",Space,Str "Characters"]
|
||||
,Header 1 ("",[],[]) [Str "Special",Space,Str "Characters"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "some",Space,Str "unicode:"]
|
||||
,BulletList
|
||||
[[Plain [Str "I",Space,Str "hat:",Space,Str "\206"]]
|
||||
|
|
@ -252,8 +252,8 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Plus:",Space,Str "+"]
|
||||
,Para [Str "Minus:",Space,Str "-"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Links"]
|
||||
,Header 2 [Str "Explicit"]
|
||||
,Header 1 ("",[],[]) [Str "Links"]
|
||||
,Header 2 ("",[],[]) [Str "Explicit"]
|
||||
,Para [Str "Just",Space,Str "a",Space,Link [Str "URL"] ("/url/",""),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/","title"),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/","title preceded by two spaces"),Str "."]
|
||||
|
|
@ -262,7 +262,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/","title with single quotes")]
|
||||
,Para [Str "Email",Space,Str "link",Space,Str "(nobody",Space,Str "[at]",Space,Str "nowhere",Str ".",Str "net)"]
|
||||
,Para [Link [Str "Empty"] ("",""),Str "."]
|
||||
,Header 2 [Str "Reference"]
|
||||
,Header 2 ("",[],[]) [Str "Reference"]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
|
|
@ -275,12 +275,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,CodeBlock ("",[],[]) "[not]: /url"
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/","Title with \"quotes\" inside"),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "biz"] ("/url/","Title with \"quote\" inside"),Str "."]
|
||||
,Header 2 [Str "With",Space,Str "ampersands"]
|
||||
,Header 2 ("",[],[]) [Str "With",Space,Str "ampersands"]
|
||||
,Para [Str "Here",Str "'",Str "s",Space,Str "a",Space,Link [Str "link",Space,Str "with",Space,Str "an",Space,Str "ampersand",Space,Str "in",Space,Str "the",Space,Str "URL"] ("http://example.com/?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here",Str "'",Str "s",Space,Str "a",Space,Str "link",Space,Str "with",Space,Str "an",Space,Str "amersand",Space,Str "in",Space,Str "the",Space,Str "link",Space,Str "text:",Space,Link [Str "AT&T"] ("http://att.com/","AT&T"),Str "."]
|
||||
,Para [Str "Here",Str "'",Str "s",Space,Str "an",Space,Link [Str "inline",Space,Str "link"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here",Str "'",Str "s",Space,Str "an",Space,Link [Str "inline",Space,Str "link",Space,Str "in",Space,Str "pointy",Space,Str "braces"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Header 2 [Str "Autolinks"]
|
||||
,Header 2 ("",[],[]) [Str "Autolinks"]
|
||||
,Para [Str "With",Space,Str "an",Space,Str "ampersand:",Space,Link [Str "http://example",Str ".",Str "com/?foo=1&bar=2"] ("http://example.com/?foo=1&bar=2","")]
|
||||
,BulletList
|
||||
[[Plain [Str "In",Space,Str "a",Space,Str "list?"]]
|
||||
|
|
@ -292,12 +292,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Auto",Str "-",Str "links",Space,Str "should",Space,Str "not",Space,Str "occur",Space,Str "here:",Space,Code ("",[],[]) "<http://example.com/>"]
|
||||
,CodeBlock ("",[],[]) "or here: <http://example.com/>"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Images"]
|
||||
,Header 1 ("",[],[]) [Str "Images"]
|
||||
,Para [Str "From",Space,Str "\"",Str "Voyage",Space,Str "dans",Space,Str "la",Space,Str "Lune",Str "\"",Space,Str "by",Space,Str "Georges",Space,Str "Melies",Space,Str "(1902):"]
|
||||
,Para [Image [Str "lalune"] ("lalune.jpg","Voyage dans la Lune")]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "movie",Space,Image [Str "movie"] ("movie.jpg",""),Space,Str "icon",Str "."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Footnotes"]
|
||||
,Header 1 ("",[],[]) [Str "Footnotes"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "footnote",Space,Str "reference",Link [Str "(1)"] ("#note_1",""),Str ",",Space,Str "and",Space,Str "another",Link [Str "(longnote)"] ("#note_longnote",""),Str ".",Space,Str "This",Space,Str "should",Space,Emph [Str "not"],Space,Str "be",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Space,Str "because",Space,Str "it",Space,Str "contains",Space,Str "a",Space,Str "space^(my",Space,Str "note)",Str "."]
|
||||
,Para [Link [Str "(1)"] ("#ref_1",""),Space,Str "Here",Space,Str "is",Space,Str "the",Space,Str "footnote",Str ".",Space,Str "It",Space,Str "can",Space,Str "go",Space,Str "anywhere",Space,Str "in",Space,Str "the",Space,Str "document,",Space,Str "not",Space,Str "just",Space,Str "at",Space,Str "the",Space,Str "end",Str "."]
|
||||
,Para [Link [Str "(longnote)"] ("#ref_longnote",""),Space,Str "Here",Str "'",Str "s",Space,Str "the",Space,Str "other",Space,Str "note",Str ".",Space,Str "This",Space,Str "one",Space,Str "contains",Space,Str "multiple",Space,Str "blocks",Str "."]
|
||||
|
|
|
|||
|
|
@ -2,25 +2,25 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[RawBlock "latex" "\\maketitle"
|
||||
,Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "set",Space,Str "of",Space,Str "tests",Space,Str "for",Space,Str "pandoc.",Space,Str "Most",Space,Str "of",Space,Str "them",Space,Str "are",Space,Str "adapted",Space,Str "from",Space,Str "John",Space,Str "Gruber\8217s",Space,Str "markdown",Space,Str "test",Space,Str "suite."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Headers"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 1 ("",[],[]) [Str "Headers"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 ("",[],[]) [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Para [Str "Level",Space,Str "4"]
|
||||
,Para [Str "Level",Space,Str "5"]
|
||||
,Header 1 [Str "Level",Space,Str "1"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 [Str "Level",Space,Str "3"]
|
||||
,Header 1 ("",[],[]) [Str "Level",Space,Str "1"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 ("",[],[]) [Str "Level",Space,Str "3"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,Header 2 [Str "Level",Space,Str "2"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Paragraphs"]
|
||||
,Header 1 ("",[],[]) [Str "Paragraphs"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "regular",Space,Str "paragraph."]
|
||||
,Para [Str "In",Space,Str "Markdown",Space,Str "1.0.0",Space,Str "and",Space,Str "earlier.",Space,Str "Version",Space,Str "8.",Space,Str "This",Space,Str "line",Space,Str "turns",Space,Str "into",Space,Str "a",Space,Str "list",Space,Str "item.",Space,Str "Because",Space,Str "a",Space,Str "hard-wrapped",Space,Str "line",Space,Str "in",Space,Str "the",Space,Str "middle",Space,Str "of",Space,Str "a",Space,Str "paragraph",Space,Str "looked",Space,Str "like",Space,Str "a",Space,Str "list",Space,Str "item."]
|
||||
,Para [Str "Here\8217s",Space,Str "one",Space,Str "with",Space,Str "a",Space,Str "bullet.",Space,Str "*",Space,Str "criminey."]
|
||||
,Para [Str "There",Space,Str "should",Space,Str "be",Space,Str "a",Space,Str "hard",Space,Str "line",Space,Str "break",LineBreak,Str "here."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Block",Space,Str "Quotes"]
|
||||
,Header 1 ("",[],[]) [Str "Block",Space,Str "Quotes"]
|
||||
,Para [Str "E-mail",Space,Str "style:"]
|
||||
,BlockQuote
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "block",Space,Str "quote.",Space,Str "It",Space,Str "is",Space,Str "pretty",Space,Str "short."]]
|
||||
|
|
@ -52,15 +52,15 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[Para [Str "Don\8217t",Space,Str "quote",Space,Str "me."]]]
|
||||
,Para [Str "And",Space,Str "a",Space,Str "following",Space,Str "paragraph."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Code",Space,Str "Blocks"]
|
||||
,Header 1 ("",[],[]) [Str "Code",Space,Str "Blocks"]
|
||||
,Para [Str "Code:"]
|
||||
,CodeBlock ("",[],[]) "---- (should be four hyphens)\n\nsub status {\n print \"working\";\n}\n\nthis code block is indented by one tab"
|
||||
,Para [Str "And:"]
|
||||
,CodeBlock ("",[],[]) " this code block is indented by two tabs\n\nThese should not be escaped: \\$ \\\\ \\> \\[ \\{"
|
||||
,Para [Str "this",Space,Str "has",Space,Emph [Str "two",LineBreak,Str "lines"]]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Lists"]
|
||||
,Header 2 [Str "Unordered"]
|
||||
,Header 1 ("",[],[]) [Str "Lists"]
|
||||
,Header 2 ("",[],[]) [Str "Unordered"]
|
||||
,Para [Str "Asterisks",Space,Str "tight:"]
|
||||
,BulletList
|
||||
[[Para [Str "asterisk",Space,Str "1"]]
|
||||
|
|
@ -91,7 +91,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[[Para [Str "Minus",Space,Str "1"]]
|
||||
,[Para [Str "Minus",Space,Str "2"]]
|
||||
,[Para [Str "Minus",Space,Str "3"]]]
|
||||
,Header 2 [Str "Ordered"]
|
||||
,Header 2 ("",[],[]) [Str "Ordered"]
|
||||
,Para [Str "Tight:"]
|
||||
,OrderedList (1,Decimal,Period)
|
||||
[[Para [Str "First"]]
|
||||
|
|
@ -118,7 +118,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Item",Space,Str "1.",Space,Str "graf",Space,Str "two.",Space,Str "The",Space,Str "quick",Space,Str "brown",Space,Str "fox",Space,Str "jumped",Space,Str "over",Space,Str "the",Space,Str "lazy",Space,Str "dog\8217s",Space,Str "back."]]
|
||||
,[Para [Str "Item",Space,Str "2."]]
|
||||
,[Para [Str "Item",Space,Str "3."]]]
|
||||
,Header 2 [Str "Nested"]
|
||||
,Header 2 ("",[],[]) [Str "Nested"]
|
||||
,BulletList
|
||||
[[Para [Str "Tab"]
|
||||
,BulletList
|
||||
|
|
@ -143,14 +143,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,[Para [Str "Fie"]]
|
||||
,[Para [Str "Foe"]]]]
|
||||
,[Para [Str "Third"]]]
|
||||
,Header 2 [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,Header 2 ("",[],[]) [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]]]]]
|
||||
,Header 2 [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,Header 2 ("",[],[]) [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,OrderedList (2,Decimal,TwoParens)
|
||||
[[Para [Str "begins",Space,Str "with",Space,Str "2"]]
|
||||
,[Para [Str "and",Space,Str "now",Space,Str "3"]
|
||||
|
|
@ -180,7 +180,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "M.A.",Space,Str "2007"]
|
||||
,Para [Str "B.",Space,Str "Williams"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Definition",Space,Str "Lists"]
|
||||
,Header 1 ("",[],[]) [Str "Definition",Space,Str "Lists"]
|
||||
,Para [Str "Tight",Space,Str "using",Space,Str "spaces:"]
|
||||
,DefinitionList
|
||||
[([Str "apple"],
|
||||
|
|
@ -215,7 +215,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,CodeBlock ("",[],[]) "{ orange code block }"
|
||||
,BlockQuote
|
||||
[Para [Str "orange",Space,Str "block",Space,Str "quote"]]]])]
|
||||
,Header 1 [Str "HTML",Space,Str "Blocks"]
|
||||
,Header 1 ("",[],[]) [Str "HTML",Space,Str "Blocks"]
|
||||
,Para [Str "Simple",Space,Str "block",Space,Str "on",Space,Str "one",Space,Str "line:"]
|
||||
,Para [Str "foo",Space,Str "And",Space,Str "nested",Space,Str "without",Space,Str "indentation:"]
|
||||
,Para [Str "foo",Space,Str "bar",Space,Str "Interpreted",Space,Str "markdown",Space,Str "in",Space,Str "a",Space,Str "table:"]
|
||||
|
|
@ -234,7 +234,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,CodeBlock ("",[],[]) "<hr />"
|
||||
,Para [Str "Hr\8217s:"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Inline",Space,Str "Markup"]
|
||||
,Header 1 ("",[],[]) [Str "Inline",Space,Str "Markup"]
|
||||
,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ",",Space,Str "and",Space,Str "so",Space,Emph [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "This",Space,Str "is",Space,Strong [Str "strong"],Str ",",Space,Str "and",Space,Str "so",Space,Strong [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "An",Space,Emph [Link [Str "emphasized",Space,Str "link"] ("/url","")],Str "."]
|
||||
|
|
@ -248,7 +248,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Subscripts:",Space,Str "H",Subscript [Str "2"],Str "O,",Space,Str "H",Subscript [Str "23"],Str "O,",Space,Str "H",Subscript [Str "many",Space,Str "of",Space,Str "them"],Str "O."]
|
||||
,Para [Str "These",Space,Str "should",Space,Str "not",Space,Str "be",Space,Str "superscripts",Space,Str "or",Space,Str "subscripts,",Space,Str "because",Space,Str "of",Space,Str "the",Space,Str "unescaped",Space,Str "spaces:",Space,Str "a^b",Space,Str "c^d,",Space,Str "a",Math InlineMath "\\sim",Str "b",Space,Str "c",Math InlineMath "\\sim",Str "d."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Header 1 ("",[],[]) [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Para [Quoted DoubleQuote [Str "Hello,"],Space,Str "said",Space,Str "the",Space,Str "spider.",Space,Quoted DoubleQuote [Quoted SingleQuote [Str "Shelob"],Space,Str "is",Space,Str "my",Space,Str "name."]]
|
||||
,Para [Quoted SingleQuote [Str "A"],Str ",",Space,Quoted SingleQuote [Str "B"],Str ",",Space,Str "and",Space,Quoted SingleQuote [Str "C"],Space,Str "are",Space,Str "letters."]
|
||||
,Para [Quoted SingleQuote [Str "Oak,"],Space,Quoted SingleQuote [Str "elm,"],Space,Str "and",Space,Quoted SingleQuote [Str "beech"],Space,Str "are",Space,Str "names",Space,Str "of",Space,Str "trees.",Space,Str "So",Space,Str "is",Space,Quoted SingleQuote [Str "pine."]]
|
||||
|
|
@ -258,7 +258,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Dashes",Space,Str "between",Space,Str "numbers:",Space,Str "5\8211\&7,",Space,Str "255\8211\&66,",Space,Str "1987\8211\&1999."]
|
||||
,Para [Str "Ellipses\8230and\8230and\8230."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "LaTeX"]
|
||||
,Header 1 ("",[],[]) [Str "LaTeX"]
|
||||
,BulletList
|
||||
[[Para [Cite [Citation {citationId = "smith.1899", citationPrefix = [], citationSuffix = [Str ",",Space,Str "22-23"], citationMode = AuthorInText, citationNoteNum = 0, citationHash = 0}] [RawInline "latex" "\\cite[22-23]{smith.1899}"]]]
|
||||
,[Para [RawInline "latex" "\\doublespacing"]]
|
||||
|
|
@ -288,7 +288,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[[[Plain [Str "Animal"]]]
|
||||
,[[Plain [Str "Vegetable"]]]]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Special",Space,Str "Characters"]
|
||||
,Header 1 ("",[],[]) [Str "Special",Space,Str "Characters"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "some",Space,Str "unicode:"]
|
||||
,BulletList
|
||||
[[Para [Str "I",Space,Str "hat:",Space,Str "\206"]]
|
||||
|
|
@ -318,8 +318,8 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Plus:",Space,Str "+"]
|
||||
,Para [Str "Minus:",Space,Str "-"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Links"]
|
||||
,Header 2 [Str "Explicit"]
|
||||
,Header 1 ("",[],[]) [Str "Links"]
|
||||
,Header 2 ("",[],[]) [Str "Explicit"]
|
||||
,Para [Str "Just",Space,Str "a",Space,Link [Str "URL"] ("/url/",""),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/",""),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/",""),Str "."]
|
||||
|
|
@ -329,7 +329,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Link [Str "with_underscore"] ("/url/with_underscore","")]
|
||||
,Para [Link [Str "Email",Space,Str "link"] ("mailto:nobody@nowhere.net","")]
|
||||
,Para [Link [Str "Empty"] ("",""),Str "."]
|
||||
,Header 2 [Str "Reference"]
|
||||
,Header 2 ("",[],[]) [Str "Reference"]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
|
|
@ -342,12 +342,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,CodeBlock ("",[],[]) "[not]: /url"
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "biz"] ("/url/",""),Str "."]
|
||||
,Header 2 [Str "With",Space,Str "ampersands"]
|
||||
,Header 2 ("",[],[]) [Str "With",Space,Str "ampersands"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Link [Str "link",Space,Str "with",Space,Str "an",Space,Str "ampersand",Space,Str "in",Space,Str "the",Space,Str "URL"] ("http://example.com/?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "link",Space,Str "with",Space,Str "an",Space,Str "amersand",Space,Str "in",Space,Str "the",Space,Str "link",Space,Str "text:",Space,Link [Str "AT&T"] ("http://att.com/",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "an",Space,Link [Str "inline",Space,Str "link"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "an",Space,Link [Str "inline",Space,Str "link",Space,Str "in",Space,Str "pointy",Space,Str "braces"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Header 2 [Str "Autolinks"]
|
||||
,Header 2 ("",[],[]) [Str "Autolinks"]
|
||||
,Para [Str "With",Space,Str "an",Space,Str "ampersand:",Space,Link [Str "http://example.com/?foo=1&bar=2"] ("http://example.com/?foo=1&bar=2","")]
|
||||
,BulletList
|
||||
[[Para [Str "In",Space,Str "a",Space,Str "list?"]]
|
||||
|
|
@ -359,12 +359,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Auto-links",Space,Str "should",Space,Str "not",Space,Str "occur",Space,Str "here:",Space,Code ("",[],[]) "<http://example.com/>"]
|
||||
,CodeBlock ("",[],[]) "or here: <http://example.com/>"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Images"]
|
||||
,Header 1 ("",[],[]) [Str "Images"]
|
||||
,Para [Str "From",Space,Quoted DoubleQuote [Str "Voyage",Space,Str "dans",Space,Str "la",Space,Str "Lune"],Space,Str "by",Space,Str "Georges",Space,Str "Melies",Space,Str "(1902):"]
|
||||
,Para [Image [Str "image"] ("lalune.jpg","")]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "movie",Space,Image [Str "image"] ("movie.jpg",""),Space,Str "icon."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Footnotes"]
|
||||
,Header 1 ("",[],[]) [Str "Footnotes"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Note [Para [Str "Here",Space,Str "is",Space,Str "the",Space,Str "footnote.",Space,Str "It",Space,Str "can",Space,Str "go",Space,Str "anywhere",Space,Str "after",Space,Str "the",Space,Str "footnote",Space,Str "reference.",Space,Str "It",Space,Str "need",Space,Str "not",Space,Str "be",Space,Str "placed",Space,Str "at",Space,Str "the",Space,Str "end",Space,Str "of",Space,Str "the",Space,Str "document."]],Space,Str "and",Space,Str "another.",Note [Para [Str "Here\8217s",Space,Str "the",Space,Str "long",Space,Str "note.",Space,Str "This",Space,Str "one",Space,Str "contains",Space,Str "multiple",Space,Str "blocks."],Para [Str "Subsequent",Space,Str "blocks",Space,Str "are",Space,Str "indented",Space,Str "to",Space,Str "show",Space,Str "that",Space,Str "they",Space,Str "belong",Space,Str "to",Space,Str "the",Space,Str "footnote",Space,Str "(as",Space,Str "with",Space,Str "list",Space,Str "items)."],CodeBlock ("",[],[]) " { <code> }",Para [Str "If",Space,Str "you",Space,Str "want,",Space,Str "you",Space,Str "can",Space,Str "indent",Space,Str "every",Space,Str "line,",Space,Str "but",Space,Str "you",Space,Str "can",Space,Str "also",Space,Str "be",Space,Str "lazy",Space,Str "and",Space,Str "just",Space,Str "indent",Space,Str "the",Space,Str "first",Space,Str "line",Space,Str "of",Space,Str "each",Space,Str "block."]],Space,Str "This",Space,Str "should",Space,Emph [Str "not"],Space,Str "be",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Space,Str "because",Space,Str "it",Space,Str "contains",Space,Str "a",Space,Str "space.[^my",Space,Str "note]",Space,Str "Here",Space,Str "is",Space,Str "an",Space,Str "inline",Space,Str "note.",Note [Para [Str "This",Space,Str "is",Space,Emph [Str "easier"],Space,Str "to",Space,Str "type.",Space,Str "Inline",Space,Str "notes",Space,Str "may",Space,Str "contain",Space,Link [Str "links"] ("http://google.com",""),Space,Str "and",Space,Code ("",[],[]) "]",Space,Str "verbatim",Space,Str "characters,",Space,Str "as",Space,Str "well",Space,Str "as",Space,Str "[bracketed",Space,Str "text]."]]]
|
||||
,BlockQuote
|
||||
[Para [Str "Notes",Space,Str "can",Space,Str "go",Space,Str "in",Space,Str "quotes.",Note [Para [Str "In",Space,Str "quote."]]]]
|
||||
|
|
|
|||
8
tests/lhs-test-markdown.native
Normal file
8
tests/lhs-test-markdown.native
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
[Header 1 ("lhs-test",[],[]) [Str "lhs",Space,Str "test"]
|
||||
,Para [Code ("",[],[]) "unsplit",Space,Str "is",Space,Str "an",Space,Str "arrow",Space,Str "that",Space,Str "takes",Space,Str "a",Space,Str "pair",Space,Str "of",Space,Str "values",Space,Str "and",Space,Str "combines",Space,Str "them",Space,Str "to",Space,Str "return",Space,Str "a",Space,Str "single",Space,Str "value:"]
|
||||
,CodeBlock ("",["sourceCode","literate","haskell"],[]) "unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d\nunsplit = arr . uncurry \n -- arr (\\op (x,y) -> x `op` y) "
|
||||
,Para [Code ("",[],[]) "(***)",Space,Str "combines",Space,Str "two",Space,Str "arrows",Space,Str "into",Space,Str "a",Space,Str "new",Space,Str "arrow",Space,Str "by",Space,Str "running",Space,Str "the",Space,Str "two",Space,Str "arrows",Space,Str "on",Space,Str "a",Space,Str "pair",Space,Str "of",Space,Str "values",Space,Str "(one",Space,Str "arrow",Space,Str "on",Space,Str "the",Space,Str "first",Space,Str "item",Space,Str "of",Space,Str "the",Space,Str "pair",Space,Str "and",Space,Str "one",Space,Str "arrow",Space,Str "on",Space,Str "the",Space,Str "second",Space,Str "item",Space,Str "of",Space,Str "the",Space,Str "pair)."]
|
||||
,CodeBlock ("",[],[]) "f *** g = first f >>> second g"
|
||||
,Para [Str "Block",Space,Str "quote:"]
|
||||
,BlockQuote
|
||||
[Para [Str "foo",Space,Str "bar"]]]
|
||||
|
|
@ -27,7 +27,7 @@ code > span.er { color: #ff0000; font-weight: bold; }
|
|||
</style>
|
||||
</head>
|
||||
<body>
|
||||
<h1 id="lhs-test">lhs test</h1>
|
||||
<h1>lhs test</h1>
|
||||
<p><code>unsplit</code> is an arrow that takes a pair of values and combines them to return a single value:</p>
|
||||
<pre class="sourceCode literate haskell"><code class="sourceCode haskell"><span class="ot">unsplit ::</span> (<span class="dt">Arrow</span> a) <span class="ot">=></span> (b <span class="ot">-></span> c <span class="ot">-></span> d) <span class="ot">-></span> a (b, c) d
|
||||
unsplit <span class="fu">=</span> arr <span class="fu">.</span> <span class="fu">uncurry</span>
|
||||
|
|
|
|||
|
|
@ -27,7 +27,7 @@ code > span.er { color: #ff0000; font-weight: bold; }
|
|||
</style>
|
||||
</head>
|
||||
<body>
|
||||
<h1 id="lhs-test">lhs test</h1>
|
||||
<h1>lhs test</h1>
|
||||
<p><code>unsplit</code> is an arrow that takes a pair of values and combines them to return a single value:</p>
|
||||
<pre class="sourceCode literate haskell"><code class="sourceCode haskell"><span class="fu">></span><span class="ot"> unsplit ::</span> (<span class="dt">Arrow</span> a) <span class="ot">=></span> (b <span class="ot">-></span> c <span class="ot">-></span> d) <span class="ot">-></span> a (b, c) d
|
||||
<span class="fu">></span> unsplit <span class="fu">=</span> arr <span class="fu">.</span> <span class="fu">uncurry</span>
|
||||
|
|
|
|||
|
|
@ -1,4 +1,4 @@
|
|||
[Header 1 [Str "lhs",Space,Str "test"]
|
||||
[Header 1 ("",[],[]) [Str "lhs",Space,Str "test"]
|
||||
,Para [Code ("",[],[]) "unsplit",Space,Str "is",Space,Str "an",Space,Str "arrow",Space,Str "that",Space,Str "takes",Space,Str "a",Space,Str "pair",Space,Str "of",Space,Str "values",Space,Str "and",Space,Str "combines",Space,Str "them",Space,Str "to",Space,Str "return",Space,Str "a",Space,Str "single",Space,Str "value:"]
|
||||
,CodeBlock ("",["sourceCode","literate","haskell"],[]) "unsplit :: (Arrow a) => (b -> c -> d) -> a (b, c) d\nunsplit = arr . uncurry \n -- arr (\\op (x,y) -> x `op` y) "
|
||||
,Para [Code ("",[],[]) "(***)",Space,Str "combines",Space,Str "two",Space,Str "arrows",Space,Str "into",Space,Str "a",Space,Str "new",Space,Str "arrow",Space,Str "by",Space,Str "running",Space,Str "the",Space,Str "two",Space,Str "arrows",Space,Str "on",Space,Str "a",Space,Str "pair",Space,Str "of",Space,Str "values",Space,Str "(one",Space,Str "arrow",Space,Str "on",Space,Str "the",Space,Str "first",Space,Str "item",Space,Str "of",Space,Str "the",Space,Str "pair",Space,Str "and",Space,Str "one",Space,Str "arrow",Space,Str "on",Space,Str "the",Space,Str "second",Space,Str "item",Space,Str "of",Space,Str "the",Space,Str "pair)."]
|
||||
|
|
|
|||
|
|
@ -1,54 +1,54 @@
|
|||
[Header 1 [Str "Additional",Space,Str "markdown",Space,Str "reader",Space,Str "tests"]
|
||||
,Header 2 [Str "Blank",Space,Str "line",Space,Str "before",Space,Str "URL",Space,Str "in",Space,Str "link",Space,Str "reference"]
|
||||
[Header 1 ("additional-markdown-reader-tests",[],[]) [Str "Additional",Space,Str "markdown",Space,Str "reader",Space,Str "tests"]
|
||||
,Header 2 ("blank-line-before-url-in-link-reference",[],[]) [Str "Blank",Space,Str "line",Space,Str "before",Space,Str "URL",Space,Str "in",Space,Str "link",Space,Str "reference"]
|
||||
,Para [Link [Str "foo"] ("/url",""),Space,Str "and",Space,Link [Str "bar"] ("/url","title")]
|
||||
,Header 2 [Str "Raw",Space,Str "ConTeXt",Space,Str "environments"]
|
||||
,Header 2 ("raw-context-environments",[],[]) [Str "Raw",Space,Str "ConTeXt",Space,Str "environments"]
|
||||
,Plain [RawInline "tex" "\\placeformula "]
|
||||
,RawBlock "context" "\\startformula\n L_{1} = L_{2}\n \\stopformula"
|
||||
,RawBlock "context" "\\start[a2]\n\\start[a2]\n\\stop[a2]\n\\stop[a2]"
|
||||
,Header 2 [Str "URLs",Space,Str "with",Space,Str "spaces"]
|
||||
,Header 2 ("urls-with-spaces",[],[]) [Str "URLs",Space,Str "with",Space,Str "spaces"]
|
||||
,Para [Link [Str "foo"] ("/bar%20and%20baz",""),Space,Link [Str "foo"] ("/bar%20and%20baz",""),Space,Link [Str "foo"] ("/bar%20and%20baz",""),Space,Link [Str "foo"] ("bar%20baz","title")]
|
||||
,Para [Link [Str "baz"] ("/foo%20foo",""),Space,Link [Str "bam"] ("/foo%20fee",""),Space,Link [Str "bork"] ("/foo/zee%20zob","title")]
|
||||
,Header 2 [Str "Horizontal",Space,Str "rules",Space,Str "with",Space,Str "spaces",Space,Str "at",Space,Str "end"]
|
||||
,Header 2 ("horizontal-rules-with-spaces-at-end",[],[]) [Str "Horizontal",Space,Str "rules",Space,Str "with",Space,Str "spaces",Space,Str "at",Space,Str "end"]
|
||||
,HorizontalRule
|
||||
,HorizontalRule
|
||||
,Header 2 [Str "Raw",Space,Str "HTML",Space,Str "before",Space,Str "header"]
|
||||
,Header 2 ("raw-html-before-header",[],[]) [Str "Raw",Space,Str "HTML",Space,Str "before",Space,Str "header"]
|
||||
,Para [RawInline "html" "<a>",RawInline "html" "</a>"]
|
||||
,Header 3 [Str "my",Space,Str "header"]
|
||||
,Header 2 [Str "$",Space,Str "in",Space,Str "math"]
|
||||
,Header 3 ("my-header",[],[]) [Str "my",Space,Str "header"]
|
||||
,Header 2 ("in-math",[],[]) [Str "$",Space,Str "in",Space,Str "math"]
|
||||
,Para [Math InlineMath "\\$2 + \\$3"]
|
||||
,Header 2 [Str "Commented-out",Space,Str "list",Space,Str "item"]
|
||||
,Header 2 ("commented-out-list-item",[],[]) [Str "Commented-out",Space,Str "list",Space,Str "item"]
|
||||
,BulletList
|
||||
[[Plain [Str "one",Space,RawInline "html" "<!--\n- two\n-->"]]
|
||||
,[Plain [Str "three"]]]
|
||||
,Header 2 [Str "Backslash",Space,Str "newline"]
|
||||
,Header 2 ("backslash-newline",[],[]) [Str "Backslash",Space,Str "newline"]
|
||||
,Para [Str "hi",LineBreak,Str "there"]
|
||||
,Header 2 [Str "Code",Space,Str "spans"]
|
||||
,Header 2 ("code-spans",[],[]) [Str "Code",Space,Str "spans"]
|
||||
,Para [Code ("",[],[]) "hi\\"]
|
||||
,Para [Code ("",[],[]) "hi there"]
|
||||
,Para [Code ("",[],[]) "hi````there"]
|
||||
,Para [Str "`hi"]
|
||||
,Para [Str "there`"]
|
||||
,Header 2 [Str "Multilingual",Space,Str "URLs"]
|
||||
,Header 2 ("multilingual-urls",[],[]) [Str "Multilingual",Space,Str "URLs"]
|
||||
,Para [RawInline "html" "<http://\27979.com?\27979=\27979>"]
|
||||
,Para [Link [Str "foo"] ("/bar/\27979?x=\27979","title")]
|
||||
,Para [Link [Str "\27979@foo.\27979.baz"] ("mailto:\27979@foo.\27979.baz","")]
|
||||
,Header 2 [Str "Numbered",Space,Str "examples"]
|
||||
,Header 2 ("numbered-examples",[],[]) [Str "Numbered",Space,Str "examples"]
|
||||
,OrderedList (1,Example,TwoParens)
|
||||
[[Plain [Str "First",Space,Str "example."]]
|
||||
,[Plain [Str "Second",Space,Str "example."]]]
|
||||
,Para [Str "Explanation",Space,Str "of",Space,Str "examples",Space,Str "(2)",Space,Str "and",Space,Str "(3)."]
|
||||
,OrderedList (3,Example,TwoParens)
|
||||
[[Plain [Str "Third",Space,Str "example."]]]
|
||||
,Header 2 [Str "Macros"]
|
||||
,Header 2 ("macros",[],[]) [Str "Macros"]
|
||||
,Para [Math InlineMath "\\langle x,y \\rangle"]
|
||||
,Header 2 [Str "Case-insensitive",Space,Str "references"]
|
||||
,Header 2 ("case-insensitive-references",[],[]) [Str "Case-insensitive",Space,Str "references"]
|
||||
,Para [Link [Str "Fum"] ("/fum","")]
|
||||
,Para [Link [Str "FUM"] ("/fum","")]
|
||||
,Para [Link [Str "bat"] ("/bat","")]
|
||||
,Header 2 [Str "Curly",Space,Str "smart",Space,Str "quotes"]
|
||||
,Header 2 ("curly-smart-quotes",[],[]) [Str "Curly",Space,Str "smart",Space,Str "quotes"]
|
||||
,Para [Quoted DoubleQuote [Str "Hi"]]
|
||||
,Para [Quoted SingleQuote [Str "Hi"]]
|
||||
,Header 2 [Str "Consecutive",Space,Str "lists"]
|
||||
,Header 2 ("consecutive-lists",[],[]) [Str "Consecutive",Space,Str "lists"]
|
||||
,BulletList
|
||||
[[Plain [Str "one"]]
|
||||
,[Plain [Str "two"]]]
|
||||
|
|
@ -58,9 +58,9 @@
|
|||
,OrderedList (1,LowerAlpha,Period)
|
||||
[[Plain [Str "one"]]
|
||||
,[Plain [Str "two"]]]
|
||||
,Header 2 [Str "Implicit",Space,Str "header",Space,Str "references"]
|
||||
,Header 3 [Str "My",Space,Str "header"]
|
||||
,Header 3 [Str "My",Space,Str "other",Space,Str "header"]
|
||||
,Header 2 ("implicit-header-references",[],[]) [Str "Implicit",Space,Str "header",Space,Str "references"]
|
||||
,Header 3 ("my-header-1",[],[]) [Str "My",Space,Str "header"]
|
||||
,Header 3 ("my-other-header",[],[]) [Str "My",Space,Str "other",Space,Str "header"]
|
||||
,Para [Str "A",Space,Str "link",Space,Str "to",Space,Link [Str "My",Space,Str "header"] ("#my-header",""),Str "."]
|
||||
,Para [Str "Another",Space,Str "link",Space,Str "to",Space,Link [Str "it"] ("#my-header",""),Str "."]
|
||||
,Para [Str "But",Space,Str "this",Space,Str "is",Space,Str "not",Space,Str "a",Space,Str "link",Space,Str "to",Space,Link [Str "My",Space,Str "other",Space,Str "header"] ("/foo",""),Str ",",Space,Str "since",Space,Str "the",Space,Str "reference",Space,Str "is",Space,Str "defined."]]
|
||||
|
|
|
|||
|
|
@ -1,39 +1,39 @@
|
|||
Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
||||
[Header 1 [Str "header"]
|
||||
,Header 2 [Str "header",Space,Str "level",Space,Str "two"]
|
||||
,Header 3 [Str "header",Space,Str "level",Space,Str "3"]
|
||||
,Header 4 [Str "header",Space,Emph [Str "level"],Space,Str "four"]
|
||||
,Header 5 [Str "header",Space,Str "level",Space,Str "5"]
|
||||
,Header 6 [Str "header",Space,Str "level",Space,Str "6"]
|
||||
[Header 1 ("",[],[]) [Str "header"]
|
||||
,Header 2 ("",[],[]) [Str "header",Space,Str "level",Space,Str "two"]
|
||||
,Header 3 ("",[],[]) [Str "header",Space,Str "level",Space,Str "3"]
|
||||
,Header 4 ("",[],[]) [Str "header",Space,Emph [Str "level"],Space,Str "four"]
|
||||
,Header 5 ("",[],[]) [Str "header",Space,Str "level",Space,Str "5"]
|
||||
,Header 6 ("",[],[]) [Str "header",Space,Str "level",Space,Str "6"]
|
||||
,Para [Str "=======",Space,Str "not",Space,Str "a",Space,Str "header",Space,Str "========"]
|
||||
,Para [Code ("",[],[]) "==\160not\160a\160header\160=="]
|
||||
,Header 2 [Str "emph",Space,Str "and",Space,Str "strong"]
|
||||
,Header 2 ("",[],[]) [Str "emph",Space,Str "and",Space,Str "strong"]
|
||||
,Para [Emph [Str "emph"],Space,Strong [Str "strong"]]
|
||||
,Para [Strong [Emph [Str "strong",Space,Str "and",Space,Str "emph"]]]
|
||||
,Para [Strong [Emph [Str "emph",Space,Str "inside"],Space,Str "strong"]]
|
||||
,Para [Strong [Str "strong",Space,Str "with",Space,Emph [Str "emph"]]]
|
||||
,Para [Emph [Strong [Str "strong",Space,Str "inside"],Space,Str "emph"]]
|
||||
,Header 2 [Str "horizontal",Space,Str "rule"]
|
||||
,Header 2 ("",[],[]) [Str "horizontal",Space,Str "rule"]
|
||||
,Para [Str "top"]
|
||||
,HorizontalRule
|
||||
,Para [Str "bottom"]
|
||||
,HorizontalRule
|
||||
,Header 2 [Str "nowiki"]
|
||||
,Header 2 ("",[],[]) [Str "nowiki"]
|
||||
,Para [Str "''not",Space,Str "emph''"]
|
||||
,Header 2 [Str "strikeout"]
|
||||
,Header 2 ("",[],[]) [Str "strikeout"]
|
||||
,Para [Strikeout [Str "This",Space,Str "is",Space,Emph [Str "struck",Space,Str "out"]]]
|
||||
,Header 2 [Str "entities"]
|
||||
,Header 2 ("",[],[]) [Str "entities"]
|
||||
,Para [Str "hi",Space,Str "&",Space,Str "low"]
|
||||
,Para [Str "hi",Space,Str "&",Space,Str "low"]
|
||||
,Para [Str "G\246del"]
|
||||
,Para [Str "\777\2730"]
|
||||
,Header 2 [Str "comments"]
|
||||
,Header 2 ("",[],[]) [Str "comments"]
|
||||
,Para [Str "inline",Space,Str "comment"]
|
||||
,Para [Str "between",Space,Str "blocks"]
|
||||
,Header 2 [Str "linebreaks"]
|
||||
,Header 2 ("",[],[]) [Str "linebreaks"]
|
||||
,Para [Str "hi",LineBreak,Str "there"]
|
||||
,Para [Str "hi",LineBreak,Str "there"]
|
||||
,Header 2 [Str ":",Space,Str "indents"]
|
||||
,Header 2 ("",[],[]) [Str ":",Space,Str "indents"]
|
||||
,Para [Str "hi"]
|
||||
,DefinitionList
|
||||
[([],
|
||||
|
|
@ -46,36 +46,36 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
[([],
|
||||
[[Plain [Str "there"]]])]]])]
|
||||
,Para [Str "bud"]
|
||||
,Header 2 [Str "p",Space,Str "tags"]
|
||||
,Header 2 ("",[],[]) [Str "p",Space,Str "tags"]
|
||||
,Para [Str "hi",Space,Str "there"]
|
||||
,Para [Str "bud"]
|
||||
,Para [Str "another"]
|
||||
,Header 2 [Str "raw",Space,Str "html"]
|
||||
,Header 2 ("",[],[]) [Str "raw",Space,Str "html"]
|
||||
,Para [Str "hi",Space,RawInline "html" "<span style=\"color:red\">",Emph [Str "there"],RawInline "html" "</span>",Str "."]
|
||||
,Para [RawInline "html" "<ins>",Str "inserted",RawInline "html" "</ins>"]
|
||||
,RawBlock "html" "<div class=\"special\">"
|
||||
,Para [Str "hi",Space,Emph [Str "there"]]
|
||||
,RawBlock "html" "</div>"
|
||||
,Header 2 [Str "sup,",Space,Str "sub,",Space,Str "del"]
|
||||
,Header 2 ("",[],[]) [Str "sup,",Space,Str "sub,",Space,Str "del"]
|
||||
,Para [Str "H",Subscript [Str "2"],Str "O",Space,Str "base",Superscript [Emph [Str "exponent"]],Space,Strikeout [Str "hello"]]
|
||||
,Header 2 [Str "inline",Space,Str "code"]
|
||||
,Header 2 ("",[],[]) [Str "inline",Space,Str "code"]
|
||||
,Para [Code ("",[],[]) "*\8594*",Space,Code ("",[],[]) "typed",Space,Code ("",["haskell"],[]) ">>="]
|
||||
,Header 2 [Str "code",Space,Str "blocks"]
|
||||
,Header 2 ("",[],[]) [Str "code",Space,Str "blocks"]
|
||||
,CodeBlock ("",[],[]) "case xs of\n (_:_) -> reverse xs\n [] -> ['*']"
|
||||
,CodeBlock ("",["haskell"],[]) "case xs of\n (_:_) -> reverse xs\n [] -> ['*']"
|
||||
,CodeBlock ("",["ruby","numberLines"],[("startFrom","100")]) "widgets.each do |w|\n print w.price\nend"
|
||||
,Header 2 [Str "block",Space,Str "quotes"]
|
||||
,Header 2 ("",[],[]) [Str "block",Space,Str "quotes"]
|
||||
,Para [Str "Regular",Space,Str "paragraph"]
|
||||
,BlockQuote
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "block",Space,Str "quote."]
|
||||
,Para [Str "With",Space,Str "two",Space,Str "paragraphs."]]
|
||||
,Para [Str "Nother",Space,Str "paragraph."]
|
||||
,Header 2 [Str "external",Space,Str "links"]
|
||||
,Header 2 ("",[],[]) [Str "external",Space,Str "links"]
|
||||
,Para [Link [Emph [Str "Google"],Space,Str "search",Space,Str "engine"] ("http://google.com","")]
|
||||
,Para [Link [Str "http://johnmacfarlane.net/pandoc/"] ("http://johnmacfarlane.net/pandoc/","")]
|
||||
,Para [Link [Str "1"] ("http://google.com",""),Space,Link [Str "2"] ("http://yahoo.com","")]
|
||||
,Para [Link [Str "email",Space,Str "me"] ("mailto:info@example.org","")]
|
||||
,Header 2 [Str "internal",Space,Str "links"]
|
||||
,Header 2 ("",[],[]) [Str "internal",Space,Str "links"]
|
||||
,Para [Link [Str "Help"] ("Help","wikilink")]
|
||||
,Para [Link [Str "the",Space,Str "help",Space,Str "page"] ("Help","wikilink")]
|
||||
,Para [Link [Str "Helpers"] ("Help","wikilink")]
|
||||
|
|
@ -83,12 +83,12 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,Para [Link [Str "Contents"] ("Help:Contents","wikilink")]
|
||||
,Para [Link [Str "#My",Space,Str "anchor"] ("#My_anchor","wikilink")]
|
||||
,Para [Link [Str "and",Space,Str "text"] ("Page#with_anchor","wikilink")]
|
||||
,Header 2 [Str "images"]
|
||||
,Header 2 ("",[],[]) [Str "images"]
|
||||
,Para [Image [Str "caption"] ("example.jpg","image")]
|
||||
,Para [Image [Str "the",Space,Emph [Str "caption"],Space,Str "with",Space,Link [Str "external",Space,Str "link"] ("http://google.com","")] ("example.jpg","image")]
|
||||
,Para [Image [Str "caption"] ("example.jpg","image")]
|
||||
,Para [Image [Str "example.jpg"] ("example.jpg","image")]
|
||||
,Header 2 [Str "lists"]
|
||||
,Header 2 ("",[],[]) [Str "lists"]
|
||||
,BulletList
|
||||
[[Plain [Str "Start",Space,Str "each",Space,Str "line"]]
|
||||
,[Plain [Str "with",Space,Str "an",Space,Str "asterisk",Space,Str "(*)."]
|
||||
|
|
@ -161,21 +161,21 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
[[Plain [Str "Amsterdam"]]
|
||||
,[Plain [Str "Rotterdam"]]
|
||||
,[Plain [Str "The",Space,Str "Hague"]]]
|
||||
,Header 2 [Str "math"]
|
||||
,Header 2 ("",[],[]) [Str "math"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "some",Space,Math InlineMath "x=\\frac{y^\\pi}{z}",Str "."]
|
||||
,Header 2 [Str "preformatted",Space,Str "blocks"]
|
||||
,Header 2 ("",[],[]) [Str "preformatted",Space,Str "blocks"]
|
||||
,Para [Code ("",[],[]) "Start\160each\160line\160with\160a\160space.",LineBreak,Code ("",[],[]) "Text\160is\160",Strong [Code ("",[],[]) "preformatted"],Code ("",[],[]) "\160and",LineBreak,Emph [Code ("",[],[]) "markups"],Code ("",[],[]) "\160",Strong [Emph [Code ("",[],[]) "can"]],Code ("",[],[]) "\160be\160done."]
|
||||
,Para [Code ("",[],[]) "\160hell\160\160\160\160\160\160yeah"]
|
||||
,Para [Code ("",[],[]) "Start\160with\160a\160space\160in\160the\160first\160column,",LineBreak,Code ("",[],[]) "(before\160the\160<nowiki>).",LineBreak,Code ("",[],[]) "",LineBreak,Code ("",[],[]) "Then\160your\160block\160format\160will\160be",LineBreak,Code ("",[],[]) "\160\160\160\160maintained.",LineBreak,Code ("",[],[]) "",LineBreak,Code ("",[],[]) "This\160is\160good\160for\160copying\160in\160code\160blocks:",LineBreak,Code ("",[],[]) "",LineBreak,Code ("",[],[]) "def\160function():",LineBreak,Code ("",[],[]) "\160\160\160\160\"\"\"documentation\160string\"\"\"",LineBreak,Code ("",[],[]) "",LineBreak,Code ("",[],[]) "\160\160\160\160if\160True:",LineBreak,Code ("",[],[]) "\160\160\160\160\160\160\160\160print\160True",LineBreak,Code ("",[],[]) "\160\160\160\160else:",LineBreak,Code ("",[],[]) "\160\160\160\160\160\160\160\160print\160False"]
|
||||
,Para [Str "Not"]
|
||||
,RawBlock "html" "<hr/>"
|
||||
,Para [Str "preformatted"]
|
||||
,Header 2 [Str "templates"]
|
||||
,Header 2 ("",[],[]) [Str "templates"]
|
||||
,RawBlock "mediawiki" "{{Welcome}}"
|
||||
,RawBlock "mediawiki" "{{Foo:Bar}}"
|
||||
,RawBlock "mediawiki" "{{Thankyou|all your effort|Me}}"
|
||||
,Para [Str "Written",Space,RawInline "mediawiki" "{{{date}}}",Space,Str "by",Space,RawInline "mediawiki" "{{{name}}}",Str "."]
|
||||
,Header 2 [Str "tables"]
|
||||
,Header 2 ("",[],[]) [Str "tables"]
|
||||
,Table [] [AlignDefault,AlignDefault] [0.0,0.0]
|
||||
[[]
|
||||
,[]]
|
||||
|
|
@ -237,5 +237,5 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,[Para [Str "ice",Space,Str "cream"]]]]]]
|
||||
,[[Para [Str "Butter"]]
|
||||
,[Para [Str "Ice",Space,Str "cream"]]]]
|
||||
,Header 2 [Str "notes"]
|
||||
,Header 2 ("",[],[]) [Str "notes"]
|
||||
,Para [Str "My",Space,Str "note!",Note [Plain [Str "This."]]]]
|
||||
|
|
|
|||
|
|
@ -2,13 +2,13 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
[DefinitionList
|
||||
[([Str "Revision"],
|
||||
[[Para [Str "3"]]])]
|
||||
,Header 1 [Str "Level",Space,Str "one",Space,Str "header"]
|
||||
,Header 1 ("",[],[]) [Str "Level",Space,Str "one",Space,Str "header"]
|
||||
,Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "set",Space,Str "of",Space,Str "tests",Space,Str "for",Space,Str "pandoc.",Space,Str "Most",Space,Str "of",Space,Str "them",Space,Str "are",Space,Str "adapted",Space,Str "from",Space,Str "John",Space,Str "Gruber\8217s",Space,Str "markdown",Space,Str "test",Space,Str "suite."]
|
||||
,Header 2 [Str "Level",Space,Str "two",Space,Str "header"]
|
||||
,Header 3 [Str "Level",Space,Str "three"]
|
||||
,Header 4 [Str "Level",Space,Str "four",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 5 [Str "Level",Space,Str "five"]
|
||||
,Header 1 [Str "Paragraphs"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "two",Space,Str "header"]
|
||||
,Header 3 ("",[],[]) [Str "Level",Space,Str "three"]
|
||||
,Header 4 ("",[],[]) [Str "Level",Space,Str "four",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 5 ("",[],[]) [Str "Level",Space,Str "five"]
|
||||
,Header 1 ("",[],[]) [Str "Paragraphs"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "regular",Space,Str "paragraph."]
|
||||
,Para [Str "In",Space,Str "Markdown",Space,Str "1.0.0",Space,Str "and",Space,Str "earlier.",Space,Str "Version",Space,Str "8.",Space,Str "This",Space,Str "line",Space,Str "turns",Space,Str "into",Space,Str "a",Space,Str "list",Space,Str "item.",Space,Str "Because",Space,Str "a",Space,Str "hard-wrapped",Space,Str "line",Space,Str "in",Space,Str "the",Space,Str "middle",Space,Str "of",Space,Str "a",Space,Str "paragraph",Space,Str "looked",Space,Str "like",Space,Str "a",Space,Str "list",Space,Str "item."]
|
||||
,Para [Str "Here\8217s",Space,Str "one",Space,Str "with",Space,Str "a",Space,Str "bullet.",Space,Str "*",Space,Str "criminey."]
|
||||
|
|
@ -16,7 +16,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,HorizontalRule
|
||||
,Para [Str "Another:"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Block",Space,Str "Quotes"]
|
||||
,Header 1 ("",[],[]) [Str "Block",Space,Str "Quotes"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "block",Space,Str "quote:"]
|
||||
,BlockQuote
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "block",Space,Str "quote.",Space,Str "It",Space,Str "is",Space,Str "pretty",Space,Str "short."]]
|
||||
|
|
@ -34,7 +34,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
[Para [Str "nested"]
|
||||
,BlockQuote
|
||||
[Para [Str "nested"]]]]
|
||||
,Header 1 [Str "Code",Space,Str "Blocks"]
|
||||
,Header 1 ("",[],[]) [Str "Code",Space,Str "Blocks"]
|
||||
,Para [Str "Code:"]
|
||||
,CodeBlock ("",[],[]) "---- (should be four hyphens)\n\nsub status {\n print \"working\";\n}"
|
||||
,CodeBlock ("",[],[]) "this code block is indented by one tab"
|
||||
|
|
@ -42,8 +42,8 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,CodeBlock ("",[],[]) "this block is indented by two tabs\n\nThese should not be escaped: \\$ \\\\ \\> \\[ \\{"
|
||||
,Para [Str "And:"]
|
||||
,CodeBlock ("",["sourceCode","python"],[]) "def my_function(x):\n return x + 1"
|
||||
,Header 1 [Str "Lists"]
|
||||
,Header 2 [Str "Unordered"]
|
||||
,Header 1 ("",[],[]) [Str "Lists"]
|
||||
,Header 2 ("",[],[]) [Str "Unordered"]
|
||||
,Para [Str "Asterisks",Space,Str "tight:"]
|
||||
,BulletList
|
||||
[[Plain [Str "asterisk",Space,Str "1"]]
|
||||
|
|
@ -74,7 +74,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
[[Para [Str "Minus",Space,Str "1"]]
|
||||
,[Para [Str "Minus",Space,Str "2"]]
|
||||
,[Para [Str "Minus",Space,Str "3"]]]
|
||||
,Header 2 [Str "Ordered"]
|
||||
,Header 2 ("",[],[]) [Str "Ordered"]
|
||||
,Para [Str "Tight:"]
|
||||
,OrderedList (1,Decimal,Period)
|
||||
[[Plain [Str "First"]]
|
||||
|
|
@ -118,7 +118,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,[Plain [Str "Fie"]]
|
||||
,[Plain [Str "Foe"]]]]]
|
||||
,[Para [Str "Third"]]]
|
||||
,Header 2 [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,Header 2 ("",[],[]) [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,OrderedList (2,Decimal,TwoParens)
|
||||
[[Plain [Str "begins",Space,Str "with",Space,Str "2"]]
|
||||
,[Para [Str "and",Space,Str "now",Space,Str "3"]
|
||||
|
|
@ -148,7 +148,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,OrderedList (4,LowerAlpha,TwoParens)
|
||||
[[Plain [Str "item",Space,Str "1"]]
|
||||
,[Plain [Str "item",Space,Str "2"]]]
|
||||
,Header 2 [Str "Definition"]
|
||||
,Header 2 ("",[],[]) [Str "Definition"]
|
||||
,DefinitionList
|
||||
[([Str "term",Space,Str "1"],
|
||||
[[Para [Str "Definition",Space,Str "1."]]])
|
||||
|
|
@ -157,7 +157,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,Para [Str "Definition",Space,Str "2,",Space,Str "paragraph",Space,Str "2."]]])
|
||||
,([Str "term",Space,Str "with",Space,Emph [Str "emphasis"]],
|
||||
[[Para [Str "Definition",Space,Str "3."]]])]
|
||||
,Header 1 [Str "Field",Space,Str "Lists"]
|
||||
,Header 1 ("",[],[]) [Str "Field",Space,Str "Lists"]
|
||||
,BlockQuote
|
||||
[DefinitionList
|
||||
[([Str "address"],
|
||||
|
|
@ -173,18 +173,18 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
[[Para [Emph [Str "Nowhere"],Str ",",Space,Str "MA,",Space,Str "USA"]]])
|
||||
,([Str "phone"],
|
||||
[[Para [Str "123-4567"]]])]
|
||||
,Header 1 [Str "HTML",Space,Str "Blocks"]
|
||||
,Header 1 ("",[],[]) [Str "HTML",Space,Str "Blocks"]
|
||||
,Para [Str "Simple",Space,Str "block",Space,Str "on",Space,Str "one",Space,Str "line:"]
|
||||
,RawBlock "html" "<div>foo</div>"
|
||||
,Para [Str "Now,",Space,Str "nested:"]
|
||||
,RawBlock "html" "<div>\n <div>\n <div>\n foo\n </div>\n </div>\n</div>"
|
||||
,Header 1 [Str "LaTeX",Space,Str "Block"]
|
||||
,Header 1 ("",[],[]) [Str "LaTeX",Space,Str "Block"]
|
||||
,RawBlock "latex" "\\begin{tabular}{|l|l|}\\hline\nAnimal & Number \\\\ \\hline\nDog & 2 \\\\\nCat & 1 \\\\ \\hline\n\\end{tabular}"
|
||||
,Header 1 [Str "Inline",Space,Str "Markup"]
|
||||
,Header 1 ("",[],[]) [Str "Inline",Space,Str "Markup"]
|
||||
,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ".",Space,Str "This",Space,Str "is",Space,Strong [Str "strong"],Str "."]
|
||||
,Para [Str "This",Space,Str "is",Space,Str "code:",Space,Code ("",[],[]) ">",Str ",",Space,Code ("",[],[]) "$",Str ",",Space,Code ("",[],[]) "\\",Str ",",Space,Code ("",[],[]) "\\$",Str ",",Space,Code ("",[],[]) "<html>",Str "."]
|
||||
,Para [Str "This",Space,Str "is",Subscript [Str "subscripted"],Space,Str "and",Space,Str "this",Space,Str "is",Space,Superscript [Str "superscripted"],Str "."]
|
||||
,Header 1 [Str "Special",Space,Str "Characters"]
|
||||
,Header 1 ("",[],[]) [Str "Special",Space,Str "Characters"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "some",Space,Str "unicode:"]
|
||||
,BulletList
|
||||
[[Plain [Str "I",Space,Str "hat:",Space,Str "\206"]]
|
||||
|
|
@ -212,7 +212,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,Para [Str "Bang:",Space,Str "!"]
|
||||
,Para [Str "Plus:",Space,Str "+"]
|
||||
,Para [Str "Minus:",Space,Str "-"]
|
||||
,Header 1 [Str "Links"]
|
||||
,Header 1 ("",[],[]) [Str "Links"]
|
||||
,Para [Str "Explicit:",Space,Str "a",Space,Link [Str "URL"] ("/url/",""),Str "."]
|
||||
,Para [Str "Two",Space,Str "anonymous",Space,Str "links:",Space,Link [Str "the",Space,Str "first"] ("/url1/",""),Space,Str "and",Space,Link [Str "the",Space,Str "second"] ("/url2/","")]
|
||||
,Para [Str "Reference",Space,Str "links:",Space,Link [Str "link1"] ("/url1/",""),Space,Str "and",Space,Link [Str "link2"] ("/url2/",""),Space,Str "and",Space,Link [Str "link1"] ("/url1/",""),Space,Str "again."]
|
||||
|
|
@ -221,20 +221,20 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,Para [Str "Autolinks:",Space,Link [Str "http://example.com/?foo=1&bar=2"] ("http://example.com/?foo=1&bar=2",""),Space,Str "and",Space,Link [Str "nobody@nowhere.net"] ("mailto:nobody@nowhere.net",""),Str "."]
|
||||
,Para [Str "But",Space,Str "not",Space,Str "here:"]
|
||||
,CodeBlock ("",[],[]) "http://example.com/"
|
||||
,Header 1 [Str "Images"]
|
||||
,Header 1 ("",[],[]) [Str "Images"]
|
||||
,Para [Str "From",Space,Quoted DoubleQuote [Str "Voyage",Space,Str "dans",Space,Str "la",Space,Str "Lune"],Space,Str "by",Space,Str "Georges",Space,Str "Melies",Space,Str "(1902):"]
|
||||
,Para [Image [Str "image"] ("lalune.jpg","")]
|
||||
,Para [Image [Str "Voyage dans la Lune"] ("lalune.jpg","")]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "movie",Space,Image [Str "movie"] ("movie.jpg",""),Space,Str "icon."]
|
||||
,Para [Str "And",Space,Str "an",Space,Link [Image [Str "A movie"] ("movie.jpg","")] ("/url",""),Str "."]
|
||||
,Header 1 [Str "Comments"]
|
||||
,Header 1 ("",[],[]) [Str "Comments"]
|
||||
,Para [Str "First",Space,Str "paragraph"]
|
||||
,Para [Str "Another",Space,Str "paragraph"]
|
||||
,Para [Str "A",Space,Str "third",Space,Str "paragraph"]
|
||||
,Header 1 [Str "Line",Space,Str "blocks"]
|
||||
,Header 1 ("",[],[]) [Str "Line",Space,Str "blocks"]
|
||||
,Para [Str "But",Space,Str "can",Space,Str "a",Space,Str "bee",Space,Str "be",Space,Str "said",Space,Str "to",Space,Str "be",LineBreak,Str " or",Space,Str "not",Space,Str "to",Space,Str "be",Space,Str "an",Space,Str "entire",Space,Str "bee,",LineBreak,Str " when",Space,Str "half",Space,Str "the",Space,Str "bee",Space,Str "is",Space,Str "not",Space,Str "a",Space,Str "bee,",LineBreak,Str " due",Space,Str "to",Space,Str "some",Space,Str "ancient",Space,Str "injury?"]
|
||||
,Para [Str "Continuation",Space,Str "line",LineBreak,Str " and",Space,Str "another"]
|
||||
,Header 1 [Str "Simple",Space,Str "Tables"]
|
||||
,Header 1 ("",[],[]) [Str "Simple",Space,Str "Tables"]
|
||||
,Table [] [AlignDefault,AlignDefault,AlignDefault] [0.0,0.0,0.0]
|
||||
[[Plain [Str "col",Space,Str "1"]]
|
||||
,[Plain [Str "col",Space,Str "2"]]
|
||||
|
|
@ -256,7 +256,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,[[Plain [Str "r2",Space,Str "d"]]
|
||||
,[Plain [Str "e"]]
|
||||
,[Plain [Str "f"]]]]
|
||||
,Header 1 [Str "Grid",Space,Str "Tables"]
|
||||
,Header 1 ("",[],[]) [Str "Grid",Space,Str "Tables"]
|
||||
,Table [] [AlignDefault,AlignDefault,AlignDefault] [0.2375,0.15,0.1625]
|
||||
[[Plain [Str "col",Space,Str "1"]]
|
||||
,[Plain [Str "col",Space,Str "2"]]
|
||||
|
|
@ -301,26 +301,26 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite",Str ":
|
|||
,[Plain [Str "b",Space,Str "2"]]
|
||||
,[Plain [Str "b",Space,Str "2"]]]]
|
||||
,[Plain [Str "c",Space,Str "c",Space,Str "2",Space,Str "c",Space,Str "2"]]]]
|
||||
,Header 1 [Str "Footnotes"]
|
||||
,Header 1 ("",[],[]) [Str "Footnotes"]
|
||||
,Para [Note [Para [Str "Note",Space,Str "with",Space,Str "one",Space,Str "line."]]]
|
||||
,Para [Note [Para [Str "Note",Space,Str "with",Space,Str "continuation",Space,Str "line."]]]
|
||||
,Para [Note [Para [Str "Note",Space,Str "with"],Para [Str "continuation",Space,Str "block."]]]
|
||||
,Para [Note [Para [Str "Note",Space,Str "with",Space,Str "continuation",Space,Str "line"],Para [Str "and",Space,Str "a",Space,Str "second",Space,Str "para."]]]
|
||||
,Para [Str "Not",Space,Str "in",Space,Str "note."]
|
||||
,Header 1 [Str "Math"]
|
||||
,Header 1 ("",[],[]) [Str "Math"]
|
||||
,Para [Str "Some",Space,Str "inline",Space,Str "math",Space,Math InlineMath "E=mc^2",Str ".",Space,Str "Now",Space,Str "some",Space,Str "display",Space,Str "math:"]
|
||||
,Para [Math DisplayMath "E=mc^2"]
|
||||
,Para [Math DisplayMath "E = mc^2"]
|
||||
,Para [Math DisplayMath "E = mc^2",Math DisplayMath "\\alpha = \\beta"]
|
||||
,Para [Math DisplayMath "E &= mc^2\\\\\nF &= \\pi E",Math DisplayMath "F &= \\gamma \\alpha^2"]
|
||||
,Para [Str "All",Space,Str "done."]
|
||||
,Header 1 [Str "Default-Role"]
|
||||
,Header 1 ("",[],[]) [Str "Default-Role"]
|
||||
,Para [Str "Try",Space,Str "changing",Space,Str "the",Space,Str "default",Space,Str "role",Space,Str "to",Space,Str "a",Space,Str "few",Space,Str "different",Space,Str "things."]
|
||||
,Header 2 [Str "Doesn\8217t",Space,Str "Break",Space,Str "Title",Space,Str "Parsing"]
|
||||
,Header 2 ("",[],[]) [Str "Doesn\8217t",Space,Str "Break",Space,Str "Title",Space,Str "Parsing"]
|
||||
,Para [Str "Inline",Space,Str "math:",Space,Math InlineMath "E=mc^2",Space,Str "or",Space,Math InlineMath "E=mc^2",Space,Str "or",Space,Math InlineMath "E=mc^2",Str ".",Space,Str "Other",Space,Str "roles:",Space,Superscript [Str "super"],Str ",",Space,Subscript [Str "sub"],Str "."]
|
||||
,Para [Math DisplayMath "\\alpha = beta",Math DisplayMath "E = mc^2"]
|
||||
,Para [Str "Some",Space,Superscript [Str "of"],Space,Str "these",Space,Superscript [Str "words"],Space,Str "are",Space,Str "in",Space,Superscript [Str "superscript"],Str "."]
|
||||
,Para [Str "Reset",Space,Str "default-role",Space,Str "to",Space,Str "the",Space,Str "default",Space,Str "default."]
|
||||
,Para [Str "And",Space,Str "now",Space,Str "some-invalid-string-3231231",Space,Str "is",Space,Str "nonsense."]
|
||||
,Header 2 [Str "Literal",Space,Str "symbols"]
|
||||
,Header 2 ("",[],[]) [Str "Literal",Space,Str "symbols"]
|
||||
,Para [Str "2*2",Space,Str "=",Space,Str "4*1"]]
|
||||
|
|
|
|||
|
|
@ -1,8 +1,8 @@
|
|||
Pandoc (Meta {docTitle = [Str "My",Space,Str "S5",Space,Str "Document"], docAuthors = [[Str "Sam",Space,Str "Smith"],[Str "Jen",Space,Str "Jones"]], docDate = [Str "July",Space,Str "15,",Space,Str "2006"]})
|
||||
[Header 1 [Str "First",Space,Str "slide"]
|
||||
[Header 1 ("first-slide",[],[]) [Str "First",Space,Str "slide"]
|
||||
,BulletList
|
||||
[[Plain [Str "first",Space,Str "bullet"]]
|
||||
,[Plain [Str "second",Space,Str "bullet"]]]
|
||||
,Header 1 [Str "Math"]
|
||||
,Header 1 ("math",[],[]) [Str "Math"]
|
||||
,BulletList
|
||||
[[Plain [Math InlineMath "\\frac{d}{dx}f(x)=\\lim_{h\\to 0}\\frac{f(x+h)-f(x)}{h}"]]]]
|
||||
|
|
|
|||
|
|
@ -1,25 +1,25 @@
|
|||
Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docAuthors = [[Str "John",Space,Str "MacFarlane"],[Str "Anonymous"]], docDate = [Str "July",Space,Str "17,",Space,Str "2006"]})
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "set",Space,Str "of",Space,Str "tests",Space,Str "for",Space,Str "pandoc.",Space,Str "Most",Space,Str "of",Space,Str "them",Space,Str "are",Space,Str "adapted",Space,Str "from",Space,Str "John",Space,Str "Gruber\8217s",Space,Str "markdown",Space,Str "test",Space,Str "suite."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Headers"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 4 [Str "Level",Space,Str "4"]
|
||||
,Header 5 [Str "Level",Space,Str "5"]
|
||||
,Header 1 [Str "Level",Space,Str "1"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 [Str "Level",Space,Str "3"]
|
||||
,Header 1 ("headers",[],[]) [Str "Headers"]
|
||||
,Header 2 ("level-2-with-an-embedded-link",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 ("level-3-with-emphasis",[],[]) [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 4 ("level-4",[],[]) [Str "Level",Space,Str "4"]
|
||||
,Header 5 ("level-5",[],[]) [Str "Level",Space,Str "5"]
|
||||
,Header 1 ("level-1",[],[]) [Str "Level",Space,Str "1"]
|
||||
,Header 2 ("level-2-with-emphasis",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 ("level-3",[],[]) [Str "Level",Space,Str "3"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,Header 2 [Str "Level",Space,Str "2"]
|
||||
,Header 2 ("level-2",[],[]) [Str "Level",Space,Str "2"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Paragraphs"]
|
||||
,Header 1 ("paragraphs",[],[]) [Str "Paragraphs"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "regular",Space,Str "paragraph."]
|
||||
,Para [Str "In",Space,Str "Markdown",Space,Str "1.0.0",Space,Str "and",Space,Str "earlier.",Space,Str "Version",Space,Str "8.",Space,Str "This",Space,Str "line",Space,Str "turns",Space,Str "into",Space,Str "a",Space,Str "list",Space,Str "item.",Space,Str "Because",Space,Str "a",Space,Str "hard-wrapped",Space,Str "line",Space,Str "in",Space,Str "the",Space,Str "middle",Space,Str "of",Space,Str "a",Space,Str "paragraph",Space,Str "looked",Space,Str "like",Space,Str "a",Space,Str "list",Space,Str "item."]
|
||||
,Para [Str "Here\8217s",Space,Str "one",Space,Str "with",Space,Str "a",Space,Str "bullet.",Space,Str "*",Space,Str "criminey."]
|
||||
,Para [Str "There",Space,Str "should",Space,Str "be",Space,Str "a",Space,Str "hard",Space,Str "line",Space,Str "break",LineBreak,Str "here."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Block",Space,Str "Quotes"]
|
||||
,Header 1 ("block-quotes",[],[]) [Str "Block",Space,Str "Quotes"]
|
||||
,Para [Str "E-mail",Space,Str "style:"]
|
||||
,BlockQuote
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "block",Space,Str "quote.",Space,Str "It",Space,Str "is",Space,Str "pretty",Space,Str "short."]]
|
||||
|
|
@ -38,14 +38,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "This",Space,Str "should",Space,Str "not",Space,Str "be",Space,Str "a",Space,Str "block",Space,Str "quote:",Space,Str "2",Space,Str ">",Space,Str "1."]
|
||||
,Para [Str "And",Space,Str "a",Space,Str "following",Space,Str "paragraph."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Code",Space,Str "Blocks"]
|
||||
,Header 1 ("code-blocks",[],[]) [Str "Code",Space,Str "Blocks"]
|
||||
,Para [Str "Code:"]
|
||||
,CodeBlock ("",[],[]) "---- (should be four hyphens)\n\nsub status {\n print \"working\";\n}\n\nthis code block is indented by one tab"
|
||||
,Para [Str "And:"]
|
||||
,CodeBlock ("",[],[]) " this code block is indented by two tabs\n\nThese should not be escaped: \\$ \\\\ \\> \\[ \\{"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Lists"]
|
||||
,Header 2 [Str "Unordered"]
|
||||
,Header 1 ("lists",[],[]) [Str "Lists"]
|
||||
,Header 2 ("unordered",[],[]) [Str "Unordered"]
|
||||
,Para [Str "Asterisks",Space,Str "tight:"]
|
||||
,BulletList
|
||||
[[Plain [Str "asterisk",Space,Str "1"]]
|
||||
|
|
@ -76,7 +76,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[[Para [Str "Minus",Space,Str "1"]]
|
||||
,[Para [Str "Minus",Space,Str "2"]]
|
||||
,[Para [Str "Minus",Space,Str "3"]]]
|
||||
,Header 2 [Str "Ordered"]
|
||||
,Header 2 ("ordered",[],[]) [Str "Ordered"]
|
||||
,Para [Str "Tight:"]
|
||||
,OrderedList (1,Decimal,Period)
|
||||
[[Plain [Str "First"]]
|
||||
|
|
@ -103,7 +103,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Item",Space,Str "1.",Space,Str "graf",Space,Str "two.",Space,Str "The",Space,Str "quick",Space,Str "brown",Space,Str "fox",Space,Str "jumped",Space,Str "over",Space,Str "the",Space,Str "lazy",Space,Str "dog\8217s",Space,Str "back."]]
|
||||
,[Para [Str "Item",Space,Str "2."]]
|
||||
,[Para [Str "Item",Space,Str "3."]]]
|
||||
,Header 2 [Str "Nested"]
|
||||
,Header 2 ("nested",[],[]) [Str "Nested"]
|
||||
,BulletList
|
||||
[[Plain [Str "Tab"]
|
||||
,BulletList
|
||||
|
|
@ -128,14 +128,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,[Plain [Str "Fie"]]
|
||||
,[Plain [Str "Foe"]]]]
|
||||
,[Para [Str "Third"]]]
|
||||
,Header 2 [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,Header 2 ("tabs-and-spaces",[],[]) [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]]]]]
|
||||
,Header 2 [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,Header 2 ("fancy-list-markers",[],[]) [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,OrderedList (2,Decimal,TwoParens)
|
||||
[[Plain [Str "begins",Space,Str "with",Space,Str "2"]]
|
||||
,[Para [Str "and",Space,Str "now",Space,Str "3"]
|
||||
|
|
@ -165,7 +165,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "M.A.\160\&2007"]
|
||||
,Para [Str "B.",Space,Str "Williams"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Definition",Space,Str "Lists"]
|
||||
,Header 1 ("definition-lists",[],[]) [Str "Definition",Space,Str "Lists"]
|
||||
,Para [Str "Tight",Space,Str "using",Space,Str "spaces:"]
|
||||
,DefinitionList
|
||||
[([Str "apple"],
|
||||
|
|
@ -226,7 +226,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,OrderedList (1,Decimal,Period)
|
||||
[[Plain [Str "sublist"]]
|
||||
,[Plain [Str "sublist"]]]]])]
|
||||
,Header 1 [Str "HTML",Space,Str "Blocks"]
|
||||
,Header 1 ("html-blocks",[],[]) [Str "HTML",Space,Str "Blocks"]
|
||||
,Para [Str "Simple",Space,Str "block",Space,Str "on",Space,Str "one",Space,Str "line:"]
|
||||
,RawBlock "html" "<div>"
|
||||
,Plain [Str "foo"]
|
||||
|
|
@ -268,7 +268,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Hr\8217s:"]
|
||||
,RawBlock "html" "<hr>\n\n<hr />\n\n<hr />\n\n<hr> \n\n<hr /> \n\n<hr /> \n\n<hr class=\"foo\" id=\"bar\" />\n\n<hr class=\"foo\" id=\"bar\" />\n\n<hr class=\"foo\" id=\"bar\">\n"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Inline",Space,Str "Markup"]
|
||||
,Header 1 ("inline-markup",[],[]) [Str "Inline",Space,Str "Markup"]
|
||||
,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ",",Space,Str "and",Space,Str "so",Space,Emph [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "This",Space,Str "is",Space,Strong [Str "strong"],Str ",",Space,Str "and",Space,Str "so",Space,Strong [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "An",Space,Emph [Link [Str "emphasized",Space,Str "link"] ("/url","")],Str "."]
|
||||
|
|
@ -282,7 +282,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Subscripts:",Space,Str "H",Subscript [Str "2"],Str "O,",Space,Str "H",Subscript [Str "23"],Str "O,",Space,Str "H",Subscript [Str "many\160of\160them"],Str "O."]
|
||||
,Para [Str "These",Space,Str "should",Space,Str "not",Space,Str "be",Space,Str "superscripts",Space,Str "or",Space,Str "subscripts,",Space,Str "because",Space,Str "of",Space,Str "the",Space,Str "unescaped",Space,Str "spaces:",Space,Str "a^b",Space,Str "c^d,",Space,Str "a~b",Space,Str "c~d."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Header 1 ("smart-quotes-ellipses-dashes",[],[]) [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Para [Quoted DoubleQuote [Str "Hello,"],Space,Str "said",Space,Str "the",Space,Str "spider.",Space,Quoted DoubleQuote [Quoted SingleQuote [Str "Shelob"],Space,Str "is",Space,Str "my",Space,Str "name."]]
|
||||
,Para [Quoted SingleQuote [Str "A"],Str ",",Space,Quoted SingleQuote [Str "B"],Str ",",Space,Str "and",Space,Quoted SingleQuote [Str "C"],Space,Str "are",Space,Str "letters."]
|
||||
,Para [Quoted SingleQuote [Str "Oak,"],Space,Quoted SingleQuote [Str "elm,"],Space,Str "and",Space,Quoted SingleQuote [Str "beech"],Space,Str "are",Space,Str "names",Space,Str "of",Space,Str "trees.",Space,Str "So",Space,Str "is",Space,Quoted SingleQuote [Str "pine."]]
|
||||
|
|
@ -292,7 +292,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Dashes",Space,Str "between",Space,Str "numbers:",Space,Str "5\8211\&7,",Space,Str "255\8211\&66,",Space,Str "1987\8211\&1999."]
|
||||
,Para [Str "Ellipses\8230and\8230and\8230."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "LaTeX"]
|
||||
,Header 1 ("latex",[],[]) [Str "LaTeX"]
|
||||
,BulletList
|
||||
[[Plain [RawInline "tex" "\\cite[22-23]{smith.1899}"]]
|
||||
,[Plain [Math InlineMath "2+2=4"]]
|
||||
|
|
@ -311,7 +311,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "LaTeX",Space,Str "table:"]
|
||||
,RawBlock "latex" "\\begin{tabular}{|l|l|}\\hline\nAnimal & Number \\\\ \\hline\nDog & 2 \\\\\nCat & 1 \\\\ \\hline\n\\end{tabular}"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Special",Space,Str "Characters"]
|
||||
,Header 1 ("special-characters",[],[]) [Str "Special",Space,Str "Characters"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "some",Space,Str "unicode:"]
|
||||
,BulletList
|
||||
[[Plain [Str "I",Space,Str "hat:",Space,Str "\206"]]
|
||||
|
|
@ -341,8 +341,8 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Plus:",Space,Str "+"]
|
||||
,Para [Str "Minus:",Space,Str "-"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Links"]
|
||||
,Header 2 [Str "Explicit"]
|
||||
,Header 1 ("links",[],[]) [Str "Links"]
|
||||
,Header 2 ("explicit",[],[]) [Str "Explicit"]
|
||||
,Para [Str "Just",Space,Str "a",Space,Link [Str "URL"] ("/url/",""),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/","title"),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/","title preceded by two spaces"),Str "."]
|
||||
|
|
@ -352,7 +352,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Link [Str "with_underscore"] ("/url/with_underscore","")]
|
||||
,Para [Link [Str "Email",Space,Str "link"] ("mailto:nobody@nowhere.net","")]
|
||||
,Para [Link [Str "Empty"] ("",""),Str "."]
|
||||
,Header 2 [Str "Reference"]
|
||||
,Header 2 ("reference",[],[]) [Str "Reference"]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
|
|
@ -365,12 +365,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,CodeBlock ("",[],[]) "[not]: /url"
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/","Title with \"quotes\" inside"),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "biz"] ("/url/","Title with \"quote\" inside"),Str "."]
|
||||
,Header 2 [Str "With",Space,Str "ampersands"]
|
||||
,Header 2 ("with-ampersands",[],[]) [Str "With",Space,Str "ampersands"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Link [Str "link",Space,Str "with",Space,Str "an",Space,Str "ampersand",Space,Str "in",Space,Str "the",Space,Str "URL"] ("http://example.com/?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "link",Space,Str "with",Space,Str "an",Space,Str "amersand",Space,Str "in",Space,Str "the",Space,Str "link",Space,Str "text:",Space,Link [Str "AT&T"] ("http://att.com/","AT&T"),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "an",Space,Link [Str "inline",Space,Str "link"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "an",Space,Link [Str "inline",Space,Str "link",Space,Str "in",Space,Str "pointy",Space,Str "braces"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Header 2 [Str "Autolinks"]
|
||||
,Header 2 ("autolinks",[],[]) [Str "Autolinks"]
|
||||
,Para [Str "With",Space,Str "an",Space,Str "ampersand:",Space,Link [Str "http://example.com/?foo=1&bar=2"] ("http://example.com/?foo=1&bar=2","")]
|
||||
,BulletList
|
||||
[[Plain [Str "In",Space,Str "a",Space,Str "list?"]]
|
||||
|
|
@ -382,12 +382,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Auto-links",Space,Str "should",Space,Str "not",Space,Str "occur",Space,Str "here:",Space,Code ("",[],[]) "<http://example.com/>"]
|
||||
,CodeBlock ("",[],[]) "or here: <http://example.com/>"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Images"]
|
||||
,Header 1 ("images",[],[]) [Str "Images"]
|
||||
,Para [Str "From",Space,Quoted DoubleQuote [Str "Voyage",Space,Str "dans",Space,Str "la",Space,Str "Lune"],Space,Str "by",Space,Str "Georges",Space,Str "Melies",Space,Str "(1902):"]
|
||||
,Para [Image [Str "lalune"] ("lalune.jpg","Voyage dans la Lune")]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "movie",Space,Image [Str "movie"] ("movie.jpg",""),Space,Str "icon."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Footnotes"]
|
||||
,Header 1 ("footnotes",[],[]) [Str "Footnotes"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Note [Para [Str "Here",Space,Str "is",Space,Str "the",Space,Str "footnote.",Space,Str "It",Space,Str "can",Space,Str "go",Space,Str "anywhere",Space,Str "after",Space,Str "the",Space,Str "footnote",Space,Str "reference.",Space,Str "It",Space,Str "need",Space,Str "not",Space,Str "be",Space,Str "placed",Space,Str "at",Space,Str "the",Space,Str "end",Space,Str "of",Space,Str "the",Space,Str "document."]],Space,Str "and",Space,Str "another.",Note [Para [Str "Here\8217s",Space,Str "the",Space,Str "long",Space,Str "note.",Space,Str "This",Space,Str "one",Space,Str "contains",Space,Str "multiple",Space,Str "blocks."],Para [Str "Subsequent",Space,Str "blocks",Space,Str "are",Space,Str "indented",Space,Str "to",Space,Str "show",Space,Str "that",Space,Str "they",Space,Str "belong",Space,Str "to",Space,Str "the",Space,Str "footnote",Space,Str "(as",Space,Str "with",Space,Str "list",Space,Str "items)."],CodeBlock ("",[],[]) " { <code> }",Para [Str "If",Space,Str "you",Space,Str "want,",Space,Str "you",Space,Str "can",Space,Str "indent",Space,Str "every",Space,Str "line,",Space,Str "but",Space,Str "you",Space,Str "can",Space,Str "also",Space,Str "be",Space,Str "lazy",Space,Str "and",Space,Str "just",Space,Str "indent",Space,Str "the",Space,Str "first",Space,Str "line",Space,Str "of",Space,Str "each",Space,Str "block."]],Space,Str "This",Space,Str "should",Space,Emph [Str "not"],Space,Str "be",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Space,Str "because",Space,Str "it",Space,Str "contains",Space,Str "a",Space,Str "space.[^my",Space,Str "note]",Space,Str "Here",Space,Str "is",Space,Str "an",Space,Str "inline",Space,Str "note.",Note [Para [Str "This",Space,Str "is",Space,Emph [Str "easier"],Space,Str "to",Space,Str "type.",Space,Str "Inline",Space,Str "notes",Space,Str "may",Space,Str "contain",Space,Link [Str "links"] ("http://google.com",""),Space,Str "and",Space,Code ("",[],[]) "]",Space,Str "verbatim",Space,Str "characters,",Space,Str "as",Space,Str "well",Space,Str "as",Space,Str "[bracketed",Space,Str "text]."]]]
|
||||
,BlockQuote
|
||||
[Para [Str "Notes",Space,Str "can",Space,Str "go",Space,Str "in",Space,Str "quotes.",Note [Para [Str "In",Space,Str "quote."]]]]
|
||||
|
|
|
|||
|
|
@ -1,13 +1,13 @@
|
|||
Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "set",Space,Str "of",Space,Str "tests",Space,Str "for",Space,Str "pandoc",Space,Str "Textile",Space,Str "Reader",Str ".",Space,Str "Part",Space,Str "of",Space,Str "it",Space,Str "comes",LineBreak,Str "from",Space,Str "John",Space,Str "Gruber",Str "\8217",Str "s",Space,Str "markdown",Space,Str "test",Space,Str "suite",Str "."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Headers"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embeded",Space,Str "link"] ("http://www.example.com","")]
|
||||
,Header 3 [Str "Level",Space,Str "3",Space,Str "with",Space,Strong [Str "emphasis"]]
|
||||
,Header 4 [Str "Level",Space,Str "4"]
|
||||
,Header 5 [Str "Level",Space,Str "5"]
|
||||
,Header 6 [Str "Level",Space,Str "6"]
|
||||
,Header 1 [Str "Paragraphs"]
|
||||
,Header 1 ("",[],[]) [Str "Headers"]
|
||||
,Header 2 ("",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embeded",Space,Str "link"] ("http://www.example.com","")]
|
||||
,Header 3 ("",[],[]) [Str "Level",Space,Str "3",Space,Str "with",Space,Strong [Str "emphasis"]]
|
||||
,Header 4 ("",[],[]) [Str "Level",Space,Str "4"]
|
||||
,Header 5 ("",[],[]) [Str "Level",Space,Str "5"]
|
||||
,Header 6 ("",[],[]) [Str "Level",Space,Str "6"]
|
||||
,Header 1 ("",[],[]) [Str "Paragraphs"]
|
||||
,Para [Str "Here",Str "\8217",Str "s",Space,Str "a",Space,Str "regular",Space,Str "paragraph",Str "."]
|
||||
,Para [Str "Line",Space,Str "breaks",Space,Str "are",Space,Str "preserved",Space,Str "in",Space,Str "textile",Str ",",Space,Str "so",Space,Str "you",Space,Str "can",Space,Str "not",Space,Str "wrap",Space,Str "your",Space,Str "very",LineBreak,Str "long",Space,Str "paragraph",Space,Str "with",Space,Str "your",Space,Str "favourite",Space,Str "text",Space,Str "editor",Space,Str "and",Space,Str "have",Space,Str "it",Space,Str "rendered",LineBreak,Str "with",Space,Str "no",Space,Str "break",Str "."]
|
||||
,Para [Str "Here",Str "\8217",Str "s",Space,Str "one",Space,Str "with",Space,Str "a",Space,Str "bullet",Str "."]
|
||||
|
|
@ -16,23 +16,23 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,Para [Str "There",Space,Str "should",Space,Str "be",Space,Str "a",Space,Str "paragraph",Space,Str "break",Space,Str "between",Space,Str "here"]
|
||||
,Para [Str "and",Space,Str "here",Str "."]
|
||||
,Para [Str "pandoc",Space,Str "converts",Space,Str "textile",Str "."]
|
||||
,Header 1 [Str "Block",Space,Str "Quotes"]
|
||||
,Header 1 ("",[],[]) [Str "Block",Space,Str "Quotes"]
|
||||
,BlockQuote
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "famous",Space,Str "quote",Space,Str "from",Space,Str "somebody",Str ".",Space,Str "He",Space,Str "had",Space,Str "a",Space,Str "lot",Space,Str "of",Space,Str "things",Space,Str "to",LineBreak,Str "say",Str ",",Space,Str "so",Space,Str "the",Space,Str "text",Space,Str "is",Space,Str "really",Space,Str "really",Space,Str "long",Space,Str "and",Space,Str "spans",Space,Str "on",Space,Str "multiple",Space,Str "lines",Str "."]]
|
||||
,Para [Str "And",Space,Str "a",Space,Str "following",Space,Str "paragraph",Str "."]
|
||||
,Header 1 [Str "Code",Space,Str "Blocks"]
|
||||
,Header 1 ("",[],[]) [Str "Code",Space,Str "Blocks"]
|
||||
,Para [Str "Code",Str ":"]
|
||||
,CodeBlock ("",[],[]) " ---- (should be four hyphens)\n\n sub status {\n print \"working\";\n }\n\n this code block is indented by one tab"
|
||||
,Para [Str "And",Str ":"]
|
||||
,CodeBlock ("",[],[]) " this code block is indented by two tabs\n\n These should not be escaped: \\$ \\\\ \\> \\[ \\{"
|
||||
,CodeBlock ("",[],[]) "Code block with .bc\n continued\n @</\\\n"
|
||||
,Para [Str "Inline",Space,Str "code",Str ":",Space,Code ("",[],[]) "<tt>",Str ",",Space,Code ("",[],[]) "@",Str "."]
|
||||
,Header 1 [Str "Notextile"]
|
||||
,Header 1 ("",[],[]) [Str "Notextile"]
|
||||
,Para [Str "A",Space,Str "block",Space,Str "of",Space,Str "text",Space,Str "can",Space,Str "be",Space,Str "protected",Space,Str "with",Space,Str "notextile",Space,Str ":"]
|
||||
,Para [Str "\nNo *bold* and\n* no bullet\n"]
|
||||
,Para [Str "and",Space,Str "inlines",Space,Str "can",Space,Str "be",Space,Str "protected",Space,Str "with",Space,Str "double *equals (=)* markup",Str "."]
|
||||
,Header 1 [Str "Lists"]
|
||||
,Header 2 [Str "Unordered"]
|
||||
,Header 1 ("",[],[]) [Str "Lists"]
|
||||
,Header 2 ("",[],[]) [Str "Unordered"]
|
||||
,Para [Str "Asterisks",Space,Str "tight",Str ":"]
|
||||
,BulletList
|
||||
[[Plain [Str "asterisk",Space,Str "1"]]
|
||||
|
|
@ -42,13 +42,13 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,BulletList
|
||||
[[Plain [Str "asterisk",Space,Str "1",LineBreak,Str "newline"]]
|
||||
,[Plain [Str "asterisk",Space,Str "2"]]]
|
||||
,Header 2 [Str "Ordered"]
|
||||
,Header 2 ("",[],[]) [Str "Ordered"]
|
||||
,Para [Str "Tight",Str ":"]
|
||||
,OrderedList (1,DefaultStyle,DefaultDelim)
|
||||
[[Plain [Str "First"]]
|
||||
,[Plain [Str "Second"]]
|
||||
,[Plain [Str "Third"]]]
|
||||
,Header 2 [Str "Nested"]
|
||||
,Header 2 ("",[],[]) [Str "Nested"]
|
||||
,BulletList
|
||||
[[Plain [Str "ui",Space,Str "1"]
|
||||
,BulletList
|
||||
|
|
@ -63,7 +63,7 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,BulletList
|
||||
[[Plain [Str "ui",Space,Str "2",Str ".",Str "1",Str ".",Str "1"]]
|
||||
,[Plain [Str "ui",Space,Str "2",Str ".",Str "1",Str ".",Str "2"]]]]]]]
|
||||
,Header 2 [Str "Definition",Space,Str "List"]
|
||||
,Header 2 ("",[],[]) [Str "Definition",Space,Str "List"]
|
||||
,DefinitionList
|
||||
[([Str "coffee"],
|
||||
[[Plain [Str "Hot",Space,Str "and",Space,Str "black"]]])
|
||||
|
|
@ -74,23 +74,23 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,Para [Str "Cold",Space,Str "drink",Space,Str "that",Space,Str "goes",Space,Str "great",Space,Str "with",Space,Str "cookies",Str "."]]])
|
||||
,([Str "beer"],
|
||||
[[Plain [Str "fresh",Space,Str "and",Space,Str "bitter"]]])]
|
||||
,Header 1 [Str "Inline",Space,Str "Markup"]
|
||||
,Header 1 ("",[],[]) [Str "Inline",Space,Str "Markup"]
|
||||
,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ",",Space,Str "and",Space,Str "so",Space,Emph [Str "is",Space,Str "this"],Str ".",LineBreak,Str "This",Space,Str "is",Space,Strong [Str "strong"],Str ",",Space,Str "and",Space,Str "so",Space,Strong [Str "is",Space,Str "this"],Str ".",LineBreak,Str "Hyphenated-words-are-ok",Str ",",Space,Str "as",Space,Str "well",Space,Str "as",Space,Str "strange_underscore_notation",Str ".",LineBreak,Str "A",Space,Link [Strong [Str "strong",Space,Str "link"]] ("http://www.foobar.com",""),Str "."]
|
||||
,Para [Emph [Strong [Str "This",Space,Str "is",Space,Str "strong",Space,Str "and",Space,Str "em",Str "."]],LineBreak,Str "So",Space,Str "is",Space,Strong [Emph [Str "this"]],Space,Str "word",Space,Str "and",Space,Emph [Strong [Str "that",Space,Str "one"]],Str ".",LineBreak,Strikeout [Str "This",Space,Str "is",Space,Str "strikeout",Space,Str "and",Space,Strong [Str "strong"]]]
|
||||
,Para [Str "Superscripts",Str ":",Space,Str "a",Superscript [Str "bc"],Str "d",Space,Str "a",Superscript [Strong [Str "hello"]],Space,Str "a",Superscript [Str "hello",Space,Str "there"],Str ".",LineBreak,Str "Subscripts",Str ":",Space,Subscript [Str "here"],Space,Str "H",Subscript [Str "2"],Str "O",Str ",",Space,Str "H",Subscript [Str "23"],Str "O",Str ",",Space,Str "H",Subscript [Str "many",Space,Str "of",Space,Str "them"],Str "O",Str "."]
|
||||
,Para [Str "Dashes",Space,Str ":",Space,Str "How",Space,Str "cool",Space,Str "\8212",Space,Str "automatic",Space,Str "dashes",Str "."]
|
||||
,Para [Str "Elipses",Space,Str ":",Space,Str "He",Space,Str "thought",Space,Str "and",Space,Str "thought",Space,Str "\8230",Space,Str "and",Space,Str "then",Space,Str "thought",Space,Str "some",Space,Str "more",Str "."]
|
||||
,Para [Str "Quotes",Space,Str "and",Space,Str "apostrophes",Space,Str ":",Space,Quoted DoubleQuote [Str "I",Str "\8217",Str "d",Space,Str "like",Space,Str "to",Space,Str "thank",Space,Str "you"],Space,Str "for",Space,Str "example",Str "."]
|
||||
,Header 1 [Str "Links"]
|
||||
,Header 2 [Str "Explicit"]
|
||||
,Header 1 ("",[],[]) [Str "Links"]
|
||||
,Header 2 ("",[],[]) [Str "Explicit"]
|
||||
,Para [Str "Just",Space,Str "a",Space,Link [Str "url"] ("http://www.url.com","")]
|
||||
,Para [Link [Str "Email",Space,Str "link"] ("mailto:nobody@nowhere.net","")]
|
||||
,Para [Str "Automatic",Space,Str "linking",Space,Str "to",Space,Link [Str "http://www.example.com"] ("http://www.example.com",""),Str "."]
|
||||
,Para [Link [Str "Example"] ("http://www.example.com/",""),Str ":",Space,Str "Example",Space,Str "of",Space,Str "a",Space,Str "link",Space,Str "followed",Space,Str "by",Space,Str "a",Space,Str "colon",Str "."]
|
||||
,Para [Str "A",Space,Str "link",Link [Str "with",Space,Str "brackets"] ("http://www.example.com",""),Str "and",Space,Str "no",Space,Str "spaces",Str "."]
|
||||
,Header 1 [Str "Tables"]
|
||||
,Header 1 ("",[],[]) [Str "Tables"]
|
||||
,Para [Str "Textile",Space,Str "allows",Space,Str "tables",Space,Str "with",Space,Str "and",Space,Str "without",Space,Str "headers",Space,Str ":"]
|
||||
,Header 2 [Str "Without",Space,Str "headers"]
|
||||
,Header 2 ("",[],[]) [Str "Without",Space,Str "headers"]
|
||||
,Table [] [AlignDefault,AlignDefault,AlignDefault] [0.0,0.0,0.0]
|
||||
[]
|
||||
[[[Plain [Str "name"]]
|
||||
|
|
@ -106,7 +106,7 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,[Plain [Str "45"]]
|
||||
,[Plain [Str "f"]]]]
|
||||
,Para [Str "and",Space,Str "some",Space,Str "text",Space,Str "following",Space,Str "\8230"]
|
||||
,Header 2 [Str "With",Space,Str "headers"]
|
||||
,Header 2 ("",[],[]) [Str "With",Space,Str "headers"]
|
||||
,Table [] [AlignDefault,AlignDefault,AlignDefault] [0.0,0.0,0.0]
|
||||
[[Plain [Str "name"]]
|
||||
,[Plain [Str "age"]]
|
||||
|
|
@ -120,10 +120,10 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,[[Plain [Str "bella"]]
|
||||
,[Plain [Str "45"]]
|
||||
,[Plain [Str "f"]]]]
|
||||
,Header 1 [Str "Images"]
|
||||
,Header 1 ("",[],[]) [Str "Images"]
|
||||
,Para [Str "Textile",Space,Str "inline",Space,Str "image",Space,Str "syntax",Str ",",Space,Str "like",Space,LineBreak,Str "here",Space,Image [Str "this is the alt text"] ("this_is_an_image.png","this is the alt text"),LineBreak,Str "and",Space,Str "here",Space,Image [Str ""] ("this_is_an_image.png",""),Str "."]
|
||||
,Header 1 [Str "Attributes"]
|
||||
,Header 2 [Str "HTML",Space,Str "and",Space,Str "CSS",Space,Str "attributes",Space,Str "are",Space,Str "ignored"]
|
||||
,Header 1 ("",[],[]) [Str "Attributes"]
|
||||
,Header 2 ("",[],[]) [Str "HTML",Space,Str "and",Space,Str "CSS",Space,Str "attributes",Space,Str "are",Space,Str "ignored"]
|
||||
,Para [Str "as",Space,Str "well",Space,Str "as",Space,Strong [Str "inline",Space,Str "attributes"],Space,Str "of",Space,Str " all kind"]
|
||||
,Para [Str "and",Space,Str "paragraph",Space,Str "attributes",Str ",",Space,Str "and",Space,Str "table",Space,Str "attributes",Str "."]
|
||||
,Table [] [AlignDefault,AlignDefault,AlignDefault] [0.0,0.0,0.0]
|
||||
|
|
@ -134,7 +134,7 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
,[[Plain [Str "joan"]]
|
||||
,[Plain [Str "24"]]
|
||||
,[Plain [Str "f"]]]]
|
||||
,Header 1 [Str "Raw",Space,Str "HTML"]
|
||||
,Header 1 ("",[],[]) [Str "Raw",Space,Str "HTML"]
|
||||
,Para [Str "However",Str ",",Space,RawInline "html" "<strong>",Space,Str "raw",Space,Str "HTML",Space,Str "inlines",Space,RawInline "html" "</strong>",Space,Str "are",Space,Str "accepted",Str ",",Space,Str "as",Space,Str "well",Space,Str "as",Space,Str ":"]
|
||||
,RawBlock "html" "<div class=\"foobar\">"
|
||||
,Para [Str "any",Space,Strong [Str "Raw",Space,Str "HTML",Space,Str "Block"],Space,Str "with",Space,Str "bold",LineBreak]
|
||||
|
|
@ -148,18 +148,18 @@ Pandoc (Meta {docTitle = [], docAuthors = [], docDate = []})
|
|||
[[Plain [Str "this",Space,Str "<",Str "div",Str ">",Space,Str "won",Str "\8217",Str "t",Space,Str "produce",Space,Str "raw",Space,Str "html",Space,Str "blocks",Space,Str "<",Str "/div",Str ">"]]
|
||||
,[Plain [Str "but",Space,Str "this",Space,RawInline "html" "<strong>",Space,Str "will",Space,Str "produce",Space,Str "inline",Space,Str "html",Space,RawInline "html" "</strong>"]]]
|
||||
,Para [Str "Can",Space,Str "you",Space,Str "prove",Space,Str "that",Space,Str "2",Space,Str "<",Space,Str "3",Space,Str "?"]
|
||||
,Header 1 [Str "Raw",Space,Str "LaTeX"]
|
||||
,Header 1 ("",[],[]) [Str "Raw",Space,Str "LaTeX"]
|
||||
,Para [Str "This",Space,Str "Textile",Space,Str "reader",Space,Str "also",Space,Str "accepts",Space,Str "raw",Space,Str "LaTeX",Space,Str "for",Space,Str "blocks",Space,Str ":"]
|
||||
,RawBlock "latex" "\\begin{itemize}\n \\item one\n \\item two\n\\end{itemize}"
|
||||
,Para [Str "and",Space,Str "for",Space,RawInline "latex" "\\emph{inlines}",Str "."]
|
||||
,Header 1 [Str "Acronyms",Space,Str "and",Space,Str "marks"]
|
||||
,Header 1 ("",[],[]) [Str "Acronyms",Space,Str "and",Space,Str "marks"]
|
||||
,Para [Str "PBS (Public Broadcasting System)"]
|
||||
,Para [Str "Hi",Str "\8482"]
|
||||
,Para [Str "Hi",Space,Str "\8482"]
|
||||
,Para [Str "\174",Space,Str "Hi",Str "\174"]
|
||||
,Para [Str "Hi",Str "\169",Str "2008",Space,Str "\169",Space,Str "2008"]
|
||||
,Header 1 [Str "Footnotes"]
|
||||
,Header 1 ("",[],[]) [Str "Footnotes"]
|
||||
,Para [Str "A",Space,Str "note",Str ".",Note [Para [Str "The",Space,Str "note",LineBreak,Str "is",Space,Str "here",Str "!"]],Space,Str "Another",Space,Str "note",Note [Para [Str "Other",Space,Str "note",Str "."]],Str "."]
|
||||
,Header 1 [Str "Comment",Space,Str "blocks"]
|
||||
,Header 1 ("",[],[]) [Str "Comment",Space,Str "blocks"]
|
||||
,Null
|
||||
,Para [Str "not",Space,Str "a",Space,Str "comment",Str "."]]
|
||||
|
|
|
|||
|
|
@ -9,31 +9,40 @@ markdown test suite.
|
|||
|
||||
'''''
|
||||
|
||||
[[headers]]
|
||||
Headers
|
||||
-------
|
||||
|
||||
[[level-2-with-an-embedded-link]]
|
||||
Level 2 with an link:/url[embedded link]
|
||||
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
||||
|
||||
[[level-3-with-emphasis]]
|
||||
Level 3 with _emphasis_
|
||||
^^^^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
[[level-4]]
|
||||
Level 4
|
||||
+++++++
|
||||
|
||||
[[level-5]]
|
||||
Level 5
|
||||
|
||||
[[level-1]]
|
||||
Level 1
|
||||
-------
|
||||
|
||||
[[level-2-with-emphasis]]
|
||||
Level 2 with _emphasis_
|
||||
~~~~~~~~~~~~~~~~~~~~~~~
|
||||
|
||||
[[level-3]]
|
||||
Level 3
|
||||
^^^^^^^
|
||||
|
||||
with no blank line
|
||||
|
||||
[[level-2]]
|
||||
Level 2
|
||||
~~~~~~~
|
||||
|
||||
|
|
@ -41,6 +50,7 @@ with no blank line
|
|||
|
||||
'''''
|
||||
|
||||
[[paragraphs]]
|
||||
Paragraphs
|
||||
----------
|
||||
|
||||
|
|
@ -57,6 +67,7 @@ here.
|
|||
|
||||
'''''
|
||||
|
||||
[[block-quotes]]
|
||||
Block Quotes
|
||||
------------
|
||||
|
||||
|
|
@ -100,6 +111,7 @@ And a following paragraph.
|
|||
|
||||
'''''
|
||||
|
||||
[[code-blocks]]
|
||||
Code Blocks
|
||||
-----------
|
||||
|
||||
|
|
@ -125,9 +137,11 @@ These should not be escaped: \$ \\ \> \[ \{
|
|||
|
||||
'''''
|
||||
|
||||
[[lists]]
|
||||
Lists
|
||||
-----
|
||||
|
||||
[[unordered]]
|
||||
Unordered
|
||||
~~~~~~~~~
|
||||
|
||||
|
|
@ -167,6 +181,7 @@ Minuses loose:
|
|||
* Minus 2
|
||||
* Minus 3
|
||||
|
||||
[[ordered]]
|
||||
Ordered
|
||||
~~~~~~~
|
||||
|
||||
|
|
@ -202,6 +217,7 @@ Item 1. graf two. The quick brown fox jumped over the lazy dog’s back.
|
|||
2. Item 2.
|
||||
3. Item 3.
|
||||
|
||||
[[nested]]
|
||||
Nested
|
||||
~~~~~~
|
||||
|
||||
|
|
@ -227,6 +243,7 @@ Same thing but with paragraphs:
|
|||
* Foe
|
||||
3. Third
|
||||
|
||||
[[tabs-and-spaces]]
|
||||
Tabs and spaces
|
||||
~~~~~~~~~~~~~~~
|
||||
|
||||
|
|
@ -235,6 +252,7 @@ Tabs and spaces
|
|||
** this is an example list item indented with tabs
|
||||
** this is an example list item indented with spaces
|
||||
|
||||
[[fancy-list-markers]]
|
||||
Fancy list markers
|
||||
~~~~~~~~~~~~~~~~~~
|
||||
|
||||
|
|
@ -268,6 +286,7 @@ B. Williams
|
|||
|
||||
'''''
|
||||
|
||||
[[definition-lists]]
|
||||
Definition Lists
|
||||
----------------
|
||||
|
||||
|
|
@ -349,6 +368,7 @@ orange::
|
|||
1. sublist
|
||||
2. sublist
|
||||
|
||||
[[html-blocks]]
|
||||
HTML Blocks
|
||||
-----------
|
||||
|
||||
|
|
@ -405,6 +425,7 @@ Hr’s:
|
|||
|
||||
'''''
|
||||
|
||||
[[inline-markup]]
|
||||
Inline Markup
|
||||
-------------
|
||||
|
||||
|
|
@ -435,6 +456,7 @@ spaces: a^b c^d, a~b c~d.
|
|||
|
||||
'''''
|
||||
|
||||
[[smart-quotes-ellipses-dashes]]
|
||||
Smart quotes, ellipses, dashes
|
||||
------------------------------
|
||||
|
||||
|
|
@ -457,6 +479,7 @@ Ellipses…and…and….
|
|||
|
||||
'''''
|
||||
|
||||
[[latex]]
|
||||
LaTeX
|
||||
-----
|
||||
|
||||
|
|
@ -483,6 +506,7 @@ Here’s a LaTeX table:
|
|||
|
||||
'''''
|
||||
|
||||
[[special-characters]]
|
||||
Special Characters
|
||||
------------------
|
||||
|
||||
|
|
@ -538,9 +562,11 @@ Minus: -
|
|||
|
||||
'''''
|
||||
|
||||
[[links]]
|
||||
Links
|
||||
-----
|
||||
|
||||
[[explicit]]
|
||||
Explicit
|
||||
~~~~~~~~
|
||||
|
||||
|
|
@ -562,6 +588,7 @@ mailto:nobody@nowhere.net[Email link]
|
|||
|
||||
link:[Empty].
|
||||
|
||||
[[reference]]
|
||||
Reference
|
||||
~~~~~~~~~
|
||||
|
||||
|
|
@ -591,6 +618,7 @@ Foo link:/url/[bar].
|
|||
|
||||
Foo link:/url/[biz].
|
||||
|
||||
[[with-ampersands]]
|
||||
With ampersands
|
||||
~~~~~~~~~~~~~~~
|
||||
|
||||
|
|
@ -602,6 +630,7 @@ Here’s an link:/script?foo=1&bar=2[inline link].
|
|||
|
||||
Here’s an link:/script?foo=1&bar=2[inline link in pointy braces].
|
||||
|
||||
[[autolinks]]
|
||||
Autolinks
|
||||
~~~~~~~~~
|
||||
|
||||
|
|
@ -625,6 +654,7 @@ or here: <http://example.com/>
|
|||
|
||||
'''''
|
||||
|
||||
[[images]]
|
||||
Images
|
||||
------
|
||||
|
||||
|
|
@ -636,6 +666,7 @@ Here is a movie image:movie.jpg[movie] icon.
|
|||
|
||||
'''''
|
||||
|
||||
[[footnotes]]
|
||||
Footnotes
|
||||
---------
|
||||
|
||||
|
|
|
|||
|
|
@ -1,25 +1,25 @@
|
|||
Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docAuthors = [[Str "John",Space,Str "MacFarlane"],[Str "Anonymous"]], docDate = [Str "July",Space,Str "17,",Space,Str "2006"]})
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "set",Space,Str "of",Space,Str "tests",Space,Str "for",Space,Str "pandoc.",Space,Str "Most",Space,Str "of",Space,Str "them",Space,Str "are",Space,Str "adapted",Space,Str "from",Space,Str "John",Space,Str "Gruber\8217s",Space,Str "markdown",Space,Str "test",Space,Str "suite."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Headers"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 4 [Str "Level",Space,Str "4"]
|
||||
,Header 5 [Str "Level",Space,Str "5"]
|
||||
,Header 1 [Str "Level",Space,Str "1"]
|
||||
,Header 2 [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 [Str "Level",Space,Str "3"]
|
||||
,Header 1 ("headers",[],[]) [Str "Headers"]
|
||||
,Header 2 ("level-2-with-an-embedded-link",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Str "an",Space,Link [Str "embedded",Space,Str "link"] ("/url","")]
|
||||
,Header 3 ("level-3-with-emphasis",[],[]) [Str "Level",Space,Str "3",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 4 ("level-4",[],[]) [Str "Level",Space,Str "4"]
|
||||
,Header 5 ("level-5",[],[]) [Str "Level",Space,Str "5"]
|
||||
,Header 1 ("level-1",[],[]) [Str "Level",Space,Str "1"]
|
||||
,Header 2 ("level-2-with-emphasis",[],[]) [Str "Level",Space,Str "2",Space,Str "with",Space,Emph [Str "emphasis"]]
|
||||
,Header 3 ("level-3",[],[]) [Str "Level",Space,Str "3"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,Header 2 [Str "Level",Space,Str "2"]
|
||||
,Header 2 ("level-2",[],[]) [Str "Level",Space,Str "2"]
|
||||
,Para [Str "with",Space,Str "no",Space,Str "blank",Space,Str "line"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Paragraphs"]
|
||||
,Header 1 ("paragraphs",[],[]) [Str "Paragraphs"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "regular",Space,Str "paragraph."]
|
||||
,Para [Str "In",Space,Str "Markdown",Space,Str "1.0.0",Space,Str "and",Space,Str "earlier.",Space,Str "Version",Space,Str "8.",Space,Str "This",Space,Str "line",Space,Str "turns",Space,Str "into",Space,Str "a",Space,Str "list",Space,Str "item.",Space,Str "Because",Space,Str "a",Space,Str "hard-wrapped",Space,Str "line",Space,Str "in",Space,Str "the",Space,Str "middle",Space,Str "of",Space,Str "a",Space,Str "paragraph",Space,Str "looked",Space,Str "like",Space,Str "a",Space,Str "list",Space,Str "item."]
|
||||
,Para [Str "Here\8217s",Space,Str "one",Space,Str "with",Space,Str "a",Space,Str "bullet.",Space,Str "*",Space,Str "criminey."]
|
||||
,Para [Str "There",Space,Str "should",Space,Str "be",Space,Str "a",Space,Str "hard",Space,Str "line",Space,Str "break",LineBreak,Str "here."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Block",Space,Str "Quotes"]
|
||||
,Header 1 ("block-quotes",[],[]) [Str "Block",Space,Str "Quotes"]
|
||||
,Para [Str "E-mail",Space,Str "style:"]
|
||||
,BlockQuote
|
||||
[Para [Str "This",Space,Str "is",Space,Str "a",Space,Str "block",Space,Str "quote.",Space,Str "It",Space,Str "is",Space,Str "pretty",Space,Str "short."]]
|
||||
|
|
@ -38,14 +38,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "This",Space,Str "should",Space,Str "not",Space,Str "be",Space,Str "a",Space,Str "block",Space,Str "quote:",Space,Str "2",Space,Str ">",Space,Str "1."]
|
||||
,Para [Str "And",Space,Str "a",Space,Str "following",Space,Str "paragraph."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Code",Space,Str "Blocks"]
|
||||
,Header 1 ("code-blocks",[],[]) [Str "Code",Space,Str "Blocks"]
|
||||
,Para [Str "Code:"]
|
||||
,CodeBlock ("",[],[]) "---- (should be four hyphens)\n\nsub status {\n print \"working\";\n}\n\nthis code block is indented by one tab"
|
||||
,Para [Str "And:"]
|
||||
,CodeBlock ("",[],[]) " this code block is indented by two tabs\n\nThese should not be escaped: \\$ \\\\ \\> \\[ \\{"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Lists"]
|
||||
,Header 2 [Str "Unordered"]
|
||||
,Header 1 ("lists",[],[]) [Str "Lists"]
|
||||
,Header 2 ("unordered",[],[]) [Str "Unordered"]
|
||||
,Para [Str "Asterisks",Space,Str "tight:"]
|
||||
,BulletList
|
||||
[[Plain [Str "asterisk",Space,Str "1"]]
|
||||
|
|
@ -76,7 +76,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
[[Para [Str "Minus",Space,Str "1"]]
|
||||
,[Para [Str "Minus",Space,Str "2"]]
|
||||
,[Para [Str "Minus",Space,Str "3"]]]
|
||||
,Header 2 [Str "Ordered"]
|
||||
,Header 2 ("ordered",[],[]) [Str "Ordered"]
|
||||
,Para [Str "Tight:"]
|
||||
,OrderedList (1,Decimal,Period)
|
||||
[[Plain [Str "First"]]
|
||||
|
|
@ -103,7 +103,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Item",Space,Str "1.",Space,Str "graf",Space,Str "two.",Space,Str "The",Space,Str "quick",Space,Str "brown",Space,Str "fox",Space,Str "jumped",Space,Str "over",Space,Str "the",Space,Str "lazy",Space,Str "dog\8217s",Space,Str "back."]]
|
||||
,[Para [Str "Item",Space,Str "2."]]
|
||||
,[Para [Str "Item",Space,Str "3."]]]
|
||||
,Header 2 [Str "Nested"]
|
||||
,Header 2 ("nested",[],[]) [Str "Nested"]
|
||||
,BulletList
|
||||
[[Plain [Str "Tab"]
|
||||
,BulletList
|
||||
|
|
@ -128,14 +128,14 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,[Plain [Str "Fie"]]
|
||||
,[Plain [Str "Foe"]]]]
|
||||
,[Para [Str "Third"]]]
|
||||
,Header 2 [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,Header 2 ("tabs-and-spaces",[],[]) [Str "Tabs",Space,Str "and",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "a",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]
|
||||
,BulletList
|
||||
[[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "tabs"]]
|
||||
,[Para [Str "this",Space,Str "is",Space,Str "an",Space,Str "example",Space,Str "list",Space,Str "item",Space,Str "indented",Space,Str "with",Space,Str "spaces"]]]]]
|
||||
,Header 2 [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,Header 2 ("fancy-list-markers",[],[]) [Str "Fancy",Space,Str "list",Space,Str "markers"]
|
||||
,OrderedList (2,Decimal,TwoParens)
|
||||
[[Plain [Str "begins",Space,Str "with",Space,Str "2"]]
|
||||
,[Para [Str "and",Space,Str "now",Space,Str "3"]
|
||||
|
|
@ -165,7 +165,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "M.A.\160\&2007"]
|
||||
,Para [Str "B.",Space,Str "Williams"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Definition",Space,Str "Lists"]
|
||||
,Header 1 ("definition-lists",[],[]) [Str "Definition",Space,Str "Lists"]
|
||||
,Para [Str "Tight",Space,Str "using",Space,Str "spaces:"]
|
||||
,DefinitionList
|
||||
[([Str "apple"],
|
||||
|
|
@ -226,7 +226,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,OrderedList (1,Decimal,Period)
|
||||
[[Plain [Str "sublist"]]
|
||||
,[Plain [Str "sublist"]]]]])]
|
||||
,Header 1 [Str "HTML",Space,Str "Blocks"]
|
||||
,Header 1 ("html-blocks",[],[]) [Str "HTML",Space,Str "Blocks"]
|
||||
,Para [Str "Simple",Space,Str "block",Space,Str "on",Space,Str "one",Space,Str "line:"]
|
||||
,RawBlock "html" "<div>"
|
||||
,Plain [Str "foo"]
|
||||
|
|
@ -268,7 +268,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Hr\8217s:"]
|
||||
,RawBlock "html" "<hr>\n\n<hr />\n\n<hr />\n\n<hr> \n\n<hr /> \n\n<hr /> \n\n<hr class=\"foo\" id=\"bar\" />\n\n<hr class=\"foo\" id=\"bar\" />\n\n<hr class=\"foo\" id=\"bar\">\n"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Inline",Space,Str "Markup"]
|
||||
,Header 1 ("inline-markup",[],[]) [Str "Inline",Space,Str "Markup"]
|
||||
,Para [Str "This",Space,Str "is",Space,Emph [Str "emphasized"],Str ",",Space,Str "and",Space,Str "so",Space,Emph [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "This",Space,Str "is",Space,Strong [Str "strong"],Str ",",Space,Str "and",Space,Str "so",Space,Strong [Str "is",Space,Str "this"],Str "."]
|
||||
,Para [Str "An",Space,Emph [Link [Str "emphasized",Space,Str "link"] ("/url","")],Str "."]
|
||||
|
|
@ -282,7 +282,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Subscripts:",Space,Str "H",Subscript [Str "2"],Str "O,",Space,Str "H",Subscript [Str "23"],Str "O,",Space,Str "H",Subscript [Str "many\160of\160them"],Str "O."]
|
||||
,Para [Str "These",Space,Str "should",Space,Str "not",Space,Str "be",Space,Str "superscripts",Space,Str "or",Space,Str "subscripts,",Space,Str "because",Space,Str "of",Space,Str "the",Space,Str "unescaped",Space,Str "spaces:",Space,Str "a^b",Space,Str "c^d,",Space,Str "a~b",Space,Str "c~d."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Header 1 ("smart-quotes-ellipses-dashes",[],[]) [Str "Smart",Space,Str "quotes,",Space,Str "ellipses,",Space,Str "dashes"]
|
||||
,Para [Quoted DoubleQuote [Str "Hello,"],Space,Str "said",Space,Str "the",Space,Str "spider.",Space,Quoted DoubleQuote [Quoted SingleQuote [Str "Shelob"],Space,Str "is",Space,Str "my",Space,Str "name."]]
|
||||
,Para [Quoted SingleQuote [Str "A"],Str ",",Space,Quoted SingleQuote [Str "B"],Str ",",Space,Str "and",Space,Quoted SingleQuote [Str "C"],Space,Str "are",Space,Str "letters."]
|
||||
,Para [Quoted SingleQuote [Str "Oak,"],Space,Quoted SingleQuote [Str "elm,"],Space,Str "and",Space,Quoted SingleQuote [Str "beech"],Space,Str "are",Space,Str "names",Space,Str "of",Space,Str "trees.",Space,Str "So",Space,Str "is",Space,Quoted SingleQuote [Str "pine."]]
|
||||
|
|
@ -292,7 +292,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Dashes",Space,Str "between",Space,Str "numbers:",Space,Str "5\8211\&7,",Space,Str "255\8211\&66,",Space,Str "1987\8211\&1999."]
|
||||
,Para [Str "Ellipses\8230and\8230and\8230."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "LaTeX"]
|
||||
,Header 1 ("latex",[],[]) [Str "LaTeX"]
|
||||
,BulletList
|
||||
[[Plain [RawInline "tex" "\\cite[22-23]{smith.1899}"]]
|
||||
,[Plain [Math InlineMath "2+2=4"]]
|
||||
|
|
@ -311,7 +311,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "LaTeX",Space,Str "table:"]
|
||||
,RawBlock "latex" "\\begin{tabular}{|l|l|}\\hline\nAnimal & Number \\\\ \\hline\nDog & 2 \\\\\nCat & 1 \\\\ \\hline\n\\end{tabular}"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Special",Space,Str "Characters"]
|
||||
,Header 1 ("special-characters",[],[]) [Str "Special",Space,Str "Characters"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "some",Space,Str "unicode:"]
|
||||
,BulletList
|
||||
[[Plain [Str "I",Space,Str "hat:",Space,Str "\206"]]
|
||||
|
|
@ -341,8 +341,8 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Plus:",Space,Str "+"]
|
||||
,Para [Str "Minus:",Space,Str "-"]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Links"]
|
||||
,Header 2 [Str "Explicit"]
|
||||
,Header 1 ("links",[],[]) [Str "Links"]
|
||||
,Header 2 ("explicit",[],[]) [Str "Explicit"]
|
||||
,Para [Str "Just",Space,Str "a",Space,Link [Str "URL"] ("/url/",""),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/","title"),Str "."]
|
||||
,Para [Link [Str "URL",Space,Str "and",Space,Str "title"] ("/url/","title preceded by two spaces"),Str "."]
|
||||
|
|
@ -352,7 +352,7 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Link [Str "with_underscore"] ("/url/with_underscore","")]
|
||||
,Para [Link [Str "Email",Space,Str "link"] ("mailto:nobody@nowhere.net","")]
|
||||
,Para [Link [Str "Empty"] ("",""),Str "."]
|
||||
,Header 2 [Str "Reference"]
|
||||
,Header 2 ("reference",[],[]) [Str "Reference"]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/",""),Str "."]
|
||||
|
|
@ -365,12 +365,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,CodeBlock ("",[],[]) "[not]: /url"
|
||||
,Para [Str "Foo",Space,Link [Str "bar"] ("/url/","Title with \"quotes\" inside"),Str "."]
|
||||
,Para [Str "Foo",Space,Link [Str "biz"] ("/url/","Title with \"quote\" inside"),Str "."]
|
||||
,Header 2 [Str "With",Space,Str "ampersands"]
|
||||
,Header 2 ("with-ampersands",[],[]) [Str "With",Space,Str "ampersands"]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Link [Str "link",Space,Str "with",Space,Str "an",Space,Str "ampersand",Space,Str "in",Space,Str "the",Space,Str "URL"] ("http://example.com/?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "a",Space,Str "link",Space,Str "with",Space,Str "an",Space,Str "amersand",Space,Str "in",Space,Str "the",Space,Str "link",Space,Str "text:",Space,Link [Str "AT&T"] ("http://att.com/","AT&T"),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "an",Space,Link [Str "inline",Space,Str "link"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Para [Str "Here\8217s",Space,Str "an",Space,Link [Str "inline",Space,Str "link",Space,Str "in",Space,Str "pointy",Space,Str "braces"] ("/script?foo=1&bar=2",""),Str "."]
|
||||
,Header 2 [Str "Autolinks"]
|
||||
,Header 2 ("autolinks",[],[]) [Str "Autolinks"]
|
||||
,Para [Str "With",Space,Str "an",Space,Str "ampersand:",Space,Link [Str "http://example.com/?foo=1&bar=2"] ("http://example.com/?foo=1&bar=2","")]
|
||||
,BulletList
|
||||
[[Plain [Str "In",Space,Str "a",Space,Str "list?"]]
|
||||
|
|
@ -382,12 +382,12 @@ Pandoc (Meta {docTitle = [Str "Pandoc",Space,Str "Test",Space,Str "Suite"], docA
|
|||
,Para [Str "Auto-links",Space,Str "should",Space,Str "not",Space,Str "occur",Space,Str "here:",Space,Code ("",[],[]) "<http://example.com/>"]
|
||||
,CodeBlock ("",[],[]) "or here: <http://example.com/>"
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Images"]
|
||||
,Header 1 ("images",[],[]) [Str "Images"]
|
||||
,Para [Str "From",Space,Quoted DoubleQuote [Str "Voyage",Space,Str "dans",Space,Str "la",Space,Str "Lune"],Space,Str "by",Space,Str "Georges",Space,Str "Melies",Space,Str "(1902):"]
|
||||
,Para [Image [Str "lalune"] ("lalune.jpg","Voyage dans la Lune")]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "movie",Space,Image [Str "movie"] ("movie.jpg",""),Space,Str "icon."]
|
||||
,HorizontalRule
|
||||
,Header 1 [Str "Footnotes"]
|
||||
,Header 1 ("footnotes",[],[]) [Str "Footnotes"]
|
||||
,Para [Str "Here",Space,Str "is",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Note [Para [Str "Here",Space,Str "is",Space,Str "the",Space,Str "footnote.",Space,Str "It",Space,Str "can",Space,Str "go",Space,Str "anywhere",Space,Str "after",Space,Str "the",Space,Str "footnote",Space,Str "reference.",Space,Str "It",Space,Str "need",Space,Str "not",Space,Str "be",Space,Str "placed",Space,Str "at",Space,Str "the",Space,Str "end",Space,Str "of",Space,Str "the",Space,Str "document."]],Space,Str "and",Space,Str "another.",Note [Para [Str "Here\8217s",Space,Str "the",Space,Str "long",Space,Str "note.",Space,Str "This",Space,Str "one",Space,Str "contains",Space,Str "multiple",Space,Str "blocks."],Para [Str "Subsequent",Space,Str "blocks",Space,Str "are",Space,Str "indented",Space,Str "to",Space,Str "show",Space,Str "that",Space,Str "they",Space,Str "belong",Space,Str "to",Space,Str "the",Space,Str "footnote",Space,Str "(as",Space,Str "with",Space,Str "list",Space,Str "items)."],CodeBlock ("",[],[]) " { <code> }",Para [Str "If",Space,Str "you",Space,Str "want,",Space,Str "you",Space,Str "can",Space,Str "indent",Space,Str "every",Space,Str "line,",Space,Str "but",Space,Str "you",Space,Str "can",Space,Str "also",Space,Str "be",Space,Str "lazy",Space,Str "and",Space,Str "just",Space,Str "indent",Space,Str "the",Space,Str "first",Space,Str "line",Space,Str "of",Space,Str "each",Space,Str "block."]],Space,Str "This",Space,Str "should",Space,Emph [Str "not"],Space,Str "be",Space,Str "a",Space,Str "footnote",Space,Str "reference,",Space,Str "because",Space,Str "it",Space,Str "contains",Space,Str "a",Space,Str "space.[^my",Space,Str "note]",Space,Str "Here",Space,Str "is",Space,Str "an",Space,Str "inline",Space,Str "note.",Note [Para [Str "This",Space,Str "is",Space,Emph [Str "easier"],Space,Str "to",Space,Str "type.",Space,Str "Inline",Space,Str "notes",Space,Str "may",Space,Str "contain",Space,Link [Str "links"] ("http://google.com",""),Space,Str "and",Space,Code ("",[],[]) "]",Space,Str "verbatim",Space,Str "characters,",Space,Str "as",Space,Str "well",Space,Str "as",Space,Str "[bracketed",Space,Str "text]."]]]
|
||||
,BlockQuote
|
||||
[Para [Str "Notes",Space,Str "can",Space,Str "go",Space,Str "in",Space,Str "quotes.",Note [Para [Str "In",Space,Str "quote."]]]]
|
||||
|
|
|
|||
|
|
@ -2,31 +2,31 @@ This is a set of tests for pandoc. Most of them are adapted from John Gruber's m
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Headers
|
||||
h1(#headers). Headers
|
||||
|
||||
h2. Level 2 with an "embedded link":/url
|
||||
h2(#level-2-with-an-embedded-link). Level 2 with an "embedded link":/url
|
||||
|
||||
h3. Level 3 with _emphasis_
|
||||
h3(#level-3-with-emphasis). Level 3 with _emphasis_
|
||||
|
||||
h4. Level 4
|
||||
h4(#level-4). Level 4
|
||||
|
||||
h5. Level 5
|
||||
h5(#level-5). Level 5
|
||||
|
||||
h1. Level 1
|
||||
h1(#level-1). Level 1
|
||||
|
||||
h2. Level 2 with _emphasis_
|
||||
h2(#level-2-with-emphasis). Level 2 with _emphasis_
|
||||
|
||||
h3. Level 3
|
||||
h3(#level-3). Level 3
|
||||
|
||||
with no blank line
|
||||
|
||||
h2. Level 2
|
||||
h2(#level-2). Level 2
|
||||
|
||||
with no blank line
|
||||
|
||||
<hr />
|
||||
|
||||
h1. Paragraphs
|
||||
h1(#paragraphs). Paragraphs
|
||||
|
||||
Here's a regular paragraph.
|
||||
|
||||
|
|
@ -39,7 +39,7 @@ here.
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Block Quotes
|
||||
h1(#block-quotes). Block Quotes
|
||||
|
||||
E-mail style:
|
||||
|
||||
|
|
@ -79,7 +79,7 @@ And a following paragraph.
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Code Blocks
|
||||
h1(#code-blocks). Code Blocks
|
||||
|
||||
Code:
|
||||
|
||||
|
|
@ -103,9 +103,9 @@ These should not be escaped: \$ \\ \> \[ \{
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Lists
|
||||
h1(#lists). Lists
|
||||
|
||||
h2. Unordered
|
||||
h2(#unordered). Unordered
|
||||
|
||||
Asterisks tight:
|
||||
|
||||
|
|
@ -143,7 +143,7 @@ Minuses loose:
|
|||
* Minus 2
|
||||
* Minus 3
|
||||
|
||||
h2. Ordered
|
||||
h2(#ordered). Ordered
|
||||
|
||||
Tight:
|
||||
|
||||
|
|
@ -178,7 +178,7 @@ Multiple paragraphs:
|
|||
<li><p>Item 3.</p></li>
|
||||
</ol>
|
||||
|
||||
h2. Nested
|
||||
h2(#nested). Nested
|
||||
|
||||
* Tab
|
||||
** Tab
|
||||
|
|
@ -202,14 +202,14 @@ Same thing but with paragraphs:
|
|||
#* Foe
|
||||
# Third
|
||||
|
||||
h2. Tabs and spaces
|
||||
h2(#tabs-and-spaces). Tabs and spaces
|
||||
|
||||
* this is a list item indented with tabs
|
||||
* this is a list item indented with spaces
|
||||
** this is an example list item indented with tabs
|
||||
** this is an example list item indented with spaces
|
||||
|
||||
h2. Fancy list markers
|
||||
h2(#fancy-list-markers). Fancy list markers
|
||||
|
||||
<ol start="2" style="list-style-type: decimal;">
|
||||
<li>begins with 2</li>
|
||||
|
|
@ -259,7 +259,7 @@ B. Williams
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Definition Lists
|
||||
h1(#definition-lists). Definition Lists
|
||||
|
||||
Tight using spaces:
|
||||
|
||||
|
|
@ -347,7 +347,7 @@ Blank line after term, indented marker, alternate markers:
|
|||
</dd>
|
||||
</dl>
|
||||
|
||||
h1. HTML Blocks
|
||||
h1(#html-blocks). HTML Blocks
|
||||
|
||||
Simple block on one line:
|
||||
|
||||
|
|
@ -464,7 +464,7 @@ Hr's:
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Inline Markup
|
||||
h1(#inline-markup). Inline Markup
|
||||
|
||||
This is _emphasized_, and so _is this_.
|
||||
|
||||
|
|
@ -492,7 +492,7 @@ These should not be superscripts or subscripts, because of the unescaped spaces:
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Smart quotes, ellipses, dashes
|
||||
h1(#smart-quotes-ellipses-dashes). Smart quotes, ellipses, dashes
|
||||
|
||||
"Hello," said the spider. "'Shelob' is my name."
|
||||
|
||||
|
|
@ -512,7 +512,7 @@ Ellipses...and...and....
|
|||
|
||||
<hr />
|
||||
|
||||
h1. LaTeX
|
||||
h1(#latex). LaTeX
|
||||
|
||||
*
|
||||
* <span class="math">2+2=4</math>
|
||||
|
|
@ -535,7 +535,7 @@ Here's a LaTeX table:
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Special Characters
|
||||
h1(#special-characters). Special Characters
|
||||
|
||||
Here is some unicode:
|
||||
|
||||
|
|
@ -589,9 +589,9 @@ Minus: -
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Links
|
||||
h1(#links). Links
|
||||
|
||||
h2. Explicit
|
||||
h2(#explicit). Explicit
|
||||
|
||||
Just a "URL":/url/.
|
||||
|
||||
|
|
@ -611,7 +611,7 @@ Just a "URL":/url/.
|
|||
|
||||
"Empty":.
|
||||
|
||||
h2. Reference
|
||||
h2(#reference). Reference
|
||||
|
||||
Foo "bar":/url/.
|
||||
|
||||
|
|
@ -638,7 +638,7 @@ Foo "bar":/url/.
|
|||
|
||||
Foo "biz":/url/.
|
||||
|
||||
h2. With ampersands
|
||||
h2(#with-ampersands). With ampersands
|
||||
|
||||
Here's a "link with an ampersand in the URL":http://example.com/?foo=1&bar=2.
|
||||
|
||||
|
|
@ -648,7 +648,7 @@ Here's an "inline link":/script?foo=1&bar=2.
|
|||
|
||||
Here's an "inline link in pointy braces":/script?foo=1&bar=2.
|
||||
|
||||
h2. Autolinks
|
||||
h2(#autolinks). Autolinks
|
||||
|
||||
With an ampersand: "$":http://example.com/?foo=1&bar=2
|
||||
|
||||
|
|
@ -669,7 +669,7 @@ bc. or here: <http://example.com/>
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Images
|
||||
h1(#images). Images
|
||||
|
||||
From "Voyage dans la Lune" by Georges Melies (1902):
|
||||
|
||||
|
|
@ -680,7 +680,7 @@ Here is a movie !movie.jpg(movie)! icon.
|
|||
|
||||
<hr />
|
||||
|
||||
h1. Footnotes
|
||||
h1(#footnotes). Footnotes
|
||||
|
||||
Here is a footnote reference,[1] and another.[2] This should _not_ be a footnote reference, because it contains a space.[^my note] Here is an inline note.[3]
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue