FileSystemFileHandle.hs

{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE ForeignFunctionInterface, JavaScriptFFI #-}
{-# LANGUAGE ImplicitParams, ConstraintKinds, KindSignatures #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-- | Generated by dom-gen from fs (webref). Do not edit.
module GHCJS.DOM.JSFFI.Generated.FileSystemFileHandle
       (js_createSyncAccessHandle, js_createWritable, js_getFile, createSyncAccessHandle, createSyncAccessHandle_, createWritable, createWritable_, getFile, getFile_, FileSystemFileHandle(..), gTypeFileSystemFileHandle)
       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[\"createSyncAccessHandle\"]().then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
        js_createSyncAccessHandle :: FileSystemFileHandle -> IO (JSVal, FileSystemSyncAccessHandle)
-- | <https://developer.mozilla.org/docs/Web/API/FileSystemFileHandle/createSyncAccessHandle MDN FileSystemFileHandle.createSyncAccessHandle documentation>
createSyncAccessHandle :: (MonadDOM m) => FileSystemFileHandle -> m FileSystemSyncAccessHandle
createSyncAccessHandle self = liftDOM (((js_createSyncAccessHandle (self)) >>= checkPromiseResult))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemFileHandle/createSyncAccessHandle MDN FileSystemFileHandle.createSyncAccessHandle documentation>
createSyncAccessHandle_ :: (MonadDOM m) => FileSystemFileHandle -> m ()
createSyncAccessHandle_ self = liftDOM (void (((js_createSyncAccessHandle (self)) >>= checkPromiseResult)))

foreign import javascript interruptible "(($1, $2, $c) => { return $1[\"createWritable\"]($2).then(function(s) { $c(null, s);}, function(e) { $c(e, null);}); })"
        js_createWritable :: FileSystemFileHandle -> JSVal -> IO (JSVal, FileSystemWritableFileStream)
-- | <https://developer.mozilla.org/docs/Web/API/FileSystemFileHandle/createWritable MDN FileSystemFileHandle.createWritable documentation>
createWritable :: (MonadDOM m) => FileSystemFileHandle -> Maybe FileSystemCreateWritableOptions -> m FileSystemWritableFileStream
createWritable self options = liftDOM ((((P.maybe (P.return jsUndefined) toJSVal options) >>= \a2' -> js_createWritable (self) a2') >>= checkPromiseResult))

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemFileHandle/createWritable MDN FileSystemFileHandle.createWritable documentation>
createWritable_ :: (MonadDOM m) => FileSystemFileHandle -> Maybe FileSystemCreateWritableOptions -> m ()
createWritable_ self options = liftDOM (void ((((P.maybe (P.return jsUndefined) toJSVal options) >>= \a2' -> js_createWritable (self) a2') >>= checkPromiseResult)))

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

-- | <https://developer.mozilla.org/docs/Web/API/FileSystemFileHandle/getFile MDN FileSystemFileHandle.getFile documentation>
getFile_ :: (MonadDOM m) => FileSystemFileHandle -> m ()
getFile_ self = liftDOM (void (((js_getFile (self)) >>= checkPromiseResult)))