-- |
-- Module: NetSpider.Query.Internal
-- Description: 
-- Maintainer: Toshio Ito <debug.ito@gmail.com>
--
-- 
module NetSpider.Query.Internal
       ( FoundNodePolicy(..)
       ) where

-- | Policy to treat 'FoundNode's (local findings) when the spider
-- creates the snapshot graph.
--
-- 'Eq' instance was added in version 0.3.2.0
--
-- @since 0.2.0.0
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)