Haddock reader: derive Show for Token, making debugging easier.
commit100f8df43eb2dcef9ccbc02fbcca576d77467740
authorDavid Lazar <lazar6@illinois.edu>
dateThu 4 Apr 2013, 23:01 (14 years ago)
parent7e42905
src/Text/Pandoc/Readers/Haddock/Lex.x+1−1
@@ -131,7 +131,7 @@ data Token
131131 | TokExamplePrompt String
132132 | TokExampleExpression String
133133 | TokExampleResult String
134−-- deriving Show
134+ deriving Show
135135
136136tokenPos :: LToken -> (Int, Int)
137137tokenPos t = let AlexPn _ line col = snd t in (line, col)