Tissevert/pandoc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 1

Remove old comment.

Browse source
This commit is contained in:
John MacFarlane 2018-10-27 11:22:21 -07:00
parent 9678538f45
commit 0a29da5042
1 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/Text/Pandoc/Readers/Roff.hs
View file

@ -104,12 +104,11 @@ data CellFormat =
type TableRow = ([CellFormat], [RoffTokens]) type TableRow = ([CellFormat], [RoffTokens])
-- TODO parse tables (see man tbl)
data RoffToken = MLine [LinePart] data RoffToken = MLine [LinePart]
| MEmptyLine | MEmptyLine
| MMacro MacroKind [Arg] SourcePos | MMacro MacroKind [Arg] SourcePos
| MTable [TableOption] [TableRow] SourcePos | MTable [TableOption] [TableRow] SourcePos
deriving Show deriving Show
newtype RoffTokens = RoffTokens { unRoffTokens :: Seq.Seq RoffToken } newtype RoffTokens = RoffTokens { unRoffTokens :: Seq.Seq RoffToken }
deriving (Show, Semigroup, Monoid) deriving (Show, Semigroup, Monoid)