hnix-store/hnix-store-remote/tests/Util.hs
2020-11-11 22:57:49 +01:00

14 lines
266 B
Haskell

module Util where
import Test.Tasty.QuickCheck
import Data.Text.Arbitrary
import System.Nix.Store.Remote.Util
prop_TextToBSLRoundtrip x =
bslToText (textToBSL x) === x
prop_TextToBSRoundtrip x =
bsToText (textToBS x) === x