Commits

Konstantine Rybnikov committed 0fd6eba

Comment out useless printings to test on big data.

Comments (0)

Files changed (1)

           canonicalized <- canonicalizePath path
           putStrLn $ "Your path is: " ++ canonicalized
           index <- indexPath canonicalized
-          printIndex index
+          -- printIndex index
           dirs' <- allPossibleDirs canonicalized
           let dirs = canonicalized : dirs'
-          putStrLn "Dirs:"
-          putStrLn $ intercalate "\n" dirs
+          -- putStrLn "Dirs:"
+          -- putStrLn $ intercalate "\n" dirs
           let dirSummaries = map (getDuplicatesSummary index) dirs
           let dirsWithSummary = zip dirs dirSummaries
           putStrLn "Number of duplicate files:"