changeset 3018:fbba3aa90a16

<oerjan> mv test.hs{.1,}
author HackBot
date Sat, 01 Jun 2013 19:31:05 +0000
parents 2c57049fedee
children 00c8fbc8aae9
files test.hs test.hs.1
diffstat 2 files changed, 1 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/test.hs	Sat Jun 01 19:30:46 2013 +0000
+++ b/test.hs	Sat Jun 01 19:31:05 2013 +0000
@@ -1,2 +1,2 @@
-import Data.List (sort)
+import Data.List (sort, stripPrefix)
 main = mapM_ putStrLn . map (\s -> head s ++ " occurs->" ++ show (length s)) . group . sort . catMaybes . map (stripPrefix "username:" . (!!2) . words) . lines =<< getContents
--- a/test.hs.1	Sat Jun 01 19:30:46 2013 +0000
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,2 +0,0 @@
-import Data.List (sort, stripPrefix)
-main = mapM_ putStrLn . map (\s -> head s ++ " occurs->" ++ show (length s)) . group . sort . catMaybes . map (stripPrefix "username:" . (!!2) . words) . lines =<< getContents