ghcjs-dom-javascript-0.10.0.0: src/GHCJS/DOM/JSFFI/Generated/Body.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from fetch (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.Body
       (js_arrayBuffer, js_blob, js_bytes, js_formData, js_json, js_text, js_getBody, js_getBodyUsed, arrayBuffer, arrayBuffer_, blob, blob_, bytes, bytes_, formData, formData_, json, json_, text, text_, getBody, getBodyUnsafe, getBodyUnchecked, getBodyUsed, Body(..), gTypeBody, IsBody, toBody)
       where
import Prelude ((.), (==), (>>=), (<$>), (++), Bool(..), Maybe(..), IO, Int, Word, Double, Float)
import qualified Prelude as P
import Control.Monad (void)
import GHCJS.Types (JSVal, JSString)
import GHCJS.Foreign (jsUndefined, jsNull)
import GHCJS.DOM.Types
import qualified GHCJS.DOM.Types as Types
import GHCJS.DOM.EventTargetClosures (EventName, unsafeEventName, unsafeEventNameAsync)
import GHCJS.DOM.JSFFI.Generated.Enums

foreign import javascript interruptible "(($1, $c) => { return $1[\"arrayBuffer\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
        js_arrayBuffer :: Body -> IO (JSVal, ArrayBuffer)
-- | <https://developer.mozilla.org/docs/Web/API/Request/arrayBuffer MDN Body.arrayBuffer documentation>
arrayBuffer :: (MonadDOM m, IsBody self) => self -> m ArrayBuffer
arrayBuffer self = liftDOM (((js_arrayBuffer ((Types.toBody self))) >>= checkPromiseResult))

-- | <https://developer.mozilla.org/docs/Web/API/Request/arrayBuffer MDN Body.arrayBuffer documentation>
arrayBuffer_ :: (MonadDOM m, IsBody self) => self -> m ()
arrayBuffer_ self = liftDOM (void (((js_arrayBuffer ((Types.toBody self))) >>= checkPromiseResult)))

foreign import javascript interruptible "(($1, $c) => { return $1[\"blob\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
        js_blob :: Body -> IO (JSVal, Blob)
-- | <https://developer.mozilla.org/docs/Web/API/Request/blob MDN Body.blob documentation>
blob :: (MonadDOM m, IsBody self) => self -> m Blob
blob self = liftDOM (((js_blob ((Types.toBody self))) >>= checkPromiseResult))

-- | <https://developer.mozilla.org/docs/Web/API/Request/blob MDN Body.blob documentation>
blob_ :: (MonadDOM m, IsBody self) => self -> m ()
blob_ self = liftDOM (void (((js_blob ((Types.toBody self))) >>= checkPromiseResult)))

foreign import javascript interruptible "(($1, $c) => { return $1[\"bytes\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
        js_bytes :: Body -> IO (JSVal, Uint8Array)
-- | <https://developer.mozilla.org/docs/Web/API/Request/bytes MDN Body.bytes documentation>
bytes :: (MonadDOM m, IsBody self) => self -> m Uint8Array
bytes self = liftDOM (((js_bytes ((Types.toBody self))) >>= checkPromiseResult))

-- | <https://developer.mozilla.org/docs/Web/API/Request/bytes MDN Body.bytes documentation>
bytes_ :: (MonadDOM m, IsBody self) => self -> m ()
bytes_ self = liftDOM (void (((js_bytes ((Types.toBody self))) >>= checkPromiseResult)))

foreign import javascript interruptible "(($1, $c) => { return $1[\"formData\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
        js_formData :: Body -> IO (JSVal, FormData)
-- | <https://developer.mozilla.org/docs/Web/API/Request/formData MDN Body.formData documentation>
formData :: (MonadDOM m, IsBody self) => self -> m FormData
formData self = liftDOM (((js_formData ((Types.toBody self))) >>= checkPromiseResult))

-- | <https://developer.mozilla.org/docs/Web/API/Request/formData MDN Body.formData documentation>
formData_ :: (MonadDOM m, IsBody self) => self -> m ()
formData_ self = liftDOM (void (((js_formData ((Types.toBody self))) >>= checkPromiseResult)))

foreign import javascript interruptible "(($1, $c) => { return $1[\"json\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
        js_json :: Body -> IO (JSVal, JSVal)
-- | <https://developer.mozilla.org/docs/Web/API/Request/json MDN Body.json documentation>
json :: (MonadDOM m, IsBody self) => self -> m JSVal
json self = liftDOM (((js_json ((Types.toBody self))) >>= checkPromiseResult))

-- | <https://developer.mozilla.org/docs/Web/API/Request/json MDN Body.json documentation>
json_ :: (MonadDOM m, IsBody self) => self -> m ()
json_ self = liftDOM (void (((js_json ((Types.toBody self))) >>= checkPromiseResult)))

foreign import javascript interruptible "(($1, $c) => { return $1[\"text\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
        js_text :: Body -> IO (JSVal, JSString)
-- | <https://developer.mozilla.org/docs/Web/API/Request/text MDN Body.text documentation>
text :: (MonadDOM m, IsBody self, FromJSString result) => self -> m result
text self = liftDOM ((fromJSString <$> ((js_text ((Types.toBody self))) >>= checkPromiseResult)))

-- | <https://developer.mozilla.org/docs/Web/API/Request/text MDN Body.text documentation>
text_ :: (MonadDOM m, IsBody self) => self -> m ()
text_ self = liftDOM (void (((js_text ((Types.toBody self))) >>= checkPromiseResult)))

foreign import javascript unsafe "(($1) => { return $1[\"body\"]; })"
        js_getBody :: Body -> IO JSVal
-- | <https://developer.mozilla.org/docs/Web/API/Request/body MDN Body.body documentation>
getBody :: (MonadDOM m, IsBody self) => self -> m (Maybe ReadableStream)
getBody self = liftDOM (((js_getBody ((Types.toBody self))) >>= fromJSValUnchecked))

-- | <https://developer.mozilla.org/docs/Web/API/Request/body MDN Body.body documentation>
getBodyUnsafe :: (MonadDOM m, IsBody self, HasCallStack) => self -> m ReadableStream
getBodyUnsafe self = liftDOM ((((js_getBody ((Types.toBody self))) >>= fromJSValUnchecked) >>= P.maybe (P.error "Nothing to return") P.return))

-- | <https://developer.mozilla.org/docs/Web/API/Request/body MDN Body.body documentation>
getBodyUnchecked :: (MonadDOM m, IsBody self) => self -> m ReadableStream
getBodyUnchecked self = liftDOM ((pFromJSVal <$> (js_getBody ((Types.toBody self)))))

foreign import javascript unsafe "(($1) => { return $1[\"bodyUsed\"]; })"
        js_getBodyUsed :: Body -> IO Bool
-- | <https://developer.mozilla.org/docs/Web/API/Request/bodyUsed MDN Body.bodyUsed documentation>
getBodyUsed :: (MonadDOM m, IsBody self) => self -> m Bool
getBodyUsed self = liftDOM ((js_getBodyUsed ((Types.toBody self))))