-- |
-- Module      : Foundation.System.Entropy.Common
-- License     : BSD-style
-- Maintainer  : Vincent Hanquez <vincent@snarc.org>
-- Stability   : experimental
-- Portability : portable
--
-- Common part for vectors
--
{-# LANGUAGE DeriveDataTypeable #-}
module Foundation.System.Entropy.Common
    ( EntropySystemMissing(..)
    ) where

import Basement.Compat.Base

data EntropySystemMissing = EntropySystemMissing
    deriving (Int -> EntropySystemMissing -> ShowS
[EntropySystemMissing] -> ShowS
EntropySystemMissing -> String
(Int -> EntropySystemMissing -> ShowS)
-> (EntropySystemMissing -> String)
-> ([EntropySystemMissing] -> ShowS)
-> Show EntropySystemMissing
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> EntropySystemMissing -> ShowS
showsPrec :: Int -> EntropySystemMissing -> ShowS
$cshow :: EntropySystemMissing -> String
show :: EntropySystemMissing -> String
$cshowList :: [EntropySystemMissing] -> ShowS
showList :: [EntropySystemMissing] -> ShowS
Show,EntropySystemMissing -> EntropySystemMissing -> Bool
(EntropySystemMissing -> EntropySystemMissing -> Bool)
-> (EntropySystemMissing -> EntropySystemMissing -> Bool)
-> Eq EntropySystemMissing
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EntropySystemMissing -> EntropySystemMissing -> Bool
== :: EntropySystemMissing -> EntropySystemMissing -> Bool
$c/= :: EntropySystemMissing -> EntropySystemMissing -> Bool
/= :: EntropySystemMissing -> EntropySystemMissing -> Bool
Eq,Typeable)

instance Exception EntropySystemMissing