diff --git a/ghcjs-dom-jsffi.cabal b/ghcjs-dom-jsffi.cabal
--- a/ghcjs-dom-jsffi.cabal
+++ b/ghcjs-dom-jsffi.cabal
@@ -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
diff --git a/src/GHCJS/DOM.hs b/src/GHCJS/DOM.hs
--- a/src/GHCJS/DOM.hs
+++ b/src/GHCJS/DOM.hs
@@ -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
diff --git a/src/GHCJS/DOM/JSFFI/Database.hs b/src/GHCJS/DOM/JSFFI/Database.hs
--- a/src/GHCJS/DOM/JSFFI/Database.hs
+++ b/src/GHCJS/DOM/JSFFI/Database.hs
@@ -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) =>