<div dir="ltr"><div class="gmail_quote"><br><br><div dir="ltr">Hello,<div><br></div><div>I'd like to change how the error messages from GHC get wrapped.</div><div><br></div><div>I am using the following code:</div><div>

<font face="courier new, monospace"><br></font></div>
<div><div><font face="courier new, monospace">  flip gcatch handler $ do</font></div><div><font face="courier new, monospace">    runStmt "let f (x, y, z, w, e, r, d , ax, b ,c,ex ,g ,h) = (x :: Int) + y + z" RunToCompletion</font></div>


<div><font face="courier new, monospace">    runStmt "f (1, 2, 3)" RunToCompletion</font></div><div><font face="courier new, monospace">    return ()</font></div><div><font face="courier new, monospace">  where</font></div>


<div><font face="courier new, monospace">    handler :: SomeException -> Ghc ()</font></div><div><font face="courier new, monospace">    handler e = </font></div><div><font face="courier new, monospace">      liftIO $ putStrLn $ "Exception:\n" ++ show e</font></div>


<div>      </div></div><div>The output I am getting looks like this:</div><div><br></div><div><img src="https://s3-us-west-2.amazonaws.com/droplr.storage/files/acc_197446/FUaJ?AWSAccessKeyId=AKIAJSVQN3Z4K7MT5U2A&Expires=1388811474&Signature=ueO76P78Cidag/PQT%2BWG/19cRc4%3D&response-content-disposition=inline;+filename%3DScreen+Shot+2014-01-03+at+22.57.44.png;" alt="Inline image 1"><br>


</div><div><br></div><div>I would like the types to not wrap at all, or wrap at some very long length along the lines of 200-300 characters.</div><div><br></div><div>I have seen the `pprUserLength` and `pprCols` fields in DynFlags, but they don't seem to do anything.</div>


<div><br></div><div>What should I do?</div><div><br></div><div>Thanks!</div><span class="HOEnZb"><font color="#888888"><div>Andrew</div><div><br></div></font></span></div>
</div><br></div>