Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
Browse files
Browse the repository at this point in the history
Comment handling rewrite
- Loading branch information
Showing
8 changed files
with
470 additions
and
414 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Original file line number | Diff line number | Diff line change |
---|---|---|
@@ -0,0 +1,47 @@ | ||
-- | A module comment. | ||
module X where | ||
-- a comment before bob | ||
bob -- after bob | ||
= | ||
foo -- next to foo | ||
-- line after foo | ||
(bar | ||
foo -- next to bar foo | ||
bar -- next to bar | ||
) -- next to the end paren of (bar) | ||
-- line after (bar) | ||
mu -- next to mu | ||
-- line after mu | ||
-- another line after mu | ||
zot -- next to zot | ||
-- line after zot | ||
(case casey -- after casey | ||
of | ||
Just -- after Just | ||
-> do | ||
justice -- after justice | ||
* | ||
foo | ||
(blah * blah + z + 2 / 4 + a - -- before a line break | ||
2 * -- inside this mess | ||
z / | ||
2 / | ||
2 / | ||
aooooo / | ||
aaaaa -- bob comment | ||
) + | ||
(sdfsdfsd fsdfsdf) -- blah comment | ||
putStrLn "") | ||
[1, 2, 3] | ||
[ 1 -- foo | ||
, ( 2 -- bar | ||
, 2.5 -- mu | ||
) | ||
, 3] | ||
|
||
-- a comment after bob | ||
|
||
-- Comment for foo | ||
foo = 1 -- after foo | ||
|
||
-- a comment at the end of the module |
Oops, something went wrong.