hscurses 1.4.1.0 → 1.4.1.1
raw patch · 2 files changed
+9/−4 lines, 2 filesdep ~basedep ~old-timenew-uploaderPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: base, old-time
API changes (from Hackage documentation)
- UI.HSCurses.Curses: throwIfErr :: Num a => String -> IO a -> IO a
+ UI.HSCurses.Curses: throwIfErr :: (Eq a, Show a, Num a) => String -> IO a -> IO a
- UI.HSCurses.Curses: throwIfErr_ :: Num a => String -> IO a -> IO ()
+ UI.HSCurses.Curses: throwIfErr_ :: (Eq a, Show a, Num a) => String -> IO a -> IO ()
Files
- UI/HSCurses/Curses.hsc +7/−2
- hscurses.cabal +2/−2
UI/HSCurses/Curses.hsc view
@@ -234,6 +234,11 @@ defineKey (#const KEY_DOWN) "\x1b[1;2B" defineKey (#const KEY_SLEFT) "\x1b[1;2D" defineKey (#const KEY_SRIGHT) "\x1b[1;2C"+ defineKey (#const KEY_B2) "\x1b[E" -- xterm seems to emit B2, not BEG+ defineKey (#const KEY_END) "\x1b[F"+ defineKey (#const KEY_END) "\x1b[4~"+ defineKey (#const KEY_HOME) "\x1b[H"+ defineKey (#const KEY_HOME) "\x1b[1~" #endif ------------------------------------------------------------------------@@ -241,7 +246,7 @@ fi :: (Integral a, Num b) => a -> b fi = fromIntegral -throwIfErr :: Num a => String -> IO a -> IO a+throwIfErr :: (Eq a, Show a, Num a) => String -> IO a -> IO a --throwIfErr name act = do -- res <- act -- if res == (cERR)@@ -249,7 +254,7 @@ -- else return res throwIfErr s = throwIf (== (#const ERR)) (\a -> "Curses[" ++ show a ++ "]:" ++ s) -throwIfErr_ :: Num a => String -> IO a -> IO ()+throwIfErr_ :: (Eq a, Show a, Num a) => String -> IO a -> IO () throwIfErr_ name act = void $ throwIfErr name act errI :: IO CInt -> IO ()
hscurses.cabal view
@@ -1,5 +1,5 @@ Name: hscurses-Version: 1.4.1.0+Version: 1.4.1.1 License: LGPL License-file: LICENSE Author: John Meacham <john at repetae dot net>@@ -36,7 +36,7 @@ Library Build-depends: base == 4.*, mtl,- old-time == 1.0.*, old-locale == 1.0.*+ old-time < 1.2, old-locale == 1.0.* if !os(windows) Build-depends: unix >= 2.4 && < 2.6 Exposed-modules: