explicitly use lazy ByteStrings
This commit is contained in:
parent
67d6f7a546
commit
0260f665dc
|
@ -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)
|
||||||
|
|
|
@ -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, (~?=))
|
||||||
|
|
||||||
|
|
|
@ -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 (..), (~?=))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user