Merge pull request #694 from eatnumber1/end_column

Emit the end line in the JSON
This commit is contained in:
koalaman 2016-06-18 15:09:58 -07:00 committed by GitHub
commit e1cec6c5d3
1 changed files with 1 additions and 0 deletions

View File

@ -40,6 +40,7 @@ instance JSON (PositionedComment) where
showJSON comment@(PositionedComment start end (Comment level code string)) = makeObj [ showJSON comment@(PositionedComment start end (Comment level code string)) = makeObj [
("file", showJSON $ posFile start), ("file", showJSON $ posFile start),
("line", showJSON $ posLine start), ("line", showJSON $ posLine start),
("endLine", showJSON $ posLine end),
("column", showJSON $ posColumn start), ("column", showJSON $ posColumn start),
("endColumn", showJSON $ posColumn end), ("endColumn", showJSON $ posColumn end),
("level", showJSON $ severityText comment), ("level", showJSON $ severityText comment),