module Qtc.Core.QIODevice (
isOpen
,isTextModeEnabled
,openMode
,peek
,setTextModeEnabled
,Qwrite(..)
,qIODevice_delete
,qIODevice_deleteLater
)
where
import Foreign.C.Types
import Qth.ClassTypes.Core
import Qtc.Enums.Base
import Qtc.Enums.Core.QIODevice
import Qtc.Classes.Base
import Qtc.Classes.Qccs
import Qtc.Classes.Core
import Qtc.ClassTypes.Core
import Qth.ClassTypes.Core
instance QuserMethod (QIODevice ()) (()) (IO ()) where
userMethod qobj evid ()
= withObjectPtr qobj $ \cobj_qobj ->
qtc_QIODevice_userMethod cobj_qobj (toCInt evid)
foreign import ccall "qtc_QIODevice_userMethod" qtc_QIODevice_userMethod :: Ptr (TQIODevice a) -> CInt -> IO ()
instance QuserMethod (QIODeviceSc a) (()) (IO ()) where
userMethod qobj evid ()
= withObjectPtr qobj $ \cobj_qobj ->
qtc_QIODevice_userMethod cobj_qobj (toCInt evid)
instance QuserMethod (QIODevice ()) (QVariant ()) (IO (QVariant ())) where
userMethod qobj evid qvoj
= withObjectRefResult $
withObjectPtr qobj $ \cobj_qobj ->
withObjectPtr qvoj $ \cobj_qvoj ->
qtc_QIODevice_userMethodVariant cobj_qobj (toCInt evid) cobj_qvoj
foreign import ccall "qtc_QIODevice_userMethodVariant" qtc_QIODevice_userMethodVariant :: Ptr (TQIODevice a) -> CInt -> Ptr (TQVariant ()) -> IO (Ptr (TQVariant ()))
instance QuserMethod (QIODeviceSc a) (QVariant ()) (IO (QVariant ())) where
userMethod qobj evid qvoj
= withObjectRefResult $
withObjectPtr qobj $ \cobj_qobj ->
withObjectPtr qvoj $ \cobj_qvoj ->
qtc_QIODevice_userMethodVariant cobj_qobj (toCInt evid) cobj_qvoj
instance QatEnd (QIODevice ()) (()) where
atEnd x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_atEnd_h cobj_x0
foreign import ccall "qtc_QIODevice_atEnd_h" qtc_QIODevice_atEnd_h :: Ptr (TQIODevice a) -> IO CBool
instance QatEnd (QIODeviceSc a) (()) where
atEnd x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_atEnd_h cobj_x0
instance QbytesAvailable (QIODevice ()) (()) where
bytesAvailable x0 ()
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_bytesAvailable_h cobj_x0
foreign import ccall "qtc_QIODevice_bytesAvailable_h" qtc_QIODevice_bytesAvailable_h :: Ptr (TQIODevice a) -> IO CLLong
instance QbytesAvailable (QIODeviceSc a) (()) where
bytesAvailable x0 ()
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_bytesAvailable_h cobj_x0
instance QbytesToWrite (QIODevice ()) (()) where
bytesToWrite x0 ()
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_bytesToWrite_h cobj_x0
foreign import ccall "qtc_QIODevice_bytesToWrite_h" qtc_QIODevice_bytesToWrite_h :: Ptr (TQIODevice a) -> IO CLLong
instance QbytesToWrite (QIODeviceSc a) (()) where
bytesToWrite x0 ()
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_bytesToWrite_h cobj_x0
instance QcanReadLine (QIODevice ()) (()) where
canReadLine x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_canReadLine_h cobj_x0
foreign import ccall "qtc_QIODevice_canReadLine_h" qtc_QIODevice_canReadLine_h :: Ptr (TQIODevice a) -> IO CBool
instance QcanReadLine (QIODeviceSc a) (()) where
canReadLine x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_canReadLine_h cobj_x0
instance Qclose (QIODevice ()) (()) (IO ()) where
close x0 ()
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_close_h cobj_x0
foreign import ccall "qtc_QIODevice_close_h" qtc_QIODevice_close_h :: Ptr (TQIODevice a) -> IO ()
instance Qclose (QIODeviceSc a) (()) (IO ()) where
close x0 ()
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_close_h cobj_x0
instance QerrorString (QIODevice a) (()) where
errorString x0 ()
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_errorString cobj_x0
foreign import ccall "qtc_QIODevice_errorString" qtc_QIODevice_errorString :: Ptr (TQIODevice a) -> IO (Ptr (TQString ()))
isOpen :: QIODevice a -> (()) -> IO (Bool)
isOpen x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_isOpen cobj_x0
foreign import ccall "qtc_QIODevice_isOpen" qtc_QIODevice_isOpen :: Ptr (TQIODevice a) -> IO CBool
instance QisReadable (QIODevice a) (()) where
isReadable x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_isReadable cobj_x0
foreign import ccall "qtc_QIODevice_isReadable" qtc_QIODevice_isReadable :: Ptr (TQIODevice a) -> IO CBool
instance QisSequential (QIODevice ()) (()) where
isSequential x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_isSequential_h cobj_x0
foreign import ccall "qtc_QIODevice_isSequential_h" qtc_QIODevice_isSequential_h :: Ptr (TQIODevice a) -> IO CBool
instance QisSequential (QIODeviceSc a) (()) where
isSequential x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_isSequential_h cobj_x0
isTextModeEnabled :: QIODevice a -> (()) -> IO (Bool)
isTextModeEnabled x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_isTextModeEnabled cobj_x0
foreign import ccall "qtc_QIODevice_isTextModeEnabled" qtc_QIODevice_isTextModeEnabled :: Ptr (TQIODevice a) -> IO CBool
instance QisWritable (QIODevice a) (()) where
isWritable x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_isWritable cobj_x0
foreign import ccall "qtc_QIODevice_isWritable" qtc_QIODevice_isWritable :: Ptr (TQIODevice a) -> IO CBool
instance Qopen (QIODevice ()) ((OpenMode)) where
open x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_open_h cobj_x0 (toCLong $ qFlags_toInt x1)
foreign import ccall "qtc_QIODevice_open_h" qtc_QIODevice_open_h :: Ptr (TQIODevice a) -> CLong -> IO CBool
instance Qopen (QIODeviceSc a) ((OpenMode)) where
open x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_open_h cobj_x0 (toCLong $ qFlags_toInt x1)
openMode :: QIODevice a -> (()) -> IO (OpenMode)
openMode x0 ()
= withQFlagsResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_openMode cobj_x0
foreign import ccall "qtc_QIODevice_openMode" qtc_QIODevice_openMode :: Ptr (TQIODevice a) -> IO CLong
peek :: QIODevice a -> ((Int)) -> IO (String)
peek x0 (x1)
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_peek cobj_x0 (toCLLong x1)
foreign import ccall "qtc_QIODevice_peek" qtc_QIODevice_peek :: Ptr (TQIODevice a) -> CLLong -> IO (Ptr (TQString ()))
instance Qpos (QIODevice ()) (()) (IO (Int)) where
pos x0 ()
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_pos_h cobj_x0
foreign import ccall "qtc_QIODevice_pos_h" qtc_QIODevice_pos_h :: Ptr (TQIODevice a) -> IO CLLong
instance Qpos (QIODeviceSc a) (()) (IO (Int)) where
pos x0 ()
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_pos_h cobj_x0
instance Qqread (QIODevice a) ((Int)) where
qread x0 (x1)
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_read cobj_x0 (toCLLong x1)
foreign import ccall "qtc_QIODevice_read" qtc_QIODevice_read :: Ptr (TQIODevice a) -> CLLong -> IO (Ptr (TQString ()))
instance QreadAll (QIODevice a) (()) where
readAll x0 ()
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_readAll cobj_x0
foreign import ccall "qtc_QIODevice_readAll" qtc_QIODevice_readAll :: Ptr (TQIODevice a) -> IO (Ptr (TQString ()))
instance QreadLine (QIODevice a) (()) where
readLine x0 ()
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_readLine cobj_x0
foreign import ccall "qtc_QIODevice_readLine" qtc_QIODevice_readLine :: Ptr (TQIODevice a) -> IO (Ptr (TQString ()))
instance QreadLine (QIODevice a) ((Int)) where
readLine x0 (x1)
= withStringResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_readLine1 cobj_x0 (toCLLong x1)
foreign import ccall "qtc_QIODevice_readLine1" qtc_QIODevice_readLine1 :: Ptr (TQIODevice a) -> CLLong -> IO (Ptr (TQString ()))
instance Qreset (QIODevice ()) (()) (IO (Bool)) where
reset x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_reset_h cobj_x0
foreign import ccall "qtc_QIODevice_reset_h" qtc_QIODevice_reset_h :: Ptr (TQIODevice a) -> IO CBool
instance Qreset (QIODeviceSc a) (()) (IO (Bool)) where
reset x0 ()
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_reset_h cobj_x0
instance Qseek (QIODevice ()) ((Int)) where
seek x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_seek_h cobj_x0 (toCLLong x1)
foreign import ccall "qtc_QIODevice_seek_h" qtc_QIODevice_seek_h :: Ptr (TQIODevice a) -> CLLong -> IO CBool
instance Qseek (QIODeviceSc a) ((Int)) where
seek x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_seek_h cobj_x0 (toCLLong x1)
instance QsetErrorString (QIODevice ()) ((String)) where
setErrorString x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_setErrorString cobj_x0 cstr_x1
foreign import ccall "qtc_QIODevice_setErrorString" qtc_QIODevice_setErrorString :: Ptr (TQIODevice a) -> CWString -> IO ()
instance QsetErrorString (QIODeviceSc a) ((String)) where
setErrorString x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_setErrorString cobj_x0 cstr_x1
instance QsetOpenMode (QIODevice ()) ((OpenMode)) where
setOpenMode x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_setOpenMode cobj_x0 (toCLong $ qFlags_toInt x1)
foreign import ccall "qtc_QIODevice_setOpenMode" qtc_QIODevice_setOpenMode :: Ptr (TQIODevice a) -> CLong -> IO ()
instance QsetOpenMode (QIODeviceSc a) ((OpenMode)) where
setOpenMode x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_setOpenMode cobj_x0 (toCLong $ qFlags_toInt x1)
setTextModeEnabled :: QIODevice a -> ((Bool)) -> IO ()
setTextModeEnabled x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_setTextModeEnabled cobj_x0 (toCBool x1)
foreign import ccall "qtc_QIODevice_setTextModeEnabled" qtc_QIODevice_setTextModeEnabled :: Ptr (TQIODevice a) -> CBool -> IO ()
instance Qqsize (QIODevice ()) (()) (IO (Int)) where
qsize x0 ()
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_size_h cobj_x0
foreign import ccall "qtc_QIODevice_size_h" qtc_QIODevice_size_h :: Ptr (TQIODevice a) -> IO CLLong
instance Qqsize (QIODeviceSc a) (()) (IO (Int)) where
qsize x0 ()
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_size_h cobj_x0
instance QwaitForBytesWritten (QIODevice ()) ((Int)) where
waitForBytesWritten x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_waitForBytesWritten_h cobj_x0 (toCInt x1)
foreign import ccall "qtc_QIODevice_waitForBytesWritten_h" qtc_QIODevice_waitForBytesWritten_h :: Ptr (TQIODevice a) -> CInt -> IO CBool
instance QwaitForBytesWritten (QIODeviceSc a) ((Int)) where
waitForBytesWritten x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_waitForBytesWritten_h cobj_x0 (toCInt x1)
instance QwaitForReadyRead (QIODevice ()) ((Int)) where
waitForReadyRead x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_waitForReadyRead_h cobj_x0 (toCInt x1)
foreign import ccall "qtc_QIODevice_waitForReadyRead_h" qtc_QIODevice_waitForReadyRead_h :: Ptr (TQIODevice a) -> CInt -> IO CBool
instance QwaitForReadyRead (QIODeviceSc a) ((Int)) where
waitForReadyRead x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_waitForReadyRead_h cobj_x0 (toCInt x1)
class Qwrite x1 where
write :: QIODevice a -> x1 -> IO (Int)
instance Qwrite ((String)) where
write x0 (x1)
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_write cobj_x0 cstr_x1
foreign import ccall "qtc_QIODevice_write" qtc_QIODevice_write :: Ptr (TQIODevice a) -> CWString -> IO CLLong
instance Qwrite ((String, Int)) where
write x0 (x1, x2)
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_write1 cobj_x0 cstr_x1 (toCLLong x2)
foreign import ccall "qtc_QIODevice_write1" qtc_QIODevice_write1 :: Ptr (TQIODevice a) -> CWString -> CLLong -> IO CLLong
instance QwriteData (QIODevice ()) ((String, Int)) where
writeData x0 (x1, x2)
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_writeData_h cobj_x0 cstr_x1 (toCLLong x2)
foreign import ccall "qtc_QIODevice_writeData_h" qtc_QIODevice_writeData_h :: Ptr (TQIODevice a) -> CWString -> CLLong -> IO CLLong
instance QwriteData (QIODeviceSc a) ((String, Int)) where
writeData x0 (x1, x2)
= withLongLongResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_writeData_h cobj_x0 cstr_x1 (toCLLong x2)
qIODevice_delete :: QIODevice a -> IO ()
qIODevice_delete x0
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_delete cobj_x0
foreign import ccall "qtc_QIODevice_delete" qtc_QIODevice_delete :: Ptr (TQIODevice a) -> IO ()
qIODevice_deleteLater :: QIODevice a -> IO ()
qIODevice_deleteLater x0
= withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_deleteLater cobj_x0
foreign import ccall "qtc_QIODevice_deleteLater" qtc_QIODevice_deleteLater :: Ptr (TQIODevice a) -> IO ()
instance QchildEvent (QIODevice ()) ((QChildEvent t1)) where
childEvent x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
qtc_QIODevice_childEvent cobj_x0 cobj_x1
foreign import ccall "qtc_QIODevice_childEvent" qtc_QIODevice_childEvent :: Ptr (TQIODevice a) -> Ptr (TQChildEvent t1) -> IO ()
instance QchildEvent (QIODeviceSc a) ((QChildEvent t1)) where
childEvent x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
qtc_QIODevice_childEvent cobj_x0 cobj_x1
instance QconnectNotify (QIODevice ()) ((String)) where
connectNotify x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_connectNotify cobj_x0 cstr_x1
foreign import ccall "qtc_QIODevice_connectNotify" qtc_QIODevice_connectNotify :: Ptr (TQIODevice a) -> CWString -> IO ()
instance QconnectNotify (QIODeviceSc a) ((String)) where
connectNotify x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_connectNotify cobj_x0 cstr_x1
instance QcustomEvent (QIODevice ()) ((QEvent t1)) where
customEvent x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
qtc_QIODevice_customEvent cobj_x0 cobj_x1
foreign import ccall "qtc_QIODevice_customEvent" qtc_QIODevice_customEvent :: Ptr (TQIODevice a) -> Ptr (TQEvent t1) -> IO ()
instance QcustomEvent (QIODeviceSc a) ((QEvent t1)) where
customEvent x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
qtc_QIODevice_customEvent cobj_x0 cobj_x1
instance QdisconnectNotify (QIODevice ()) ((String)) where
disconnectNotify x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_disconnectNotify cobj_x0 cstr_x1
foreign import ccall "qtc_QIODevice_disconnectNotify" qtc_QIODevice_disconnectNotify :: Ptr (TQIODevice a) -> CWString -> IO ()
instance QdisconnectNotify (QIODeviceSc a) ((String)) where
disconnectNotify x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_disconnectNotify cobj_x0 cstr_x1
instance Qevent (QIODevice ()) ((QEvent t1)) where
event x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
qtc_QIODevice_event_h cobj_x0 cobj_x1
foreign import ccall "qtc_QIODevice_event_h" qtc_QIODevice_event_h :: Ptr (TQIODevice a) -> Ptr (TQEvent t1) -> IO CBool
instance Qevent (QIODeviceSc a) ((QEvent t1)) where
event x0 (x1)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
qtc_QIODevice_event_h cobj_x0 cobj_x1
instance QeventFilter (QIODevice ()) ((QObject t1, QEvent t2)) where
eventFilter x0 (x1, x2)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
withObjectPtr x2 $ \cobj_x2 ->
qtc_QIODevice_eventFilter_h cobj_x0 cobj_x1 cobj_x2
foreign import ccall "qtc_QIODevice_eventFilter_h" qtc_QIODevice_eventFilter_h :: Ptr (TQIODevice a) -> Ptr (TQObject t1) -> Ptr (TQEvent t2) -> IO CBool
instance QeventFilter (QIODeviceSc a) ((QObject t1, QEvent t2)) where
eventFilter x0 (x1, x2)
= withBoolResult $
withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
withObjectPtr x2 $ \cobj_x2 ->
qtc_QIODevice_eventFilter_h cobj_x0 cobj_x1 cobj_x2
instance Qreceivers (QIODevice ()) ((String)) where
receivers x0 (x1)
= withIntResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_receivers cobj_x0 cstr_x1
foreign import ccall "qtc_QIODevice_receivers" qtc_QIODevice_receivers :: Ptr (TQIODevice a) -> CWString -> IO CInt
instance Qreceivers (QIODeviceSc a) ((String)) where
receivers x0 (x1)
= withIntResult $
withObjectPtr x0 $ \cobj_x0 ->
withCWString x1 $ \cstr_x1 ->
qtc_QIODevice_receivers cobj_x0 cstr_x1
instance Qsender (QIODevice ()) (()) where
sender x0 ()
= withQObjectResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_sender cobj_x0
foreign import ccall "qtc_QIODevice_sender" qtc_QIODevice_sender :: Ptr (TQIODevice a) -> IO (Ptr (TQObject ()))
instance Qsender (QIODeviceSc a) (()) where
sender x0 ()
= withQObjectResult $
withObjectPtr x0 $ \cobj_x0 ->
qtc_QIODevice_sender cobj_x0
instance QtimerEvent (QIODevice ()) ((QTimerEvent t1)) where
timerEvent x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
qtc_QIODevice_timerEvent cobj_x0 cobj_x1
foreign import ccall "qtc_QIODevice_timerEvent" qtc_QIODevice_timerEvent :: Ptr (TQIODevice a) -> Ptr (TQTimerEvent t1) -> IO ()
instance QtimerEvent (QIODeviceSc a) ((QTimerEvent t1)) where
timerEvent x0 (x1)
= withObjectPtr x0 $ \cobj_x0 ->
withObjectPtr x1 $ \cobj_x1 ->
qtc_QIODevice_timerEvent cobj_x0 cobj_x1