bytestring-from 0.2 → 0.2.1
raw patch · 2 files changed
+5/−6 lines, 2 files
Files
- bytestring-from.cabal +1/−1
- src/Data/ByteString/From.hs +4/−5
bytestring-from.cabal view
@@ -1,5 +1,5 @@ name: bytestring-from-version: 0.2+version: 0.2.1 synopsis: A type-class to convert values from ByteString. license: OtherLicense license-file: LICENSE
src/Data/ByteString/From.hs view
@@ -6,6 +6,7 @@ module Data.ByteString.From ( FromByteString (..)+ , fromByteString , runParser ) where @@ -23,14 +24,12 @@ import qualified Data.ByteString.Lazy as Lazy --- | Parse 'ByteString's as typed values.------ Minimal complete definition: 'parser'.+-- | Parse 'ByteString's. class FromByteString a where parser :: Parser a - fromByteString :: ByteString -> Maybe a- fromByteString = either (const Nothing) Just . runParser parser+fromByteString :: FromByteString a => ByteString -> Maybe a+fromByteString = either (const Nothing) Just . runParser parser runParser :: Parser a -> ByteString -> Either String a runParser p b = case feed (parse p b) "" of