ghcjs-dom-jsffi 0.9.0.0 → 0.9.1.0
raw patch · 3 files changed
+20/−2 lines, 3 files
Files
- ghcjs-dom-jsffi.cabal +1/−1
- src/GHCJS/DOM.hs +16/−1
- src/GHCJS/DOM/JSFFI/Database.hs +3/−0
ghcjs-dom-jsffi.cabal view
@@ -1,5 +1,5 @@ name: ghcjs-dom-jsffi-version: 0.9.0.0+version: 0.9.1.0 cabal-version: >=1.24 build-type: Simple license: MIT
src/GHCJS/DOM.hs view
@@ -9,6 +9,9 @@ , syncAfter , waitForAnimationFrame , nextAnimationFrame+, AnimationFrameHandle+, inAnimationFrame+, inAnimationFrame' , catch , bracket ) where@@ -18,7 +21,8 @@ import Data.Maybe (fromJust) -import JavaScript.Web.AnimationFrame (waitForAnimationFrame)+import GHCJS.Concurrent (OnBlocked(..))+import JavaScript.Web.AnimationFrame (waitForAnimationFrame, AnimationFrameHandle, inAnimationFrame) import GHCJS.DOM.Types @@ -44,3 +48,14 @@ nextAnimationFrame :: (Double -> JSM a) -> JSM a nextAnimationFrame f = waitForAnimationFrame >>= f++{- |+ Run the action in an animationframe callback. The action runs in a+ synchronous thread, and is passed the high-performance clock time+ stamp for that frame. On GHCJS this version will continue+ asynchronously if it is not possible to complete the callback+ synchronously.+ -}+inAnimationFrame' :: (Double -> JSM ()) -- ^ the action to run+ -> JSM AnimationFrameHandle+inAnimationFrame' = inAnimationFrame ContinueAsync
src/GHCJS/DOM/JSFFI/Database.hs view
@@ -24,6 +24,7 @@ import GHCJS.Marshal.Pure (pToJSVal) import GHCJS.Foreign.Callback (releaseCallback) import GHCJS.DOM.Types+import GHCJS.Foreign.Export import GHCJS.DOM.JSFFI.SQLError (throwSQLException) import GHCJS.DOM.JSFFI.Generated.SQLTransactionCallback (newSQLTransactionCallbackSync)@@ -35,6 +36,8 @@ foreign import javascript interruptible "$1[\"changeVersion\"]($2, $3, $4, $c, function() { $c(null); });" js_changeVersion :: Database -> JSString -> JSString -> Nullable SQLTransactionCallback -> IO (Nullable SQLError)++foreign import javascript "getTheStoredExport()" getTheStoredExport :: IO (Export a) -- | <https://developer.mozilla.org/en-US/docs/Web/API/Database.changeVersion Mozilla Database.changeVersion documentation> changeVersion' :: (MonadIO m, ToJSString oldVersion, ToJSString newVersion) =>