module Polysemy.Db.Data.DbName where newtype DbName = DbName { DbName -> Text unDbName :: Text } deriving stock (DbName -> DbName -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: DbName -> DbName -> Bool $c/= :: DbName -> DbName -> Bool == :: DbName -> DbName -> Bool $c== :: DbName -> DbName -> Bool Eq, Int -> DbName -> ShowS [DbName] -> ShowS DbName -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [DbName] -> ShowS $cshowList :: [DbName] -> ShowS show :: DbName -> String $cshow :: DbName -> String showsPrec :: Int -> DbName -> ShowS $cshowsPrec :: Int -> DbName -> ShowS Show, forall x. Rep DbName x -> DbName forall x. DbName -> Rep DbName x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep DbName x -> DbName $cfrom :: forall x. DbName -> Rep DbName x Generic) deriving newtype (String -> DbName forall a. (String -> a) -> IsString a fromString :: String -> DbName $cfromString :: String -> DbName IsString, Eq DbName DbName -> DbName -> Bool DbName -> DbName -> Ordering DbName -> DbName -> DbName forall a. Eq a -> (a -> a -> Ordering) -> (a -> a -> Bool) -> (a -> a -> Bool) -> (a -> a -> Bool) -> (a -> a -> Bool) -> (a -> a -> a) -> (a -> a -> a) -> Ord a min :: DbName -> DbName -> DbName $cmin :: DbName -> DbName -> DbName max :: DbName -> DbName -> DbName $cmax :: DbName -> DbName -> DbName >= :: DbName -> DbName -> Bool $c>= :: DbName -> DbName -> Bool > :: DbName -> DbName -> Bool $c> :: DbName -> DbName -> Bool <= :: DbName -> DbName -> Bool $c<= :: DbName -> DbName -> Bool < :: DbName -> DbName -> Bool $c< :: DbName -> DbName -> Bool compare :: DbName -> DbName -> Ordering $ccompare :: DbName -> DbName -> Ordering Ord) json ''DbName