diff options
author | John MacFarlane <jgm@berkeley.edu> | 2018-10-27 11:22:21 -0700 |
---|---|---|
committer | John MacFarlane <jgm@berkeley.edu> | 2018-10-27 11:22:21 -0700 |
commit | 0a29da50426859ad19f4d388edab9dc90ebfa1ca (patch) | |
tree | a32a0fbb7e0e77381065e4b331af14b46a2e1e4c | |
parent | 9678538f45258421d12bf12cbf77e7be17f131c3 (diff) | |
download | pandoc-0a29da50426859ad19f4d388edab9dc90ebfa1ca.tar.gz |
Remove old comment.
-rw-r--r-- | src/Text/Pandoc/Readers/Roff.hs | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/Text/Pandoc/Readers/Roff.hs b/src/Text/Pandoc/Readers/Roff.hs index 89c0dd166..7d9aae8b6 100644 --- a/src/Text/Pandoc/Readers/Roff.hs +++ b/src/Text/Pandoc/Readers/Roff.hs @@ -104,12 +104,11 @@ data CellFormat = type TableRow = ([CellFormat], [RoffTokens]) --- TODO parse tables (see man tbl) data RoffToken = MLine [LinePart] - | MEmptyLine - | MMacro MacroKind [Arg] SourcePos - | MTable [TableOption] [TableRow] SourcePos - deriving Show + | MEmptyLine + | MMacro MacroKind [Arg] SourcePos + | MTable [TableOption] [TableRow] SourcePos + deriving Show newtype RoffTokens = RoffTokens { unRoffTokens :: Seq.Seq RoffToken } deriving (Show, Semigroup, Monoid) |