{-# LANGUAGE DeriveAnyClass #-} module Hercules.Agent.WorkerProtocol.Command.StartDaemon where import Data.Binary import Protolude data StartDaemon = StartDaemon { StartDaemon -> FilePath socketPath :: FilePath } deriving ((forall x. StartDaemon -> Rep StartDaemon x) -> (forall x. Rep StartDaemon x -> StartDaemon) -> Generic StartDaemon forall x. Rep StartDaemon x -> StartDaemon forall x. StartDaemon -> Rep StartDaemon x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep StartDaemon x -> StartDaemon $cfrom :: forall x. StartDaemon -> Rep StartDaemon x Generic, Get StartDaemon [StartDaemon] -> Put StartDaemon -> Put (StartDaemon -> Put) -> Get StartDaemon -> ([StartDaemon] -> Put) -> Binary StartDaemon forall t. (t -> Put) -> Get t -> ([t] -> Put) -> Binary t putList :: [StartDaemon] -> Put $cputList :: [StartDaemon] -> Put get :: Get StartDaemon $cget :: Get StartDaemon put :: StartDaemon -> Put $cput :: StartDaemon -> Put Binary, Int -> StartDaemon -> ShowS [StartDaemon] -> ShowS StartDaemon -> FilePath (Int -> StartDaemon -> ShowS) -> (StartDaemon -> FilePath) -> ([StartDaemon] -> ShowS) -> Show StartDaemon forall a. (Int -> a -> ShowS) -> (a -> FilePath) -> ([a] -> ShowS) -> Show a showList :: [StartDaemon] -> ShowS $cshowList :: [StartDaemon] -> ShowS show :: StartDaemon -> FilePath $cshow :: StartDaemon -> FilePath showsPrec :: Int -> StartDaemon -> ShowS $cshowsPrec :: Int -> StartDaemon -> ShowS Show, StartDaemon -> StartDaemon -> Bool (StartDaemon -> StartDaemon -> Bool) -> (StartDaemon -> StartDaemon -> Bool) -> Eq StartDaemon forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: StartDaemon -> StartDaemon -> Bool $c/= :: StartDaemon -> StartDaemon -> Bool == :: StartDaemon -> StartDaemon -> Bool $c== :: StartDaemon -> StartDaemon -> Bool Eq)