TomMD/crypto-api — pull request #25 by DaveCTurner (2014-12-18 11:03:20+00:00)
Title: Catch unreasonably large seeds with NeedsInfiniteSeed

Apropos of https://github.com/TomMD/DRBG/issues/6

A possible hack that improves the error message: consider 1GB+ seeds as infinite.

I haven't compied it as the repo is missing `Crypto/Modes.hs-boot`, so wouldn't be surprised if it doesn't work as-is.