packages feed

ghcjs-dom-jsffi 0.9.2.0 → 0.9.4.0

raw patch · 587 files changed

+2259/−1495 lines, 587 files

This diff is very large; some files are shown as “too large to diff”. Download the raw patch for the complete diff.

Files

ghcjs-dom-jsffi.cabal view
@@ -1,5 +1,5 @@ name: ghcjs-dom-jsffi-version: 0.9.2.0+version: 0.9.4.0 cabal-version: >=1.24 build-type: Simple license: MIT@@ -51,6 +51,10 @@           GHCJS.DOM.JSFFI.NavigatorUserMediaError           GHCJS.DOM.JSFFI.PositionError           GHCJS.DOM.JSFFI.RTCPeerConnectionError+          GHCJS.DOM.JSFFI.SpeechGrammar+          GHCJS.DOM.JSFFI.SpeechRecognition+          GHCJS.DOM.JSFFI.SpeechRecognitionError+          GHCJS.DOM.JSFFI.SpeechRecognitionEvent           GHCJS.DOM.JSFFI.SQLError           GHCJS.DOM.JSFFI.SQLTransaction           GHCJS.DOM.JSFFI.Window
src/GHCJS/DOM/EventM.hs view
@@ -17,7 +17,11 @@ , removeListener , releaseListener , on--- * DOM Event interface+, onSync+, onAsync+, onTheseSync+, onTheseAsync+-- * Event interface , event , eventTarget , target@@ -108,13 +112,13 @@  -- | Add an EventListener to an EventTarget. addListener :: (IsEventTarget t, IsEvent e) => t -> EventName t e -> SaferEventListener t e -> Bool -> IO ()-addListener target (EventName eventName) (SaferEventListener l) useCapture =-    addEventListener target eventName (Just l) useCapture+addListener target eventName (SaferEventListener l) useCapture =+    addEventListener target (eventNameString eventName) (Just l) useCapture  -- | Remove an EventListener from an EventTarget. removeListener :: (IsEventTarget t, IsEvent e) => t -> EventName t e -> SaferEventListener t e -> Bool -> IO ()-removeListener target (EventName eventName) (SaferEventListener l) useCapture =-    removeEventListener target eventName (Just l) useCapture+removeListener target eventName (SaferEventListener l) useCapture =+    removeEventListener target (eventNameString eventName) (Just l) useCapture  -- | Release the listener (deallocates callbacks). releaseListener :: (IsEventTarget t, IsEvent e) => SaferEventListener t e -> IO ()@@ -123,9 +127,9 @@ -- | Shortcut for create, add and release: -- -- @--- releaseAction <- on element 'GHCJS.DOM.JSFFI.Generated.Document.click' $ do---     Just w <- 'GHCJS.DOM.currentWindow'---     'GHCJS.DOM.JSFFI.Generated.Window.alert' w "I was clicked!"+-- releaseAction <- on element 'GHCJS.DOM.Document.click' $ do+--     w <- 'GHCJS.DOM.currentWindowUnchecked'+--     'GHCJS.DOM.Window.alert' w "I was clicked!" -- -- remove click handler again -- releaseAction -- @@@ -134,17 +138,50 @@    -> EventName t e -- ^ event    -> EventM t e () -- ^ action    -> IO (IO ())    -- ^ @IO@ action that removes the listener from the element-on target eventName callback = do-    l <- newListener callback+on target eventName@(EventNameSyncDefault _) = onSync target eventName+on target eventName@(EventNameAsyncDefault _) = onAsync target eventName++-- | Like 'on' but always uses 'newListenerSync'+onSync :: (IsEventTarget t, IsEvent e)+   => t             -- ^ target+   -> EventName t e -- ^ event+   -> EventM t e () -- ^ action+   -> IO (IO ())    -- ^ @IO@ action that removes the listener from the element+onSync target eventName callback = do+    l <- newListenerSync callback     addListener target eventName l False     return (removeListener target eventName l False >> releaseListener l) --- | 'on' for multiple targets & events.+-- | Like 'on' but uses 'newListenerAsync'+onAsync :: (IsEventTarget t, IsEvent e)+   => t             -- ^ target+   -> EventName t e -- ^ event+   -> EventM t e () -- ^ action+   -> IO (IO ())    -- ^ @IO@ action that removes the listener from the element+onAsync target eventName callback = do+    l <- newListenerAsync callback+    addListener target eventName l False+    return (removeListener target eventName l False >> releaseListener l)++-- | 'onSync' for multiple targets & events. -- --   The returned @IO@ action removes them all at once.-onThese :: (IsEventTarget t, IsEvent e) => [(t, EventName t e)] -> EventM t e () -> IO (IO ())-onThese targetsAndEventNames callback = do-    l <- newListener callback+onTheseSync :: (IsEventTarget t, IsEvent e) => [(t, EventName t e)] -> EventM t e () -> IO (IO ())+onTheseSync targetsAndEventNames callback = do+    l <- newListenerSync callback+    forM_ targetsAndEventNames $ \(target, eventName) ->+        addListener target eventName l False+    return (do+        forM_ targetsAndEventNames (\(target, eventName) ->+            removeListener target eventName l False)+        releaseListener l)++-- | 'onAsync' for multiple targets & events.+--+--   The returned @IO@ action removes them all at once.+onTheseAsync :: (IsEventTarget t, IsEvent e) => [(t, EventName t e)] -> EventM t e () -> IO (IO ())+onTheseAsync targetsAndEventNames callback = do+    l <- newListenerAsync callback     forM_ targetsAndEventNames $ \(target, eventName) ->         addListener target eventName l False     return (do
src/GHCJS/DOM/EventTargetClosures.hs view
@@ -7,7 +7,9 @@          --   lead to confusion.          EventName(..)        , SaferEventListener(..)+       , eventNameString        , unsafeEventName+       , unsafeEventNameAsync        -- * Creation and Destruction        -- | __Note:__ Don’t forget to release your event listeners, or you will leak memory.        , eventListenerNew@@ -31,8 +33,12 @@ -- --   Many @GHCJS.DOM@ modules export @EventName@s, for example --   "GHCJS.DOM.JSFFI.Generated.Window".-newtype EventName t e = EventName DOMString+data EventName t e = EventNameSyncDefault DOMString | EventNameAsyncDefault DOMString +eventNameString :: EventName t e -> DOMString+eventNameString (EventNameSyncDefault s) = s+eventNameString (EventNameAsyncDefault s) = s+ -- | Plain JS 'EventListener' that carries the same phantom types as 'EventName'. newtype SaferEventListener t e = SaferEventListener EventListener @@ -46,7 +52,10 @@  -- | Forces the phantom parameters. unsafeEventName :: DOMString -> EventName t e-unsafeEventName = EventName+unsafeEventName = EventNameSyncDefault++unsafeEventNameAsync :: DOMString -> EventName t e+unsafeEventNameAsync = EventNameAsyncDefault  -- | Create an EventListener that will try to run the callback synchronously, --   but fork a thread if it takes too long to execute ('ContinueAsync').
src/GHCJS/DOM/JSFFI/Generated/ANGLEInstancedArrays.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/AbstractWorker.hs view
@@ -23,11 +23,11 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AbstractWorker.onerror Mozilla AbstractWorker.onerror documentation>  error ::       (IsAbstractWorker self, IsEventTarget self) =>         EventName self UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")
src/GHCJS/DOM/JSFFI/Generated/AnalyserNode.hs view
@@ -31,7 +31,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -73,7 +73,7 @@       (js_getByteTimeDomainData self          (maybeToOptional (fmap toUint8Array array)))  -foreign import javascript unsafe "$1[\"fftSize\"] = $2;"+foreign import javascript safe "$1[\"fftSize\"] = $2;"         js_setFftSize :: AnalyserNode -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.fftSize Mozilla AnalyserNode.fftSize documentation> @@ -94,7 +94,7 @@ getFrequencyBinCount :: (MonadIO m) => AnalyserNode -> m Word getFrequencyBinCount self = liftIO (js_getFrequencyBinCount self)  -foreign import javascript unsafe "$1[\"minDecibels\"] = $2;"+foreign import javascript safe "$1[\"minDecibels\"] = $2;"         js_setMinDecibels :: AnalyserNode -> Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.minDecibels Mozilla AnalyserNode.minDecibels documentation> @@ -108,7 +108,7 @@ getMinDecibels :: (MonadIO m) => AnalyserNode -> m Double getMinDecibels self = liftIO (js_getMinDecibels self)  -foreign import javascript unsafe "$1[\"maxDecibels\"] = $2;"+foreign import javascript safe "$1[\"maxDecibels\"] = $2;"         js_setMaxDecibels :: AnalyserNode -> Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AnalyserNode.maxDecibels Mozilla AnalyserNode.maxDecibels documentation> @@ -122,7 +122,7 @@ getMaxDecibels :: (MonadIO m) => AnalyserNode -> m Double getMaxDecibels self = liftIO (js_getMaxDecibels self)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"smoothingTimeConstant\"] = $2;" js_setSmoothingTimeConstant         :: AnalyserNode -> Double -> IO ()
src/GHCJS/DOM/JSFFI/Generated/Animatable.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getAnimations\"]()"
src/GHCJS/DOM/JSFFI/Generated/Animation.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/AnimationEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ApplePayError.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ApplePayPaymentAuthorizedEvent.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"payment\"]" js_getPayment ::
src/GHCJS/DOM/JSFFI/Generated/ApplePayPaymentMethodSelectedEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"paymentMethod\"]"
src/GHCJS/DOM/JSFFI/Generated/ApplePaySession.hs view
@@ -49,10 +49,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe+foreign import javascript safe         "new window[\"ApplePaySession\"]($1,\n$2)" js_newApplePaySession ::         Word -> ApplePayPaymentRequest -> IO ApplePaySession @@ -62,94 +62,89 @@ newApplePaySession version paymentRequest   = liftIO (js_newApplePaySession version paymentRequest)  -foreign import javascript unsafe-        "($1[\"supportsVersion\"]($2) ? 1 : 0)" js_supportsVersion ::-        ApplePaySession -> Word -> IO Bool+foreign import javascript safe+        "(window[\"ApplePaySession\"][\"supportsVersion\"]($1) ? 1 : 0)"+        js_supportsVersion :: Word -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.supportsVersion Mozilla ApplePaySession.supportsVersion documentation> -supportsVersion :: (MonadIO m) => ApplePaySession -> Word -> m Bool-supportsVersion self version-  = liftIO (js_supportsVersion self version)+supportsVersion :: (MonadIO m) => Word -> m Bool+supportsVersion version = liftIO (js_supportsVersion version)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.supportsVersion Mozilla ApplePaySession.supportsVersion documentation> -supportsVersion_ :: (MonadIO m) => ApplePaySession -> Word -> m ()-supportsVersion_ self version-  = liftIO (void (js_supportsVersion self version))+supportsVersion_ :: (MonadIO m) => Word -> m ()+supportsVersion_ version+  = liftIO (void (js_supportsVersion version))  -foreign import javascript unsafe-        "($1[\"canMakePayments\"]() ? 1 : 0)" js_canMakePayments ::-        ApplePaySession -> IO Bool+foreign import javascript safe+        "(window[\"ApplePaySession\"][\"canMakePayments\"]() ? 1 : 0)"+        js_canMakePayments :: IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.canMakePayments Mozilla ApplePaySession.canMakePayments documentation> -canMakePayments :: (MonadIO m) => ApplePaySession -> m Bool-canMakePayments self = liftIO (js_canMakePayments self)+canMakePayments :: (MonadIO m) => m Bool+canMakePayments = liftIO (js_canMakePayments)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.canMakePayments Mozilla ApplePaySession.canMakePayments documentation> -canMakePayments_ :: (MonadIO m) => ApplePaySession -> m ()-canMakePayments_ self = liftIO (void (js_canMakePayments self))+canMakePayments_ :: (MonadIO m) => m ()+canMakePayments_ = liftIO (void (js_canMakePayments))   foreign import javascript interruptible-        "$1[\"canMakePaymentsWithActiveCard\"]($2).then(function(s) { $c(null, s);}, function(e) { $c(e, null);});"-        js_canMakePaymentsWithActiveCard ::-        ApplePaySession -> JSString -> IO (JSVal, Bool)+        "window[\"ApplePaySession\"][\"canMakePaymentsWithActiveCard\"]($1).then(function(s) { $c(null, s);}, function(e) { $c(e, null);});"+        js_canMakePaymentsWithActiveCard :: JSString -> IO (JSVal, Bool)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.canMakePaymentsWithActiveCard Mozilla ApplePaySession.canMakePaymentsWithActiveCard documentation>  canMakePaymentsWithActiveCard ::                               (MonadIO m, ToJSString merchantIdentifier) =>-                                ApplePaySession -> merchantIdentifier -> m Bool-canMakePaymentsWithActiveCard self merchantIdentifier+                                merchantIdentifier -> m Bool+canMakePaymentsWithActiveCard merchantIdentifier   = liftIO-      ((js_canMakePaymentsWithActiveCard self-          (toJSString merchantIdentifier))+      ((js_canMakePaymentsWithActiveCard (toJSString merchantIdentifier))          >>= checkPromiseResult)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.canMakePaymentsWithActiveCard Mozilla ApplePaySession.canMakePaymentsWithActiveCard documentation>  canMakePaymentsWithActiveCard_ ::                                (MonadIO m, ToJSString merchantIdentifier) =>-                                 ApplePaySession -> merchantIdentifier -> m ()-canMakePaymentsWithActiveCard_ self merchantIdentifier+                                 merchantIdentifier -> m ()+canMakePaymentsWithActiveCard_ merchantIdentifier   = liftIO       (void-         (js_canMakePaymentsWithActiveCard self-            (toJSString merchantIdentifier)))+         (js_canMakePaymentsWithActiveCard (toJSString merchantIdentifier)))   foreign import javascript interruptible-        "$1[\"openPaymentSetup\"]($2).then(function(s) { $c(null, s);}, function(e) { $c(e, null);});"-        js_openPaymentSetup ::-        ApplePaySession -> JSString -> IO (JSVal, Bool)+        "window[\"ApplePaySession\"][\"openPaymentSetup\"]($1).then(function(s) { $c(null, s);}, function(e) { $c(e, null);});"+        js_openPaymentSetup :: JSString -> IO (JSVal, Bool)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.openPaymentSetup Mozilla ApplePaySession.openPaymentSetup documentation>  openPaymentSetup ::                  (MonadIO m, ToJSString merchantIdentifier) =>-                   ApplePaySession -> merchantIdentifier -> m Bool-openPaymentSetup self merchantIdentifier+                   merchantIdentifier -> m Bool+openPaymentSetup merchantIdentifier   = liftIO-      ((js_openPaymentSetup self (toJSString merchantIdentifier)) >>=+      ((js_openPaymentSetup (toJSString merchantIdentifier)) >>=          checkPromiseResult)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.openPaymentSetup Mozilla ApplePaySession.openPaymentSetup documentation>  openPaymentSetup_ ::                   (MonadIO m, ToJSString merchantIdentifier) =>-                    ApplePaySession -> merchantIdentifier -> m ()-openPaymentSetup_ self merchantIdentifier+                    merchantIdentifier -> m ()+openPaymentSetup_ merchantIdentifier   = liftIO-      (void (js_openPaymentSetup self (toJSString merchantIdentifier)))+      (void (js_openPaymentSetup (toJSString merchantIdentifier)))  -foreign import javascript unsafe "$1[\"begin\"]()" js_begin ::+foreign import javascript safe "$1[\"begin\"]()" js_begin ::         ApplePaySession -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.begin Mozilla ApplePaySession.begin documentation>  begin :: (MonadIO m) => ApplePaySession -> m () begin self = liftIO (js_begin self)  -foreign import javascript unsafe "$1[\"abort\"]()" js_abort ::+foreign import javascript safe "$1[\"abort\"]()" js_abort ::         ApplePaySession -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.abort Mozilla ApplePaySession.abort documentation>  abort :: (MonadIO m) => ApplePaySession -> m () abort self = liftIO (js_abort self)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"completeMerchantValidation\"]($2)"         js_completeMerchantValidation :: ApplePaySession -> JSVal -> IO () @@ -163,7 +158,7 @@          \ merchantSession' ->            js_completeMerchantValidation self merchantSession')  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"completeShippingMethodSelection\"]($2)"         js_completeShippingMethodSelectionUpdate ::         ApplePaySession -> ApplePayShippingMethodUpdate -> IO ()@@ -175,7 +170,7 @@ completeShippingMethodSelectionUpdate self update   = liftIO (js_completeShippingMethodSelectionUpdate self update)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"completeShippingContactSelection\"]($2)"         js_completeShippingContactSelectionUpdate ::         ApplePaySession -> ApplePayShippingContactUpdate -> IO ()@@ -187,7 +182,7 @@ completeShippingContactSelectionUpdate self update   = liftIO (js_completeShippingContactSelectionUpdate self update)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"completePaymentMethodSelection\"]($2)"         js_completePaymentMethodSelectionUpdate ::         ApplePaySession -> ApplePayPaymentMethodUpdate -> IO ()@@ -199,7 +194,7 @@ completePaymentMethodSelectionUpdate self update   = liftIO (js_completePaymentMethodSelectionUpdate self update)  -foreign import javascript unsafe "$1[\"completePayment\"]($2)"+foreign import javascript safe "$1[\"completePayment\"]($2)"         js_completePaymentResult ::         ApplePaySession -> ApplePayPaymentAuthorizationResult -> IO () @@ -210,7 +205,7 @@ completePaymentResult self result   = liftIO (js_completePaymentResult self result)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"completeShippingMethodSelection\"]($2,\n$3, $4)"         js_completeShippingMethodSelection ::         ApplePaySession -> Word -> ApplePayLineItem -> JSVal -> IO ()@@ -227,7 +222,7 @@            js_completeShippingMethodSelection self status newTotal              newLineItems')  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"completeShippingContactSelection\"]($2,\n$3, $4, $5)"         js_completeShippingContactSelection ::         ApplePaySession ->@@ -251,7 +246,7 @@              newTotal              newLineItems')  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"completePaymentMethodSelection\"]($2,\n$3)"         js_completePaymentMethodSelection ::         ApplePaySession -> ApplePayLineItem -> JSVal -> IO ()@@ -266,7 +261,7 @@          \ newLineItems' ->            js_completePaymentMethodSelection self newTotal newLineItems')  -foreign import javascript unsafe "$1[\"completePayment\"]($2)"+foreign import javascript safe "$1[\"completePayment\"]($2)"         js_completePayment :: ApplePaySession -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplePaySession.completePayment Mozilla ApplePaySession.completePayment documentation>
src/GHCJS/DOM/JSFFI/Generated/ApplePayShippingContactSelectedEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"shippingContact\"]"
src/GHCJS/DOM/JSFFI/Generated/ApplePayShippingMethodSelectedEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"shippingMethod\"]"
src/GHCJS/DOM/JSFFI/Generated/ApplePayValidateMerchantEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"validationURL\"]"
src/GHCJS/DOM/JSFFI/Generated/ApplicationCache.hs view
@@ -27,17 +27,17 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"update\"]()" js_update ::+foreign import javascript safe "$1[\"update\"]()" js_update ::         ApplicationCache -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.update Mozilla ApplicationCache.update documentation>  update :: (MonadIO m) => ApplicationCache -> m () update self = liftIO (js_update self)  -foreign import javascript unsafe "$1[\"swapCache\"]()" js_swapCache+foreign import javascript safe "$1[\"swapCache\"]()" js_swapCache         :: ApplicationCache -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.swapCache Mozilla ApplicationCache.swapCache documentation> @@ -70,7 +70,7 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onerror Mozilla ApplicationCache.onerror documentation>  error :: EventName ApplicationCache UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onnoupdate Mozilla ApplicationCache.onnoupdate documentation>  noUpdate :: EventName ApplicationCache Event@@ -82,7 +82,7 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onprogress Mozilla ApplicationCache.onprogress documentation>  progress :: EventName ApplicationCache ProgressEvent-progress = unsafeEventName (toJSString "progress")+progress = unsafeEventNameAsync (toJSString "progress")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ApplicationCache.onupdateready Mozilla ApplicationCache.onupdateready documentation>  updateReady :: EventName ApplicationCache Event
src/GHCJS/DOM/JSFFI/Generated/Attr.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"namespaceURI\"]"
src/GHCJS/DOM/JSFFI/Generated/AudioBuffer.hs view
@@ -26,10 +26,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"getChannelData\"]($2)"+foreign import javascript safe "$1[\"getChannelData\"]($2)"         js_getChannelData :: AudioBuffer -> Word -> IO Float32Array  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBuffer.getChannelData Mozilla AudioBuffer.getChannelData documentation>
src/GHCJS/DOM/JSFFI/Generated/AudioBufferCallback.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferCallback Mozilla AudioBufferCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/AudioBufferSourceNode.hs view
@@ -31,11 +31,11 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"start\"]($2, $3, $4)"-        js_start ::+foreign import javascript safe "$1[\"start\"]($2, $3, $4)" js_start+        ::         AudioBufferSourceNode ->           Optional Double -> Optional Double -> Optional Double -> IO () @@ -49,7 +49,7 @@       (js_start self (maybeToOptional when) (maybeToOptional grainOffset)          (maybeToOptional grainDuration))  -foreign import javascript unsafe "$1[\"stop\"]($2)" js_stop ::+foreign import javascript safe "$1[\"stop\"]($2)" js_stop ::         AudioBufferSourceNode -> Optional Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioBufferSourceNode.stop Mozilla AudioBufferSourceNode.stop documentation>
src/GHCJS/DOM/JSFFI/Generated/AudioContext.hs view
@@ -51,7 +51,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -92,7 +92,7 @@   = liftIO       ((js_close (toAudioContext self)) >>= maybeThrowPromiseRejected)  -foreign import javascript unsafe "$1[\"createBuffer\"]($2, $3, $4)"+foreign import javascript safe "$1[\"createBuffer\"]($2, $3, $4)"         js_createBuffer ::         AudioContext -> Word -> Word -> Float -> IO AudioBuffer @@ -117,7 +117,7 @@             numberOfFrames             sampleRate))  -foreign import javascript unsafe "$1[\"createBuffer\"]($2, $3)"+foreign import javascript safe "$1[\"createBuffer\"]($2, $3)"         js_createBufferFromArrayBuffer ::         AudioContext -> ArrayBuffer -> Bool -> IO AudioBuffer @@ -176,7 +176,7 @@ createBufferSource_ self   = liftIO (void (js_createBufferSource (toAudioContext self)))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"createMediaElementSource\"]($2)" js_createMediaElementSource         ::         AudioContext -> HTMLMediaElement -> IO MediaElementAudioSourceNode@@ -202,7 +202,7 @@          (js_createMediaElementSource (toAudioContext self)             (toHTMLMediaElement mediaElement)))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"createMediaStreamSource\"]($2)" js_createMediaStreamSource ::         AudioContext -> MediaStream -> IO MediaStreamAudioSourceNode @@ -254,7 +254,7 @@ createGain_ self   = liftIO (void (js_createGain (toAudioContext self)))  -foreign import javascript unsafe "$1[\"createDelay\"]($2)"+foreign import javascript safe "$1[\"createDelay\"]($2)"         js_createDelay :: AudioContext -> Optional Double -> IO DelayNode  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createDelay Mozilla AudioContext.createDelay documentation> @@ -364,7 +364,7 @@ createAnalyser_ self   = liftIO (void (js_createAnalyser (toAudioContext self)))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"createScriptProcessor\"]($2,\n$3, $4)"         js_createScriptProcessor ::         AudioContext ->@@ -408,8 +408,8 @@ createOscillator_ self   = liftIO (void (js_createOscillator (toAudioContext self)))  -foreign import javascript unsafe-        "$1[\"createPeriodicWave\"]($2, $3)" js_createPeriodicWave ::+foreign import javascript safe "$1[\"createPeriodicWave\"]($2, $3)"+        js_createPeriodicWave ::         AudioContext -> Float32Array -> Float32Array -> IO PeriodicWave  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createPeriodicWave Mozilla AudioContext.createPeriodicWave documentation> @@ -433,8 +433,8 @@          (js_createPeriodicWave (toAudioContext self) (toFloat32Array real)             (toFloat32Array imag)))  -foreign import javascript unsafe-        "$1[\"createChannelSplitter\"]($2)" js_createChannelSplitter ::+foreign import javascript safe "$1[\"createChannelSplitter\"]($2)"+        js_createChannelSplitter ::         AudioContext -> Optional Word -> IO ChannelSplitterNode  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioContext.createChannelSplitter Mozilla AudioContext.createChannelSplitter documentation> @@ -455,7 +455,7 @@          (js_createChannelSplitter (toAudioContext self)             (maybeToOptional numberOfOutputs)))  -foreign import javascript unsafe "$1[\"createChannelMerger\"]($2)"+foreign import javascript safe "$1[\"createChannelMerger\"]($2)"         js_createChannelMerger ::         AudioContext -> Optional Word -> IO ChannelMergerNode
src/GHCJS/DOM/JSFFI/Generated/AudioDestinationNode.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"maxChannelCount\"]"
src/GHCJS/DOM/JSFFI/Generated/AudioListener.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setPosition\"]($2, $3, $4)"
src/GHCJS/DOM/JSFFI/Generated/AudioNode.hs view
@@ -30,10 +30,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"connect\"]($2, $3, $4)"+foreign import javascript safe "$1[\"connect\"]($2, $3, $4)"         js_connect ::         AudioNode -> AudioNode -> Optional Word -> Optional Word -> IO () @@ -47,7 +47,7 @@          (maybeToOptional output)          (maybeToOptional input))  -foreign import javascript unsafe "$1[\"connect\"]($2, $3)"+foreign import javascript safe "$1[\"connect\"]($2, $3)"         js_connectParam ::         AudioNode -> AudioParam -> Optional Word -> IO () @@ -60,7 +60,7 @@       (js_connectParam (toAudioNode self) destination          (maybeToOptional output))  -foreign import javascript unsafe "$1[\"disconnect\"]($2)"+foreign import javascript safe "$1[\"disconnect\"]($2)"         js_disconnect :: AudioNode -> Optional Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.disconnect Mozilla AudioNode.disconnect documentation> @@ -96,7 +96,7 @@ getNumberOfOutputs self   = liftIO (js_getNumberOfOutputs (toAudioNode self))  -foreign import javascript unsafe "$1[\"channelCount\"] = $2;"+foreign import javascript safe "$1[\"channelCount\"] = $2;"         js_setChannelCount :: AudioNode -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.channelCount Mozilla AudioNode.channelCount documentation> @@ -113,7 +113,7 @@ getChannelCount self   = liftIO (js_getChannelCount (toAudioNode self))  -foreign import javascript unsafe "$1[\"channelCountMode\"] = $2;"+foreign import javascript safe "$1[\"channelCountMode\"] = $2;"         js_setChannelCountMode :: AudioNode -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/AudioNode.channelCountMode Mozilla AudioNode.channelCountMode documentation> @@ -135,7 +135,7 @@   = liftIO       (fromJSString <$> (js_getChannelCountMode (toAudioNode self)))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"channelInterpretation\"] = $2;" js_setChannelInterpretation         :: AudioNode -> JSString -> IO ()
src/GHCJS/DOM/JSFFI/Generated/AudioParam.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setValueAtTime\"]($2, $3)"
src/GHCJS/DOM/JSFFI/Generated/AudioProcessingEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"playbackTime\"]"
src/GHCJS/DOM/JSFFI/Generated/AudioTrack.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"id\"]" js_getId ::
src/GHCJS/DOM/JSFFI/Generated/AudioTrackList.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/AutocompleteErrorEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/BarProp.hs view
@@ -21,7 +21,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "($1[\"visible\"] ? 1 : 0)"
src/GHCJS/DOM/JSFFI/Generated/BasicCredential.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"id\"]" js_getId ::
src/GHCJS/DOM/JSFFI/Generated/BeforeLoadEvent.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/BeforeUnloadEvent.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"returnValue\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/BiquadFilterNode.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/Blob.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"Blob\"]($1, $2)"
src/GHCJS/DOM/JSFFI/Generated/BlobCallback.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/BlobCallback Mozilla BlobCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/Body.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript interruptible
src/GHCJS/DOM/JSFFI/Generated/ByteLengthQueuingStrategy.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/CSS.hs view
@@ -23,57 +23,54 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe-        "($1[\"supports\"]($2, $3) ? 1 : 0)" js_supports2 ::-        CSS -> JSString -> JSString -> IO Bool+        "(window[\"CSS\"][\"supports\"]($1,\n$2) ? 1 : 0)" js_supports2 ::+        JSString -> JSString -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSS.supports Mozilla CSS.supports documentation>  supports2 ::           (MonadIO m, ToJSString property, ToJSString value) =>-            CSS -> property -> value -> m Bool-supports2 self property value-  = liftIO-      (js_supports2 self (toJSString property) (toJSString value))+            property -> value -> m Bool+supports2 property value+  = liftIO (js_supports2 (toJSString property) (toJSString value))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSS.supports Mozilla CSS.supports documentation>  supports2_ ::            (MonadIO m, ToJSString property, ToJSString value) =>-             CSS -> property -> value -> m ()-supports2_ self property value+             property -> value -> m ()+supports2_ property value   = liftIO-      (void (js_supports2 self (toJSString property) (toJSString value)))+      (void (js_supports2 (toJSString property) (toJSString value)))  -foreign import javascript unsafe "($1[\"supports\"]($2) ? 1 : 0)"-        js_supports :: CSS -> JSString -> IO Bool+foreign import javascript unsafe+        "(window[\"CSS\"][\"supports\"]($1) ? 1 : 0)" js_supports ::+        JSString -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSS.supports Mozilla CSS.supports documentation>  supports ::-         (MonadIO m, ToJSString conditionText) =>-           CSS -> conditionText -> m Bool-supports self conditionText-  = liftIO (js_supports self (toJSString conditionText))+         (MonadIO m, ToJSString conditionText) => conditionText -> m Bool+supports conditionText+  = liftIO (js_supports (toJSString conditionText))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSS.supports Mozilla CSS.supports documentation>  supports_ ::-          (MonadIO m, ToJSString conditionText) =>-            CSS -> conditionText -> m ()-supports_ self conditionText-  = liftIO (void (js_supports self (toJSString conditionText)))+          (MonadIO m, ToJSString conditionText) => conditionText -> m ()+supports_ conditionText+  = liftIO (void (js_supports (toJSString conditionText)))  -foreign import javascript unsafe "$1[\"escape\"]($2)" js_escape ::-        CSS -> JSString -> IO JSString+foreign import javascript unsafe "window[\"CSS\"][\"escape\"]($1)"+        js_escape :: JSString -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSS.escape Mozilla CSS.escape documentation>  escape ::        (MonadIO m, ToJSString ident, FromJSString result) =>-         CSS -> ident -> m result-escape self ident-  = liftIO (fromJSString <$> (js_escape self (toJSString ident)))+         ident -> m result+escape ident+  = liftIO (fromJSString <$> (js_escape (toJSString ident)))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSS.escape Mozilla CSS.escape documentation> -escape_ :: (MonadIO m, ToJSString ident) => CSS -> ident -> m ()-escape_ self ident-  = liftIO (void (js_escape self (toJSString ident)))+escape_ :: (MonadIO m, ToJSString ident) => ident -> m ()+escape_ ident = liftIO (void (js_escape (toJSString ident)))
src/GHCJS/DOM/JSFFI/Generated/CSSFontFaceLoadEvent.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/CSSFontFaceRule.hs view
@@ -22,7 +22,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"style\"]" js_getStyle ::
src/GHCJS/DOM/JSFFI/Generated/CSSImportRule.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"href\"]" js_getHref ::
src/GHCJS/DOM/JSFFI/Generated/CSSKeyframeRule.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"keyText\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/CSSKeyframesRule.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"insertRule\"]($2)"
src/GHCJS/DOM/JSFFI/Generated/CSSMediaRule.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"insertRule\"]($2, $3)"+foreign import javascript safe "$1[\"insertRule\"]($2, $3)"         js_insertRule ::         CSSMediaRule -> Optional JSString -> Optional Word -> IO Word @@ -50,7 +50,7 @@          (js_insertRule self (toOptionalJSString rule)             (maybeToOptional index)))  -foreign import javascript unsafe "$1[\"deleteRule\"]($2)"+foreign import javascript safe "$1[\"deleteRule\"]($2)"         js_deleteRule :: CSSMediaRule -> Optional Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSMediaRule.deleteRule Mozilla CSSMediaRule.deleteRule documentation>
src/GHCJS/DOM/JSFFI/Generated/CSSNamespaceRule.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"namespaceURI\"]"
src/GHCJS/DOM/JSFFI/Generated/CSSPageRule.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"selectorText\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/CSSPrimitiveValue.hs view
@@ -37,10 +37,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"setFloatValue\"]($2, $3)"+foreign import javascript safe "$1[\"setFloatValue\"]($2, $3)"         js_setFloatValue ::         CSSPrimitiveValue -> Optional Word -> Optional Float -> IO () @@ -53,7 +53,7 @@       (js_setFloatValue self (maybeToOptional unitType)          (maybeToOptional floatValue))  -foreign import javascript unsafe "$1[\"getFloatValue\"]($2)"+foreign import javascript safe "$1[\"getFloatValue\"]($2)"         js_getFloatValue :: CSSPrimitiveValue -> Optional Word -> IO Float  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getFloatValue Mozilla CSSPrimitiveValue.getFloatValue documentation> @@ -68,7 +68,7 @@ getFloatValue_ self unitType   = liftIO (void (js_getFloatValue self (maybeToOptional unitType)))  -foreign import javascript unsafe "$1[\"setStringValue\"]($2, $3)"+foreign import javascript safe "$1[\"setStringValue\"]($2, $3)"         js_setStringValue ::         CSSPrimitiveValue -> Optional Word -> Optional JSString -> IO () @@ -81,7 +81,7 @@       (js_setStringValue self (maybeToOptional stringType)          (toOptionalJSString stringValue))  -foreign import javascript unsafe "$1[\"getStringValue\"]()"+foreign import javascript safe "$1[\"getStringValue\"]()"         js_getStringValue :: CSSPrimitiveValue -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getStringValue Mozilla CSSPrimitiveValue.getStringValue documentation> @@ -94,7 +94,7 @@ getStringValue_ :: (MonadIO m) => CSSPrimitiveValue -> m () getStringValue_ self = liftIO (void (js_getStringValue self))  -foreign import javascript unsafe "$1[\"getCounterValue\"]()"+foreign import javascript safe "$1[\"getCounterValue\"]()"         js_getCounterValue :: CSSPrimitiveValue -> IO Counter  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getCounterValue Mozilla CSSPrimitiveValue.getCounterValue documentation> @@ -105,7 +105,7 @@ getCounterValue_ :: (MonadIO m) => CSSPrimitiveValue -> m () getCounterValue_ self = liftIO (void (js_getCounterValue self))  -foreign import javascript unsafe "$1[\"getRectValue\"]()"+foreign import javascript safe "$1[\"getRectValue\"]()"         js_getRectValue :: CSSPrimitiveValue -> IO Rect  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getRectValue Mozilla CSSPrimitiveValue.getRectValue documentation> @@ -116,7 +116,7 @@ getRectValue_ :: (MonadIO m) => CSSPrimitiveValue -> m () getRectValue_ self = liftIO (void (js_getRectValue self))  -foreign import javascript unsafe "$1[\"getRGBColorValue\"]()"+foreign import javascript safe "$1[\"getRGBColorValue\"]()"         js_getRGBColorValue :: CSSPrimitiveValue -> IO RGBColor  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSPrimitiveValue.getRGBColorValue Mozilla CSSPrimitiveValue.getRGBColorValue documentation>
src/GHCJS/DOM/JSFFI/Generated/CSSRule.hs view
@@ -34,7 +34,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern UNKNOWN_RULE = 0 pattern STYLE_RULE = 1@@ -59,7 +59,7 @@ getType :: (MonadIO m, IsCSSRule self) => self -> m Word getType self = liftIO (js_getType (toCSSRule self))  -foreign import javascript unsafe "$1[\"cssText\"] = $2;"+foreign import javascript safe "$1[\"cssText\"] = $2;"         js_setCssText :: CSSRule -> Optional JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSRule.cssText Mozilla CSSRule.cssText documentation>
src/GHCJS/DOM/JSFFI/Generated/CSSRuleList.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/CSSStyleDeclaration.hs view
@@ -36,7 +36,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getPropertyValue\"]($2)"@@ -100,7 +100,7 @@       (fromJust . nullableToMaybe <$>          (js_getPropertyCSSValue self (toJSString propertyName)))  -foreign import javascript unsafe "$1[\"removeProperty\"]($2)"+foreign import javascript safe "$1[\"removeProperty\"]($2)"         js_removeProperty :: CSSStyleDeclaration -> JSString -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.removeProperty Mozilla CSSStyleDeclaration.removeProperty documentation> @@ -160,7 +160,7 @@       (fromJust . fromMaybeJSString <$>          (js_getPropertyPriority self (toJSString propertyName)))  -foreign import javascript unsafe "$1[\"setProperty\"]($2, $3, $4)"+foreign import javascript safe "$1[\"setProperty\"]($2, $3, $4)"         js_setProperty ::         CSSStyleDeclaration ->           JSString -> JSString -> Optional JSString -> IO ()@@ -252,7 +252,7 @@       (void          (js_isPropertyImplicit self (toOptionalJSString propertyName)))  -foreign import javascript unsafe "$1[\"cssText\"] = $2;"+foreign import javascript safe "$1[\"cssText\"] = $2;"         js_setCssText :: CSSStyleDeclaration -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleDeclaration.cssText Mozilla CSSStyleDeclaration.cssText documentation>
src/GHCJS/DOM/JSFFI/Generated/CSSStyleRule.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"selectorText\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/CSSStyleSheet.hs view
@@ -27,10 +27,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"insertRule\"]($2, $3)"+foreign import javascript safe "$1[\"insertRule\"]($2, $3)"         js_insertRuleDeprecated ::         CSSStyleSheet -> JSString -> Word -> IO Word @@ -49,7 +49,7 @@   = liftIO       (void (js_insertRuleDeprecated self (toJSString rule) index))  -foreign import javascript unsafe "$1[\"insertRule\"]($2)"+foreign import javascript safe "$1[\"insertRule\"]($2)"         js_insertRule :: CSSStyleSheet -> JSString -> IO Word  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.insertRule Mozilla CSSStyleSheet.insertRule documentation> @@ -64,14 +64,14 @@ insertRule_ self rule   = liftIO (void (js_insertRule self (toJSString rule)))  -foreign import javascript unsafe "$1[\"deleteRule\"]($2)"+foreign import javascript safe "$1[\"deleteRule\"]($2)"         js_deleteRule :: CSSStyleSheet -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.deleteRule Mozilla CSSStyleSheet.deleteRule documentation>  deleteRule :: (MonadIO m) => CSSStyleSheet -> Word -> m () deleteRule self index = liftIO (js_deleteRule self index)  -foreign import javascript unsafe "$1[\"addRule\"]($2, $3, $4)"+foreign import javascript safe "$1[\"addRule\"]($2, $3, $4)"         js_addRule ::         CSSStyleSheet ->           Optional JSString -> Optional JSString -> Optional Word -> IO Int@@ -99,7 +99,7 @@             (toOptionalJSString style)             (maybeToOptional index)))  -foreign import javascript unsafe "$1[\"removeRule\"]($2)"+foreign import javascript safe "$1[\"removeRule\"]($2)"         js_removeRule :: CSSStyleSheet -> Optional Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSStyleSheet.removeRule Mozilla CSSStyleSheet.removeRule documentation>
src/GHCJS/DOM/JSFFI/Generated/CSSSupportsRule.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"insertRule\"]($2, $3)"+foreign import javascript safe "$1[\"insertRule\"]($2, $3)"         js_insertRule :: CSSSupportsRule -> JSString -> Word -> IO Word  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSSupportsRule.insertRule Mozilla CSSSupportsRule.insertRule documentation> @@ -44,7 +44,7 @@ insertRule_ self rule index   = liftIO (void (js_insertRule self (toJSString rule) index))  -foreign import javascript unsafe "$1[\"deleteRule\"]($2)"+foreign import javascript safe "$1[\"deleteRule\"]($2)"         js_deleteRule :: CSSSupportsRule -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSSupportsRule.deleteRule Mozilla CSSSupportsRule.deleteRule documentation>
src/GHCJS/DOM/JSFFI/Generated/CSSValue.hs view
@@ -26,14 +26,14 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern CSS_INHERIT = 0 pattern CSS_PRIMITIVE_VALUE = 1 pattern CSS_VALUE_LIST = 2 pattern CSS_CUSTOM = 3  -foreign import javascript unsafe "$1[\"cssText\"] = $2;"+foreign import javascript safe "$1[\"cssText\"] = $2;"         js_setCssText :: CSSValue -> Optional JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CSSValue.cssText Mozilla CSSValue.cssText documentation>
src/GHCJS/DOM/JSFFI/Generated/CSSValueList.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/CanvasCaptureMediaStreamTrack.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"requestFrame\"]()"
src/GHCJS/DOM/JSFFI/Generated/CanvasGradient.hs view
@@ -23,10 +23,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"addColorStop\"]($2, $3)"+foreign import javascript safe "$1[\"addColorStop\"]($2, $3)"         js_addColorStop :: CanvasGradient -> Float -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CanvasGradient.addColorStop Mozilla CanvasGradient.addColorStop documentation>
src/GHCJS/DOM/JSFFI/Generated/CanvasPath.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"closePath\"]()" js_closePath@@ -78,8 +78,8 @@   = liftIO       (js_bezierCurveTo (toCanvasPath self) cp1x cp1y cp2x cp2y x y)  -foreign import javascript unsafe-        "$1[\"arcTo\"]($2, $3, $4, $5, $6)" js_arcTo ::+foreign import javascript safe "$1[\"arcTo\"]($2, $3, $4, $5, $6)"+        js_arcTo ::         CanvasPath ->           Double -> Double -> Double -> Double -> Double -> IO () @@ -100,7 +100,7 @@        self -> Double -> Double -> Double -> Double -> m () rect self x y w h = liftIO (js_rect (toCanvasPath self) x y w h)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"arc\"]($2, $3, $4, $5, $6,\n$7)" js_arc ::         CanvasPath ->           Double -> Double -> Double -> Double -> Double -> Bool -> IO ()@@ -115,7 +115,7 @@       (js_arc (toCanvasPath self) x y radius startAngle endAngle          anticlockwise)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"ellipse\"]($2, $3, $4, $5,\n$6, $7, $8, $9)" js_ellipse ::         CanvasPath ->           Double ->
src/GHCJS/DOM/JSFFI/Generated/CanvasRenderingContext2D.hs view
@@ -94,7 +94,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"save\"]()" js_save ::@@ -600,7 +600,7 @@ strokeRect self x y width height   = liftIO (js_strokeRect self x y width height)  -foreign import javascript unsafe "$1[\"drawImage\"]($2, $3, $4)"+foreign import javascript safe "$1[\"drawImage\"]($2, $3, $4)"         js_drawImage ::         CanvasRenderingContext2D ->           CanvasImageSource -> Float -> Float -> IO ()@@ -612,7 +612,7 @@ drawImage self image x y   = liftIO (js_drawImage self (toCanvasImageSource image) x y)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"drawImage\"]($2, $3, $4, $5,\n$6)" js_drawImageScaled ::         CanvasRenderingContext2D ->           CanvasImageSource -> Float -> Float -> Float -> Float -> IO ()@@ -627,7 +627,7 @@       (js_drawImageScaled self (toCanvasImageSource image) x y width          height)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"drawImage\"]($2, $3, $4, $5,\n$6, $7, $8, $9, $10)"         js_drawImagePart ::         CanvasRenderingContext2D ->@@ -811,7 +811,7 @@          dirtyWidth          dirtyHeight)  -foreign import javascript unsafe "$1[\"createImageData\"]($2)"+foreign import javascript safe "$1[\"createImageData\"]($2)"         js_createImageData ::         CanvasRenderingContext2D -> Optional ImageData -> IO ImageData @@ -829,7 +829,7 @@   = liftIO       (void (js_createImageData self (maybeToOptional imagedata)))  -foreign import javascript unsafe "$1[\"createImageData\"]($2, $3)"+foreign import javascript safe "$1[\"createImageData\"]($2, $3)"         js_createImageDataSize ::         CanvasRenderingContext2D -> Float -> Float -> IO ImageData @@ -846,7 +846,7 @@ createImageDataSize_ self sw sh   = liftIO (void (js_createImageDataSize self sw sh))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"createLinearGradient\"]($2,\n$3, $4, $5)"         js_createLinearGradient ::         CanvasRenderingContext2D ->@@ -868,7 +868,7 @@ createLinearGradient_ self x0 y0 x1 y1   = liftIO (void (js_createLinearGradient self x0 y0 x1 y1))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"createRadialGradient\"]($2,\n$3, $4, $5, $6, $7)"         js_createRadialGradient ::         CanvasRenderingContext2D ->@@ -892,7 +892,7 @@ createRadialGradient_ self x0 y0 r0 x1 y1 r1   = liftIO (void (js_createRadialGradient self x0 y0 r0 x1 y1 r1))  -foreign import javascript unsafe "$1[\"createPattern\"]($2, $3)"+foreign import javascript safe "$1[\"createPattern\"]($2, $3)"         js_createPattern ::         CanvasRenderingContext2D ->           CanvasImageSource -> JSString -> IO (Nullable CanvasPattern)@@ -940,7 +940,7 @@          (js_createPattern self (toCanvasImageSource image)             (toJSString repetition)))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"getImageData\"]($2, $3, $4,\n$5)" js_getImageData ::         CanvasRenderingContext2D ->           Float -> Float -> Float -> Float -> IO ImageData@@ -961,7 +961,7 @@ getImageData_ self sx sy sw sh   = liftIO (void (js_getImageData self sx sy sw sh))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"webkitGetImageDataHD\"]($2,\n$3, $4, $5)"         js_webkitGetImageDataHD ::         CanvasRenderingContext2D ->
src/GHCJS/DOM/JSFFI/Generated/CharacterData.hs view
@@ -26,10 +26,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"substringData\"]($2, $3)"+foreign import javascript safe "$1[\"substringData\"]($2, $3)"         js_substringData :: CharacterData -> Word -> Word -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.substringData Mozilla CharacterData.substringData documentation> @@ -58,7 +58,7 @@ appendData self data'   = liftIO (js_appendData (toCharacterData self) (toJSString data'))  -foreign import javascript unsafe "$1[\"insertData\"]($2, $3)"+foreign import javascript safe "$1[\"insertData\"]($2, $3)"         js_insertData :: CharacterData -> Word -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.insertData Mozilla CharacterData.insertData documentation> @@ -69,7 +69,7 @@   = liftIO       (js_insertData (toCharacterData self) offset (toJSString data'))  -foreign import javascript unsafe "$1[\"deleteData\"]($2, $3)"+foreign import javascript safe "$1[\"deleteData\"]($2, $3)"         js_deleteData :: CharacterData -> Word -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/CharacterData.deleteData Mozilla CharacterData.deleteData documentation> @@ -78,7 +78,7 @@ deleteData self offset count   = liftIO (js_deleteData (toCharacterData self) offset count)  -foreign import javascript unsafe "$1[\"replaceData\"]($2, $3, $4)"+foreign import javascript safe "$1[\"replaceData\"]($2, $3, $4)"         js_replaceData ::         CharacterData -> Word -> Word -> JSString -> IO ()
src/GHCJS/DOM/JSFFI/Generated/ChildNode.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"before\"]($2)" js_before ::+foreign import javascript safe "$1[\"before\"]($2)" js_before ::         ChildNode -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ChildNode.before Mozilla ChildNode.before documentation> @@ -38,7 +38,7 @@   = liftIO       (toJSVal nodes >>= \ nodes' -> js_before (toChildNode self) nodes')  -foreign import javascript unsafe "$1[\"after\"]($2)" js_after ::+foreign import javascript safe "$1[\"after\"]($2)" js_after ::         ChildNode -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ChildNode.after Mozilla ChildNode.after documentation> @@ -49,7 +49,7 @@   = liftIO       (toJSVal nodes >>= \ nodes' -> js_after (toChildNode self) nodes')  -foreign import javascript unsafe "$1[\"replaceWith\"]($2)"+foreign import javascript safe "$1[\"replaceWith\"]($2)"         js_replaceWith :: ChildNode -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ChildNode.replaceWith Mozilla ChildNode.replaceWith documentation> @@ -61,7 +61,7 @@       (toJSVal nodes >>=          \ nodes' -> js_replaceWith (toChildNode self) nodes')  -foreign import javascript unsafe "$1[\"remove\"]()" js_remove ::+foreign import javascript safe "$1[\"remove\"]()" js_remove ::         ChildNode -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ChildNode.remove Mozilla ChildNode.remove documentation>
src/GHCJS/DOM/JSFFI/Generated/ClipboardEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/CloseEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/CommandLineAPIHost.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"clearConsoleMessages\"]()"
src/GHCJS/DOM/JSFFI/Generated/Comment.hs view
@@ -21,7 +21,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"Comment\"]($1)"
src/GHCJS/DOM/JSFFI/Generated/CompositionEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ConvolverNode.hs view
@@ -24,11 +24,11 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"buffer\"] = $2;"-        js_setBuffer :: ConvolverNode -> Optional AudioBuffer -> IO ()+foreign import javascript safe "$1[\"buffer\"] = $2;" js_setBuffer+        :: ConvolverNode -> Optional AudioBuffer -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ConvolverNode.buffer Mozilla ConvolverNode.buffer documentation>  setBuffer ::
src/GHCJS/DOM/JSFFI/Generated/Coordinates.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"latitude\"]" js_getLatitude
src/GHCJS/DOM/JSFFI/Generated/CountQueuingStrategy.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/Counter.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"identifier\"]"
src/GHCJS/DOM/JSFFI/Generated/Crypto.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"getRandomValues\"]($2)"+foreign import javascript safe "$1[\"getRandomValues\"]($2)"         js_getRandomValues ::         Crypto -> ArrayBufferView -> IO ArrayBufferView @@ -51,7 +51,7 @@ getSubtle :: (MonadIO m) => Crypto -> m SubtleCrypto getSubtle self = liftIO (js_getSubtle self)  -foreign import javascript unsafe "$1[\"webkitSubtle\"]"+foreign import javascript safe "$1[\"webkitSubtle\"]"         js_getWebkitSubtle :: Crypto -> IO WebKitSubtleCrypto  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Crypto.webkitSubtle Mozilla Crypto.webkitSubtle documentation>
src/GHCJS/DOM/JSFFI/Generated/CryptoKey.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"type\"]" js_getType ::
src/GHCJS/DOM/JSFFI/Generated/CustomElementRegistry.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"define\"]($2, $3)" js_define
src/GHCJS/DOM/JSFFI/Generated/CustomEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/DOMError.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"name\"]" js_getName ::
src/GHCJS/DOM/JSFFI/Generated/DOMException.hs view
@@ -36,7 +36,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/DOMImplementation.hs view
@@ -26,10 +26,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"createDocumentType\"]($2, $3,\n$4)" js_createDocumentType ::         DOMImplementation ->           JSString -> JSString -> JSString -> IO DocumentType@@ -58,8 +58,8 @@             (toJSString publicId)             (toJSString systemId)))  -foreign import javascript unsafe-        "$1[\"createDocument\"]($2, $3, $4)" js_createDocument ::+foreign import javascript safe "$1[\"createDocument\"]($2, $3, $4)"+        js_createDocument ::         DOMImplementation ->           Optional JSString ->             JSString -> Optional DocumentType -> IO XMLDocument
src/GHCJS/DOM/JSFFI/Generated/DOMNamedFlowCollection.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/DOMParser.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"DOMParser\"]()"@@ -33,7 +33,7 @@ newDOMParser :: (MonadIO m) => m DOMParser newDOMParser = liftIO (js_newDOMParser)  -foreign import javascript unsafe "$1[\"parseFromString\"]($2, $3)"+foreign import javascript safe "$1[\"parseFromString\"]($2, $3)"         js_parseFromString ::         DOMParser -> JSString -> JSString -> IO Document
src/GHCJS/DOM/JSFFI/Generated/DOMPoint.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"DOMPoint\"]($1)"@@ -52,19 +52,18 @@          (maybeToOptional z)          (maybeToOptional w))  -foreign import javascript unsafe "$1[\"fromPoint\"]($2)"-        js_fromPoint :: DOMPoint -> Optional DOMPointInit -> IO DOMPoint+foreign import javascript unsafe+        "window[\"DOMPoint\"][\"fromPoint\"]($1)" js_fromPoint ::+        Optional DOMPointInit -> IO DOMPoint  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMPoint.fromPoint Mozilla DOMPoint.fromPoint documentation> -fromPoint ::-          (MonadIO m) => DOMPoint -> Maybe DOMPointInit -> m DOMPoint-fromPoint self other-  = liftIO (js_fromPoint self (maybeToOptional other))+fromPoint :: (MonadIO m) => Maybe DOMPointInit -> m DOMPoint+fromPoint other = liftIO (js_fromPoint (maybeToOptional other))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMPoint.fromPoint Mozilla DOMPoint.fromPoint documentation> -fromPoint_ :: (MonadIO m) => DOMPoint -> Maybe DOMPointInit -> m ()-fromPoint_ self other-  = liftIO (void (js_fromPoint self (maybeToOptional other)))+fromPoint_ :: (MonadIO m) => Maybe DOMPointInit -> m ()+fromPoint_ other+  = liftIO (void (js_fromPoint (maybeToOptional other)))   foreign import javascript unsafe "$1[\"x\"] = $2;" js_setX ::         DOMPoint -> Double -> IO ()
src/GHCJS/DOM/JSFFI/Generated/DOMPointReadOnly.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -56,26 +56,19 @@          (maybeToOptional z)          (maybeToOptional w))  -foreign import javascript unsafe "$1[\"fromPoint\"]($2)"-        js_fromPoint ::-        DOMPointReadOnly -> Optional DOMPointInit -> IO DOMPointReadOnly+foreign import javascript unsafe+        "window[\"DOMPointReadOnly\"][\"fromPoint\"]($1)" js_fromPoint ::+        Optional DOMPointInit -> IO DOMPointReadOnly  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMPointReadOnly.fromPoint Mozilla DOMPointReadOnly.fromPoint documentation>  fromPoint ::-          (MonadIO m, IsDOMPointReadOnly self) =>-            self -> Maybe DOMPointInit -> m DOMPointReadOnly-fromPoint self other-  = liftIO-      (js_fromPoint (toDOMPointReadOnly self) (maybeToOptional other))+          (MonadIO m) => Maybe DOMPointInit -> m DOMPointReadOnly+fromPoint other = liftIO (js_fromPoint (maybeToOptional other))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMPointReadOnly.fromPoint Mozilla DOMPointReadOnly.fromPoint documentation> -fromPoint_ ::-           (MonadIO m, IsDOMPointReadOnly self) =>-             self -> Maybe DOMPointInit -> m ()-fromPoint_ self other-  = liftIO-      (void-         (js_fromPoint (toDOMPointReadOnly self) (maybeToOptional other)))+fromPoint_ :: (MonadIO m) => Maybe DOMPointInit -> m ()+fromPoint_ other+  = liftIO (void (js_fromPoint (maybeToOptional other)))   foreign import javascript unsafe "$1[\"x\"]" js_getX ::         DOMPointReadOnly -> IO Double
src/GHCJS/DOM/JSFFI/Generated/DOMRect.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -44,19 +44,18 @@          (maybeToOptional width)          (maybeToOptional height))  -foreign import javascript unsafe "$1[\"fromRect\"]($2)" js_fromRect-        :: DOMRect -> Optional DOMRectInit -> IO DOMRect+foreign import javascript unsafe+        "window[\"DOMRect\"][\"fromRect\"]($1)" js_fromRect ::+        Optional DOMRectInit -> IO DOMRect  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMRect.fromRect Mozilla DOMRect.fromRect documentation> -fromRect ::-         (MonadIO m) => DOMRect -> Maybe DOMRectInit -> m DOMRect-fromRect self other-  = liftIO (js_fromRect self (maybeToOptional other))+fromRect :: (MonadIO m) => Maybe DOMRectInit -> m DOMRect+fromRect other = liftIO (js_fromRect (maybeToOptional other))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMRect.fromRect Mozilla DOMRect.fromRect documentation> -fromRect_ :: (MonadIO m) => DOMRect -> Maybe DOMRectInit -> m ()-fromRect_ self other-  = liftIO (void (js_fromRect self (maybeToOptional other)))+fromRect_ :: (MonadIO m) => Maybe DOMRectInit -> m ()+fromRect_ other+  = liftIO (void (js_fromRect (maybeToOptional other)))   foreign import javascript unsafe "$1[\"x\"] = $2;" js_setX ::         DOMRect -> Double -> IO ()
src/GHCJS/DOM/JSFFI/Generated/DOMRectReadOnly.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -47,25 +47,18 @@          (maybeToOptional width)          (maybeToOptional height))  -foreign import javascript unsafe "$1[\"fromRect\"]($2)" js_fromRect-        :: DOMRectReadOnly -> Optional DOMRectInit -> IO DOMRectReadOnly+foreign import javascript unsafe+        "window[\"DOMRectReadOnly\"][\"fromRect\"]($1)" js_fromRect ::+        Optional DOMRectInit -> IO DOMRectReadOnly  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMRectReadOnly.fromRect Mozilla DOMRectReadOnly.fromRect documentation> -fromRect ::-         (MonadIO m, IsDOMRectReadOnly self) =>-           self -> Maybe DOMRectInit -> m DOMRectReadOnly-fromRect self other-  = liftIO-      (js_fromRect (toDOMRectReadOnly self) (maybeToOptional other))+fromRect :: (MonadIO m) => Maybe DOMRectInit -> m DOMRectReadOnly+fromRect other = liftIO (js_fromRect (maybeToOptional other))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMRectReadOnly.fromRect Mozilla DOMRectReadOnly.fromRect documentation> -fromRect_ ::-          (MonadIO m, IsDOMRectReadOnly self) =>-            self -> Maybe DOMRectInit -> m ()-fromRect_ self other-  = liftIO-      (void-         (js_fromRect (toDOMRectReadOnly self) (maybeToOptional other)))+fromRect_ :: (MonadIO m) => Maybe DOMRectInit -> m ()+fromRect_ other+  = liftIO (void (js_fromRect (maybeToOptional other)))   foreign import javascript unsafe "$1[\"x\"]" js_getX ::         DOMRectReadOnly -> IO Double
src/GHCJS/DOM/JSFFI/Generated/DOMStringList.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/DOMStringMap.hs view
@@ -21,7 +21,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_get ::
src/GHCJS/DOM/JSFFI/Generated/DOMTokenList.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::@@ -73,7 +73,7 @@ contains_ self token   = liftIO (void (js_contains self (toJSString token)))  -foreign import javascript unsafe "$1[\"add\"]($2)" js_add ::+foreign import javascript safe "$1[\"add\"]($2)" js_add ::         DOMTokenList -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.add Mozilla DOMTokenList.add documentation> @@ -82,7 +82,7 @@ add self tokens   = liftIO (toJSVal tokens >>= \ tokens' -> js_add self tokens')  -foreign import javascript unsafe "$1[\"remove\"]($2)" js_remove ::+foreign import javascript safe "$1[\"remove\"]($2)" js_remove ::         DOMTokenList -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.remove Mozilla DOMTokenList.remove documentation> @@ -91,7 +91,7 @@ remove self tokens   = liftIO (toJSVal tokens >>= \ tokens' -> js_remove self tokens')  -foreign import javascript unsafe "($1[\"toggle\"]($2, $3) ? 1 : 0)"+foreign import javascript safe "($1[\"toggle\"]($2, $3) ? 1 : 0)"         js_toggle :: DOMTokenList -> JSString -> Bool -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.toggle Mozilla DOMTokenList.toggle documentation> @@ -108,8 +108,8 @@ toggle_ self token force   = liftIO (void (js_toggle self (toJSString token) force))  -foreign import javascript unsafe "$1[\"replace\"]($2, $3)"-        js_replace :: DOMTokenList -> JSString -> JSString -> IO ()+foreign import javascript safe "$1[\"replace\"]($2, $3)" js_replace+        :: DOMTokenList -> JSString -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.replace Mozilla DOMTokenList.replace documentation>  replace ::@@ -118,7 +118,7 @@ replace self token newToken   = liftIO (js_replace self (toJSString token) (toJSString newToken))  -foreign import javascript unsafe "($1[\"supports\"]($2) ? 1 : 0)"+foreign import javascript safe "($1[\"supports\"]($2) ? 1 : 0)"         js_supports :: DOMTokenList -> JSString -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DOMTokenList.supports Mozilla DOMTokenList.supports documentation>
src/GHCJS/DOM/JSFFI/Generated/DataCue.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/DataTransfer.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setDragImage\"]($2, $3, $4)"
src/GHCJS/DOM/JSFFI/Generated/DataTransferItem.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getAsString\"]($2)"
src/GHCJS/DOM/JSFFI/Generated/DataTransferItemList.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::@@ -54,7 +54,7 @@         (MonadIO m) => DataTransferItemList -> Maybe File -> m () addFile self file = liftIO (js_addFile self (maybeToOptional file))  -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_add ::+foreign import javascript safe "$1[\"add\"]($2, $3)" js_add ::         DataTransferItemList ->           Optional JSString -> Optional JSString -> IO ()
src/GHCJS/DOM/JSFFI/Generated/Database.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/DatabaseCallback.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DatabaseCallback Mozilla DatabaseCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/DedicatedWorkerGlobalScope.hs view
@@ -23,10 +23,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"postMessage\"]($2, $3)"+foreign import javascript safe "$1[\"postMessage\"]($2, $3)"         js_postMessage ::         DedicatedWorkerGlobalScope -> JSVal -> JSVal -> IO () @@ -43,4 +43,4 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DedicatedWorkerGlobalScope.onmessage Mozilla DedicatedWorkerGlobalScope.onmessage documentation>  message :: EventName DedicatedWorkerGlobalScope MessageEvent-message = unsafeEventName (toJSString "message")+message = unsafeEventNameAsync (toJSString "message")
src/GHCJS/DOM/JSFFI/Generated/DelayNode.hs view
@@ -22,7 +22,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"delayTime\"]"
src/GHCJS/DOM/JSFFI/Generated/DeviceMotionEvent.hs view
@@ -31,7 +31,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/DeviceOrientationEvent.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/DeviceProximityEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/Document.hs view
@@ -112,7 +112,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getAnimations\"]()"@@ -210,7 +210,7 @@          (js_getElementsByClassName (toDocument self)             (toJSString classNames)))  -foreign import javascript unsafe "$1[\"createElement\"]($2)"+foreign import javascript safe "$1[\"createElement\"]($2)"         js_createElement :: Document -> JSString -> IO Element  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createElement Mozilla Document.createElement documentation> @@ -229,7 +229,7 @@   = liftIO       (void (js_createElement (toDocument self) (toJSString localName)))  -foreign import javascript unsafe "$1[\"createElementNS\"]($2, $3)"+foreign import javascript safe "$1[\"createElementNS\"]($2, $3)"         js_createElementNS ::         Document -> Optional JSString -> JSString -> IO Element @@ -289,7 +289,7 @@   = liftIO       (void (js_createTextNode (toDocument self) (toJSString data')))  -foreign import javascript unsafe "$1[\"createCDATASection\"]($2)"+foreign import javascript safe "$1[\"createCDATASection\"]($2)"         js_createCDATASection :: Document -> JSString -> IO CDATASection  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createCDATASection Mozilla Document.createCDATASection documentation> @@ -326,7 +326,7 @@   = liftIO       (void (js_createComment (toDocument self) (toJSString data')))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"createProcessingInstruction\"]($2,\n$3)"         js_createProcessingInstruction ::         Document -> JSString -> JSString -> IO ProcessingInstruction@@ -354,7 +354,7 @@             (toJSString target)             (toJSString data')))  -foreign import javascript unsafe "$1[\"importNode\"]($2, $3)"+foreign import javascript safe "$1[\"importNode\"]($2, $3)"         js_importNode :: Document -> Node -> Bool -> IO Node  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.importNode Mozilla Document.importNode documentation> @@ -372,8 +372,8 @@   = liftIO       (void (js_importNode (toDocument self) (toNode node) deep))  -foreign import javascript unsafe "$1[\"adoptNode\"]($2)"-        js_adoptNode :: Document -> Node -> IO Node+foreign import javascript safe "$1[\"adoptNode\"]($2)" js_adoptNode+        :: Document -> Node -> IO Node  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.adoptNode Mozilla Document.adoptNode documentation>  adoptNode ::@@ -387,7 +387,7 @@ adoptNode_ self node   = liftIO (void (js_adoptNode (toDocument self) (toNode node)))  -foreign import javascript unsafe "$1[\"createAttribute\"]($2)"+foreign import javascript safe "$1[\"createAttribute\"]($2)"         js_createAttribute :: Document -> JSString -> IO Attr  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createAttribute Mozilla Document.createAttribute documentation> @@ -407,8 +407,8 @@       (void          (js_createAttribute (toDocument self) (toJSString localName)))  -foreign import javascript unsafe-        "$1[\"createAttributeNS\"]($2, $3)" js_createAttributeNS ::+foreign import javascript safe "$1[\"createAttributeNS\"]($2, $3)"+        js_createAttributeNS ::         Document -> Optional JSString -> JSString -> IO Attr  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createAttributeNS Mozilla Document.createAttributeNS documentation> @@ -434,7 +434,7 @@             (toOptionalJSString namespaceURI)             (toJSString qualifiedName)))  -foreign import javascript unsafe "$1[\"createEvent\"]($2)"+foreign import javascript safe "$1[\"createEvent\"]($2)"         js_createEvent :: Document -> JSString -> IO Event  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.createEvent Mozilla Document.createEvent documentation> @@ -709,7 +709,7 @@       (fromJust . nullableToMaybe <$>          (js_getSelection (toDocument self)))  -foreign import javascript unsafe "$1[\"createExpression\"]($2, $3)"+foreign import javascript safe "$1[\"createExpression\"]($2, $3)"         js_createExpression ::         Document ->           Optional JSString -> Optional XPathNSResolver -> IO XPathExpression@@ -759,7 +759,7 @@          (js_createNSResolver (toDocument self)             (maybeToOptional (fmap toNode nodeResolver))))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"evaluate\"]($2, $3, $4, $5,\n$6)" js_evaluate ::         Document ->           Optional JSString ->@@ -1186,8 +1186,8 @@   = liftIO       (fromJust . nullableToMaybe <$> (js_getLocation (toDocument self)))  -foreign import javascript unsafe "$1[\"domain\"] = $2;"-        js_setDomain :: Document -> JSString -> IO ()+foreign import javascript safe "$1[\"domain\"] = $2;" js_setDomain+        :: Document -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.domain Mozilla Document.domain documentation>  setDomain ::@@ -1215,8 +1215,8 @@ getReferrer self   = liftIO (fromJSString <$> (js_getReferrer (toDocument self)))  -foreign import javascript unsafe "$1[\"cookie\"] = $2;"-        js_setCookie :: Document -> JSString -> IO ()+foreign import javascript safe "$1[\"cookie\"] = $2;" js_setCookie+        :: Document -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.cookie Mozilla Document.cookie documentation>  setCookie ::@@ -1224,7 +1224,7 @@ setCookie self val   = liftIO (js_setCookie (toDocument self) (toJSString val))  -foreign import javascript unsafe "$1[\"cookie\"]" js_getCookie ::+foreign import javascript safe "$1[\"cookie\"]" js_getCookie ::         Document -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.cookie Mozilla Document.cookie documentation> @@ -1292,7 +1292,7 @@ getDir self   = liftIO (fromJSString <$> (js_getDir (toDocument self)))  -foreign import javascript unsafe "$1[\"body\"] = $2;" js_setBody ::+foreign import javascript safe "$1[\"body\"] = $2;" js_setBody ::         Document -> Optional HTMLElement -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.body Mozilla Document.body documentation> @@ -1476,7 +1476,8 @@ -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.onreadystatechange Mozilla Document.onreadystatechange documentation>  readyStateChange ::                  (IsDocument self, IsEventTarget self) => EventName self Event-readyStateChange = unsafeEventName (toJSString "readystatechange")+readyStateChange+  = unsafeEventNameAsync (toJSString "readystatechange")   foreign import javascript unsafe "$1[\"styleSheets\"]"         js_getStyleSheets :: Document -> IO StyleSheetList@@ -1753,7 +1754,7 @@       (fromJust . fromMaybeJSString <$>          (js_getXmlEncoding (toDocument self)))  -foreign import javascript unsafe "$1[\"xmlVersion\"] = $2;"+foreign import javascript safe "$1[\"xmlVersion\"] = $2;"         js_setXmlVersion :: Document -> Optional JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Document.xmlVersion Mozilla Document.xmlVersion documentation>
src/GHCJS/DOM/JSFFI/Generated/DocumentAndElementEventHandlers.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/DocumentAndElementEventHandlers.oncopy Mozilla DocumentAndElementEventHandlers.oncopy documentation>
src/GHCJS/DOM/JSFFI/Generated/DocumentFragment.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/DocumentOrShadowRoot.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"elementFromPoint\"]($2, $3)"
src/GHCJS/DOM/JSFFI/Generated/DocumentTimeline.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/DocumentType.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"name\"]" js_getName ::
src/GHCJS/DOM/JSFFI/Generated/DynamicsCompressorNode.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"threshold\"]"
src/GHCJS/DOM/JSFFI/Generated/EXTBlendMinMax.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern MIN_EXT = 32775 pattern MAX_EXT = 32776
src/GHCJS/DOM/JSFFI/Generated/EXTTextureFilterAnisotropic.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern TEXTURE_MAX_ANISOTROPY_EXT = 34046 pattern MAX_TEXTURE_MAX_ANISOTROPY_EXT = 34047
src/GHCJS/DOM/JSFFI/Generated/EXTsRGB.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SRGB_EXT = 35904 pattern SRGB_ALPHA_EXT = 35906
src/GHCJS/DOM/JSFFI/Generated/Element.hs view
@@ -85,7 +85,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -213,7 +213,7 @@             (toOptionalJSString namespaceURI)             (toJSString localName)))  -foreign import javascript unsafe "$1[\"setAttribute\"]($2, $3)"+foreign import javascript safe "$1[\"setAttribute\"]($2, $3)"         js_setAttribute :: Element -> JSString -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.setAttribute Mozilla Element.setAttribute documentation> @@ -226,8 +226,8 @@       (js_setAttribute (toElement self) (toJSString qualifiedName)          (toJSString value))  -foreign import javascript unsafe-        "$1[\"setAttributeNS\"]($2, $3, $4)" js_setAttributeNS ::+foreign import javascript safe "$1[\"setAttributeNS\"]($2, $3, $4)"+        js_setAttributeNS ::         Element -> Optional JSString -> JSString -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.setAttributeNS Mozilla Element.setAttributeNS documentation> @@ -410,7 +410,7 @@             (toOptionalJSString namespaceURI)             (toJSString localName)))  -foreign import javascript unsafe "$1[\"setAttributeNode\"]($2)"+foreign import javascript safe "$1[\"setAttributeNode\"]($2)"         js_setAttributeNode :: Element -> Attr -> IO (Nullable Attr)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.setAttributeNode Mozilla Element.setAttributeNode documentation> @@ -442,7 +442,7 @@       (fromJust . nullableToMaybe <$>          (js_setAttributeNode (toElement self) attr))  -foreign import javascript unsafe "$1[\"setAttributeNodeNS\"]($2)"+foreign import javascript safe "$1[\"setAttributeNodeNS\"]($2)"         js_setAttributeNodeNS :: Element -> Attr -> IO (Nullable Attr)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.setAttributeNodeNS Mozilla Element.setAttributeNodeNS documentation> @@ -475,7 +475,7 @@       (fromJust . nullableToMaybe <$>          (js_setAttributeNodeNS (toElement self) attr))  -foreign import javascript unsafe "$1[\"removeAttributeNode\"]($2)"+foreign import javascript safe "$1[\"removeAttributeNode\"]($2)"         js_removeAttributeNode :: Element -> Attr -> IO Attr  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.removeAttributeNode Mozilla Element.removeAttributeNode documentation> @@ -490,7 +490,7 @@ removeAttributeNode_ self attr   = liftIO (void (js_removeAttributeNode (toElement self) attr))  -foreign import javascript unsafe "$1[\"attachShadow\"]($2)"+foreign import javascript safe "$1[\"attachShadow\"]($2)"         js_attachShadow :: Element -> ShadowRootInit -> IO ShadowRoot  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.attachShadow Mozilla Element.attachShadow documentation> @@ -506,8 +506,8 @@ attachShadow_ self init   = liftIO (void (js_attachShadow (toElement self) init))  -foreign import javascript unsafe "$1[\"closest\"]($2)" js_closest-        :: Element -> JSString -> IO (Nullable Element)+foreign import javascript safe "$1[\"closest\"]($2)" js_closest ::+        Element -> JSString -> IO (Nullable Element)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.closest Mozilla Element.closest documentation>  closest ::@@ -545,7 +545,7 @@       (fromJust . nullableToMaybe <$>          (js_closest (toElement self) (toJSString selectors)))  -foreign import javascript unsafe "($1[\"matches\"]($2) ? 1 : 0)"+foreign import javascript safe "($1[\"matches\"]($2) ? 1 : 0)"         js_matches :: Element -> JSString -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.matches Mozilla Element.matches documentation> @@ -563,7 +563,7 @@   = liftIO       (void (js_matches (toElement self) (toJSString selectors)))  -foreign import javascript unsafe+foreign import javascript safe         "($1[\"webkitMatchesSelector\"]($2) ? 1 : 0)"         js_webkitMatchesSelector :: Element -> JSString -> IO Bool @@ -654,7 +654,7 @@       (void          (js_getElementsByClassName (toElement self) (toJSString name)))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"insertAdjacentElement\"]($2,\n$3)" js_insertAdjacentElement         :: Element -> JSString -> Element -> IO (Nullable Element) @@ -703,9 +703,8 @@          (js_insertAdjacentElement (toElement self) (toJSString where')             (toElement element)))  -foreign import javascript unsafe-        "$1[\"insertAdjacentText\"]($2, $3)" js_insertAdjacentText ::-        Element -> JSString -> JSString -> IO ()+foreign import javascript safe "$1[\"insertAdjacentText\"]($2, $3)"+        js_insertAdjacentText :: Element -> JSString -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.insertAdjacentText Mozilla Element.insertAdjacentText documentation>  insertAdjacentText ::@@ -810,9 +809,8 @@          (MonadIO m, IsElement self) => self -> Double -> Double -> m () scrollBy self x y = liftIO (js_scrollBy (toElement self) x y)  -foreign import javascript unsafe-        "$1[\"insertAdjacentHTML\"]($2, $3)" js_insertAdjacentHTML ::-        Element -> JSString -> JSString -> IO ()+foreign import javascript safe "$1[\"insertAdjacentHTML\"]($2, $3)"+        js_insertAdjacentHTML :: Element -> JSString -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.insertAdjacentHTML Mozilla Element.insertAdjacentHTML documentation>  insertAdjacentHTML ::@@ -1126,7 +1124,7 @@ getClientHeight :: (MonadIO m, IsElement self) => self -> m Double getClientHeight self = liftIO (js_getClientHeight (toElement self))  -foreign import javascript unsafe "$1[\"innerHTML\"] = $2;"+foreign import javascript safe "$1[\"innerHTML\"] = $2;"         js_setInnerHTML :: Element -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.innerHTML Mozilla Element.innerHTML documentation> @@ -1145,7 +1143,7 @@ getInnerHTML self   = liftIO (fromJSString <$> (js_getInnerHTML (toElement self)))  -foreign import javascript unsafe "$1[\"outerHTML\"] = $2;"+foreign import javascript safe "$1[\"outerHTML\"] = $2;"         js_setOuterHTML :: Element -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Element.outerHTML Mozilla Element.outerHTML documentation>
src/GHCJS/DOM/JSFFI/Generated/ElementCSSInlineStyle.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"style\"]" js_getStyle ::
src/GHCJS/DOM/JSFFI/Generated/ErrorEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/EventListener.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"handleEvent\"]($2)"
src/GHCJS/DOM/JSFFI/Generated/EventSource.hs view
@@ -26,10 +26,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe+foreign import javascript safe         "new window[\"EventSource\"]($1,\n$2)" js_newEventSource ::         JSString -> Optional EventSourceInit -> IO EventSource @@ -77,12 +77,12 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.onopen Mozilla EventSource.onopen documentation>  open :: EventName EventSource Event-open = unsafeEventName (toJSString "open")+open = unsafeEventNameAsync (toJSString "open")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.onmessage Mozilla EventSource.onmessage documentation>  message :: EventName EventSource MessageEvent-message = unsafeEventName (toJSString "message")+message = unsafeEventNameAsync (toJSString "message")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/EventSource.onerror Mozilla EventSource.onerror documentation>  error :: EventName EventSource UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")
src/GHCJS/DOM/JSFFI/Generated/EventTarget.hs view
@@ -66,7 +66,7 @@              (maybeToOptional callback)              (EventListenerOptionsOrBool options'))  -foreign import javascript unsafe+foreign import javascript safe         "($1[\"dispatchEvent\"]($2) ? 1 : 0)" js_dispatchEvent ::         EventTarget -> Event -> IO Bool
src/GHCJS/DOM/JSFFI/Generated/File.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"File\"]($1, $2, $3)"
src/GHCJS/DOM/JSFFI/Generated/FileError.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern NOT_FOUND_ERR = 1 pattern SECURITY_ERR = 2
src/GHCJS/DOM/JSFFI/Generated/FileException.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"toString\"]()" js_toString
src/GHCJS/DOM/JSFFI/Generated/FileList.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/FileReader.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"FileReader\"]()"@@ -39,7 +39,7 @@ newFileReader :: (MonadIO m) => m FileReader newFileReader = liftIO (js_newFileReader)  -foreign import javascript unsafe "$1[\"readAsArrayBuffer\"]($2)"+foreign import javascript safe "$1[\"readAsArrayBuffer\"]($2)"         js_readAsArrayBuffer :: FileReader -> Optional Blob -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.readAsArrayBuffer Mozilla FileReader.readAsArrayBuffer documentation> @@ -49,7 +49,7 @@   = liftIO       (js_readAsArrayBuffer self (maybeToOptional (fmap toBlob blob)))  -foreign import javascript unsafe "$1[\"readAsBinaryString\"]($2)"+foreign import javascript safe "$1[\"readAsBinaryString\"]($2)"         js_readAsBinaryString :: FileReader -> Optional Blob -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.readAsBinaryString Mozilla FileReader.readAsBinaryString documentation> @@ -59,7 +59,7 @@   = liftIO       (js_readAsBinaryString self (maybeToOptional (fmap toBlob blob)))  -foreign import javascript unsafe "$1[\"readAsText\"]($2, $3)"+foreign import javascript safe "$1[\"readAsText\"]($2, $3)"         js_readAsText ::         FileReader -> Optional Blob -> Optional JSString -> IO () @@ -72,7 +72,7 @@       (js_readAsText self (maybeToOptional (fmap toBlob blob))          (toOptionalJSString encoding))  -foreign import javascript unsafe "$1[\"readAsDataURL\"]($2)"+foreign import javascript safe "$1[\"readAsDataURL\"]($2)"         js_readAsDataURL :: FileReader -> Optional Blob -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.readAsDataURL Mozilla FileReader.readAsDataURL documentation> @@ -130,24 +130,24 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onloadstart Mozilla FileReader.onloadstart documentation>  loadStart :: EventName FileReader ProgressEvent-loadStart = unsafeEventName (toJSString "loadstart")+loadStart = unsafeEventNameAsync (toJSString "loadstart")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onprogress Mozilla FileReader.onprogress documentation>  progress :: EventName FileReader ProgressEvent-progress = unsafeEventName (toJSString "progress")+progress = unsafeEventNameAsync (toJSString "progress")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onload Mozilla FileReader.onload documentation>  load :: EventName FileReader UIEvent-load = unsafeEventName (toJSString "load")+load = unsafeEventNameAsync (toJSString "load")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onabort Mozilla FileReader.onabort documentation>  abortEvent :: EventName FileReader UIEvent-abortEvent = unsafeEventName (toJSString "abort")+abortEvent = unsafeEventNameAsync (toJSString "abort")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onerror Mozilla FileReader.onerror documentation>  error :: EventName FileReader UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReader.onloadend Mozilla FileReader.onloadend documentation>  loadEnd :: EventName FileReader ProgressEvent-loadEnd = unsafeEventName (toJSString "loadend")+loadEnd = unsafeEventNameAsync (toJSString "loadend")
src/GHCJS/DOM/JSFFI/Generated/FileReaderSync.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"FileReaderSync\"]()"@@ -36,7 +36,7 @@ newFileReaderSync :: (MonadIO m) => m FileReaderSync newFileReaderSync = liftIO (js_newFileReaderSync)  -foreign import javascript unsafe "$1[\"readAsArrayBuffer\"]($2)"+foreign import javascript safe "$1[\"readAsArrayBuffer\"]($2)"         js_readAsArrayBuffer :: FileReaderSync -> Blob -> IO ArrayBuffer  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReaderSync.readAsArrayBuffer Mozilla FileReaderSync.readAsArrayBuffer documentation> @@ -51,7 +51,7 @@ readAsArrayBuffer_ self blob   = liftIO (void (js_readAsArrayBuffer self (toBlob blob)))  -foreign import javascript unsafe "$1[\"readAsBinaryString\"]($2)"+foreign import javascript safe "$1[\"readAsBinaryString\"]($2)"         js_readAsBinaryString :: FileReaderSync -> Blob -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReaderSync.readAsBinaryString Mozilla FileReaderSync.readAsBinaryString documentation> @@ -68,7 +68,7 @@ readAsBinaryString_ self blob   = liftIO (void (js_readAsBinaryString self (toBlob blob)))  -foreign import javascript unsafe "$1[\"readAsText\"]($2, $3)"+foreign import javascript safe "$1[\"readAsText\"]($2, $3)"         js_readAsText ::         FileReaderSync -> Blob -> Optional JSString -> IO JSString @@ -91,7 +91,7 @@       (void          (js_readAsText self (toBlob blob) (toOptionalJSString encoding)))  -foreign import javascript unsafe "$1[\"readAsDataURL\"]($2)"+foreign import javascript safe "$1[\"readAsDataURL\"]($2)"         js_readAsDataURL :: FileReaderSync -> Blob -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FileReaderSync.readAsDataURL Mozilla FileReaderSync.readAsDataURL documentation>
src/GHCJS/DOM/JSFFI/Generated/FocusEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/FontFace.hs view
@@ -30,10 +30,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe+foreign import javascript safe         "new window[\"FontFace\"]($1, $2,\n$3)" js_newFontFace ::         JSString ->           StringOrBinaryData -> Optional FontFaceDescriptors -> IO FontFace@@ -61,8 +61,8 @@ load_ :: (MonadIO m) => FontFace -> m () load_ self = liftIO (void (js_load self))  -foreign import javascript unsafe "$1[\"family\"] = $2;"-        js_setFamily :: FontFace -> JSString -> IO ()+foreign import javascript safe "$1[\"family\"] = $2;" js_setFamily+        :: FontFace -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FontFace.family Mozilla FontFace.family documentation>  setFamily :: (MonadIO m, ToJSString val) => FontFace -> val -> m ()@@ -76,8 +76,8 @@           (MonadIO m, FromJSString result) => FontFace -> m result getFamily self = liftIO (fromJSString <$> (js_getFamily self))  -foreign import javascript unsafe "$1[\"style\"] = $2;" js_setStyle-        :: FontFace -> JSString -> IO ()+foreign import javascript safe "$1[\"style\"] = $2;" js_setStyle ::+        FontFace -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FontFace.style Mozilla FontFace.style documentation>  setStyle :: (MonadIO m, ToJSString val) => FontFace -> val -> m ()@@ -91,8 +91,8 @@          (MonadIO m, FromJSString result) => FontFace -> m result getStyle self = liftIO (fromJSString <$> (js_getStyle self))  -foreign import javascript unsafe "$1[\"weight\"] = $2;"-        js_setWeight :: FontFace -> JSString -> IO ()+foreign import javascript safe "$1[\"weight\"] = $2;" js_setWeight+        :: FontFace -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FontFace.weight Mozilla FontFace.weight documentation>  setWeight :: (MonadIO m, ToJSString val) => FontFace -> val -> m ()@@ -106,7 +106,7 @@           (MonadIO m, FromJSString result) => FontFace -> m result getWeight self = liftIO (fromJSString <$> (js_getWeight self))  -foreign import javascript unsafe "$1[\"stretch\"] = $2;"+foreign import javascript safe "$1[\"stretch\"] = $2;"         js_setStretch :: FontFace -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FontFace.stretch Mozilla FontFace.stretch documentation> @@ -122,7 +122,7 @@            (MonadIO m, FromJSString result) => FontFace -> m result getStretch self = liftIO (fromJSString <$> (js_getStretch self))  -foreign import javascript unsafe "$1[\"unicodeRange\"] = $2;"+foreign import javascript safe "$1[\"unicodeRange\"] = $2;"         js_setUnicodeRange :: FontFace -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FontFace.unicodeRange Mozilla FontFace.unicodeRange documentation> @@ -140,7 +140,7 @@ getUnicodeRange self   = liftIO (fromJSString <$> (js_getUnicodeRange self))  -foreign import javascript unsafe "$1[\"variant\"] = $2;"+foreign import javascript safe "$1[\"variant\"] = $2;"         js_setVariant :: FontFace -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FontFace.variant Mozilla FontFace.variant documentation> @@ -156,7 +156,7 @@            (MonadIO m, FromJSString result) => FontFace -> m result getVariant self = liftIO (fromJSString <$> (js_getVariant self))  -foreign import javascript unsafe "$1[\"featureSettings\"] = $2;"+foreign import javascript safe "$1[\"featureSettings\"] = $2;"         js_setFeatureSettings :: FontFace -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FontFace.featureSettings Mozilla FontFace.featureSettings documentation>
src/GHCJS/DOM/JSFFI/Generated/FontFaceSet.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"FontFaceSet\"]($1)"@@ -102,7 +102,7 @@   = liftIO       (void (js_load self (toJSString font) (toOptionalJSString text)))  -foreign import javascript unsafe "($1[\"check\"]($2, $3) ? 1 : 0)"+foreign import javascript safe "($1[\"check\"]($2, $3) ? 1 : 0)"         js_check :: FontFaceSet -> JSString -> Optional JSString -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/FontFaceSet.check Mozilla FontFaceSet.check documentation>
src/GHCJS/DOM/JSFFI/Generated/FormData.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"FormData\"]($1)"
src/GHCJS/DOM/JSFFI/Generated/GainNode.hs view
@@ -21,7 +21,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"gain\"]" js_getGain ::
src/GHCJS/DOM/JSFFI/Generated/Gamepad.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"id\"]" js_getId ::
src/GHCJS/DOM/JSFFI/Generated/GamepadButton.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "($1[\"pressed\"] ? 1 : 0)"
src/GHCJS/DOM/JSFFI/Generated/GamepadEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/Geolocation.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/Geoposition.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"coords\"]" js_getCoords ::
src/GHCJS/DOM/JSFFI/Generated/GlobalCrypto.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"crypto\"]" js_getCrypto ::
src/GHCJS/DOM/JSFFI/Generated/GlobalEventHandlers.hs view
@@ -39,14 +39,14 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/GlobalEventHandlers.onabort Mozilla GlobalEventHandlers.onabort documentation>  abort ::       (IsGlobalEventHandlers self, IsEventTarget self) =>         EventName self UIEvent-abort = unsafeEventName (toJSString "abort")+abort = unsafeEventNameAsync (toJSString "abort")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/GlobalEventHandlers.onautocomplete Mozilla GlobalEventHandlers.onautocomplete documentation>  autocomplete ::@@ -65,7 +65,7 @@ blur ::      (IsGlobalEventHandlers self, IsEventTarget self) =>        EventName self FocusEvent-blur = unsafeEventName (toJSString "blur")+blur = unsafeEventNameAsync (toJSString "blur")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/GlobalEventHandlers.oncanplay Mozilla GlobalEventHandlers.oncanplay documentation>  canPlay ::@@ -173,13 +173,13 @@ error ::       (IsGlobalEventHandlers self, IsEventTarget self) =>         EventName self UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/GlobalEventHandlers.onfocus Mozilla GlobalEventHandlers.onfocus documentation>  focus ::       (IsGlobalEventHandlers self, IsEventTarget self) =>         EventName self FocusEvent-focus = unsafeEventName (toJSString "focus")+focus = unsafeEventNameAsync (toJSString "focus")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/GlobalEventHandlers.oninput Mozilla GlobalEventHandlers.oninput documentation>  input ::@@ -215,7 +215,7 @@ load ::      (IsGlobalEventHandlers self, IsEventTarget self) =>        EventName self UIEvent-load = unsafeEventName (toJSString "load")+load = unsafeEventNameAsync (toJSString "load")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/GlobalEventHandlers.onloadeddata Mozilla GlobalEventHandlers.onloadeddata documentation>  loadedData ::@@ -233,7 +233,7 @@ loadStart ::           (IsGlobalEventHandlers self, IsEventTarget self) =>             EventName self ProgressEvent-loadStart = unsafeEventName (toJSString "loadstart")+loadStart = unsafeEventNameAsync (toJSString "loadstart")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/GlobalEventHandlers.onmousedown Mozilla GlobalEventHandlers.onmousedown documentation>  mouseDown ::@@ -305,7 +305,7 @@ progress ::          (IsGlobalEventHandlers self, IsEventTarget self) =>            EventName self ProgressEvent-progress = unsafeEventName (toJSString "progress")+progress = unsafeEventNameAsync (toJSString "progress")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/GlobalEventHandlers.onratechange Mozilla GlobalEventHandlers.onratechange documentation>  rateChange ::
src/GHCJS/DOM/JSFFI/Generated/GlobalPerformance.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"performance\"]"
src/GHCJS/DOM/JSFFI/Generated/HTMLAllCollection.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/HTMLAnchorElement.hs view
@@ -32,7 +32,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"charset\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLAppletElement.hs view
@@ -31,7 +31,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign
src/GHCJS/DOM/JSFFI/Generated/HTMLAreaElement.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"alt\"] = $2;" js_setAlt ::
src/GHCJS/DOM/JSFFI/Generated/HTMLAttachmentElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"file\"] = $2;" js_setFile ::
src/GHCJS/DOM/JSFFI/Generated/HTMLBRElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"clear\"] = $2;" js_setClear
src/GHCJS/DOM/JSFFI/Generated/HTMLBaseElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"href\"] = $2;" js_setHref ::
src/GHCJS/DOM/JSFFI/Generated/HTMLBodyElement.hs view
@@ -31,7 +31,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"aLink\"] = $2;" js_setALink@@ -134,15 +134,15 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onblur Mozilla HTMLBodyElement.onblur documentation>  blur :: EventName HTMLBodyElement FocusEvent-blur = unsafeEventName (toJSString "blur")+blur = unsafeEventNameAsync (toJSString "blur")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onerror Mozilla HTMLBodyElement.onerror documentation>  error :: EventName HTMLBodyElement UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onfocus Mozilla HTMLBodyElement.onfocus documentation>  focus :: EventName HTMLBodyElement FocusEvent-focus = unsafeEventName (toJSString "focus")+focus = unsafeEventNameAsync (toJSString "focus")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onfocusin Mozilla HTMLBodyElement.onfocusin documentation>  focusin :: EventName HTMLBodyElement onfocusin@@ -154,7 +154,7 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onload Mozilla HTMLBodyElement.onload documentation>  load :: EventName HTMLBodyElement UIEvent-load = unsafeEventName (toJSString "load")+load = unsafeEventNameAsync (toJSString "load")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLBodyElement.onresize Mozilla HTMLBodyElement.onresize documentation>  resize :: EventName HTMLBodyElement UIEvent
src/GHCJS/DOM/JSFFI/Generated/HTMLButtonElement.hs view
@@ -37,7 +37,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/HTMLCanvasElement.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getContext\"]($2, $3)"@@ -82,9 +82,8 @@             \ arguments' ->               js_getContext self (toJSString contextId) arguments'))  -foreign import javascript unsafe "$1[\"toDataURL\"]($2)"-        js_toDataURL ::-        HTMLCanvasElement -> Optional JSString -> IO JSString+foreign import javascript safe "$1[\"toDataURL\"]($2)" js_toDataURL+        :: HTMLCanvasElement -> Optional JSString -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLCanvasElement.toDataURL Mozilla HTMLCanvasElement.toDataURL documentation>  toDataURL ::@@ -101,7 +100,7 @@ toDataURL_ self type'   = liftIO (void (js_toDataURL self (toOptionalJSString type')))  -foreign import javascript unsafe "$1[\"toBlob\"]($2, $3, $4)"+foreign import javascript safe "$1[\"toBlob\"]($2, $3, $4)"         js_toBlob' ::         HTMLCanvasElement ->           BlobCallback -> Optional JSString -> Optional JSVal -> IO ()@@ -118,7 +117,7 @@            js_toBlob' self callback (toOptionalJSString type')              (maybeToOptional quality'))  -foreign import javascript unsafe "$1[\"captureStream\"]($2)"+foreign import javascript safe "$1[\"captureStream\"]($2)"         js_captureStream ::         HTMLCanvasElement -> Optional Double -> IO MediaStream
src/GHCJS/DOM/JSFFI/Generated/HTMLCollection.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/HTMLDListElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"compact\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLDataElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue
src/GHCJS/DOM/JSFFI/Generated/HTMLDataListElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"options\"]" js_getOptions ::
src/GHCJS/DOM/JSFFI/Generated/HTMLDetailsElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"open\"] = $2;" js_setOpen ::
src/GHCJS/DOM/JSFFI/Generated/HTMLDirectoryElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"compact\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLDivElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign
src/GHCJS/DOM/JSFFI/Generated/HTMLDocument.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"open\"]()" js_open ::
src/GHCJS/DOM/JSFFI/Generated/HTMLElement.hs view
@@ -43,7 +43,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"HTMLElement\"]()"@@ -241,7 +241,7 @@ getSpellcheck :: (MonadIO m, IsHTMLElement self) => self -> m Bool getSpellcheck self = liftIO (js_getSpellcheck (toHTMLElement self))  -foreign import javascript unsafe "$1[\"innerText\"] = $2;"+foreign import javascript safe "$1[\"innerText\"] = $2;"         js_setInnerText :: HTMLElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.innerText Mozilla HTMLElement.innerText documentation> @@ -261,7 +261,7 @@ getInnerText self   = liftIO (fromJSString <$> (js_getInnerText (toHTMLElement self)))  -foreign import javascript unsafe "$1[\"contentEditable\"] = $2;"+foreign import javascript safe "$1[\"contentEditable\"] = $2;"         js_setContentEditable :: HTMLElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.contentEditable Mozilla HTMLElement.contentEditable documentation> @@ -352,7 +352,7 @@ getOffsetHeight self   = liftIO (js_getOffsetHeight (toHTMLElement self))  -foreign import javascript unsafe "$1[\"outerText\"] = $2;"+foreign import javascript safe "$1[\"outerText\"] = $2;"         js_setOuterText :: HTMLElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement.outerText Mozilla HTMLElement.outerText documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLEmbedElement.hs view
@@ -27,10 +27,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"getSVGDocument\"]()"+foreign import javascript safe "$1[\"getSVGDocument\"]()"         js_getSVGDocument :: HTMLEmbedElement -> IO Document  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLEmbedElement.getSVGDocument Mozilla HTMLEmbedElement.getSVGDocument documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLFieldSetElement.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/HTMLFontElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"color\"] = $2;" js_setColor
src/GHCJS/DOM/JSFFI/Generated/HTMLFormControlsCollection.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_get ::
src/GHCJS/DOM/JSFFI/Generated/HTMLFormElement.hs view
@@ -36,7 +36,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_getAt ::
src/GHCJS/DOM/JSFFI/Generated/HTMLFrameElement.hs view
@@ -35,10 +35,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"getSVGDocument\"]()"+foreign import javascript safe "$1[\"getSVGDocument\"]()"         js_getSVGDocument :: HTMLFrameElement -> IO Document  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameElement.getSVGDocument Mozilla HTMLFrameElement.getSVGDocument documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLFrameSetElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"cols\"] = $2;" js_setCols ::@@ -63,15 +63,15 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onblur Mozilla HTMLFrameSetElement.onblur documentation>  blur :: EventName HTMLFrameSetElement FocusEvent-blur = unsafeEventName (toJSString "blur")+blur = unsafeEventNameAsync (toJSString "blur")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onerror Mozilla HTMLFrameSetElement.onerror documentation>  error :: EventName HTMLFrameSetElement UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onfocus Mozilla HTMLFrameSetElement.onfocus documentation>  focus :: EventName HTMLFrameSetElement FocusEvent-focus = unsafeEventName (toJSString "focus")+focus = unsafeEventNameAsync (toJSString "focus")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onfocusin Mozilla HTMLFrameSetElement.onfocusin documentation>  focusin :: EventName HTMLFrameSetElement onfocusin@@ -83,7 +83,7 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onload Mozilla HTMLFrameSetElement.onload documentation>  load :: EventName HTMLFrameSetElement UIEvent-load = unsafeEventName (toJSString "load")+load = unsafeEventNameAsync (toJSString "load")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLFrameSetElement.onresize Mozilla HTMLFrameSetElement.onresize documentation>  resize :: EventName HTMLFrameSetElement UIEvent
src/GHCJS/DOM/JSFFI/Generated/HTMLHRElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign
src/GHCJS/DOM/JSFFI/Generated/HTMLHeadElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"profile\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLHeadingElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign
src/GHCJS/DOM/JSFFI/Generated/HTMLHtmlElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"version\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLHyperlinkElementUtils.hs view
@@ -32,7 +32,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"href\"] = $2;" js_setHref ::
src/GHCJS/DOM/JSFFI/Generated/HTMLIFrameElement.hs view
@@ -36,10 +36,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"getSVGDocument\"]()"+foreign import javascript safe "$1[\"getSVGDocument\"]()"         js_getSVGDocument :: HTMLIFrameElement -> IO Document  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLIFrameElement.getSVGDocument Mozilla HTMLIFrameElement.getSVGDocument documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLImageElement.hs view
@@ -38,7 +38,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::
src/GHCJS/DOM/JSFFI/Generated/HTMLInputElement.hs view
@@ -73,17 +73,17 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"stepUp\"]($2)" js_stepUp ::+foreign import javascript safe "$1[\"stepUp\"]($2)" js_stepUp ::         HTMLInputElement -> Optional Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.stepUp Mozilla HTMLInputElement.stepUp documentation>  stepUp :: (MonadIO m) => HTMLInputElement -> Maybe Int -> m () stepUp self n = liftIO (js_stepUp self (maybeToOptional n))  -foreign import javascript unsafe "$1[\"stepDown\"]($2)" js_stepDown+foreign import javascript safe "$1[\"stepDown\"]($2)" js_stepDown         :: HTMLInputElement -> Optional Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.stepDown Mozilla HTMLInputElement.stepDown documentation> @@ -130,7 +130,7 @@ select :: (MonadIO m) => HTMLInputElement -> m () select self = liftIO (js_select self)  -foreign import javascript unsafe "$1[\"setRangeText\"]($2)"+foreign import javascript safe "$1[\"setRangeText\"]($2)"         js_setRangeText :: HTMLInputElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.setRangeText Mozilla HTMLInputElement.setRangeText documentation> @@ -140,7 +140,7 @@ setRangeText self replacement   = liftIO (js_setRangeText self (toJSString replacement))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"setRangeText\"]($2, $3, $4,\n$5)" js_setRangeText4 ::         HTMLInputElement ->           JSString -> Word -> Word -> Optional JSString -> IO ()@@ -155,7 +155,7 @@       (js_setRangeText4 self (toJSString replacement) start end          (toOptionalJSString selectionMode))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"setSelectionRange\"]($2, $3,\n$4)" js_setSelectionRange ::         HTMLInputElement -> Int -> Int -> Optional JSString -> IO () @@ -464,7 +464,7 @@        (MonadIO m, FromJSString result) => HTMLInputElement -> m result getMax self = liftIO (fromJSString <$> (js_getMax self))  -foreign import javascript unsafe "$1[\"minLength\"] = $2;"+foreign import javascript safe "$1[\"minLength\"] = $2;"         js_setMinLength :: HTMLInputElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.minLength Mozilla HTMLInputElement.minLength documentation> @@ -478,7 +478,7 @@ getMinLength :: (MonadIO m) => HTMLInputElement -> m Int getMinLength self = liftIO (js_getMinLength self)  -foreign import javascript unsafe "$1[\"maxLength\"] = $2;"+foreign import javascript safe "$1[\"maxLength\"] = $2;"         js_setMaxLength :: HTMLInputElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.maxLength Mozilla HTMLInputElement.maxLength documentation> @@ -600,7 +600,7 @@ getRequired :: (MonadIO m) => HTMLInputElement -> m Bool getRequired self = liftIO (js_getRequired self)  -foreign import javascript unsafe "$1[\"size\"] = $2;" js_setSize ::+foreign import javascript safe "$1[\"size\"] = $2;" js_setSize ::         HTMLInputElement -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.size Mozilla HTMLInputElement.size documentation> @@ -680,8 +680,8 @@ getDefaultValue self   = liftIO (fromJSString <$> (js_getDefaultValue self))  -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: HTMLInputElement -> JSString -> IO ()+foreign import javascript safe "$1[\"value\"] = $2;" js_setValue ::+        HTMLInputElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.value Mozilla HTMLInputElement.value documentation>  setValue ::@@ -696,7 +696,7 @@          (MonadIO m, FromJSString result) => HTMLInputElement -> m result getValue self = liftIO (fromJSString <$> (js_getValue self))  -foreign import javascript unsafe "$1[\"valueAsDate\"] = $2;"+foreign import javascript safe "$1[\"valueAsDate\"] = $2;"         js_setValueAsDate :: HTMLInputElement -> Optional Date -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.valueAsDate Mozilla HTMLInputElement.valueAsDate documentation> @@ -728,7 +728,7 @@ getValueAsDateUnchecked self   = liftIO (fromJust . nullableToMaybe <$> (js_getValueAsDate self))  -foreign import javascript unsafe "$1[\"valueAsNumber\"] = $2;"+foreign import javascript safe "$1[\"valueAsNumber\"] = $2;"         js_setValueAsNumber :: HTMLInputElement -> Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.valueAsNumber Mozilla HTMLInputElement.valueAsNumber documentation> @@ -787,35 +787,35 @@ getLabels :: (MonadIO m) => HTMLInputElement -> m NodeList getLabels self = liftIO (js_getLabels self)  -foreign import javascript unsafe "$1[\"selectionStart\"] = $2;"+foreign import javascript safe "$1[\"selectionStart\"] = $2;"         js_setSelectionStart :: HTMLInputElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionStart Mozilla HTMLInputElement.selectionStart documentation>  setSelectionStart :: (MonadIO m) => HTMLInputElement -> Int -> m () setSelectionStart self val = liftIO (js_setSelectionStart self val)  -foreign import javascript unsafe "$1[\"selectionStart\"]"+foreign import javascript safe "$1[\"selectionStart\"]"         js_getSelectionStart :: HTMLInputElement -> IO Int  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionStart Mozilla HTMLInputElement.selectionStart documentation>  getSelectionStart :: (MonadIO m) => HTMLInputElement -> m Int getSelectionStart self = liftIO (js_getSelectionStart self)  -foreign import javascript unsafe "$1[\"selectionEnd\"] = $2;"+foreign import javascript safe "$1[\"selectionEnd\"] = $2;"         js_setSelectionEnd :: HTMLInputElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionEnd Mozilla HTMLInputElement.selectionEnd documentation>  setSelectionEnd :: (MonadIO m) => HTMLInputElement -> Int -> m () setSelectionEnd self val = liftIO (js_setSelectionEnd self val)  -foreign import javascript unsafe "$1[\"selectionEnd\"]"+foreign import javascript safe "$1[\"selectionEnd\"]"         js_getSelectionEnd :: HTMLInputElement -> IO Int  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionEnd Mozilla HTMLInputElement.selectionEnd documentation>  getSelectionEnd :: (MonadIO m) => HTMLInputElement -> m Int getSelectionEnd self = liftIO (js_getSelectionEnd self)  -foreign import javascript unsafe "$1[\"selectionDirection\"] = $2;"+foreign import javascript safe "$1[\"selectionDirection\"] = $2;"         js_setSelectionDirection :: HTMLInputElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionDirection Mozilla HTMLInputElement.selectionDirection documentation> @@ -824,7 +824,7 @@ setSelectionDirection self val   = liftIO (js_setSelectionDirection self (toJSString val))  -foreign import javascript unsafe "$1[\"selectionDirection\"]"+foreign import javascript safe "$1[\"selectionDirection\"]"         js_getSelectionDirection :: HTMLInputElement -> IO JSString  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLInputElement.selectionDirection Mozilla HTMLInputElement.selectionDirection documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLKeygenElement.hs view
@@ -32,7 +32,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/HTMLLIElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::
src/GHCJS/DOM/JSFFI/Generated/HTMLLabelElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"form\"]" js_getForm ::
src/GHCJS/DOM/JSFFI/Generated/HTMLLegendElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"form\"]" js_getForm ::
src/GHCJS/DOM/JSFFI/Generated/HTMLLinkElement.hs view
@@ -35,7 +35,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"disabled\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLMapElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"areas\"]" js_getAreas ::
src/GHCJS/DOM/JSFFI/Generated/HTMLMarqueeElement.hs view
@@ -33,7 +33,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"start\"]()" js_start ::@@ -131,7 +131,7 @@ getHspace :: (MonadIO m) => HTMLMarqueeElement -> m Word getHspace self = liftIO (js_getHspace self)  -foreign import javascript unsafe "$1[\"loop\"] = $2;" js_setLoop ::+foreign import javascript safe "$1[\"loop\"] = $2;" js_setLoop ::         HTMLMarqueeElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMarqueeElement.loop Mozilla HTMLMarqueeElement.loop documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLMediaElement.hs view
@@ -71,7 +71,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"load\"]()" js_load ::@@ -172,7 +172,7 @@           (maybeToOptional mediaKeys))          >>= maybeThrowPromiseRejected)  -foreign import javascript unsafe "$1[\"addTextTrack\"]($2, $3, $4)"+foreign import javascript safe "$1[\"addTextTrack\"]($2, $3, $4)"         js_addTextTrack ::         HTMLMediaElement ->           JSString -> Optional JSString -> Optional JSString -> IO TextTrack@@ -418,7 +418,7 @@            (MonadIO m, IsHTMLMediaElement self) => self -> m Bool getSeeking self = liftIO (js_getSeeking (toHTMLMediaElement self))  -foreign import javascript unsafe "$1[\"currentTime\"] = $2;"+foreign import javascript safe "$1[\"currentTime\"] = $2;"         js_setCurrentTime :: HTMLMediaElement -> Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.currentTime Mozilla HTMLMediaElement.currentTime documentation> @@ -565,8 +565,8 @@ getControls self   = liftIO (js_getControls (toHTMLMediaElement self))  -foreign import javascript unsafe "$1[\"volume\"] = $2;"-        js_setVolume :: HTMLMediaElement -> Double -> IO ()+foreign import javascript safe "$1[\"volume\"] = $2;" js_setVolume+        :: HTMLMediaElement -> Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLMediaElement.volume Mozilla HTMLMediaElement.volume documentation>  setVolume ::
src/GHCJS/DOM/JSFFI/Generated/HTMLMenuElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"compact\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLMetaElement.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"content\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLMeterElement.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue
src/GHCJS/DOM/JSFFI/Generated/HTMLModElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"cite\"] = $2;" js_setCite ::
src/GHCJS/DOM/JSFFI/Generated/HTMLOListElement.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"compact\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLObjectElement.hs view
@@ -42,7 +42,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -78,7 +78,7 @@ setCustomValidity self error   = liftIO (js_setCustomValidity self (toJSString error))  -foreign import javascript unsafe "$1[\"getSVGDocument\"]()"+foreign import javascript safe "$1[\"getSVGDocument\"]()"         js_getSVGDocument :: HTMLObjectElement -> IO Document  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLObjectElement.getSVGDocument Mozilla HTMLObjectElement.getSVGDocument documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLOptGroupElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"disabled\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLOptionElement.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"disabled\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLOptionsCollection.hs view
@@ -27,10 +27,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_addBefore+foreign import javascript safe "$1[\"add\"]($2, $3)" js_addBefore         ::         HTMLOptionsCollection ->           HTMLOptionElementOrGroup -> Optional HTMLElementOrLong -> IO ()@@ -120,8 +120,8 @@       (fromJust . nullableToMaybe <$>          (js_namedItem self (toJSString name)))  -foreign import javascript unsafe "$1[\"length\"] = $2;"-        js_setLength :: HTMLOptionsCollection -> Word -> IO ()+foreign import javascript safe "$1[\"length\"] = $2;" js_setLength+        :: HTMLOptionsCollection -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLOptionsCollection.length Mozilla HTMLOptionsCollection.length documentation>  setLength :: (MonadIO m) => HTMLOptionsCollection -> Word -> m ()
src/GHCJS/DOM/JSFFI/Generated/HTMLOutputElement.hs view
@@ -31,7 +31,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/HTMLParagraphElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign
src/GHCJS/DOM/JSFFI/Generated/HTMLParamElement.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::
src/GHCJS/DOM/JSFFI/Generated/HTMLPreElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"width\"] = $2;" js_setWidth
src/GHCJS/DOM/JSFFI/Generated/HTMLProgressElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue
src/GHCJS/DOM/JSFFI/Generated/HTMLQuoteElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"cite\"] = $2;" js_setCite ::
src/GHCJS/DOM/JSFFI/Generated/HTMLScriptElement.hs view
@@ -33,7 +33,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"text\"] = $2;" js_setText ::
src/GHCJS/DOM/JSFFI/Generated/HTMLSelectElement.hs view
@@ -41,7 +41,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::@@ -108,7 +108,7 @@       (fromJust . nullableToMaybe <$>          (js_namedItem self (toJSString name)))  -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_addBefore+foreign import javascript safe "$1[\"add\"]($2, $3)" js_addBefore         ::         HTMLSelectElement ->           HTMLOptionElementOrGroup -> Optional HTMLElementOrLong -> IO ()@@ -126,8 +126,8 @@              \ element' -> js_addBefore self (HTMLOptionElementOrGroup element')              (maybeToOptional (fmap HTMLElementOrLong before')))  -foreign import javascript unsafe "$1[\"remove\"]()" js_removeThis-        :: HTMLSelectElement -> IO ()+foreign import javascript safe "$1[\"remove\"]()" js_removeThis ::+        HTMLSelectElement -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.remove Mozilla HTMLSelectElement.remove documentation>  removeThis :: (MonadIO m) => HTMLSelectElement -> m ()@@ -297,8 +297,8 @@            (MonadIO m) => HTMLSelectElement -> m HTMLOptionsCollection getOptions self = liftIO (js_getOptions self)  -foreign import javascript unsafe "$1[\"length\"] = $2;"-        js_setLength :: HTMLSelectElement -> Word -> IO ()+foreign import javascript safe "$1[\"length\"] = $2;" js_setLength+        :: HTMLSelectElement -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLSelectElement.length Mozilla HTMLSelectElement.length documentation>  setLength :: (MonadIO m) => HTMLSelectElement -> Word -> m ()
src/GHCJS/DOM/JSFFI/Generated/HTMLSlotElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"assignedNodes\"]($2)"
src/GHCJS/DOM/JSFFI/Generated/HTMLSourceElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"src\"] = $2;" js_setSrc ::
src/GHCJS/DOM/JSFFI/Generated/HTMLStyleElement.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"disabled\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLTableCaptionElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign
src/GHCJS/DOM/JSFFI/Generated/HTMLTableCellElement.hs view
@@ -33,7 +33,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"cellIndex\"]"
src/GHCJS/DOM/JSFFI/Generated/HTMLTableColElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"align\"] = $2;" js_setAlign
src/GHCJS/DOM/JSFFI/Generated/HTMLTableElement.hs view
@@ -41,7 +41,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"createTHead\"]()"@@ -109,8 +109,8 @@ deleteCaption :: (MonadIO m) => HTMLTableElement -> m () deleteCaption self = liftIO (js_deleteCaption self)  -foreign import javascript unsafe "$1[\"insertRow\"]($2)"-        js_insertRow :: HTMLTableElement -> Optional Int -> IO HTMLElement+foreign import javascript safe "$1[\"insertRow\"]($2)" js_insertRow+        :: HTMLTableElement -> Optional Int -> IO HTMLElement  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.insertRow Mozilla HTMLTableElement.insertRow documentation>  insertRow ::@@ -123,14 +123,14 @@ insertRow_ self index   = liftIO (void (js_insertRow self (maybeToOptional index)))  -foreign import javascript unsafe "$1[\"deleteRow\"]($2)"-        js_deleteRow :: HTMLTableElement -> Int -> IO ()+foreign import javascript safe "$1[\"deleteRow\"]($2)" js_deleteRow+        :: HTMLTableElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.deleteRow Mozilla HTMLTableElement.deleteRow documentation>  deleteRow :: (MonadIO m) => HTMLTableElement -> Int -> m () deleteRow self index = liftIO (js_deleteRow self index)  -foreign import javascript unsafe "$1[\"caption\"] = $2;"+foreign import javascript safe "$1[\"caption\"] = $2;"         js_setCaption ::         HTMLTableElement -> Optional HTMLTableCaptionElement -> IO () @@ -165,8 +165,8 @@ getCaptionUnchecked self   = liftIO (fromJust . nullableToMaybe <$> (js_getCaption self))  -foreign import javascript unsafe "$1[\"tHead\"] = $2;" js_setTHead-        :: HTMLTableElement -> Optional HTMLTableSectionElement -> IO ()+foreign import javascript safe "$1[\"tHead\"] = $2;" js_setTHead ::+        HTMLTableElement -> Optional HTMLTableSectionElement -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.tHead Mozilla HTMLTableElement.tHead documentation>  setTHead ::@@ -198,8 +198,8 @@ getTHeadUnchecked self   = liftIO (fromJust . nullableToMaybe <$> (js_getTHead self))  -foreign import javascript unsafe "$1[\"tFoot\"] = $2;" js_setTFoot-        :: HTMLTableElement -> Optional HTMLTableSectionElement -> IO ()+foreign import javascript safe "$1[\"tFoot\"] = $2;" js_setTFoot ::+        HTMLTableElement -> Optional HTMLTableSectionElement -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableElement.tFoot Mozilla HTMLTableElement.tFoot documentation>  setTFoot ::
src/GHCJS/DOM/JSFFI/Generated/HTMLTableRowElement.hs view
@@ -29,10 +29,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"insertCell\"]($2)"+foreign import javascript safe "$1[\"insertCell\"]($2)"         js_insertCell ::         HTMLTableRowElement -> Optional Int -> IO HTMLElement @@ -48,7 +48,7 @@ insertCell_ self index   = liftIO (void (js_insertCell self (maybeToOptional index)))  -foreign import javascript unsafe "$1[\"deleteCell\"]($2)"+foreign import javascript safe "$1[\"deleteCell\"]($2)"         js_deleteCell :: HTMLTableRowElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableRowElement.deleteCell Mozilla HTMLTableRowElement.deleteCell documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLTableSectionElement.hs view
@@ -26,12 +26,11 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"insertRow\"]($2)"-        js_insertRow ::-        HTMLTableSectionElement -> Optional Int -> IO HTMLElement+foreign import javascript safe "$1[\"insertRow\"]($2)" js_insertRow+        :: HTMLTableSectionElement -> Optional Int -> IO HTMLElement  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.insertRow Mozilla HTMLTableSectionElement.insertRow documentation>  insertRow ::@@ -46,8 +45,8 @@ insertRow_ self index   = liftIO (void (js_insertRow self (maybeToOptional index)))  -foreign import javascript unsafe "$1[\"deleteRow\"]($2)"-        js_deleteRow :: HTMLTableSectionElement -> Int -> IO ()+foreign import javascript safe "$1[\"deleteRow\"]($2)" js_deleteRow+        :: HTMLTableSectionElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTableSectionElement.deleteRow Mozilla HTMLTableSectionElement.deleteRow documentation>  deleteRow :: (MonadIO m) => HTMLTableSectionElement -> Int -> m ()
src/GHCJS/DOM/JSFFI/Generated/HTMLTemplateElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"content\"]" js_getContent ::
src/GHCJS/DOM/JSFFI/Generated/HTMLTextAreaElement.hs view
@@ -49,7 +49,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -93,7 +93,7 @@ select :: (MonadIO m) => HTMLTextAreaElement -> m () select self = liftIO (js_select self)  -foreign import javascript unsafe "$1[\"setRangeText\"]($2)"+foreign import javascript safe "$1[\"setRangeText\"]($2)"         js_setRangeText :: HTMLTextAreaElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.setRangeText Mozilla HTMLTextAreaElement.setRangeText documentation> @@ -103,7 +103,7 @@ setRangeText self replacement   = liftIO (js_setRangeText self (toJSString replacement))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"setRangeText\"]($2, $3, $4,\n$5)" js_setRangeText4 ::         HTMLTextAreaElement ->           JSString -> Word -> Word -> Optional JSString -> IO ()@@ -185,7 +185,7 @@ getForm :: (MonadIO m) => HTMLTextAreaElement -> m HTMLFormElement getForm self = liftIO (js_getForm self)  -foreign import javascript unsafe "$1[\"minLength\"] = $2;"+foreign import javascript safe "$1[\"minLength\"] = $2;"         js_setMinLength :: HTMLTextAreaElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.minLength Mozilla HTMLTextAreaElement.minLength documentation> @@ -199,7 +199,7 @@ getMinLength :: (MonadIO m) => HTMLTextAreaElement -> m Int getMinLength self = liftIO (js_getMinLength self)  -foreign import javascript unsafe "$1[\"maxLength\"] = $2;"+foreign import javascript safe "$1[\"maxLength\"] = $2;"         js_setMaxLength :: HTMLTextAreaElement -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLTextAreaElement.maxLength Mozilla HTMLTextAreaElement.maxLength documentation>
src/GHCJS/DOM/JSFFI/Generated/HTMLTimeElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"dateTime\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLTitleElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"text\"] = $2;" js_setText ::
src/GHCJS/DOM/JSFFI/Generated/HTMLTrackElement.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern NONE = 0 pattern LOADING = 1
src/GHCJS/DOM/JSFFI/Generated/HTMLUListElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"compact\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/HTMLVideoElement.hs view
@@ -43,10 +43,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"webkitEnterFullscreen\"]()"+foreign import javascript safe "$1[\"webkitEnterFullscreen\"]()"         js_webkitEnterFullscreen :: HTMLVideoElement -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitEnterFullscreen Mozilla HTMLVideoElement.webkitEnterFullscreen documentation> @@ -60,7 +60,7 @@ webkitExitFullscreen :: (MonadIO m) => HTMLVideoElement -> m () webkitExitFullscreen self = liftIO (js_webkitExitFullscreen self)  -foreign import javascript unsafe "$1[\"webkitEnterFullScreen\"]()"+foreign import javascript safe "$1[\"webkitEnterFullScreen\"]()"         js_webkitEnterFullScreen :: HTMLVideoElement -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/HTMLVideoElement.webkitEnterFullScreen Mozilla HTMLVideoElement.webkitEnterFullScreen documentation>
src/GHCJS/DOM/JSFFI/Generated/HashChangeEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/Headers.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"append\"]($2, $3)" js_append+foreign import javascript safe "$1[\"append\"]($2, $3)" js_append         :: Headers -> JSString -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Headers.append Mozilla Headers.append documentation> @@ -37,14 +37,14 @@ append self name value   = liftIO (js_append self (toJSString name) (toJSString value))  -foreign import javascript unsafe "$1[\"delete\"]($2)" js_delete ::+foreign import javascript safe "$1[\"delete\"]($2)" js_delete ::         Headers -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Headers.delete Mozilla Headers.delete documentation>  delete :: (MonadIO m, ToJSString name) => Headers -> name -> m () delete self name = liftIO (js_delete self (toJSString name))  -foreign import javascript unsafe "$1[\"get\"]($2)" js_get ::+foreign import javascript safe "$1[\"get\"]($2)" js_get ::         Headers -> JSString -> IO (Nullable JSString)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Headers.get Mozilla Headers.get documentation> @@ -75,7 +75,7 @@   = liftIO       (fromJust . fromMaybeJSString <$> (js_get self (toJSString name)))  -foreign import javascript unsafe "($1[\"has\"]($2) ? 1 : 0)" js_has+foreign import javascript safe "($1[\"has\"]($2) ? 1 : 0)" js_has         :: Headers -> JSString -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Headers.has Mozilla Headers.has documentation> @@ -86,7 +86,7 @@ has_ :: (MonadIO m, ToJSString name) => Headers -> name -> m () has_ self name = liftIO (void (js_has self (toJSString name)))  -foreign import javascript unsafe "$1[\"set\"]($2, $3)" js_set ::+foreign import javascript safe "$1[\"set\"]($2, $3)" js_set ::         Headers -> JSString -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Headers.set Mozilla Headers.set documentation>
src/GHCJS/DOM/JSFFI/Generated/History.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"back\"]()" js_back ::@@ -50,7 +50,7 @@ go :: (MonadIO m) => History -> Maybe Int -> m () go self distance = liftIO (js_go self (maybeToOptional distance))  -foreign import javascript unsafe "$1[\"pushState\"]($2, $3, $4)"+foreign import javascript safe "$1[\"pushState\"]($2, $3, $4)"         js_pushState ::         History -> JSVal -> JSString -> Optional JSString -> IO () @@ -64,7 +64,7 @@          (toJSString title)          (toOptionalJSString url))  -foreign import javascript unsafe "$1[\"replaceState\"]($2, $3, $4)"+foreign import javascript safe "$1[\"replaceState\"]($2, $3, $4)"         js_replaceState ::         History -> JSVal -> JSString -> Optional JSString -> IO () @@ -85,7 +85,7 @@ getLength :: (MonadIO m) => History -> m Word getLength self = liftIO (js_getLength self)  -foreign import javascript unsafe "$1[\"scrollRestoration\"] = $2;"+foreign import javascript safe "$1[\"scrollRestoration\"] = $2;"         js_setScrollRestoration :: History -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/History.scrollRestoration Mozilla History.scrollRestoration documentation> @@ -94,7 +94,7 @@ setScrollRestoration self val   = liftIO (js_setScrollRestoration self (pToJSVal val))  -foreign import javascript unsafe "$1[\"scrollRestoration\"]"+foreign import javascript safe "$1[\"scrollRestoration\"]"         js_getScrollRestoration :: History -> IO JSVal  -- | <https://developer.mozilla.org/en-US/docs/Web/API/History.scrollRestoration Mozilla History.scrollRestoration documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBCursor.hs view
@@ -26,10 +26,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"update\"]($2)" js_update ::+foreign import javascript safe "$1[\"update\"]($2)" js_update ::         IDBCursor -> JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.update Mozilla IDBCursor.update documentation> @@ -50,14 +50,14 @@          (toJSVal value >>=             \ value' -> js_update (toIDBCursor self) value'))  -foreign import javascript unsafe "$1[\"advance\"]($2)" js_advance-        :: IDBCursor -> Word -> IO ()+foreign import javascript safe "$1[\"advance\"]($2)" js_advance ::+        IDBCursor -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.advance Mozilla IDBCursor.advance documentation>  advance :: (MonadIO m, IsIDBCursor self) => self -> Word -> m () advance self count = liftIO (js_advance (toIDBCursor self) count)  -foreign import javascript unsafe "$1[\"continue\"]($2)" js_continue+foreign import javascript safe "$1[\"continue\"]($2)" js_continue         :: IDBCursor -> Optional JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.continue Mozilla IDBCursor.continue documentation> @@ -69,9 +69,8 @@       (mapM toJSVal key >>=          \ key' -> js_continue (toIDBCursor self) (maybeToOptional key'))  -foreign import javascript unsafe-        "$1[\"continuePrimaryKey\"]($2, $3)" js_continuePrimaryKey ::-        IDBCursor -> JSVal -> JSVal -> IO ()+foreign import javascript safe "$1[\"continuePrimaryKey\"]($2, $3)"+        js_continuePrimaryKey :: IDBCursor -> JSVal -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.continuePrimaryKey Mozilla IDBCursor.continuePrimaryKey documentation>  continuePrimaryKey ::@@ -85,7 +84,7 @@              \ key' -> js_continuePrimaryKey (toIDBCursor self) key'              primaryKey')  -foreign import javascript unsafe "$1[\"delete\"]()" js_delete ::+foreign import javascript safe "$1[\"delete\"]()" js_delete ::         IDBCursor -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBCursor.delete Mozilla IDBCursor.delete documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBCursorWithValue.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"value\"]" js_getValue ::
src/GHCJS/DOM/JSFFI/Generated/IDBDatabase.hs view
@@ -27,11 +27,11 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe-        "$1[\"createObjectStore\"]($2, $3)" js_createObjectStore ::+foreign import javascript safe "$1[\"createObjectStore\"]($2, $3)"+        js_createObjectStore ::         IDBDatabase ->           JSString -> Optional IDBObjectStoreParameters -> IO IDBObjectStore @@ -55,7 +55,7 @@          (js_createObjectStore self (toJSString name)             (maybeToOptional parameters)))  -foreign import javascript unsafe "$1[\"deleteObjectStore\"]($2)"+foreign import javascript safe "$1[\"deleteObjectStore\"]($2)"         js_deleteObjectStore :: IDBDatabase -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.deleteObjectStore Mozilla IDBDatabase.deleteObjectStore documentation> @@ -64,7 +64,7 @@ deleteObjectStore self name   = liftIO (js_deleteObjectStore self (toJSString name))  -foreign import javascript unsafe "$1[\"transaction\"]($2, $3)"+foreign import javascript safe "$1[\"transaction\"]($2, $3)"         js_transaction ::         IDBDatabase ->           StringOrStrings -> Optional IDBTransactionMode -> IO IDBTransaction@@ -127,7 +127,7 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.onclose Mozilla IDBDatabase.onclose documentation>  closeEvent :: EventName IDBDatabase CloseEvent-closeEvent = unsafeEventName (toJSString "close")+closeEvent = unsafeEventNameAsync (toJSString "close")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBDatabase.onerror Mozilla IDBDatabase.onerror documentation>  error :: EventName IDBDatabase Event
src/GHCJS/DOM/JSFFI/Generated/IDBFactory.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"open\"]($2, $3)" js_open ::+foreign import javascript safe "$1[\"open\"]($2, $3)" js_open ::         IDBFactory -> JSString -> Optional Double -> IO IDBOpenDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBFactory.open Mozilla IDBFactory.open documentation> @@ -49,7 +49,7 @@          (js_open self (toJSString name)             (maybeToOptional (fmap fromIntegral version))))  -foreign import javascript unsafe "$1[\"deleteDatabase\"]($2)"+foreign import javascript safe "$1[\"deleteDatabase\"]($2)"         js_deleteDatabase :: IDBFactory -> JSString -> IO IDBOpenDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBFactory.deleteDatabase Mozilla IDBFactory.deleteDatabase documentation> @@ -65,7 +65,7 @@ deleteDatabase_ self name   = liftIO (void (js_deleteDatabase self (toJSString name)))  -foreign import javascript unsafe "$1[\"cmp\"]($2, $3)" js_cmp ::+foreign import javascript safe "$1[\"cmp\"]($2, $3)" js_cmp ::         IDBFactory -> JSVal -> JSVal -> IO Int  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBFactory.cmp Mozilla IDBFactory.cmp documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBIndex.hs view
@@ -35,10 +35,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"openCursor\"]($2, $3)"+foreign import javascript safe "$1[\"openCursor\"]($2, $3)"         js_openCursorRange ::         IDBIndex ->           Optional IDBKeyRange ->@@ -64,7 +64,7 @@          (js_openCursorRange self (maybeToOptional range)             (maybeToOptional direction)))  -foreign import javascript unsafe "$1[\"openCursor\"]($2, $3)"+foreign import javascript safe "$1[\"openCursor\"]($2, $3)"         js_openCursor ::         IDBIndex -> JSVal -> Optional IDBCursorDirection -> IO IDBRequest @@ -87,7 +87,7 @@          (toJSVal key >>= \ key' -> js_openCursor self key'             (maybeToOptional direction)))  -foreign import javascript unsafe "$1[\"openKeyCursor\"]($2, $3)"+foreign import javascript safe "$1[\"openKeyCursor\"]($2, $3)"         js_openKeyCursorRange ::         IDBIndex ->           Optional IDBKeyRange ->@@ -113,7 +113,7 @@          (js_openKeyCursorRange self (maybeToOptional range)             (maybeToOptional direction)))  -foreign import javascript unsafe "$1[\"openKeyCursor\"]($2, $3)"+foreign import javascript safe "$1[\"openKeyCursor\"]($2, $3)"         js_openKeyCursor ::         IDBIndex -> JSVal -> Optional IDBCursorDirection -> IO IDBRequest @@ -136,7 +136,7 @@          (toJSVal key >>= \ key' -> js_openKeyCursor self key'             (maybeToOptional direction)))  -foreign import javascript unsafe "$1[\"get\"]($2)" js_getRange ::+foreign import javascript safe "$1[\"get\"]($2)" js_getRange ::         IDBIndex -> Optional IDBKeyRange -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBIndex.get Mozilla IDBIndex.get documentation> @@ -149,7 +149,7 @@ getRange_ self key   = liftIO (void (js_getRange self (maybeToOptional key)))  -foreign import javascript unsafe "$1[\"get\"]($2)" js_get ::+foreign import javascript safe "$1[\"get\"]($2)" js_get ::         IDBIndex -> JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBIndex.get Mozilla IDBIndex.get documentation> @@ -161,8 +161,8 @@ get_ self key   = liftIO (void (toJSVal key >>= \ key' -> js_get self key'))  -foreign import javascript unsafe "$1[\"getKey\"]($2)"-        js_getKeyRange :: IDBIndex -> Optional IDBKeyRange -> IO IDBRequest+foreign import javascript safe "$1[\"getKey\"]($2)" js_getKeyRange+        :: IDBIndex -> Optional IDBKeyRange -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBIndex.getKey Mozilla IDBIndex.getKey documentation>  getKeyRange ::@@ -176,7 +176,7 @@ getKeyRange_ self key   = liftIO (void (js_getKeyRange self (maybeToOptional key)))  -foreign import javascript unsafe "$1[\"getKey\"]($2)" js_getKey ::+foreign import javascript safe "$1[\"getKey\"]($2)" js_getKey ::         IDBIndex -> JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBIndex.getKey Mozilla IDBIndex.getKey documentation> @@ -190,7 +190,7 @@ getKey_ self key   = liftIO (void (toJSVal key >>= \ key' -> js_getKey self key'))  -foreign import javascript unsafe "$1[\"getAll\"]($2, $3)"+foreign import javascript safe "$1[\"getAll\"]($2, $3)"         js_getAllRange ::         IDBIndex -> Optional IDBKeyRange -> Optional Word -> IO IDBRequest @@ -212,7 +212,7 @@          (js_getAllRange self (maybeToOptional range)             (maybeToOptional count)))  -foreign import javascript unsafe "$1[\"getAll\"]($2, $3)" js_getAll+foreign import javascript safe "$1[\"getAll\"]($2, $3)" js_getAll         :: IDBIndex -> JSVal -> Optional Word -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBIndex.getAll Mozilla IDBIndex.getAll documentation> @@ -233,7 +233,7 @@          (toJSVal key >>= \ key' -> js_getAll self key'             (maybeToOptional count)))  -foreign import javascript unsafe "$1[\"getAllKeys\"]($2, $3)"+foreign import javascript safe "$1[\"getAllKeys\"]($2, $3)"         js_getAllKeysRange ::         IDBIndex -> Optional IDBKeyRange -> Optional Word -> IO IDBRequest @@ -255,7 +255,7 @@          (js_getAllKeysRange self (maybeToOptional range)             (maybeToOptional count)))  -foreign import javascript unsafe "$1[\"getAllKeys\"]($2, $3)"+foreign import javascript safe "$1[\"getAllKeys\"]($2, $3)"         js_getAllKeys ::         IDBIndex -> JSVal -> Optional Word -> IO IDBRequest @@ -277,8 +277,8 @@          (toJSVal key >>= \ key' -> js_getAllKeys self key'             (maybeToOptional count)))  -foreign import javascript unsafe "$1[\"count\"]($2)" js_countRange-        :: IDBIndex -> Optional IDBKeyRange -> IO IDBRequest+foreign import javascript safe "$1[\"count\"]($2)" js_countRange ::+        IDBIndex -> Optional IDBKeyRange -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBIndex.count Mozilla IDBIndex.count documentation>  countRange ::@@ -291,7 +291,7 @@ countRange_ self range   = liftIO (void (js_countRange self (maybeToOptional range)))  -foreign import javascript unsafe "$1[\"count\"]($2)" js_count ::+foreign import javascript safe "$1[\"count\"]($2)" js_count ::         IDBIndex -> JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBIndex.count Mozilla IDBIndex.count documentation> @@ -305,7 +305,7 @@ count_ self key   = liftIO (void (toJSVal key >>= \ key' -> js_count self key'))  -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::+foreign import javascript safe "$1[\"name\"] = $2;" js_setName ::         IDBIndex -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBIndex.name Mozilla IDBIndex.name documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBKeyRange.hs view
@@ -26,91 +26,82 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"only\"]($2)" js_only ::-        IDBKeyRange -> JSVal -> IO IDBKeyRange+foreign import javascript safe+        "window[\"IDBKeyRange\"][\"only\"]($1)" js_only ::+        JSVal -> IO IDBKeyRange  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.only Mozilla IDBKeyRange.only documentation> -only ::-     (MonadIO m, ToJSVal value) => IDBKeyRange -> value -> m IDBKeyRange-only self value-  = liftIO (toJSVal value >>= \ value' -> js_only self value')+only :: (MonadIO m, ToJSVal value) => value -> m IDBKeyRange+only value = liftIO (toJSVal value >>= \ value' -> js_only value')  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.only Mozilla IDBKeyRange.only documentation> -only_ :: (MonadIO m, ToJSVal value) => IDBKeyRange -> value -> m ()-only_ self value-  = liftIO (void (toJSVal value >>= \ value' -> js_only self value'))+only_ :: (MonadIO m, ToJSVal value) => value -> m ()+only_ value+  = liftIO (void (toJSVal value >>= \ value' -> js_only value'))  -foreign import javascript unsafe "$1[\"lowerBound\"]($2, $3)"-        js_lowerBound :: IDBKeyRange -> JSVal -> Bool -> IO IDBKeyRange+foreign import javascript safe+        "window[\"IDBKeyRange\"][\"lowerBound\"]($1,\n$2)" js_lowerBound ::+        JSVal -> Bool -> IO IDBKeyRange  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.lowerBound Mozilla IDBKeyRange.lowerBound documentation>  lowerBound ::-           (MonadIO m, ToJSVal lower) =>-             IDBKeyRange -> lower -> Bool -> m IDBKeyRange-lowerBound self lower open-  = liftIO-      (toJSVal lower >>= \ lower' -> js_lowerBound self lower' open)+           (MonadIO m, ToJSVal lower) => lower -> Bool -> m IDBKeyRange+lowerBound lower open+  = liftIO (toJSVal lower >>= \ lower' -> js_lowerBound lower' open)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.lowerBound Mozilla IDBKeyRange.lowerBound documentation> -lowerBound_ ::-            (MonadIO m, ToJSVal lower) => IDBKeyRange -> lower -> Bool -> m ()-lowerBound_ self lower open+lowerBound_ :: (MonadIO m, ToJSVal lower) => lower -> Bool -> m ()+lowerBound_ lower open   = liftIO-      (void-         (toJSVal lower >>= \ lower' -> js_lowerBound self lower' open))+      (void (toJSVal lower >>= \ lower' -> js_lowerBound lower' open))  -foreign import javascript unsafe "$1[\"upperBound\"]($2, $3)"-        js_upperBound :: IDBKeyRange -> JSVal -> Bool -> IO IDBKeyRange+foreign import javascript safe+        "window[\"IDBKeyRange\"][\"upperBound\"]($1,\n$2)" js_upperBound ::+        JSVal -> Bool -> IO IDBKeyRange  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.upperBound Mozilla IDBKeyRange.upperBound documentation>  upperBound ::-           (MonadIO m, ToJSVal upper) =>-             IDBKeyRange -> upper -> Bool -> m IDBKeyRange-upperBound self upper open-  = liftIO-      (toJSVal upper >>= \ upper' -> js_upperBound self upper' open)+           (MonadIO m, ToJSVal upper) => upper -> Bool -> m IDBKeyRange+upperBound upper open+  = liftIO (toJSVal upper >>= \ upper' -> js_upperBound upper' open)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.upperBound Mozilla IDBKeyRange.upperBound documentation> -upperBound_ ::-            (MonadIO m, ToJSVal upper) => IDBKeyRange -> upper -> Bool -> m ()-upperBound_ self upper open+upperBound_ :: (MonadIO m, ToJSVal upper) => upper -> Bool -> m ()+upperBound_ upper open   = liftIO-      (void-         (toJSVal upper >>= \ upper' -> js_upperBound self upper' open))+      (void (toJSVal upper >>= \ upper' -> js_upperBound upper' open))  -foreign import javascript unsafe "$1[\"bound\"]($2, $3, $4, $5)"-        js_bound ::-        IDBKeyRange -> JSVal -> JSVal -> Bool -> Bool -> IO IDBKeyRange+foreign import javascript safe+        "window[\"IDBKeyRange\"][\"bound\"]($1,\n$2, $3, $4)" js_bound ::+        JSVal -> JSVal -> Bool -> Bool -> IO IDBKeyRange  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.bound Mozilla IDBKeyRange.bound documentation>  bound ::       (MonadIO m, ToJSVal lower, ToJSVal upper) =>-        IDBKeyRange -> lower -> upper -> Bool -> Bool -> m IDBKeyRange-bound self lower upper lowerOpen upperOpen+        lower -> upper -> Bool -> Bool -> m IDBKeyRange+bound lower upper lowerOpen upperOpen   = liftIO       (toJSVal upper >>=-         \ upper' ->-           toJSVal lower >>= \ lower' -> js_bound self lower' upper'+         \ upper' -> toJSVal lower >>= \ lower' -> js_bound lower' upper'          lowerOpen          upperOpen)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.bound Mozilla IDBKeyRange.bound documentation>  bound_ ::        (MonadIO m, ToJSVal lower, ToJSVal upper) =>-         IDBKeyRange -> lower -> upper -> Bool -> Bool -> m ()-bound_ self lower upper lowerOpen upperOpen+         lower -> upper -> Bool -> Bool -> m ()+bound_ lower upper lowerOpen upperOpen   = liftIO       (void          (toJSVal upper >>=-            \ upper' ->-              toJSVal lower >>= \ lower' -> js_bound self lower' upper'+            \ upper' -> toJSVal lower >>= \ lower' -> js_bound lower' upper'             lowerOpen             upperOpen))  -foreign import javascript unsafe "($1[\"includes\"]($2) ? 1 : 0)"+foreign import javascript safe "($1[\"includes\"]($2) ? 1 : 0)"         js_includes :: IDBKeyRange -> JSVal -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBKeyRange.includes Mozilla IDBKeyRange.includes documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBObjectStore.hs view
@@ -39,10 +39,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"put\"]($2, $3)" js_put ::+foreign import javascript safe "$1[\"put\"]($2, $3)" js_put ::         IDBObjectStore -> JSVal -> Optional JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.put Mozilla IDBObjectStore.put documentation> @@ -68,7 +68,7 @@               toJSVal value >>= \ value' -> js_put self value'                 (maybeToOptional key')))  -foreign import javascript unsafe "$1[\"add\"]($2, $3)" js_add ::+foreign import javascript safe "$1[\"add\"]($2, $3)" js_add ::         IDBObjectStore -> JSVal -> Optional JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.add Mozilla IDBObjectStore.add documentation> @@ -94,9 +94,8 @@               toJSVal value >>= \ value' -> js_add self value'                 (maybeToOptional key')))  -foreign import javascript unsafe "$1[\"delete\"]($2)"-        js_deleteRange ::-        IDBObjectStore -> Optional IDBKeyRange -> IO IDBRequest+foreign import javascript safe "$1[\"delete\"]($2)" js_deleteRange+        :: IDBObjectStore -> Optional IDBKeyRange -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.delete Mozilla IDBObjectStore.delete documentation>  deleteRange ::@@ -110,7 +109,7 @@ deleteRange_ self keyRange   = liftIO (void (js_deleteRange self (maybeToOptional keyRange)))  -foreign import javascript unsafe "$1[\"delete\"]($2)" js_delete ::+foreign import javascript safe "$1[\"delete\"]($2)" js_delete ::         IDBObjectStore -> JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.delete Mozilla IDBObjectStore.delete documentation> @@ -125,7 +124,7 @@ delete_ self key   = liftIO (void (toJSVal key >>= \ key' -> js_delete self key'))  -foreign import javascript unsafe "$1[\"get\"]($2)" js_getRange ::+foreign import javascript safe "$1[\"get\"]($2)" js_getRange ::         IDBObjectStore -> Optional IDBKeyRange -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.get Mozilla IDBObjectStore.get documentation> @@ -139,7 +138,7 @@ getRange_ self key   = liftIO (void (js_getRange self (maybeToOptional key)))  -foreign import javascript unsafe "$1[\"get\"]($2)" js_get ::+foreign import javascript safe "$1[\"get\"]($2)" js_get ::         IDBObjectStore -> JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.get Mozilla IDBObjectStore.get documentation> @@ -152,9 +151,8 @@ get_ self key   = liftIO (void (toJSVal key >>= \ key' -> js_get self key'))  -foreign import javascript unsafe "$1[\"getKey\"]($2)"-        js_getKeyRange ::-        IDBObjectStore -> Optional IDBKeyRange -> IO IDBRequest+foreign import javascript safe "$1[\"getKey\"]($2)" js_getKeyRange+        :: IDBObjectStore -> Optional IDBKeyRange -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.getKey Mozilla IDBObjectStore.getKey documentation>  getKeyRange ::@@ -168,7 +166,7 @@ getKeyRange_ self key   = liftIO (void (js_getKeyRange self (maybeToOptional key)))  -foreign import javascript unsafe "$1[\"getKey\"]($2)" js_getKey ::+foreign import javascript safe "$1[\"getKey\"]($2)" js_getKey ::         IDBObjectStore -> JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.getKey Mozilla IDBObjectStore.getKey documentation> @@ -183,7 +181,7 @@ getKey_ self key   = liftIO (void (toJSVal key >>= \ key' -> js_getKey self key'))  -foreign import javascript unsafe "$1[\"clear\"]()" js_clear ::+foreign import javascript safe "$1[\"clear\"]()" js_clear ::         IDBObjectStore -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.clear Mozilla IDBObjectStore.clear documentation> @@ -194,7 +192,7 @@ clear_ :: (MonadIO m) => IDBObjectStore -> m () clear_ self = liftIO (void (js_clear self))  -foreign import javascript unsafe "$1[\"openCursor\"]($2, $3)"+foreign import javascript safe "$1[\"openCursor\"]($2, $3)"         js_openCursorRange ::         IDBObjectStore ->           Optional IDBKeyRange ->@@ -221,7 +219,7 @@          (js_openCursorRange self (maybeToOptional range)             (maybeToOptional direction)))  -foreign import javascript unsafe "$1[\"openCursor\"]($2, $3)"+foreign import javascript safe "$1[\"openCursor\"]($2, $3)"         js_openCursor ::         IDBObjectStore ->           JSVal -> Optional IDBCursorDirection -> IO IDBRequest@@ -245,7 +243,7 @@          (toJSVal key >>= \ key' -> js_openCursor self key'             (maybeToOptional direction)))  -foreign import javascript unsafe "$1[\"openKeyCursor\"]($2, $3)"+foreign import javascript safe "$1[\"openKeyCursor\"]($2, $3)"         js_openKeyCursorRange ::         IDBObjectStore ->           Optional IDBKeyRange ->@@ -272,7 +270,7 @@          (js_openKeyCursorRange self (maybeToOptional range)             (maybeToOptional direction)))  -foreign import javascript unsafe "$1[\"openKeyCursor\"]($2, $3)"+foreign import javascript safe "$1[\"openKeyCursor\"]($2, $3)"         js_openKeyCursor ::         IDBObjectStore ->           JSVal -> Optional IDBCursorDirection -> IO IDBRequest@@ -296,7 +294,7 @@          (toJSVal key >>= \ key' -> js_openKeyCursor self key'             (maybeToOptional direction)))  -foreign import javascript unsafe "$1[\"getAll\"]($2, $3)"+foreign import javascript safe "$1[\"getAll\"]($2, $3)"         js_getAllRange ::         IDBObjectStore ->           Optional IDBKeyRange -> Optional Word -> IO IDBRequest@@ -320,7 +318,7 @@          (js_getAllRange self (maybeToOptional range)             (maybeToOptional count)))  -foreign import javascript unsafe "$1[\"getAll\"]($2, $3)" js_getAll+foreign import javascript safe "$1[\"getAll\"]($2, $3)" js_getAll         :: IDBObjectStore -> JSVal -> Optional Word -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.getAll Mozilla IDBObjectStore.getAll documentation> @@ -342,7 +340,7 @@          (toJSVal key >>= \ key' -> js_getAll self key'             (maybeToOptional count)))  -foreign import javascript unsafe "$1[\"getAllKeys\"]($2, $3)"+foreign import javascript safe "$1[\"getAllKeys\"]($2, $3)"         js_getAllKeysRange ::         IDBObjectStore ->           Optional IDBKeyRange -> Optional Word -> IO IDBRequest@@ -366,7 +364,7 @@          (js_getAllKeysRange self (maybeToOptional range)             (maybeToOptional count)))  -foreign import javascript unsafe "$1[\"getAllKeys\"]($2, $3)"+foreign import javascript safe "$1[\"getAllKeys\"]($2, $3)"         js_getAllKeys ::         IDBObjectStore -> JSVal -> Optional Word -> IO IDBRequest @@ -389,7 +387,7 @@          (toJSVal key >>= \ key' -> js_getAllKeys self key'             (maybeToOptional count)))  -foreign import javascript unsafe "$1[\"createIndex\"]($2, $3, $4)"+foreign import javascript safe "$1[\"createIndex\"]($2, $3, $4)"         js_createIndex ::         IDBObjectStore ->           JSString ->@@ -420,7 +418,7 @@               js_createIndex self (toJSString name) (StringOrStrings keyPath')             (maybeToOptional options)))  -foreign import javascript unsafe "$1[\"index\"]($2)" js_index ::+foreign import javascript safe "$1[\"index\"]($2)" js_index ::         IDBObjectStore -> JSString -> IO IDBIndex  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.index Mozilla IDBObjectStore.index documentation> @@ -434,7 +432,7 @@        (MonadIO m, ToJSString name) => IDBObjectStore -> name -> m () index_ self name = liftIO (void (js_index self (toJSString name)))  -foreign import javascript unsafe "$1[\"deleteIndex\"]($2)"+foreign import javascript safe "$1[\"deleteIndex\"]($2)"         js_deleteIndex :: IDBObjectStore -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.deleteIndex Mozilla IDBObjectStore.deleteIndex documentation> @@ -443,8 +441,8 @@ deleteIndex self name   = liftIO (js_deleteIndex self (toJSString name))  -foreign import javascript unsafe "$1[\"count\"]($2)" js_countRange-        :: IDBObjectStore -> Optional IDBKeyRange -> IO IDBRequest+foreign import javascript safe "$1[\"count\"]($2)" js_countRange ::+        IDBObjectStore -> Optional IDBKeyRange -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.count Mozilla IDBObjectStore.count documentation>  countRange ::@@ -458,7 +456,7 @@ countRange_ self range   = liftIO (void (js_countRange self (maybeToOptional range)))  -foreign import javascript unsafe "$1[\"count\"]($2)" js_count ::+foreign import javascript safe "$1[\"count\"]($2)" js_count ::         IDBObjectStore -> JSVal -> IO IDBRequest  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.count Mozilla IDBObjectStore.count documentation> @@ -472,7 +470,7 @@ count_ self key   = liftIO (void (toJSVal key >>= \ key' -> js_count self key'))  -foreign import javascript unsafe "$1[\"name\"] = $2;" js_setName ::+foreign import javascript safe "$1[\"name\"] = $2;" js_setName ::         IDBObjectStore -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBObjectStore.name Mozilla IDBObjectStore.name documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBOpenDBRequest.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBOpenDBRequest.onblocked Mozilla IDBOpenDBRequest.onblocked documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBRequest.hs view
@@ -27,10 +27,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"result\"]" js_getResult ::+foreign import javascript safe "$1[\"result\"]" js_getResult ::         IDBRequest -> IO (Nullable IDBRequestResult)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBRequest.result Mozilla IDBRequest.result documentation> @@ -56,7 +56,7 @@   = liftIO       (fromJust . nullableToMaybe <$> (js_getResult (toIDBRequest self)))  -foreign import javascript unsafe "$1[\"error\"]" js_getError ::+foreign import javascript safe "$1[\"error\"]" js_getError ::         IDBRequest -> IO (Nullable DOMError)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBRequest.error Mozilla IDBRequest.error documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBTransaction.hs view
@@ -25,10 +25,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"objectStore\"]($2)"+foreign import javascript safe "$1[\"objectStore\"]($2)"         js_objectStore :: IDBTransaction -> JSString -> IO IDBObjectStore  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBTransaction.objectStore Mozilla IDBTransaction.objectStore documentation> @@ -44,7 +44,7 @@ objectStore_ self name   = liftIO (void (js_objectStore self (toJSString name)))  -foreign import javascript unsafe "$1[\"abort\"]()" js_abort ::+foreign import javascript safe "$1[\"abort\"]()" js_abort ::         IDBTransaction -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IDBTransaction.abort Mozilla IDBTransaction.abort documentation>
src/GHCJS/DOM/JSFFI/Generated/IDBVersionChangeEvent.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ImageData.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe+foreign import javascript safe         "new window[\"ImageData\"]($1, $2,\n$3)" js_newImageData ::         Uint8ClampedArray -> Word -> Optional Word -> IO ImageData @@ -40,9 +40,8 @@       (js_newImageData (toUint8ClampedArray data') sw          (maybeToOptional sh))  -foreign import javascript unsafe-        "new window[\"ImageData\"]($1, $2)" js_newImageData' ::-        Word -> Word -> IO ImageData+foreign import javascript safe "new window[\"ImageData\"]($1, $2)"+        js_newImageData' :: Word -> Word -> IO ImageData  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ImageData Mozilla ImageData documentation>  newImageData' :: (MonadIO m) => Word -> Word -> m ImageData
src/GHCJS/DOM/JSFFI/Generated/InputEvent.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/InspectorFrontendHost.hs view
@@ -43,7 +43,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"loaded\"]()" js_loaded ::
src/GHCJS/DOM/JSFFI/Generated/IntersectionObserver.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/IntersectionObserverCallback.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/IntersectionObserverCallback Mozilla IntersectionObserverCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/IntersectionObserverEntry.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/KeyboardEvent.hs view
@@ -34,7 +34,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/KeyframeEffect.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/Location.hs view
@@ -31,7 +31,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"assign\"]($2)" js_assign ::@@ -69,7 +69,7 @@ getHref :: (MonadIO m, FromJSString result) => Location -> m result getHref self = liftIO (fromJSString <$> (js_getHref self))  -foreign import javascript unsafe "$1[\"protocol\"] = $2;"+foreign import javascript safe "$1[\"protocol\"] = $2;"         js_setProtocol :: Location -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Location.protocol Mozilla Location.protocol documentation>
src/GHCJS/DOM/JSFFI/Generated/MediaController.hs view
@@ -32,7 +32,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -155,8 +155,8 @@ getPlaybackRate :: (MonadIO m) => MediaController -> m Double getPlaybackRate self = liftIO (js_getPlaybackRate self)  -foreign import javascript unsafe "$1[\"volume\"] = $2;"-        js_setVolume :: MediaController -> Double -> IO ()+foreign import javascript safe "$1[\"volume\"] = $2;" js_setVolume+        :: MediaController -> Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaController.volume Mozilla MediaController.volume documentation>  setVolume :: (MonadIO m) => MediaController -> Double -> m ()
src/GHCJS/DOM/JSFFI/Generated/MediaControlsHost.hs view
@@ -50,7 +50,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MediaDeviceInfo.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MediaDevices.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript interruptible
src/GHCJS/DOM/JSFFI/Generated/MediaElementAudioSourceNode.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"mediaElement\"]"
src/GHCJS/DOM/JSFFI/Generated/MediaEncryptedEvent.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MediaError.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern MEDIA_ERR_ABORTED = 1 pattern MEDIA_ERR_NETWORK = 2
src/GHCJS/DOM/JSFFI/Generated/MediaKeyMessageEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MediaKeySession.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript interruptible@@ -134,4 +134,4 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/WebKitMediaKeySession.onmessage Mozilla WebKitMediaKeySession.onmessage documentation>  message :: EventName MediaKeySession MessageEvent-message = unsafeEventName (toJSString "message")+message = unsafeEventNameAsync (toJSString "message")
src/GHCJS/DOM/JSFFI/Generated/MediaKeyStatusMap.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "($1[\"has\"]($2) ? 1 : 0)" js_has
src/GHCJS/DOM/JSFFI/Generated/MediaKeySystemAccess.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getConfiguration\"]()"
src/GHCJS/DOM/JSFFI/Generated/MediaKeys.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"createSession\"]($2)"+foreign import javascript safe "$1[\"createSession\"]($2)"         js_createSession ::         MediaKeys -> Optional MediaKeySessionType -> IO MediaKeySession
src/GHCJS/DOM/JSFFI/Generated/MediaList.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::@@ -57,7 +57,7 @@ itemUnchecked self index   = liftIO (fromJust . fromMaybeJSString <$> (js_item self index))  -foreign import javascript unsafe "$1[\"deleteMedium\"]($2)"+foreign import javascript safe "$1[\"deleteMedium\"]($2)"         js_deleteMedium :: MediaList -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaList.deleteMedium Mozilla MediaList.deleteMedium documentation> @@ -66,7 +66,7 @@ deleteMedium self oldMedium   = liftIO (js_deleteMedium self (toJSString oldMedium))  -foreign import javascript unsafe "$1[\"appendMedium\"]($2)"+foreign import javascript safe "$1[\"appendMedium\"]($2)"         js_appendMedium :: MediaList -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaList.appendMedium Mozilla MediaList.appendMedium documentation> @@ -75,7 +75,7 @@ appendMedium self newMedium   = liftIO (js_appendMedium self (toJSString newMedium))  -foreign import javascript unsafe "$1[\"mediaText\"] = $2;"+foreign import javascript safe "$1[\"mediaText\"] = $2;"         js_setMediaText :: MediaList -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaList.mediaText Mozilla MediaList.mediaText documentation>
src/GHCJS/DOM/JSFFI/Generated/MediaQueryList.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"addListener\"]($2)"
src/GHCJS/DOM/JSFFI/Generated/MediaQueryListListener.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaQueryListListener Mozilla MediaQueryListListener documentation>
src/GHCJS/DOM/JSFFI/Generated/MediaRemoteControls.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MediaSession.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"MediaSession\"]($1)"
src/GHCJS/DOM/JSFFI/Generated/MediaSource.hs view
@@ -32,7 +32,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"MediaSource\"]()"@@ -42,7 +42,7 @@ newMediaSource :: (MonadIO m) => m MediaSource newMediaSource = liftIO (js_newMediaSource)  -foreign import javascript unsafe "$1[\"addSourceBuffer\"]($2)"+foreign import javascript safe "$1[\"addSourceBuffer\"]($2)"         js_addSourceBuffer :: MediaSource -> JSString -> IO SourceBuffer  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaSource.addSourceBuffer Mozilla MediaSource.addSourceBuffer documentation> @@ -58,7 +58,7 @@ addSourceBuffer_ self type'   = liftIO (void (js_addSourceBuffer self (toJSString type')))  -foreign import javascript unsafe "$1[\"removeSourceBuffer\"]($2)"+foreign import javascript safe "$1[\"removeSourceBuffer\"]($2)"         js_removeSourceBuffer :: MediaSource -> SourceBuffer -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaSource.removeSourceBuffer Mozilla MediaSource.removeSourceBuffer documentation> @@ -67,7 +67,7 @@ removeSourceBuffer self buffer   = liftIO (js_removeSourceBuffer self buffer)  -foreign import javascript unsafe "$1[\"endOfStream\"]($2)"+foreign import javascript safe "$1[\"endOfStream\"]($2)"         js_endOfStream :: MediaSource -> Optional EndOfStreamError -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaSource.endOfStream Mozilla MediaSource.endOfStream documentation> @@ -77,22 +77,20 @@   = liftIO (js_endOfStream self (maybeToOptional error))   foreign import javascript unsafe-        "($1[\"isTypeSupported\"]($2) ? 1 : 0)" js_isTypeSupported ::-        MediaSource -> JSString -> IO Bool+        "(window[\"MediaSource\"][\"isTypeSupported\"]($1) ? 1 : 0)"+        js_isTypeSupported :: JSString -> IO Bool  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaSource.isTypeSupported Mozilla MediaSource.isTypeSupported documentation> -isTypeSupported ::-                (MonadIO m, ToJSString type') => MediaSource -> type' -> m Bool-isTypeSupported self type'-  = liftIO (js_isTypeSupported self (toJSString type'))+isTypeSupported :: (MonadIO m, ToJSString type') => type' -> m Bool+isTypeSupported type'+  = liftIO (js_isTypeSupported (toJSString type'))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaSource.isTypeSupported Mozilla MediaSource.isTypeSupported documentation> -isTypeSupported_ ::-                 (MonadIO m, ToJSString type') => MediaSource -> type' -> m ()-isTypeSupported_ self type'-  = liftIO (void (js_isTypeSupported self (toJSString type')))+isTypeSupported_ :: (MonadIO m, ToJSString type') => type' -> m ()+isTypeSupported_ type'+  = liftIO (void (js_isTypeSupported (toJSString type')))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"setLiveSeekableRange\"]($2,\n$3)" js_setLiveSeekableRange ::         MediaSource -> Double -> Double -> IO () @@ -102,7 +100,7 @@ setLiveSeekableRange self start end   = liftIO (js_setLiveSeekableRange self start end)  -foreign import javascript unsafe "$1[\"clearLiveSeekableRange\"]()"+foreign import javascript safe "$1[\"clearLiveSeekableRange\"]()"         js_clearLiveSeekableRange :: MediaSource -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaSource.clearLiveSeekableRange Mozilla MediaSource.clearLiveSeekableRange documentation> @@ -127,7 +125,7 @@ getActiveSourceBuffers self   = liftIO (js_getActiveSourceBuffers self)  -foreign import javascript unsafe "$1[\"duration\"] = $2;"+foreign import javascript safe "$1[\"duration\"] = $2;"         js_setDuration :: MediaSource -> Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MediaSource.duration Mozilla MediaSource.duration documentation>
src/GHCJS/DOM/JSFFI/Generated/MediaStream.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MediaStreamAudioDestinationNode.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"stream\"]" js_getStream ::
src/GHCJS/DOM/JSFFI/Generated/MediaStreamAudioSourceNode.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"mediaStream\"]"
src/GHCJS/DOM/JSFFI/Generated/MediaStreamEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MediaStreamTrack.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"clone\"]()" js_clone ::
src/GHCJS/DOM/JSFFI/Generated/MediaStreamTrackEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MessageChannel.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"MessageChannel\"]()"
src/GHCJS/DOM/JSFFI/Generated/MessageEvent.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MessagePort.hs view
@@ -23,10 +23,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"postMessage\"]($2, $3)"+foreign import javascript safe "$1[\"postMessage\"]($2, $3)"         js_postMessage :: MessagePort -> JSVal -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MessagePort.postMessage Mozilla MessagePort.postMessage documentation> @@ -56,4 +56,4 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MessagePort.onmessage Mozilla MessagePort.onmessage documentation>  message :: EventName MessagePort MessageEvent-message = unsafeEventName (toJSString "message")+message = unsafeEventNameAsync (toJSString "message")
src/GHCJS/DOM/JSFFI/Generated/MimeType.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"type\"]" js_getType ::
src/GHCJS/DOM/JSFFI/Generated/MimeTypeArray.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/MutationEvent.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/MutationObserver.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -38,8 +38,8 @@ newMutationObserver callback   = liftIO (js_newMutationObserver (toMutationCallback callback))  -foreign import javascript unsafe "$1[\"observe\"]($2, $3)"-        js_observe ::+foreign import javascript safe "$1[\"observe\"]($2, $3)" js_observe+        ::         MutationObserver -> Node -> Optional MutationObserverInit -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/MutationObserver.observe Mozilla MutationObserver.observe documentation>
src/GHCJS/DOM/JSFFI/Generated/MutationRecord.hs view
@@ -32,7 +32,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"type\"]" js_getType ::
src/GHCJS/DOM/JSFFI/Generated/NamedNodeMap.hs view
@@ -31,7 +31,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::@@ -142,7 +142,7 @@          (js_getNamedItemNS self (toOptionalJSString namespaceURI)             (toJSString localName)))  -foreign import javascript unsafe "$1[\"setNamedItem\"]($2)"+foreign import javascript safe "$1[\"setNamedItem\"]($2)"         js_setNamedItem :: NamedNodeMap -> Attr -> IO (Nullable Attr)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/NamedNodeMap.setNamedItem Mozilla NamedNodeMap.setNamedItem documentation> @@ -170,7 +170,7 @@   = liftIO       (fromJust . nullableToMaybe <$> (js_setNamedItem self attr))  -foreign import javascript unsafe "$1[\"setNamedItemNS\"]($2)"+foreign import javascript safe "$1[\"setNamedItemNS\"]($2)"         js_setNamedItemNS :: NamedNodeMap -> Attr -> IO (Nullable Attr)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/NamedNodeMap.setNamedItemNS Mozilla NamedNodeMap.setNamedItemNS documentation> @@ -199,7 +199,7 @@   = liftIO       (fromJust . nullableToMaybe <$> (js_setNamedItemNS self attr))  -foreign import javascript unsafe "$1[\"removeNamedItem\"]($2)"+foreign import javascript safe "$1[\"removeNamedItem\"]($2)"         js_removeNamedItem :: NamedNodeMap -> JSString -> IO Attr  -- | <https://developer.mozilla.org/en-US/docs/Web/API/NamedNodeMap.removeNamedItem Mozilla NamedNodeMap.removeNamedItem documentation> @@ -217,8 +217,8 @@   = liftIO       (void (js_removeNamedItem self (toJSString qualifiedName)))  -foreign import javascript unsafe-        "$1[\"removeNamedItemNS\"]($2, $3)" js_removeNamedItemNS ::+foreign import javascript safe "$1[\"removeNamedItemNS\"]($2, $3)"+        js_removeNamedItemNS ::         NamedNodeMap -> Optional JSString -> JSString -> IO Attr  -- | <https://developer.mozilla.org/en-US/docs/Web/API/NamedNodeMap.removeNamedItemNS Mozilla NamedNodeMap.removeNamedItemNS documentation>
src/GHCJS/DOM/JSFFI/Generated/Navigator.hs view
@@ -37,7 +37,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript interruptible@@ -101,7 +101,7 @@   = liftIO       (js_getUserMedia self constraints successCallback errorCallback)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"registerProtocolHandler\"]($2,\n$3, $4)"         js_registerProtocolHandler ::         Navigator -> JSString -> JSString -> JSString -> IO ()@@ -116,7 +116,7 @@          (toJSString url)          (toJSString title))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"isProtocolHandlerRegistered\"]($2,\n$3)"         js_isProtocolHandlerRegistered ::         Navigator -> JSString -> JSString -> IO JSString@@ -142,7 +142,7 @@          (js_isProtocolHandlerRegistered self (toJSString scheme)             (toJSString url)))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"unregisterProtocolHandler\"]($2,\n$3)"         js_unregisterProtocolHandler ::         Navigator -> JSString -> JSString -> IO ()
src/GHCJS/DOM/JSFFI/Generated/NavigatorConcurrentHardware.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"hardwareConcurrency\"]"
src/GHCJS/DOM/JSFFI/Generated/NavigatorID.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"appCodeName\"]"
src/GHCJS/DOM/JSFFI/Generated/NavigatorLanguage.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"language\"]" js_getLanguage
src/GHCJS/DOM/JSFFI/Generated/NavigatorOnLine.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "($1[\"onLine\"] ? 1 : 0)"
src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaError.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"constraintName\"]"
src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaErrorCallback.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/NavigatorUserMediaErrorCallback Mozilla NavigatorUserMediaErrorCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/NavigatorUserMediaSuccessCallback.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/NavigatorUserMediaSuccessCallback Mozilla NavigatorUserMediaSuccessCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/Node.hs view
@@ -63,7 +63,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getRootNode\"]($2)"@@ -104,8 +104,8 @@ normalize :: (MonadIO m, IsNode self) => self -> m () normalize self = liftIO (js_normalize (toNode self))  -foreign import javascript unsafe "$1[\"cloneNode\"]($2)"-        js_cloneNode :: Node -> Bool -> IO Node+foreign import javascript safe "$1[\"cloneNode\"]($2)" js_cloneNode+        :: Node -> Bool -> IO Node  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Node.cloneNode Mozilla Node.cloneNode documentation>  cloneNode :: (MonadIO m, IsNode self) => self -> Bool -> m Node@@ -306,7 +306,7 @@          (js_isDefaultNamespace (toNode self)             (toOptionalJSString namespaceURI)))  -foreign import javascript unsafe "$1[\"insertBefore\"]($2, $3)"+foreign import javascript safe "$1[\"insertBefore\"]($2, $3)"         js_insertBefore :: Node -> Node -> Optional Node -> IO Node  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Node.insertBefore Mozilla Node.insertBefore documentation> @@ -328,7 +328,7 @@          (js_insertBefore (toNode self) (toNode node)             (maybeToOptional (fmap toNode child))))  -foreign import javascript unsafe "$1[\"appendChild\"]($2)"+foreign import javascript safe "$1[\"appendChild\"]($2)"         js_appendChild :: Node -> Node -> IO Node  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Node.appendChild Mozilla Node.appendChild documentation> @@ -343,7 +343,7 @@ appendChild_ self node   = liftIO (void (js_appendChild (toNode self) (toNode node)))  -foreign import javascript unsafe "$1[\"replaceChild\"]($2, $3)"+foreign import javascript safe "$1[\"replaceChild\"]($2, $3)"         js_replaceChild :: Node -> Node -> Node -> IO Node  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Node.replaceChild Mozilla Node.replaceChild documentation> @@ -362,7 +362,7 @@   = liftIO       (void (js_replaceChild (toNode self) (toNode node) (toNode child)))  -foreign import javascript unsafe "$1[\"removeChild\"]($2)"+foreign import javascript safe "$1[\"removeChild\"]($2)"         js_removeChild :: Node -> Node -> IO Node  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Node.removeChild Mozilla Node.removeChild documentation> @@ -602,7 +602,7 @@   = liftIO       (fromJust . nullableToMaybe <$> (js_getNextSibling (toNode self)))  -foreign import javascript unsafe "$1[\"nodeValue\"] = $2;"+foreign import javascript safe "$1[\"nodeValue\"] = $2;"         js_setNodeValue :: Node -> Optional JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Node.nodeValue Mozilla Node.nodeValue documentation> @@ -638,7 +638,7 @@   = liftIO       (fromJust . fromMaybeJSString <$> (js_getNodeValue (toNode self)))  -foreign import javascript unsafe "$1[\"textContent\"] = $2;"+foreign import javascript safe "$1[\"textContent\"] = $2;"         js_setTextContent :: Node -> Optional JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Node.textContent Mozilla Node.textContent documentation>
src/GHCJS/DOM/JSFFI/Generated/NodeFilter.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/NodeFilter Mozilla NodeFilter documentation>
src/GHCJS/DOM/JSFFI/Generated/NodeIterator.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"nextNode\"]()" js_nextNode
src/GHCJS/DOM/JSFFI/Generated/NodeList.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/NonDocumentTypeChildNode.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"previousElementSibling\"]"
src/GHCJS/DOM/JSFFI/Generated/NonElementParentNode.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getElementById\"]($2)"
src/GHCJS/DOM/JSFFI/Generated/Notification.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -55,18 +55,17 @@ close :: (MonadIO m) => Notification -> m () close self = liftIO (js_close self)  -foreign import javascript unsafe "$1[\"requestPermission\"]($2)"+foreign import javascript unsafe+        "window[\"Notification\"][\"requestPermission\"]($1)"         js_requestPermission ::-        Notification ->-          Optional (NotificationPermissionCallback callback) -> IO ()+        Optional (NotificationPermissionCallback callback) -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Notification.requestPermission Mozilla Notification.requestPermission documentation>  requestPermission ::                   (MonadIO m, ToJSString callback) =>-                    Notification ->-                      Maybe (NotificationPermissionCallback callback) -> m ()-requestPermission self callback-  = liftIO (js_requestPermission self (maybeToOptional callback))+                    Maybe (NotificationPermissionCallback callback) -> m ()+requestPermission callback+  = liftIO (js_requestPermission (maybeToOptional callback))   foreign import javascript unsafe "$1[\"permission\"]"         js_getPermission :: Notification -> IO JSString@@ -83,11 +82,11 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Notification.onerror Mozilla Notification.onerror documentation>  error :: EventName Notification UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Notification.onclose Mozilla Notification.onclose documentation>  cLoseEvent :: EventName Notification CloseEvent-cLoseEvent = unsafeEventName (toJSString "close")+cLoseEvent = unsafeEventNameAsync (toJSString "close")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Notification.ondisplay Mozilla Notification.ondisplay documentation>  display :: EventName Notification ondisplay
src/GHCJS/DOM/JSFFI/Generated/NotificationPermissionCallback.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/NotificationPermissionCallback Mozilla NotificationPermissionCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/OESStandardDerivatives.hs view
@@ -23,6 +23,6 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern FRAGMENT_SHADER_DERIVATIVE_HINT_OES = 35723
src/GHCJS/DOM/JSFFI/Generated/OESTextureHalfFloat.hs view
@@ -23,6 +23,6 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern HALF_FLOAT_OES = 36193
src/GHCJS/DOM/JSFFI/Generated/OESVertexArrayObject.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"createVertexArrayOES\"]()"
src/GHCJS/DOM/JSFFI/Generated/OfflineAudioCompletionEvent.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"renderedBuffer\"]"
src/GHCJS/DOM/JSFFI/Generated/OfflineAudioContext.hs view
@@ -23,10 +23,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe+foreign import javascript safe         "new window[\"OfflineAudioContext\"]($1,\n$2, $3)"         js_newOfflineAudioContext ::         Word -> Word -> Float -> IO OfflineAudioContext
src/GHCJS/DOM/JSFFI/Generated/OscillatorNode.hs view
@@ -28,17 +28,17 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"start\"]($2)" js_start ::+foreign import javascript safe "$1[\"start\"]($2)" js_start ::         OscillatorNode -> Optional Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/OscillatorNode.start Mozilla OscillatorNode.start documentation>  start :: (MonadIO m) => OscillatorNode -> Maybe Double -> m () start self when = liftIO (js_start self (maybeToOptional when))  -foreign import javascript unsafe "$1[\"stop\"]($2)" js_stop ::+foreign import javascript safe "$1[\"stop\"]($2)" js_stop ::         OscillatorNode -> Optional Double -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/OscillatorNode.stop Mozilla OscillatorNode.stop documentation> @@ -59,7 +59,7 @@ pattern PLAYING_STATE = 2 pattern FINISHED_STATE = 3  -foreign import javascript unsafe "$1[\"type\"] = $2;" js_setType ::+foreign import javascript safe "$1[\"type\"] = $2;" js_setType ::         OscillatorNode -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/OscillatorNode.type Mozilla OscillatorNode.type documentation>
src/GHCJS/DOM/JSFFI/Generated/OverconstrainedError.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/OverconstrainedErrorEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/OverflowEvent.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/PageTransitionEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/PannerNode.hs view
@@ -34,7 +34,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setPosition\"]($2, $3, $4)"
src/GHCJS/DOM/JSFFI/Generated/ParentNode.hs view
@@ -31,11 +31,11 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"prepend\"]($2)" js_prepend-        :: ParentNode -> JSVal -> IO ()+foreign import javascript safe "$1[\"prepend\"]($2)" js_prepend ::+        ParentNode -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ParentNode.prepend Mozilla ParentNode.prepend documentation>  prepend ::@@ -46,7 +46,7 @@       (toJSVal nodes >>=          \ nodes' -> js_prepend (toParentNode self) nodes')  -foreign import javascript unsafe "$1[\"append\"]($2)" js_append ::+foreign import javascript safe "$1[\"append\"]($2)" js_append ::         ParentNode -> JSVal -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ParentNode.append Mozilla ParentNode.append documentation> @@ -58,7 +58,7 @@       (toJSVal nodes >>=          \ nodes' -> js_append (toParentNode self) nodes')  -foreign import javascript unsafe "$1[\"querySelector\"]($2)"+foreign import javascript safe "$1[\"querySelector\"]($2)"         js_querySelector :: ParentNode -> JSString -> IO (Nullable Element)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ParentNode.querySelector Mozilla ParentNode.querySelector documentation> @@ -99,7 +99,7 @@       (fromJust . nullableToMaybe <$>          (js_querySelector (toParentNode self) (toJSString selectors)))  -foreign import javascript unsafe "$1[\"querySelectorAll\"]($2)"+foreign import javascript safe "$1[\"querySelectorAll\"]($2)"         js_querySelectorAll :: ParentNode -> JSString -> IO NodeList  -- | <https://developer.mozilla.org/en-US/docs/Web/API/ParentNode.querySelectorAll Mozilla ParentNode.querySelectorAll documentation>
src/GHCJS/DOM/JSFFI/Generated/PasswordCredential.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/Path2D.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"Path2D\"]()"
src/GHCJS/DOM/JSFFI/Generated/Performance.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"now\"]()" js_now ::@@ -116,7 +116,7 @@ setResourceTimingBufferSize self maxSize   = liftIO (js_setResourceTimingBufferSize self maxSize)  -foreign import javascript unsafe "$1[\"mark\"]($2)" js_mark ::+foreign import javascript safe "$1[\"mark\"]($2)" js_mark ::         Performance -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Performance.mark Mozilla Performance.mark documentation> @@ -134,7 +134,7 @@ clearMarks self markName   = liftIO (js_clearMarks self (toOptionalJSString markName))  -foreign import javascript unsafe "$1[\"measure\"]($2, $3, $4)"+foreign import javascript safe "$1[\"measure\"]($2, $3, $4)"         js_measure ::         Performance ->           JSString -> Optional JSString -> Optional JSString -> IO ()
src/GHCJS/DOM/JSFFI/Generated/PerformanceEntry.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"name\"]" js_getName ::
src/GHCJS/DOM/JSFFI/Generated/PerformanceNavigation.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern TYPE_NAVIGATE = 0 pattern TYPE_RELOAD = 1
src/GHCJS/DOM/JSFFI/Generated/PerformanceObserver.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe@@ -37,8 +37,8 @@ newPerformanceObserver callback   = liftIO (js_newPerformanceObserver callback)  -foreign import javascript unsafe "$1[\"observe\"]($2)" js_observe-        :: PerformanceObserver -> PerformanceObserverInit -> IO ()+foreign import javascript safe "$1[\"observe\"]($2)" js_observe ::+        PerformanceObserver -> PerformanceObserverInit -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/PerformanceObserver.observe Mozilla PerformanceObserver.observe documentation>  observe ::
src/GHCJS/DOM/JSFFI/Generated/PerformanceObserverCallback.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/PerformanceObserverCallback Mozilla PerformanceObserverCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/PerformanceObserverEntryList.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getEntries\"]()"
src/GHCJS/DOM/JSFFI/Generated/PerformanceResourceTiming.hs view
@@ -32,7 +32,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"initiatorType\"]"
src/GHCJS/DOM/JSFFI/Generated/PerformanceTiming.hs view
@@ -37,7 +37,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"navigationStart\"]"
src/GHCJS/DOM/JSFFI/Generated/Plugin.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/PluginArray.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_item ::
src/GHCJS/DOM/JSFFI/Generated/PopStateEvent.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/PositionCallback.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/PositionCallback Mozilla PositionCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/PositionError.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern PERMISSION_DENIED = 1 pattern POSITION_UNAVAILABLE = 2
src/GHCJS/DOM/JSFFI/Generated/PositionErrorCallback.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/PositionErrorCallback Mozilla PositionErrorCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/ProcessingInstruction.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"target\"]" js_getTarget ::
src/GHCJS/DOM/JSFFI/Generated/ProgressEvent.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/PromiseRejectionEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/QuickTimePluginReplacement.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"postEvent\"]($2)"
src/GHCJS/DOM/JSFFI/Generated/RGBColor.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"red\"]" js_getRed ::
src/GHCJS/DOM/JSFFI/Generated/RTCDTMFSender.hs view
@@ -25,10 +25,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"insertDTMF\"]($2, $3, $4)"+foreign import javascript safe "$1[\"insertDTMF\"]($2, $3, $4)"         js_insertDTMF ::         RTCDTMFSender -> JSString -> Optional Int -> Optional Int -> IO ()
src/GHCJS/DOM/JSFFI/Generated/RTCDTMFToneChangeEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/RTCDataChannel.hs view
@@ -36,10 +36,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"send\"]($2)" js_send ::+foreign import javascript safe "$1[\"send\"]($2)" js_send ::         RTCDataChannel -> ArrayBuffer -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.send Mozilla RTCDataChannel.send documentation> @@ -47,7 +47,7 @@      (MonadIO m, IsArrayBuffer data') => RTCDataChannel -> data' -> m () send self data' = liftIO (js_send self (toArrayBuffer data'))  -foreign import javascript unsafe "$1[\"send\"]($2)" js_sendView ::+foreign import javascript safe "$1[\"send\"]($2)" js_sendView ::         RTCDataChannel -> ArrayBufferView -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.send Mozilla RTCDataChannel.send documentation> @@ -57,7 +57,7 @@ sendView self data'   = liftIO (js_sendView self (toArrayBufferView data'))  -foreign import javascript unsafe "$1[\"send\"]($2)" js_sendBlob ::+foreign import javascript safe "$1[\"send\"]($2)" js_sendBlob ::         RTCDataChannel -> Blob -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.send Mozilla RTCDataChannel.send documentation> @@ -65,8 +65,8 @@          (MonadIO m, IsBlob data') => RTCDataChannel -> data' -> m () sendBlob self data' = liftIO (js_sendBlob self (toBlob data'))  -foreign import javascript unsafe "$1[\"send\"]($2)" js_sendString-        :: RTCDataChannel -> JSString -> IO ()+foreign import javascript safe "$1[\"send\"]($2)" js_sendString ::+        RTCDataChannel -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.send Mozilla RTCDataChannel.send documentation>  sendString ::@@ -215,7 +215,7 @@ getBufferedAmountLowThreshold self   = liftIO (js_getBufferedAmountLowThreshold self)  -foreign import javascript unsafe "$1[\"binaryType\"] = $2;"+foreign import javascript safe "$1[\"binaryType\"] = $2;"         js_setBinaryType :: RTCDataChannel -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.binaryType Mozilla RTCDataChannel.binaryType documentation> @@ -235,19 +235,19 @@  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.onopen Mozilla RTCDataChannel.onopen documentation>  open :: EventName RTCDataChannel Event-open = unsafeEventName (toJSString "open")+open = unsafeEventNameAsync (toJSString "open")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.onerror Mozilla RTCDataChannel.onerror documentation>  error :: EventName RTCDataChannel UIEvent-error = unsafeEventName (toJSString "error")+error = unsafeEventNameAsync (toJSString "error")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.onclose Mozilla RTCDataChannel.onclose documentation>  closeEvent :: EventName RTCDataChannel CloseEvent-closeEvent = unsafeEventName (toJSString "close")+closeEvent = unsafeEventNameAsync (toJSString "close")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.onmessage Mozilla RTCDataChannel.onmessage documentation>  message :: EventName RTCDataChannel MessageEvent-message = unsafeEventName (toJSString "message")+message = unsafeEventNameAsync (toJSString "message")  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RTCDataChannel.onbufferedamountlow Mozilla RTCDataChannel.onbufferedamountlow documentation>  bufferedamountlow :: EventName RTCDataChannel onbufferedamountlow
src/GHCJS/DOM/JSFFI/Generated/RTCDataChannelEvent.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/RTCIceCandidate.hs view
@@ -26,10 +26,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe+foreign import javascript safe         "new window[\"RTCIceCandidate\"]($1)" js_newRTCIceCandidate ::         RTCIceCandidateInit -> IO RTCIceCandidate
src/GHCJS/DOM/JSFFI/Generated/RTCIceCandidateEvent.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"candidate\"]"
src/GHCJS/DOM/JSFFI/Generated/RTCIceTransport.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"state\"]" js_getState ::
src/GHCJS/DOM/JSFFI/Generated/RTCPeerConnection.hs view
@@ -56,7 +56,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript interruptible@@ -161,7 +161,7 @@ getConfiguration_ :: (MonadIO m) => RTCPeerConnection -> m () getConfiguration_ self = liftIO (void (js_getConfiguration self))  -foreign import javascript unsafe "$1[\"setConfiguration\"]($2)"+foreign import javascript safe "$1[\"setConfiguration\"]($2)"         js_setConfiguration ::         RTCPeerConnection -> RTCConfiguration -> IO () @@ -216,7 +216,7 @@ getTransceivers_ :: (MonadIO m) => RTCPeerConnection -> m () getTransceivers_ self = liftIO (void (js_getTransceivers self))  -foreign import javascript unsafe "$1[\"addTrack\"]($2, $3)"+foreign import javascript safe "$1[\"addTrack\"]($2, $3)"         js_addTrack ::         RTCPeerConnection -> MediaStreamTrack -> JSVal -> IO RTCRtpSender @@ -240,7 +240,7 @@             \ streams' ->               js_addTrack self (toMediaStreamTrack track) streams'))  -foreign import javascript unsafe "$1[\"removeTrack\"]($2)"+foreign import javascript safe "$1[\"removeTrack\"]($2)"         js_removeTrack :: RTCPeerConnection -> RTCRtpSender -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/webkitRTCPeerConnection.removeTrack Mozilla webkitRTCPeerConnection.removeTrack documentation> @@ -248,7 +248,7 @@             (MonadIO m) => RTCPeerConnection -> RTCRtpSender -> m () removeTrack self sender = liftIO (js_removeTrack self sender)  -foreign import javascript unsafe "$1[\"addTransceiver\"]($2, $3)"+foreign import javascript safe "$1[\"addTransceiver\"]($2, $3)"         js_addTransceiverTrack ::         RTCPeerConnection ->           MediaStreamTrackOrKind ->@@ -278,8 +278,8 @@               js_addTransceiverTrack self (MediaStreamTrackOrKind track')             (maybeToOptional init)))  -foreign import javascript unsafe-        "$1[\"createDataChannel\"]($2, $3)" js_createDataChannel ::+foreign import javascript safe "$1[\"createDataChannel\"]($2, $3)"+        js_createDataChannel ::         RTCPeerConnection ->           JSString -> Optional RTCDataChannelInit -> IO RTCDataChannel
src/GHCJS/DOM/JSFFI/Generated/RTCPeerConnectionIceEvent.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"candidate\"]"
src/GHCJS/DOM/JSFFI/Generated/RTCRtpReceiver.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getParameters\"]()"
src/GHCJS/DOM/JSFFI/Generated/RTCRtpSender.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getParameters\"]()"
src/GHCJS/DOM/JSFFI/Generated/RTCRtpTransceiver.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setDirection\"]($2)"
src/GHCJS/DOM/JSFFI/Generated/RTCSessionDescription.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/RTCTrackEvent.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/RadioNodeList.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[$2]" js_get ::
src/GHCJS/DOM/JSFFI/Generated/Range.hs view
@@ -48,7 +48,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"Range\"]()"@@ -58,7 +58,7 @@ newRange :: (MonadIO m) => m Range newRange = liftIO (js_newRange)  -foreign import javascript unsafe "$1[\"setStart\"]($2, $3)"+foreign import javascript safe "$1[\"setStart\"]($2, $3)"         js_setStart :: Range -> Node -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.setStart Mozilla Range.setStart documentation> @@ -67,7 +67,7 @@ setStart self node offset   = liftIO (js_setStart self (toNode node) offset)  -foreign import javascript unsafe "$1[\"setEnd\"]($2, $3)" js_setEnd+foreign import javascript safe "$1[\"setEnd\"]($2, $3)" js_setEnd         :: Range -> Node -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.setEnd Mozilla Range.setEnd documentation> @@ -75,7 +75,7 @@ setEnd self node offset   = liftIO (js_setEnd self (toNode node) offset)  -foreign import javascript unsafe "$1[\"setStartBefore\"]($2)"+foreign import javascript safe "$1[\"setStartBefore\"]($2)"         js_setStartBefore :: Range -> Node -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.setStartBefore Mozilla Range.setStartBefore documentation> @@ -83,7 +83,7 @@ setStartBefore self node   = liftIO (js_setStartBefore self (toNode node))  -foreign import javascript unsafe "$1[\"setStartAfter\"]($2)"+foreign import javascript safe "$1[\"setStartAfter\"]($2)"         js_setStartAfter :: Range -> Node -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.setStartAfter Mozilla Range.setStartAfter documentation> @@ -91,7 +91,7 @@ setStartAfter self node   = liftIO (js_setStartAfter self (toNode node))  -foreign import javascript unsafe "$1[\"setEndBefore\"]($2)"+foreign import javascript safe "$1[\"setEndBefore\"]($2)"         js_setEndBefore :: Range -> Node -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.setEndBefore Mozilla Range.setEndBefore documentation> @@ -99,7 +99,7 @@ setEndBefore self node   = liftIO (js_setEndBefore self (toNode node))  -foreign import javascript unsafe "$1[\"setEndAfter\"]($2)"+foreign import javascript safe "$1[\"setEndAfter\"]($2)"         js_setEndAfter :: Range -> Node -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.setEndAfter Mozilla Range.setEndAfter documentation> @@ -113,14 +113,14 @@ collapse :: (MonadIO m) => Range -> Bool -> m () collapse self toStart = liftIO (js_collapse self toStart)  -foreign import javascript unsafe "$1[\"selectNode\"]($2)"+foreign import javascript safe "$1[\"selectNode\"]($2)"         js_selectNode :: Range -> Node -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.selectNode Mozilla Range.selectNode documentation>  selectNode :: (MonadIO m, IsNode node) => Range -> node -> m () selectNode self node = liftIO (js_selectNode self (toNode node))  -foreign import javascript unsafe "$1[\"selectNodeContents\"]($2)"+foreign import javascript safe "$1[\"selectNodeContents\"]($2)"         js_selectNodeContents :: Range -> Node -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.selectNodeContents Mozilla Range.selectNodeContents documentation> @@ -129,7 +129,7 @@ selectNodeContents self node   = liftIO (js_selectNodeContents self (toNode node))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"compareBoundaryPoints\"]($2,\n$3)" js_compareBoundaryPoints         :: Range -> Word -> Range -> IO Int @@ -145,14 +145,14 @@ compareBoundaryPoints_ self how sourceRange   = liftIO (void (js_compareBoundaryPoints self how sourceRange))  -foreign import javascript unsafe "$1[\"deleteContents\"]()"+foreign import javascript safe "$1[\"deleteContents\"]()"         js_deleteContents :: Range -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.deleteContents Mozilla Range.deleteContents documentation>  deleteContents :: (MonadIO m) => Range -> m () deleteContents self = liftIO (js_deleteContents self)  -foreign import javascript unsafe "$1[\"extractContents\"]()"+foreign import javascript safe "$1[\"extractContents\"]()"         js_extractContents :: Range -> IO DocumentFragment  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.extractContents Mozilla Range.extractContents documentation> @@ -163,7 +163,7 @@ extractContents_ :: (MonadIO m) => Range -> m () extractContents_ self = liftIO (void (js_extractContents self))  -foreign import javascript unsafe "$1[\"cloneContents\"]()"+foreign import javascript safe "$1[\"cloneContents\"]()"         js_cloneContents :: Range -> IO DocumentFragment  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.cloneContents Mozilla Range.cloneContents documentation> @@ -174,14 +174,14 @@ cloneContents_ :: (MonadIO m) => Range -> m () cloneContents_ self = liftIO (void (js_cloneContents self))  -foreign import javascript unsafe "$1[\"insertNode\"]($2)"+foreign import javascript safe "$1[\"insertNode\"]($2)"         js_insertNode :: Range -> Node -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.insertNode Mozilla Range.insertNode documentation>  insertNode :: (MonadIO m, IsNode node) => Range -> node -> m () insertNode self node = liftIO (js_insertNode self (toNode node))  -foreign import javascript unsafe "$1[\"surroundContents\"]($2)"+foreign import javascript safe "$1[\"surroundContents\"]($2)"         js_surroundContents :: Range -> Node -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.surroundContents Mozilla Range.surroundContents documentation> @@ -208,7 +208,7 @@ detach :: (MonadIO m) => Range -> m () detach self = liftIO (js_detach self)  -foreign import javascript unsafe+foreign import javascript safe         "($1[\"isPointInRange\"]($2,\n$3) ? 1 : 0)" js_isPointInRange ::         Range -> Node -> Word -> IO Bool @@ -224,7 +224,7 @@ isPointInRange_ self node offset   = liftIO (void (js_isPointInRange self (toNode node) offset))  -foreign import javascript unsafe "$1[\"comparePoint\"]($2, $3)"+foreign import javascript safe "$1[\"comparePoint\"]($2, $3)"         js_comparePoint :: Range -> Node -> Word -> IO Int  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.comparePoint Mozilla Range.comparePoint documentation> @@ -239,7 +239,7 @@ comparePoint_ self node offset   = liftIO (void (js_comparePoint self (toNode node) offset))  -foreign import javascript unsafe+foreign import javascript safe         "($1[\"intersectsNode\"]($2) ? 1 : 0)" js_intersectsNode ::         Range -> Node -> IO Bool @@ -290,7 +290,7 @@ getBoundingClientRect_ self   = liftIO (void (js_getBoundingClientRect self))  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"createContextualFragment\"]($2)" js_createContextualFragment         :: Range -> JSString -> IO DocumentFragment @@ -308,7 +308,7 @@   = liftIO       (void (js_createContextualFragment self (toJSString fragment)))  -foreign import javascript unsafe "$1[\"expand\"]($2)" js_expand ::+foreign import javascript safe "$1[\"expand\"]($2)" js_expand ::         Range -> Optional JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.expand Mozilla Range.expand documentation> @@ -317,7 +317,7 @@ expand self unit   = liftIO (js_expand self (toOptionalJSString unit))  -foreign import javascript unsafe "$1[\"compareNode\"]($2)"+foreign import javascript safe "$1[\"compareNode\"]($2)"         js_compareNode :: Range -> Node -> IO Int  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Range.compareNode Mozilla Range.compareNode documentation>
src/GHCJS/DOM/JSFFI/Generated/ReadableByteStreamController.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ReadableStream.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ReadableStreamBYOBReader.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ReadableStreamBYOBRequest.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ReadableStreamDefaultController.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ReadableStreamDefaultReader.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/ReadableStreamSource.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript interruptible
src/GHCJS/DOM/JSFFI/Generated/Rect.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"top\"]" js_getTop ::
src/GHCJS/DOM/JSFFI/Generated/Request.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "new window[\"Request\"]($1, $2)"@@ -43,7 +43,7 @@       (toJSVal input >>= \ input' -> js_newRequest input'          (maybeToOptional init))  -foreign import javascript unsafe "$1[\"clone\"]()" js_clone ::+foreign import javascript safe "$1[\"clone\"]()" js_clone ::         Request -> IO Request  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Request.clone Mozilla Request.clone documentation>
src/GHCJS/DOM/JSFFI/Generated/RequestAnimationFrameCallback.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/RequestAnimationFrameCallback Mozilla RequestAnimationFrameCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/Response.hs view
@@ -30,38 +30,36 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"error\"]()" js_error ::-        Response -> IO Response+foreign import javascript unsafe+        "window[\"Response\"][\"error\"]()" js_error :: IO Response  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Response.error Mozilla Response.error documentation> -error :: (MonadIO m) => Response -> m Response-error self = liftIO (js_error self)+error :: (MonadIO m) => m Response+error = liftIO (js_error)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Response.error Mozilla Response.error documentation> -error_ :: (MonadIO m) => Response -> m ()-error_ self = liftIO (void (js_error self))+error_ :: (MonadIO m) => m ()+error_ = liftIO (void (js_error))  -foreign import javascript unsafe "$1[\"redirect\"]($2, $3)"-        js_redirect :: Response -> JSString -> Optional Word -> IO Response+foreign import javascript safe+        "window[\"Response\"][\"redirect\"]($1,\n$2)" js_redirect ::+        JSString -> Optional Word -> IO Response  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Response.redirect Mozilla Response.redirect documentation>  redirect ::-         (MonadIO m, ToJSString url) =>-           Response -> url -> Maybe Word -> m Response-redirect self url status-  = liftIO-      (js_redirect self (toJSString url) (maybeToOptional status))+         (MonadIO m, ToJSString url) => url -> Maybe Word -> m Response+redirect url status+  = liftIO (js_redirect (toJSString url) (maybeToOptional status))  -- | <https://developer.mozilla.org/en-US/docs/Web/API/Response.redirect Mozilla Response.redirect documentation>  redirect_ ::-          (MonadIO m, ToJSString url) =>-            Response -> url -> Maybe Word -> m ()-redirect_ self url status+          (MonadIO m, ToJSString url) => url -> Maybe Word -> m ()+redirect_ url status   = liftIO-      (void (js_redirect self (toJSString url) (maybeToOptional status)))+      (void (js_redirect (toJSString url) (maybeToOptional status)))   foreign import javascript interruptible         "$1[\"arrayBuffer\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);});"
src/GHCJS/DOM/JSFFI/Generated/SQLError.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern UNKNOWN_ERR = 0 pattern DATABASE_ERR = 1
src/GHCJS/DOM/JSFFI/Generated/SQLException.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern UNKNOWN_ERR = 0 pattern DATABASE_ERR = 1
src/GHCJS/DOM/JSFFI/Generated/SQLResultSet.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"rows\"]" js_getRows ::@@ -34,8 +34,8 @@ getRows :: (MonadIO m) => SQLResultSet -> m SQLResultSetRowList getRows self = liftIO (js_getRows self)  -foreign import javascript unsafe "$1[\"insertId\"]" js_getInsertId-        :: SQLResultSet -> IO Double+foreign import javascript safe "$1[\"insertId\"]" js_getInsertId ::+        SQLResultSet -> IO Double  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SQLResultSet.insertId Mozilla SQLResultSet.insertId documentation>  getInsertId :: (MonadIO m) => SQLResultSet -> m Int64
src/GHCJS/DOM/JSFFI/Generated/SQLResultSetRowList.hs view
@@ -23,10 +23,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"item\"]($2)" js_item ::+foreign import javascript safe "$1[\"item\"]($2)" js_item ::         SQLResultSetRowList -> Word -> IO (Record DOMString SQLValue)  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SQLResultSetRowList.item Mozilla SQLResultSetRowList.item documentation>
src/GHCJS/DOM/JSFFI/Generated/SQLStatementCallback.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SQLStatementCallback Mozilla SQLStatementCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/SQLStatementErrorCallback.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SQLStatementErrorCallback Mozilla SQLStatementErrorCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/SQLTransaction.hs view
@@ -23,11 +23,11 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe-        "$1[\"executeSql\"]($2, $3, $4, $5)" js_executeSql ::+foreign import javascript safe "$1[\"executeSql\"]($2, $3, $4, $5)"+        js_executeSql ::         SQLTransaction ->           JSString ->             JSVal ->
src/GHCJS/DOM/JSFFI/Generated/SQLTransactionCallback.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SQLTransactionCallback Mozilla SQLTransactionCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/SQLTransactionErrorCallback.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SQLTransactionErrorCallback Mozilla SQLTransactionErrorCallback documentation>
src/GHCJS/DOM/JSFFI/Generated/SVGAElement.hs view
@@ -21,7 +21,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"target\"]" js_getTarget ::
src/GHCJS/DOM/JSFFI/Generated/SVGAltGlyphElement.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"glyphRef\"] = $2;"+foreign import javascript safe "$1[\"glyphRef\"] = $2;"         js_setGlyphRef :: SVGAltGlyphElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAltGlyphElement.glyphRef Mozilla SVGAltGlyphElement.glyphRef documentation> @@ -44,8 +44,8 @@             (MonadIO m, FromJSString result) => SVGAltGlyphElement -> m result getGlyphRef self = liftIO (fromJSString <$> (js_getGlyphRef self))  -foreign import javascript unsafe "$1[\"format\"] = $2;"-        js_setFormat :: SVGAltGlyphElement -> JSString -> IO ()+foreign import javascript safe "$1[\"format\"] = $2;" js_setFormat+        :: SVGAltGlyphElement -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAltGlyphElement.format Mozilla SVGAltGlyphElement.format documentation>  setFormat ::
src/GHCJS/DOM/JSFFI/Generated/SVGAngle.hs view
@@ -31,10 +31,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"newValueSpecifiedUnits\"]($2,\n$3)" js_newValueSpecifiedUnits         :: SVGAngle -> Word -> Float -> IO () @@ -45,7 +45,7 @@   = liftIO       (js_newValueSpecifiedUnits self unitType valueInSpecifiedUnits)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"convertToSpecifiedUnits\"]($2)" js_convertToSpecifiedUnits ::         SVGAngle -> Word -> IO () @@ -66,8 +66,8 @@ getUnitType :: (MonadIO m) => SVGAngle -> m Word getUnitType self = liftIO (js_getUnitType self)  -foreign import javascript unsafe "$1[\"value\"] = $2;" js_setValue-        :: SVGAngle -> Float -> IO ()+foreign import javascript safe "$1[\"value\"] = $2;" js_setValue ::+        SVGAngle -> Float -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAngle.value Mozilla SVGAngle.value documentation>  setValue :: (MonadIO m) => SVGAngle -> Float -> m ()@@ -80,7 +80,7 @@ getValue :: (MonadIO m) => SVGAngle -> m Float getValue self = liftIO (js_getValue self)  -foreign import javascript unsafe+foreign import javascript safe         "$1[\"valueInSpecifiedUnits\"] = $2;" js_setValueInSpecifiedUnits         :: SVGAngle -> Float -> IO () @@ -98,7 +98,7 @@ getValueInSpecifiedUnits self   = liftIO (js_getValueInSpecifiedUnits self)  -foreign import javascript unsafe "$1[\"valueAsString\"] = $2;"+foreign import javascript safe "$1[\"valueAsString\"] = $2;"         js_setValueAsString :: SVGAngle -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAngle.valueAsString Mozilla SVGAngle.valueAsString documentation>
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedAngle.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"baseVal\"]" js_getBaseVal ::
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedBoolean.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"baseVal\"] = $2;"+foreign import javascript safe "$1[\"baseVal\"] = $2;"         js_setBaseVal :: SVGAnimatedBoolean -> Bool -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAnimatedBoolean.baseVal Mozilla SVGAnimatedBoolean.baseVal documentation>
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedEnumeration.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"baseVal\"] = $2;"+foreign import javascript safe "$1[\"baseVal\"] = $2;"         js_setBaseVal :: SVGAnimatedEnumeration -> Word -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAnimatedEnumeration.baseVal Mozilla SVGAnimatedEnumeration.baseVal documentation>
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedInteger.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"baseVal\"] = $2;"+foreign import javascript safe "$1[\"baseVal\"] = $2;"         js_setBaseVal :: SVGAnimatedInteger -> Int -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAnimatedInteger.baseVal Mozilla SVGAnimatedInteger.baseVal documentation>
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedLength.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"baseVal\"]" js_getBaseVal ::
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedLengthList.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"baseVal\"]" js_getBaseVal ::
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedNumber.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"baseVal\"] = $2;"+foreign import javascript safe "$1[\"baseVal\"] = $2;"         js_setBaseVal :: SVGAnimatedNumber -> Float -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAnimatedNumber.baseVal Mozilla SVGAnimatedNumber.baseVal documentation>
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedNumberList.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"baseVal\"]" js_getBaseVal ::
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedPreserveAspectRatio.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"baseVal\"]" js_getBaseVal ::
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedRect.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"baseVal\"]" js_getBaseVal ::
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedString.hs view
@@ -24,10 +24,10 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums  -foreign import javascript unsafe "$1[\"baseVal\"] = $2;"+foreign import javascript safe "$1[\"baseVal\"] = $2;"         js_setBaseVal :: SVGAnimatedString -> JSString -> IO ()  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGAnimatedString.baseVal Mozilla SVGAnimatedString.baseVal documentation>
src/GHCJS/DOM/JSFFI/Generated/SVGAnimatedTransformList.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"baseVal\"]" js_getBaseVal ::
src/GHCJS/DOM/JSFFI/Generated/SVGAnimationElement.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getStartTime\"]()"
src/GHCJS/DOM/JSFFI/Generated/SVGCircleElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"cx\"]" js_getCx ::
src/GHCJS/DOM/JSFFI/Generated/SVGClipPathElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"clipPathUnits\"]"
src/GHCJS/DOM/JSFFI/Generated/SVGComponentTransferFunctionElement.hs view
@@ -34,7 +34,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_FECOMPONENTTRANSFER_TYPE_UNKNOWN = 0 pattern SVG_FECOMPONENTTRANSFER_TYPE_IDENTITY = 1
src/GHCJS/DOM/JSFFI/Generated/SVGCursorElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"x\"]" js_getX ::
src/GHCJS/DOM/JSFFI/Generated/SVGElement.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/SVGEllipseElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"cx\"]" js_getCx ::
src/GHCJS/DOM/JSFFI/Generated/SVGException.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"toString\"]()" js_toString
src/GHCJS/DOM/JSFFI/Generated/SVGExternalResourcesRequired.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe
src/GHCJS/DOM/JSFFI/Generated/SVGFEBlendElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_FEBLEND_MODE_UNKNOWN = 0 pattern SVG_FEBLEND_MODE_NORMAL = 1
src/GHCJS/DOM/JSFFI/Generated/SVGFEColorMatrixElement.hs view
@@ -28,7 +28,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_FECOLORMATRIX_TYPE_UNKNOWN = 0 pattern SVG_FECOLORMATRIX_TYPE_MATRIX = 1
src/GHCJS/DOM/JSFFI/Generated/SVGFEComponentTransferElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"in1\"]" js_getIn1 ::
src/GHCJS/DOM/JSFFI/Generated/SVGFECompositeElement.hs view
@@ -31,7 +31,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_FECOMPOSITE_OPERATOR_UNKNOWN = 0 pattern SVG_FECOMPOSITE_OPERATOR_OVER = 1
src/GHCJS/DOM/JSFFI/Generated/SVGFEConvolveMatrixElement.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_EDGEMODE_UNKNOWN = 0 pattern SVG_EDGEMODE_DUPLICATE = 1
src/GHCJS/DOM/JSFFI/Generated/SVGFEDiffuseLightingElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"in1\"]" js_getIn1 ::
src/GHCJS/DOM/JSFFI/Generated/SVGFEDisplacementMapElement.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_CHANNEL_UNKNOWN = 0 pattern SVG_CHANNEL_R = 1
src/GHCJS/DOM/JSFFI/Generated/SVGFEDistantLightElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"azimuth\"]" js_getAzimuth ::
src/GHCJS/DOM/JSFFI/Generated/SVGFEDropShadowElement.hs view
@@ -25,7 +25,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setStdDeviation\"]($2, $3)"
src/GHCJS/DOM/JSFFI/Generated/SVGFEGaussianBlurElement.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setStdDeviation\"]($2, $3)"
src/GHCJS/DOM/JSFFI/Generated/SVGFEImageElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"preserveAspectRatio\"]"
src/GHCJS/DOM/JSFFI/Generated/SVGFEMergeNodeElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"in1\"]" js_getIn1 ::
src/GHCJS/DOM/JSFFI/Generated/SVGFEMorphologyElement.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setRadius\"]($2, $3)"
src/GHCJS/DOM/JSFFI/Generated/SVGFEOffsetElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"in1\"]" js_getIn1 ::
src/GHCJS/DOM/JSFFI/Generated/SVGFEPointLightElement.hs view
@@ -23,7 +23,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"x\"]" js_getX ::
src/GHCJS/DOM/JSFFI/Generated/SVGFESpecularLightingElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"in1\"]" js_getIn1 ::
src/GHCJS/DOM/JSFFI/Generated/SVGFESpotLightElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"x\"]" js_getX ::
src/GHCJS/DOM/JSFFI/Generated/SVGFETileElement.hs view
@@ -22,7 +22,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"in1\"]" js_getIn1 ::
src/GHCJS/DOM/JSFFI/Generated/SVGFETurbulenceElement.hs view
@@ -30,7 +30,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_TURBULENCE_TYPE_UNKNOWN = 0 pattern SVG_TURBULENCE_TYPE_FRACTALNOISE = 1
src/GHCJS/DOM/JSFFI/Generated/SVGFilterElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"setFilterRes\"]($2, $3)"
src/GHCJS/DOM/JSFFI/Generated/SVGFilterPrimitiveStandardAttributes.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"x\"]" js_getX ::
src/GHCJS/DOM/JSFFI/Generated/SVGFitToViewBox.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"viewBox\"]" js_getViewBox ::
src/GHCJS/DOM/JSFFI/Generated/SVGForeignObjectElement.hs view
@@ -24,7 +24,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"x\"]" js_getX ::
src/GHCJS/DOM/JSFFI/Generated/SVGGlyphRefElement.hs view
@@ -26,7 +26,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"glyphRef\"] = $2;"
src/GHCJS/DOM/JSFFI/Generated/SVGGradientElement.hs view
@@ -27,7 +27,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums pattern SVG_SPREADMETHOD_UNKNOWN = 0 pattern SVG_SPREADMETHOD_PAD = 1
src/GHCJS/DOM/JSFFI/Generated/SVGGraphicsElement.hs view
@@ -29,7 +29,7 @@ import Data.Traversable (mapM) import GHCJS.DOM.Types import Control.Applicative ((<$>))-import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName)+import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync) import GHCJS.DOM.JSFFI.Generated.Enums   foreign import javascript unsafe "$1[\"getBBox\"]()" js_getBBox ::@@ -73,8 +73,8 @@ getScreenCTM_ self   = liftIO (void (js_getScreenCTM (toSVGGraphicsElement self)))  -foreign import javascript unsafe-        "$1[\"getTransformToElement\"]($2)" js_getTransformToElement ::+foreign import javascript safe "$1[\"getTransformToElement\"]($2)"+        js_getTransformToElement ::         SVGGraphicsElement -> Optional SVGElement -> IO SVGMatrix  -- | <https://developer.mozilla.org/en-US/docs/Web/API/SVGGraphicsElement.getTransformToElement Mozilla SVGGraphicsElement.getTransformToElement documentation>
src/GHCJS/DOM/JSFFI/Generated/SVGImageElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGLength.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGLengthList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGLineElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGLinearGradientElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGMarkerElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGMaskElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGMatrix.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGNumber.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGNumberList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSeg.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegArcAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegArcRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicSmoothAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoCubicSmoothRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticSmoothAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegCurvetoQuadraticSmoothRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoHorizontalAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoHorizontalRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoVerticalAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegLinetoVerticalRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegMovetoAbs.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPathSegMovetoRel.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPatternElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPoint.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPointList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPolygonElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPolylineElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGPreserveAspectRatio.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGRadialGradientElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGRect.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGRectElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGRenderingIntent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGSVGElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGScriptElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGStopElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGStringList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGStyleElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGTests.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGTextContentElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGTextPathElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGTextPositioningElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGTransform.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGTransformList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGURIReference.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGUnitTypes.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGUseElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGViewElement.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGViewSpec.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGZoomAndPan.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SVGZoomEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/Screen.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/ScriptProcessorNode.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SecurityPolicyViolationEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/Selection.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/ShadowRoot.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SiteBoundCredential.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/Slotable.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SourceBuffer.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SourceBufferList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesis.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisUtterance.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SpeechSynthesisVoice.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StaticRange.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/Storage.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StorageErrorCallback.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StorageEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StorageInfo.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StorageQuota.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StorageQuotaCallback.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StorageUsageCallback.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StringCallback.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StyleMedia.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StyleSheet.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/StyleSheetList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/SubtleCrypto.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/Text.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TextDecoder.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TextEncoder.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TextEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TextMetrics.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TextTrack.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TextTrackCue.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TextTrackCueList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TextTrackList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TimeRanges.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/Touch.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TouchEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TouchList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TrackEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TransitionEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/TreeWalker.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/URL.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/URLSearchParams.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/UserMessageHandler.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/VTTCue.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/VTTRegion.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/VTTRegionList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/ValidityState.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/VideoPlaybackQuality.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/VideoTrack.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/VideoTrackList.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/VoidCallback.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WaveShaperNode.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGL2RenderingContext.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLActiveInfo.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTextureATC.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTexturePVRTC.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLCompressedTextureS3TC.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLContextEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLDebugRendererInfo.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLDebugShaders.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLDepthTexture.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLDrawBuffers.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLLoseContext.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLRenderingContextBase.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGLShaderPrecisionFormat.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUBuffer.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUCommandBuffer.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUCommandQueue.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUComputeCommandEncoder.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUDepthStencilDescriptor.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUDepthStencilState.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUDrawable.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUFunction.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPULibrary.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderCommandEncoder.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderPassAttachmentDescriptor.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderPassColorAttachmentDescriptor.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderPassDepthAttachmentDescriptor.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderPassDescriptor.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderPipelineColorAttachmentDescriptor.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderPipelineDescriptor.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderPipelineState.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPURenderingContext.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUTexture.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebGPUTextureDescriptor.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitAnimationEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitCSSMatrix.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitCSSRegionRule.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitCSSViewportRule.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitMediaKeyError.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitMediaKeyMessageEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitMediaKeyNeededEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitMediaKeySession.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitMediaKeys.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitNamedFlow.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitNamespace.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitPlaybackTargetAvailabilityEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitPoint.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitSubtleCrypto.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebKitTransitionEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WebSocket.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WheelEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/Window.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WindowEventHandlers.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WindowOrWorkerGlobalScope.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/Worker.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WorkerGlobalScope.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WorkerLocation.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WorkerNavigator.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/WritableStream.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequest.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequestEventTarget.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XMLHttpRequestProgressEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XMLSerializer.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XPathEvaluator.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XPathException.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XPathExpression.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XPathNSResolver.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XPathResult.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/Generated/XSLTProcessor.hs view

file too large to diff

+ src/GHCJS/DOM/JSFFI/SpeechGrammar.hs view

file too large to diff

+ src/GHCJS/DOM/JSFFI/SpeechRecognition.hs view

file too large to diff

+ src/GHCJS/DOM/JSFFI/SpeechRecognitionError.hs view

file too large to diff

+ src/GHCJS/DOM/JSFFI/SpeechRecognitionEvent.hs view

file too large to diff

src/GHCJS/DOM/JSFFI/XMLHttpRequest.hs view

file too large to diff

src/GHCJS/DOM/Types.hs view

file too large to diff