{-# OPTIONS_GHC -Wno-orphans #-}

module Crypto.JOSE.Error.Instances () where

import Data.Monoid (Monoid)
import Control.Monad (Monad)
import Control.Applicative (Alternative)

import Crypto.JOSE.Error

deriving newtype instance (Monad m, Monoid e) => Alternative (JOSE e m)