<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><br></div><div>Code in the source of a package like:</div><div><br></div><div><span class="Apple-style-span" style="font-family: Times; "><pre><span class="comment">@
<a name="(line60)"></a>*Main> throw ThisException `catch` \e -> putStrLn (\"Caught \" ++ show (e :: MyException))
<a name="(line61)"></a>Caught ThisException
<a name="(line62)"></a>@</span></pre></span><div>(from the module <a href="http://haskell.org/ghc/docs/7.0-latest/html/libraries/base-4.3.0.0/src/GHC-Exception.html#Exception">http://haskell.org/ghc/docs/7.0-latest/html/libraries/base-4.3.0.0/src/GHC-Exception.html#Exception</a>)</div></div><div><br></div><div>gets formatted like:</div><div><br></div><div><br></div><div><span class="Apple-style-span" style="font-family: sans-serif; font-size: 13px; line-height: 18px; "><pre style="margin-top: 0.8em; margin-right: 0px; margin-bottom: 0.8em; margin-left: 0px; padding-top: 0.25em; padding-right: 0.25em; padding-bottom: 0.25em; padding-left: 0.25em; font-family: monospace; line-height: 16px; background-image: initial; background-attachment: initial; background-origin: initial; background-clip: initial; background-color: rgb(229, 237, 244); overflow-x: auto; overflow-y: auto; border-bottom-width: 0.25em; border-bottom-style: solid; border-bottom-color: white; background-position: initial initial; background-repeat: initial initial; ">*Main> throw ThisException <code style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; margin-left: 0px; padding-top: 0px; padding-right: 0px; padding-bottom: 0px; padding-left: 0px; font-family: monospace; line-height: 16px; ">catch</code> e -> putStrLn ("Caught " ++ show (e :: MyException))
Caught ThisException</pre></span><div><br></div></div><div>where the underlying HTML is:</div><div><br></div><div><span class="Apple-style-span" style="font-family: Times; "><pre style="word-wrap: break-word; white-space: pre-wrap; "></p><pre>
*Main&gt; throw ThisException <code>catch</code> e -&gt; putStrLn (&quot;Caught &quot; ++ show (e :: MyException))
Caught ThisException
</pre><p></pre></span><div><br></div></div><div>This is a Haddock problem I assume?</div><div><br></div><div> Doaitse</div><div><br></div><div><br></div><div><br></div><div><br></div></body></html>