diff options
| author | David Waern <david.waern@gmail.com> | 2007-11-12 01:34:39 +0000 |
|---|---|---|
| committer | David Waern <david.waern@gmail.com> | 2007-11-12 01:34:39 +0000 |
| commit | 92e7ecbcc393caab7f0d8883a51cbfca42767cb1 (patch) | |
| tree | 29389f02ecc0ab65b4d84895ec10e596f685ecaa /compiler/parser/HaddockParse.y | |
| parent | 2b32fbd087d2439238ef225f05f50822d04a6060 (diff) | |
| download | haskell-92e7ecbcc393caab7f0d8883a51cbfca42767cb1.tar.gz | |
Merge from Haddock: allow blank lines inside code blocks
Tue Jan 9 14:14:34 CET 2007 Simon Marlow <simonmar@microsoft.com>
* allow blank lines inside a @...@ code block
Please merge this to the 6.8.2 branch
Diffstat (limited to 'compiler/parser/HaddockParse.y')
| -rw-r--r-- | compiler/parser/HaddockParse.y | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/parser/HaddockParse.y b/compiler/parser/HaddockParse.y index 880652e5b5..ded4dbe394 100644 --- a/compiler/parser/HaddockParse.y +++ b/compiler/parser/HaddockParse.y @@ -74,7 +74,8 @@ elem :: { HsDoc RdrName } | '@' seq1 '@' { DocMonospaced $2 } seq1 :: { HsDoc RdrName } - : elem1 seq1 { docAppend $1 $2 } + : PARA seq1 { docAppend (DocString "\n") $2 } + | elem1 seq1 { docAppend $1 $2 } | elem1 { $1 } elem1 :: { HsDoc RdrName } |