{-# OPTIONS_GHC -fno-warn-orphans #-}

module Data.Text.Arbitrary(
  Text()
) where

import           Data.Text

import           Test.QuickCheck
import           Test.QuickCheck.Utf8

instance Arbitrary Text where
  arbitrary :: Gen Text
arbitrary = Gen Text
genValidUtf8
  shrink :: Text -> [Text]
shrink = Text -> [Text]
shrinkValidUtf8