{-# LANGUAGE CPP #-} {-# OPTIONS_GHC -fno-warn-orphans #-} {-| Module: Instances.GHC.Fingerprint Copyright: (C) 2014-2016 Ryan Scott License: BSD-style (see the file LICENSE) Maintainer: Ryan Scott Stability: Provisional Portability: GHC 'Arbitrary' instance for 'Fingerprint'. -} module Instances.GHC.Fingerprint () where #if MIN_VERSION_base(4,4,0) import GHC.Fingerprint.Type (Fingerprint(..)) import Prelude () import Prelude.Compat import Test.QuickCheck (Arbitrary(..)) instance Arbitrary Fingerprint where arbitrary = Fingerprint <$> arbitrary <*> arbitrary #endif