<div dir="ltr"><div><div>On further digging I see that Pretty.ftext eventually uses unpackFS, but outputs it via hPutStr.<br><br></div>So no problem in GHC.<br><br></div>Alan<br></div><div class="gmail_extra"><br><div class="gmail_quote">On Sat, Jan 10, 2015 at 5:39 PM, Alan & Kim Zimmerman <span dir="ltr"><<a href="mailto:alan.zimm@gmail.com" target="_blank">alan.zimm@gmail.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div>While doing further round-trip testing, I cam across the following issue<br><br></div>Original source<br><br>    module Deprecation<br>    {-# Deprecated ["This is a module \"deprecation\"",<br>                 "multi-line"] #-}<br>       ( foo )<br>     where<br><br><div>Pretty-printed AST via ppr<br><br>   (L {examples/Deprecation.hs:(3,1)-(4,30)} <br>    (DeprecatedTxt <br>     (L {examples/Deprecation.hs:3:1-14} "{-# Deprecated") <br>     [<br>      (L {examples/Deprecation.hs:3:17-50} {FastString: "This is a module \"deprecation\""}),<br>      (L {examples/Deprecation.hs:4:14-25} {FastString: "multi-line"})]))) <br><br></div><div>output where the FastString is converted to a string via unpackFS<br><br>    module Deprecation<br>    {-# Deprecated ["This is a module "deprecation"",<br>                 "multi-line"] #-}<br>       ( foo )<br>     where<br><br></div><div>So, the ppr (via Pretty.ftext) is able to reproduce the escape characters in original string, but unpackFS does not.<br><br></div><div>Is this a problem for anyone else?<br><br></div><div>Regards<br></div><div>  Aan<br></div><div><br></div></div>
</blockquote></div><br></div>