I'm not a Haskell expert but here the solution to your problem that I can
think of.
import Data.List
prettyStr :: Int -> String -> IO ()
prettyStr maxlen str = do
putStr ("\"" ++ head brokenStr)
mapM_ (\str -> putStr ("\\\n\\" ++ str)) (tail brokenStr)
putStr "\"\n"
where brokenStr = map (snd.unzip) $ groupBy (\_ (i,_) -> i `mod` maxlen
/= 0) $ zip [0..] str
Ed
On Sat, Sep 20, 2008 at 4:14 PM, Maurício
Hi,
I'm using Language.Haskell.* and would like to know if it's possible to pretty-print big strings like this:
"aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"
into something like this:
"aaaaaaaa\ \aaaaaaaa\ \aaaaaaaa\ \aaaaaaaa\ \aaaaaaaa\ \aaaaaaaa\ \aaaaaaaa"
to respect the limit on number of columns. Can you help me? Is it possible to do that?
Thanks, Maurício
_______________________________________________ Haskell-Cafe mailing list Haskell-Cafe@haskell.org http://www.haskell.org/mailman/listinfo/haskell-cafe