explicitly use lazy ByteStrings

This commit is contained in:
Jonathan Lamothe 2018-12-20 22:21:36 -05:00
parent 67d6f7a546
commit 0260f665dc
3 changed files with 3 additions and 3 deletions

View File

@ -46,7 +46,7 @@ module Password (
import Control.Lens (makeLenses, over, set, (^.)) import Control.Lens (makeLenses, over, set, (^.))
import Data.Char (isUpper, isLower, isDigit, isAlphaNum) import Data.Char (isUpper, isLower, isDigit, isAlphaNum)
import qualified Data.ByteString as B import qualified Data.ByteString.Lazy as B
import qualified Data.Map as M import qualified Data.Map as M
import Data.Maybe (fromMaybe) import Data.Maybe (fromMaybe)
import System.Random (RandomGen, randoms, split) import System.Random (RandomGen, randoms, split)

View File

@ -22,7 +22,7 @@ License along with this program. If not, see
module Spec.NewPWSalt (tests) where module Spec.NewPWSalt (tests) where
import qualified Data.ByteString as B import qualified Data.ByteString.Lazy as B
import System.Random (mkStdGen) import System.Random (mkStdGen)
import Test.HUnit (Test(..), assertBool, (~?=)) import Test.HUnit (Test(..), assertBool, (~?=))

View File

@ -23,7 +23,7 @@ License along with this program. If not, see
module Spec.ValidatePWData (tests) where module Spec.ValidatePWData (tests) where
import Control.Lens (set) import Control.Lens (set)
import qualified Data.ByteString as B import qualified Data.ByteString.Lazy as B
import System.Random (mkStdGen) import System.Random (mkStdGen)
import Test.HUnit (Test (..), (~?=)) import Test.HUnit (Test (..), (~?=))