On 6 May 2010 15:01,  <bri...@aracnet.com> wrote:
>
> I was doing the following:
>
>
> do status <- mapM PF.getFileStatus filenames
>   let times = map PF.modificationTime status
>   let sorted = sortBy (\(_, t1) (_,t2) -> compare t1 t2) (zip filenames times)

times <- mapM (liftM PF.modificationTime . PF.getFileStatus) filenames

However, I'd be tempted to leave it as is (and hope/assume that fusion
does its magic).

-- 
Ivan Lazar Miljenovic
ivan.miljeno...@gmail.com
IvanMiljenovic.wordpress.com
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to