packages feed

rhine-gloss 1.5 → 1.6

raw patch · 3 files changed

+9/−6 lines, 3 filesdep ~basedep ~monad-scheduledep ~rhinePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: base, monad-schedule, rhine

API changes (from Hackage documentation)

- FRP.Rhine.Gloss.IO: GlossConcT :: ReaderT GlossEnv (FreeAsyncT m) a -> GlossConcT m a
+ FRP.Rhine.Gloss.IO: GlossConcT :: ReaderT GlossEnv (FreeAsyncT m) a -> GlossConcT (m :: Type -> Type) a
- FRP.Rhine.Gloss.IO: [unGlossConcT] :: GlossConcT m a -> ReaderT GlossEnv (FreeAsyncT m) a
+ FRP.Rhine.Gloss.IO: [unGlossConcT] :: GlossConcT (m :: Type -> Type) a -> ReaderT GlossEnv (FreeAsyncT m) a
- FRP.Rhine.Gloss.IO: clearIO :: MonadIO m => GlossConcT m ()
+ FRP.Rhine.Gloss.IO: clearIO :: forall (m :: Type -> Type). MonadIO m => GlossConcT m ()
- FRP.Rhine.Gloss.IO: glossClockUTC :: (MonadIO m, Real (Time cl)) => cl -> GlossClockUTC m cl
+ FRP.Rhine.Gloss.IO: glossClockUTC :: forall (m :: Type -> Type) cl. (MonadIO m, Real (Time cl)) => cl -> GlossClockUTC m cl
- FRP.Rhine.Gloss.IO: glossConcTClock :: MonadIO m => cl -> GlossConcTClock m cl
+ FRP.Rhine.Gloss.IO: glossConcTClock :: forall (m :: Type -> Type) cl. MonadIO m => cl -> GlossConcTClock m cl
- FRP.Rhine.Gloss.IO: newtype GlossConcT m a
+ FRP.Rhine.Gloss.IO: newtype GlossConcT (m :: Type -> Type) a
- FRP.Rhine.Gloss.IO: paintAllIO :: MonadIO m => Picture -> GlossConcT m ()
+ FRP.Rhine.Gloss.IO: paintAllIO :: forall (m :: Type -> Type). MonadIO m => Picture -> GlossConcT m ()
- FRP.Rhine.Gloss.IO: paintIO :: MonadIO m => Picture -> GlossConcT m ()
+ FRP.Rhine.Gloss.IO: paintIO :: forall (m :: Type -> Type). MonadIO m => Picture -> GlossConcT m ()
- FRP.Rhine.Gloss.IO: runGlossEnvClock :: MonadIO m => GlossEnv -> cl -> RunGlossEnvClock m cl
+ FRP.Rhine.Gloss.IO: runGlossEnvClock :: forall (m :: Type -> Type) cl. MonadIO m => GlossEnv -> cl -> RunGlossEnvClock m cl
- FRP.Rhine.Gloss.IO: type GlossClockUTC m cl = UTCClock (GlossConcT m) cl
+ FRP.Rhine.Gloss.IO: type GlossClockUTC (m :: Type -> Type) cl = UTCClock GlossConcT m cl
- FRP.Rhine.Gloss.IO: type GlossConcTClock m = HoistClock IO (GlossConcT m)
+ FRP.Rhine.Gloss.IO: type GlossConcTClock (m :: Type -> Type) = HoistClock IO GlossConcT m
- FRP.Rhine.Gloss.IO: type RunGlossEnvClock m cl = HoistClock (GlossConcT m) m cl
+ FRP.Rhine.Gloss.IO: type RunGlossEnvClock (m :: Type -> Type) cl = HoistClock GlossConcT m m cl
- FRP.Rhine.Gloss.Pure.Combined: type GlossCombinedClock a = SequentialClock (GlossEventClock a) GlossSimulationClock
+ FRP.Rhine.Gloss.Pure.Combined: type GlossCombinedClock a = SequentialClock GlossEventClock a GlossSimulationClock
- FRP.Rhine.Gloss.Pure.Combined: type GlossRhine a = Rhine GlossM (GlossCombinedClock a) () ()
+ FRP.Rhine.Gloss.Pure.Combined: type GlossRhine a = Rhine GlossM GlossCombinedClock a () ()

Files

rhine-gloss.cabal view
@@ -1,7 +1,7 @@ -- Initial rhine-gloss.cabal generated by cabal init.  For further -- documentation, see http://haskell.org/cabal/users-guide/ name: rhine-gloss-version: 1.5+version: 1.6 synopsis: Gloss backend for Rhine description:   This package provides a simple wrapper for the `gloss` library,@@ -26,7 +26,7 @@ source-repository this   type: git   location: https://github.com/turion/rhine.git-  tag: v1.5+  tag: v1.6  library   exposed-modules:@@ -38,11 +38,11 @@    build-depends:     automaton,-    base >=4.16 && <4.21,+    base >=4.16 && <4.22,     gloss >=1.12,     mmorph >=1.1,-    monad-schedule >=0.1,-    rhine ^>=1.5,+    monad-schedule >=1.6,+    rhine ^>=1.6,     transformers >=0.5    hs-source-dirs: src@@ -57,7 +57,7 @@   main-is: Main.hs   ghc-options: -threaded   build-depends:-    base >=4.16 && <4.21,+    base >=4.16 && <4.22,     rhine-gloss    default-language: Haskell2010
src/FRP/Rhine/Gloss/IO.hs view
@@ -134,6 +134,7 @@         liftIO $ do           time <- readIORef timeRef           return (time, event)+  {-# INLINE initClock #-}  instance GetClockProxy GlossEventClockIO @@ -153,6 +154,7 @@       getTime = GlossConcT $ do         GlossEnv {timeVar} <- ask         lift $ asyncMVar timeVar+  {-# INLINE initClock #-}  instance GetClockProxy GlossSimClockIO
src/FRP/Rhine/Gloss/Pure.hs view
@@ -83,6 +83,7 @@   type Time GlossClock = Float   type Tag GlossClock = Maybe Event   initClock _ = return (constM (GlossM $ yield >> lift ask) >>> (sumS *** Category.id), 0)+  {-# INLINE initClock #-}  instance GetClockProxy GlossClock