module Graphics.UI.Gtk.WebKit.DOM.File
(fileGetName,
File, FileClass, castToFile, gTypeFile, toFile) where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
fileGetName :: (FileClass self) => self -> IO String
fileGetName self
= ((\(File arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_file_get_name argPtr1) (toFile self)) >>=
readUTFString
foreign import ccall safe "dist/build/Graphics/UI/Gtk/WebKit/DOM/File.h webkit_dom_file_get_name"
webkit_dom_file_get_name :: ((Ptr File) -> (IO (Ptr CChar)))