module NetSpider.Query.Internal
( FoundNodePolicy(..)
) where
data FoundNodePolicy n na=
PolicyOverwrite
| PolicyAppend
deriving (Int -> FoundNodePolicy n na -> ShowS
[FoundNodePolicy n na] -> ShowS
FoundNodePolicy n na -> String
(Int -> FoundNodePolicy n na -> ShowS)
-> (FoundNodePolicy n na -> String)
-> ([FoundNodePolicy n na] -> ShowS)
-> Show (FoundNodePolicy n na)
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
forall n na. Int -> FoundNodePolicy n na -> ShowS
forall n na. [FoundNodePolicy n na] -> ShowS
forall n na. FoundNodePolicy n na -> String
showList :: [FoundNodePolicy n na] -> ShowS
$cshowList :: forall n na. [FoundNodePolicy n na] -> ShowS
show :: FoundNodePolicy n na -> String
$cshow :: forall n na. FoundNodePolicy n na -> String
showsPrec :: Int -> FoundNodePolicy n na -> ShowS
$cshowsPrec :: forall n na. Int -> FoundNodePolicy n na -> ShowS
Show,FoundNodePolicy n na -> FoundNodePolicy n na -> Bool
(FoundNodePolicy n na -> FoundNodePolicy n na -> Bool)
-> (FoundNodePolicy n na -> FoundNodePolicy n na -> Bool)
-> Eq (FoundNodePolicy n na)
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
forall n na. FoundNodePolicy n na -> FoundNodePolicy n na -> Bool
/= :: FoundNodePolicy n na -> FoundNodePolicy n na -> Bool
$c/= :: forall n na. FoundNodePolicy n na -> FoundNodePolicy n na -> Bool
== :: FoundNodePolicy n na -> FoundNodePolicy n na -> Bool
$c== :: forall n na. FoundNodePolicy n na -> FoundNodePolicy n na -> Bool
Eq)