    -- |
    -- 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