diff options
Diffstat (limited to 'devel/hs-asn1-data/files/patch-Data_ASN1_Parse.hs')
| -rw-r--r-- | devel/hs-asn1-data/files/patch-Data_ASN1_Parse.hs | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/devel/hs-asn1-data/files/patch-Data_ASN1_Parse.hs b/devel/hs-asn1-data/files/patch-Data_ASN1_Parse.hs new file mode 100644 index 000000000000..2ead06800a21 --- /dev/null +++ b/devel/hs-asn1-data/files/patch-Data_ASN1_Parse.hs @@ -0,0 +1,11 @@ +--- Data/ASN1/Parse.hs.orig 2012-08-28 06:24:31 UTC ++++ Data/ASN1/Parse.hs +@@ -25,7 +25,7 @@ import Control.Applicative ((<$>)) + + -- | Parse ASN1 Monad + newtype ParseASN1 a = P { runP :: ErrorT String (State [ASN1]) a } +- deriving (Functor, Monad, MonadError String) ++ deriving (Functor, Applicative, Monad, MonadError String) + + -- | run the parse monad over a stream and returns the result and the remaining ASN1 Stream. + runParseASN1State :: ParseASN1 a -> [ASN1] -> Either String (a,[ASN1]) |