Skip to content

Commit

Permalink
#167, increase the stack limit to 10K
Browse files Browse the repository at this point in the history
  • Loading branch information
ndmitchell committed Nov 4, 2016
1 parent 7c00a31 commit 06018e7
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion src/Input/Set.hs
Original file line number Diff line number Diff line change
Expand Up @@ -13,7 +13,7 @@ import Prelude
setStackage :: FilePath -> IO (Set.Set String)
setStackage file = Set.fromList . filter (`notElem` stackOverflow) . f . lines <$> readFile' file
where
stackOverflow = ["telegram-api","pinchot","gogol-dfareporting"] -- see https://github.com/ndmitchell/hoogle/issues/167
stackOverflow = [] -- ["telegram-api","pinchot","gogol-dfareporting"] -- see https://github.com/ndmitchell/hoogle/issues/167

f (x:xs) | Just x <- stripPrefix "constraints:" x =
map (fst . word1) $ takeWhile (" " `isPrefixOf`) $ (' ':x) : xs
Expand Down
2 changes: 1 addition & 1 deletion travis.hs
Original file line number Diff line number Diff line change
Expand Up @@ -8,7 +8,7 @@ main :: IO ()
main = do
let timed x = do
putStrLn $ "\n\nSearching for " ++ x
(time,_) <- duration $ system_ $ "hoogle +RTS -T -M1.8G -K1K -RTS " ++ show x
(time,_) <- duration $ system_ $ "hoogle +RTS -T -M1.8G -K10K -RTS " ++ show x
putStrLn $ "Search " ++ show x ++ " took " ++ showDuration time
putStrLn "\n\n"
retry 3 $ timed "generate"
Expand Down

0 comments on commit 06018e7

Please sign in to comment.