On 15 September 2011 01:24, Sean Leather <[email protected]> wrote: > On Wed, Sep 14, 2011 at 05:03, Kazu Yamamoto wrote: >> >> I would like to have an efficient implementation of the chop function. > > [...] > >> >> Are there any more efficient implementations of chop? Any suggestions? > > chop xs = go xs id "" > where > go "" _ = id > go (c:cs) ss | isSpace c = go cs (ss . (:) c) > go (c:cs) ss | otherwise = ss . (:) c . go cs id
Why the extra case for go? The otherwise guard can be part of the second case... -- Ivan Lazar Miljenovic [email protected] IvanMiljenovic.wordpress.com _______________________________________________ Haskell-Cafe mailing list [email protected] http://www.haskell.org/mailman/listinfo/haskell-cafe
