Word break problem: Difference between revisions

Content added Content deleted

Inline

@@ Line 229: / Line 229: @@
 wordBreaks :: [String] -> String -> String
-wordBreaks ws = (++) <*> \s -> ":\n" ++ report (go <$> tokenTrees ws s)
+wordBreaks ws = (++) <*> (":\n" ++) . report . fmap go . tokenTrees ws
   where
     go t