handle-like 0.1.0.2 → 0.1.0.3
raw patch · 2 files changed
+2/−2 lines, 2 filesPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
API changes (from Hackage documentation)
- Data.HandleLike: class (Monad (HandleMonad h), IsString (DebugLevel h), Ord (DebugLevel h), Bounded (DebugLevel h)) => HandleLike h where type family HandleMonad h type family DebugLevel h type instance DebugLevel h = Priority hlGetByte h = do { [b] <- unpack `liftM` hlGet h 1; return b } hlGetLine h = do { b <- hlGetByte h; case b of { 10 -> return "" _ -> cons b `liftM` hlGetLine h } } hlGetContent = flip hlGet 1 hlFlush _ = return () hlDebug _ _ _ = return () hlError _ msg = error $ unpack msg
+ Data.HandleLike: class (Monad (HandleMonad h), IsString (DebugLevel h), Ord (DebugLevel h), Bounded (DebugLevel h)) => HandleLike h where type family HandleMonad h :: * -> * type family DebugLevel h type instance DebugLevel h = Priority hlGetByte h = do { [b] <- unpack `liftM` hlGet h 1; return b } hlGetLine h = do { b <- hlGetByte h; case b of { 10 -> return "" _ -> cons b `liftM` hlGetLine h } } hlGetContent = flip hlGet 1 hlFlush _ = return () hlDebug _ _ _ = return () hlError _ msg = error $ unpack msg
Files
- handle-like.cabal +1/−1
- src/Data/HandleLike.hs +1/−1
handle-like.cabal view
@@ -2,7 +2,7 @@ build-type: Simple name: handle-like-version: 0.1.0.2+version: 0.1.0.3 stability: Experimental author: Yoshikuni Jujo <PAF01143@nifty.ne.jp> maintainer: Yoshikuni Jujo <PAF01143@nifty.ne.jp>
src/Data/HandleLike.hs view
@@ -14,7 +14,7 @@ class (Monad (HandleMonad h), IsString (DebugLevel h), Ord (DebugLevel h), Bounded (DebugLevel h)) => HandleLike h where- type HandleMonad h+ type HandleMonad h :: * -> * type DebugLevel h hlPut :: h -> BS.ByteString -> HandleMonad h () hlGet :: h -> Int -> HandleMonad h BS.ByteString