# HG changeset patch # User HackBot # Date 1371417206 0 # Node ID 55b26927dd7a3a53f8db79ae52f5aca1aeed1079 # Parent 2ffadd7ef84bf10635f5b0bd642a8ff7d340d753 rm test* diff -r 2ffadd7ef84b -r 55b26927dd7a test Binary file test has changed diff -r 2ffadd7ef84b -r 55b26927dd7a test.hi Binary file test.hi has changed diff -r 2ffadd7ef84b -r 55b26927dd7a test.hs --- a/test.hs Sun Jun 16 21:12:31 2013 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,3 +0,0 @@ -import Data.Maybe (catMaybes) -import Data.List (group, sort, stripPrefix) -main = mapM_ putStrLn . map (\s -> head s ++ " occurs->" ++ show (length s)) . group . sort . catMaybes . map (stripPrefix "username:" . (!!2) . words) . lines =<< getContents diff -r 2ffadd7ef84b -r 55b26927dd7a test.o Binary file test.o has changed