{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-} ---------- GENERATED FILE, EDITS WILL BE LOST ---------- module Graphics.UI.Qtah.Generated.Core.QDateTime ( QDateTimeValue (..), QDateTimeConstPtr (..), addDays, addMSecs, addMonths, addSecs, addYears, date, daysTo, isDaylightTime, isNull, isValid, msecsTo, offsetFromUtc, secsTo, time, timeSpec, timeZone, timeZoneAbbreviation, toLocalTime, toMSecsSinceEpoch, toOffsetFromUtc, toSecsSinceEpoch, toString, toStringWithDateFormat, toStringWithStringFormat, toTimeSpec, toTimeZone, toUTC, eQ, nE, lT, lE, gT, gE, QDateTimePtr (..), setDate, setMSecsSinceEpoch, setOffsetFromUtc, setSecsSinceEpoch, setTime, setTimeSpec, setTimeZone, swap, aSSIGN, currentDateTime, currentDateTimeUtc, currentMSecsSinceEpoch, currentSecsSinceEpoch, fromMSecsSinceEpoch, fromMSecsSinceEpochWithTimeSpec, fromMSecsSinceEpochWithTimeSpecAndOffset, fromMSecsSinceEpochWithTimeZone, fromSecsSinceEpoch, fromSecsSinceEpochWithTimeSpec, fromSecsSinceEpochWithTimeSpecAndOffset, fromSecsSinceEpochWithTimeZone, fromString, fromStringWithDateFormat, fromStringWithStringFormat, QDateTimeConst (..), castQDateTimeToConst, QDateTime (..), castQDateTimeToNonconst, new, newWithDate, newWithDateAndTime, newWithDateAndTimeAndTimeSpec, newWithDateAndTimeAndTimeSpecAndOffset, newWithDateAndTimeAndTimeZone, newCopy, QDateTimeSuper (..), QDateTimeSuperConst (..), ) where import Control.Monad ((>=>)) import qualified Data.Int as HoppyDI import qualified Foreign as HoppyF import qualified Foreign.C as HoppyFC import qualified Foreign.Hoppy.Runtime as HoppyFHR import qualified Graphics.UI.Qtah.Generated.Core.QDate as M22 import qualified Graphics.UI.Qtah.Generated.Core.QString as M142 import qualified Graphics.UI.Qtah.Generated.Core.QTime as M158 import {-# SOURCE #-} qualified Graphics.UI.Qtah.Generated.Core.QTimeZone as M164 import qualified Graphics.UI.Qtah.Generated.Core.Types as M190 import Prelude (($), (.), (/=), (=<<), (==), (>>), (>>=)) import qualified Prelude as HoppyP import qualified Prelude as QtahP foreign import ccall "genpop__QDateTime_new" new' :: HoppyP.IO (HoppyF.Ptr QDateTime) foreign import ccall "genpop__QDateTime_newWithDate" newWithDate' :: HoppyF.Ptr M22.QDateConst -> HoppyP.IO (HoppyF.Ptr QDateTime) foreign import ccall "genpop__QDateTime_newWithDateAndTime" newWithDateAndTime' :: HoppyF.Ptr M22.QDateConst -> HoppyF.Ptr M158.QTimeConst -> HoppyP.IO (HoppyF.Ptr QDateTime) foreign import ccall "genpop__QDateTime_newWithDateAndTimeAndTimeSpec" newWithDateAndTimeAndTimeSpec' :: HoppyF.Ptr M22.QDateConst -> HoppyF.Ptr M158.QTimeConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTime) foreign import ccall "genpop__QDateTime_newWithDateAndTimeAndTimeSpecAndOffset" newWithDateAndTimeAndTimeSpecAndOffset' :: HoppyF.Ptr M22.QDateConst -> HoppyF.Ptr M158.QTimeConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTime) foreign import ccall "genpop__QDateTime_newWithDateAndTimeAndTimeZone" newWithDateAndTimeAndTimeZone' :: HoppyF.Ptr M22.QDateConst -> HoppyF.Ptr M158.QTimeConst -> HoppyF.Ptr M164.QTimeZoneConst -> HoppyP.IO (HoppyF.Ptr QDateTime) foreign import ccall "genpop__QDateTime_newCopy" newCopy' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr QDateTime) foreign import ccall "genpop__QDateTime_addDays" addDays' :: HoppyF.Ptr QDateTimeConst -> HoppyDI.Int64 -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_addMSecs" addMSecs' :: HoppyF.Ptr QDateTimeConst -> HoppyDI.Int64 -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_addMonths" addMonths' :: HoppyF.Ptr QDateTimeConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_addSecs" addSecs' :: HoppyF.Ptr QDateTimeConst -> HoppyDI.Int64 -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_addYears" addYears' :: HoppyF.Ptr QDateTimeConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_currentDateTime" currentDateTime' :: HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_currentDateTimeUtc" currentDateTimeUtc' :: HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_currentMSecsSinceEpoch" currentMSecsSinceEpoch' :: HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QDateTime_currentSecsSinceEpoch" currentSecsSinceEpoch' :: HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QDateTime_date" date' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr M22.QDateConst) foreign import ccall "genpop__QDateTime_daysTo" daysTo' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QDateTime_fromMSecsSinceEpoch" fromMSecsSinceEpoch' :: HoppyDI.Int64 -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromMSecsSinceEpochWithTimeSpec" fromMSecsSinceEpochWithTimeSpec' :: HoppyDI.Int64 -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromMSecsSinceEpochWithTimeSpecAndOffset" fromMSecsSinceEpochWithTimeSpecAndOffset' :: HoppyDI.Int64 -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromMSecsSinceEpochWithTimeZone" fromMSecsSinceEpochWithTimeZone' :: HoppyDI.Int64 -> HoppyF.Ptr M164.QTimeZoneConst -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromSecsSinceEpoch" fromSecsSinceEpoch' :: HoppyDI.Int64 -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromSecsSinceEpochWithTimeSpec" fromSecsSinceEpochWithTimeSpec' :: HoppyDI.Int64 -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromSecsSinceEpochWithTimeSpecAndOffset" fromSecsSinceEpochWithTimeSpecAndOffset' :: HoppyDI.Int64 -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromSecsSinceEpochWithTimeZone" fromSecsSinceEpochWithTimeZone' :: HoppyDI.Int64 -> HoppyF.Ptr M164.QTimeZoneConst -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromString" fromString' :: HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromStringWithDateFormat" fromStringWithDateFormat' :: HoppyF.Ptr M142.QStringConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_fromStringWithStringFormat" fromStringWithStringFormat' :: HoppyF.Ptr M142.QStringConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_isDaylightTime" isDaylightTime' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_isNull" isNull' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_isValid" isValid' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_msecsTo" msecsTo' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QDateTime_offsetFromUtc" offsetFromUtc' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QDateTime_secsTo" secsTo' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QDateTime_setDate" setDate' :: HoppyF.Ptr QDateTime -> HoppyF.Ptr M22.QDateConst -> HoppyP.IO () foreign import ccall "genpop__QDateTime_setMSecsSinceEpoch" setMSecsSinceEpoch' :: HoppyF.Ptr QDateTime -> HoppyDI.Int64 -> HoppyP.IO () foreign import ccall "genpop__QDateTime_setOffsetFromUtc" setOffsetFromUtc' :: HoppyF.Ptr QDateTime -> HoppyFC.CInt -> HoppyP.IO () foreign import ccall "genpop__QDateTime_setSecsSinceEpoch" setSecsSinceEpoch' :: HoppyF.Ptr QDateTime -> HoppyDI.Int64 -> HoppyP.IO () foreign import ccall "genpop__QDateTime_setTime" setTime' :: HoppyF.Ptr QDateTime -> HoppyF.Ptr M158.QTimeConst -> HoppyP.IO () foreign import ccall "genpop__QDateTime_setTimeSpec" setTimeSpec' :: HoppyF.Ptr QDateTime -> HoppyFC.CInt -> HoppyP.IO () foreign import ccall "genpop__QDateTime_setTimeZone" setTimeZone' :: HoppyF.Ptr QDateTime -> HoppyF.Ptr M164.QTimeZoneConst -> HoppyP.IO () foreign import ccall "genpop__QDateTime_swap" swap' :: HoppyF.Ptr QDateTime -> HoppyF.Ptr QDateTime -> HoppyP.IO () foreign import ccall "genpop__QDateTime_time" time' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr M158.QTimeConst) foreign import ccall "genpop__QDateTime_timeSpec" timeSpec' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QDateTime_timeZone" timeZone' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr M164.QTimeZoneConst) foreign import ccall "genpop__QDateTime_timeZoneAbbreviation" timeZoneAbbreviation' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst) foreign import ccall "genpop__QDateTime_toLocalTime" toLocalTime' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_toMSecsSinceEpoch" toMSecsSinceEpoch' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QDateTime_toOffsetFromUtc" toOffsetFromUtc' :: HoppyF.Ptr QDateTimeConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_toSecsSinceEpoch" toSecsSinceEpoch' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QDateTime_toString" toString' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr M142.QStringConst) foreign import ccall "genpop__QDateTime_toStringWithDateFormat" toStringWithDateFormat' :: HoppyF.Ptr QDateTimeConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr M142.QStringConst) foreign import ccall "genpop__QDateTime_toStringWithStringFormat" toStringWithStringFormat' :: HoppyF.Ptr QDateTimeConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr M142.QStringConst) foreign import ccall "genpop__QDateTime_toTimeSpec" toTimeSpec' :: HoppyF.Ptr QDateTimeConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_toTimeZone" toTimeZone' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr M164.QTimeZoneConst -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_toUTC" toUTC' :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr QDateTimeConst) foreign import ccall "genpop__QDateTime_EQ" eQ' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_NE" nE' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_LT" lT' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_LE" lE' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_GT" gT' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_GE" gE' :: HoppyF.Ptr QDateTimeConst -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QDateTime_ASSIGN" aSSIGN' :: HoppyF.Ptr QDateTime -> HoppyF.Ptr QDateTimeConst -> HoppyP.IO (HoppyF.Ptr QDateTime) foreign import ccall "gendel__QDateTime" delete'QDateTime :: HoppyF.Ptr QDateTimeConst -> HoppyP.IO () foreign import ccall "&gendel__QDateTime" deletePtr'QDateTime :: HoppyF.FunPtr (HoppyF.Ptr QDateTimeConst -> HoppyP.IO ()) class QDateTimeValue a where withQDateTimePtr :: a -> (QDateTimeConst -> HoppyP.IO b) -> HoppyP.IO b instance {-# OVERLAPPABLE #-} QDateTimeConstPtr a => QDateTimeValue a where withQDateTimePtr = HoppyP.flip ($) . toQDateTimeConst class (HoppyFHR.CppPtr this) => QDateTimeConstPtr this where toQDateTimeConst :: this -> QDateTimeConst addDays :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.IO QDateTime) addDays arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (addDays' arg'1' arg'2') addMSecs :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.IO QDateTime) addMSecs arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (addMSecs' arg'1' arg'2') addMonths :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO QDateTime) addMonths arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (addMonths' arg'1' arg'2') addSecs :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.IO QDateTime) addSecs arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (addSecs' arg'1' arg'2') addYears :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO QDateTime) addYears arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (addYears' arg'1' arg'2') date :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO M22.QDate) date arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M22.QDateConst) =<< (date' arg'1') daysTo :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyDI.Int64) daysTo arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (daysTo' arg'1' arg'2') isDaylightTime :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool) isDaylightTime arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( (HoppyP.return . (/= 0)) ) =<< (isDaylightTime' arg'1') isNull :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool) isNull arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( (HoppyP.return . (/= 0)) ) =<< (isNull' arg'1') isValid :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool) isValid arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( (HoppyP.return . (/= 0)) ) =<< (isValid' arg'1') msecsTo :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyDI.Int64) msecsTo arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (msecsTo' arg'1' arg'2') offsetFromUtc :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int) offsetFromUtc arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (offsetFromUtc' arg'1') secsTo :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyDI.Int64) secsTo arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (secsTo' arg'1' arg'2') time :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO M158.QTime) time arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M158.QTimeConst) =<< (time' arg'1') timeSpec :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO M190.QtTimeSpec) timeSpec arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.toCppEnum ) =<< (timeSpec' arg'1') timeZone :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO M164.QTimeZone) timeZone arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M164.QTimeZoneConst) =<< (timeZone' arg'1') timeZoneAbbreviation :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String) timeZoneAbbreviation arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M142.QStringConst) =<< (timeZoneAbbreviation' arg'1') toLocalTime :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO QDateTime) toLocalTime arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (toLocalTime' arg'1') toMSecsSinceEpoch :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyDI.Int64) toMSecsSinceEpoch arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toMSecsSinceEpoch' arg'1') toOffsetFromUtc :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO QDateTime) toOffsetFromUtc arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (toOffsetFromUtc' arg'1' arg'2') toSecsSinceEpoch :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyDI.Int64) toSecsSinceEpoch arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toSecsSinceEpoch' arg'1') toString :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String) toString arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M142.QStringConst) =<< (toString' arg'1') toStringWithDateFormat :: (QDateTimeValue this) => (this) {- ^ this -} -> (M190.QtDateFormat) -> (HoppyP.IO QtahP.String) toStringWithDateFormat arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . M142.QStringConst) =<< (toStringWithDateFormat' arg'1' arg'2') toStringWithStringFormat :: (QDateTimeValue this) => (this) {- ^ this -} -> (M190.QtDateFormat) -> (HoppyP.IO QtahP.String) toStringWithStringFormat arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . M142.QStringConst) =<< (toStringWithStringFormat' arg'1' arg'2') toTimeSpec :: (QDateTimeValue this) => (this) {- ^ this -} -> (M190.QtTimeSpec) -> (HoppyP.IO QDateTime) toTimeSpec arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (toTimeSpec' arg'1' arg'2') toTimeZone :: (QDateTimeValue this, M164.QTimeZoneValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QDateTime) toTimeZone arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M164.withQTimeZonePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (toTimeZone' arg'1' arg'2') toUTC :: (QDateTimeValue this) => (this) {- ^ this -} -> (HoppyP.IO QDateTime) toUTC arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (toUTC' arg'1') eQ :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) eQ arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (eQ' arg'1' arg'2') nE :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) nE arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (nE' arg'1' arg'2') lT :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) lT arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (lT' arg'1' arg'2') lE :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) lE arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (lE' arg'1' arg'2') gT :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) gT arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (gT' arg'1' arg'2') gE :: (QDateTimeValue this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) gE arg'1 arg'2 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (gE' arg'1' arg'2') class (QDateTimeConstPtr this) => QDateTimePtr this where toQDateTime :: this -> QDateTime setDate :: (QDateTimePtr this, M22.QDateValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ()) setDate arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> M22.withQDatePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (setDate' arg'1' arg'2') setMSecsSinceEpoch :: (QDateTimePtr this) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.IO ()) setMSecsSinceEpoch arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> let arg'2' = arg'2 in (setMSecsSinceEpoch' arg'1' arg'2') setOffsetFromUtc :: (QDateTimePtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ()) setOffsetFromUtc arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (setOffsetFromUtc' arg'1' arg'2') setSecsSinceEpoch :: (QDateTimePtr this) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.IO ()) setSecsSinceEpoch arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> let arg'2' = arg'2 in (setSecsSinceEpoch' arg'1' arg'2') setTime :: (QDateTimePtr this, M158.QTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ()) setTime arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> M158.withQTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (setTime' arg'1' arg'2') setTimeSpec :: (QDateTimePtr this) => (this) {- ^ this -} -> (M190.QtTimeSpec) -> (HoppyP.IO ()) setTimeSpec arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> (setTimeSpec' arg'1' arg'2') setTimeZone :: (QDateTimePtr this, M164.QTimeZoneValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ()) setTimeZone arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> M164.withQTimeZonePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (setTimeZone' arg'1' arg'2') swap :: (QDateTimePtr this, QDateTimePtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ()) swap arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> HoppyFHR.withCppPtr (toQDateTime arg'2) $ \arg'2' -> (swap' arg'1' arg'2') aSSIGN :: (QDateTimePtr this, QDateTimeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QDateTime) aSSIGN arg'1 arg'2 = HoppyFHR.withCppPtr (toQDateTime arg'1) $ \arg'1' -> withQDateTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> HoppyP.fmap QDateTime (aSSIGN' arg'1' arg'2') currentDateTime :: (HoppyP.IO QDateTime) currentDateTime = (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (currentDateTime') currentDateTimeUtc :: (HoppyP.IO QDateTime) currentDateTimeUtc = (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (currentDateTimeUtc') currentMSecsSinceEpoch :: (HoppyP.IO HoppyDI.Int64) currentMSecsSinceEpoch = (currentMSecsSinceEpoch') currentSecsSinceEpoch :: (HoppyP.IO HoppyDI.Int64) currentSecsSinceEpoch = (currentSecsSinceEpoch') fromMSecsSinceEpoch :: (HoppyDI.Int64) -> (HoppyP.IO QDateTime) fromMSecsSinceEpoch arg'1 = let arg'1' = arg'1 in (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromMSecsSinceEpoch' arg'1') fromMSecsSinceEpochWithTimeSpec :: (HoppyDI.Int64) -> (M190.QtTimeSpec) -> (HoppyP.IO QDateTime) fromMSecsSinceEpochWithTimeSpec arg'1 arg'2 = let arg'1' = arg'1 in ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromMSecsSinceEpochWithTimeSpec' arg'1' arg'2') fromMSecsSinceEpochWithTimeSpecAndOffset :: (HoppyDI.Int64) -> (M190.QtTimeSpec) -> (HoppyP.Int) -> (HoppyP.IO QDateTime) fromMSecsSinceEpochWithTimeSpecAndOffset arg'1 arg'2 arg'3 = let arg'1' = arg'1 in ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromMSecsSinceEpochWithTimeSpecAndOffset' arg'1' arg'2' arg'3') fromMSecsSinceEpochWithTimeZone :: (M164.QTimeZoneValue arg'2) => (HoppyDI.Int64) -> (arg'2) -> (HoppyP.IO QDateTime) fromMSecsSinceEpochWithTimeZone arg'1 arg'2 = let arg'1' = arg'1 in M164.withQTimeZonePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromMSecsSinceEpochWithTimeZone' arg'1' arg'2') fromSecsSinceEpoch :: (HoppyDI.Int64) -> (HoppyP.IO QDateTime) fromSecsSinceEpoch arg'1 = let arg'1' = arg'1 in (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromSecsSinceEpoch' arg'1') fromSecsSinceEpochWithTimeSpec :: (HoppyDI.Int64) -> (M190.QtTimeSpec) -> (HoppyP.IO QDateTime) fromSecsSinceEpochWithTimeSpec arg'1 arg'2 = let arg'1' = arg'1 in ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromSecsSinceEpochWithTimeSpec' arg'1' arg'2') fromSecsSinceEpochWithTimeSpecAndOffset :: (HoppyDI.Int64) -> (M190.QtTimeSpec) -> (HoppyP.Int) -> (HoppyP.IO QDateTime) fromSecsSinceEpochWithTimeSpecAndOffset arg'1 arg'2 arg'3 = let arg'1' = arg'1 in ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromSecsSinceEpochWithTimeSpecAndOffset' arg'1' arg'2' arg'3') fromSecsSinceEpochWithTimeZone :: (M164.QTimeZoneValue arg'2) => (HoppyDI.Int64) -> (arg'2) -> (HoppyP.IO QDateTime) fromSecsSinceEpochWithTimeZone arg'1 arg'2 = let arg'1' = arg'1 in M164.withQTimeZonePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromSecsSinceEpochWithTimeZone' arg'1' arg'2') fromString :: (M142.QStringValue arg'1) => (arg'1) -> (HoppyP.IO QDateTime) fromString arg'1 = M142.withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromString' arg'1') fromStringWithDateFormat :: (M142.QStringValue arg'1) => (arg'1) -> (M190.QtDateFormat) -> (HoppyP.IO QDateTime) fromStringWithDateFormat arg'1 arg'2 = M142.withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromStringWithDateFormat' arg'1' arg'2') fromStringWithStringFormat :: (M142.QStringValue arg'1, M142.QStringValue arg'2) => (arg'1) -> (arg'2) -> (HoppyP.IO QDateTime) fromStringWithStringFormat arg'1 arg'2 = M142.withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (HoppyFHR.decodeAndDelete . QDateTimeConst) =<< (fromStringWithStringFormat' arg'1' arg'2') data QDateTimeConst = QDateTimeConst (HoppyF.Ptr QDateTimeConst) | QDateTimeConstGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QDateTimeConst) deriving (HoppyP.Show) instance HoppyP.Eq QDateTimeConst where x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y instance HoppyP.Ord QDateTimeConst where compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y) castQDateTimeToConst :: QDateTime -> QDateTimeConst castQDateTimeToConst (QDateTime ptr') = QDateTimeConst $ HoppyF.castPtr ptr' castQDateTimeToConst (QDateTimeGc fptr' ptr') = QDateTimeConstGc fptr' $ HoppyF.castPtr ptr' instance HoppyFHR.CppPtr QDateTimeConst where nullptr = QDateTimeConst HoppyF.nullPtr withCppPtr (QDateTimeConst ptr') f' = f' ptr' withCppPtr (QDateTimeConstGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr' toPtr (QDateTimeConst ptr') = ptr' toPtr (QDateTimeConstGc _ ptr') = ptr' touchCppPtr (QDateTimeConst _) = HoppyP.return () touchCppPtr (QDateTimeConstGc fptr' _) = HoppyF.touchForeignPtr fptr' instance HoppyFHR.Deletable QDateTimeConst where delete (QDateTimeConst ptr') = delete'QDateTime ptr' delete (QDateTimeConstGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QDateTimeConst", " object."] toGc this'@(QDateTimeConst ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QDateTimeConstGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QDateTime :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ()) toGc this'@(QDateTimeConstGc {}) = HoppyP.return this' instance HoppyFHR.Copyable QDateTimeConst QDateTime where copy = newCopy instance QDateTimeConstPtr QDateTimeConst where toQDateTimeConst = HoppyP.id data QDateTime = QDateTime (HoppyF.Ptr QDateTime) | QDateTimeGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QDateTime) deriving (HoppyP.Show) instance HoppyP.Eq QDateTime where x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y instance HoppyP.Ord QDateTime where compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y) castQDateTimeToNonconst :: QDateTimeConst -> QDateTime castQDateTimeToNonconst (QDateTimeConst ptr') = QDateTime $ HoppyF.castPtr ptr' castQDateTimeToNonconst (QDateTimeConstGc fptr' ptr') = QDateTimeGc fptr' $ HoppyF.castPtr ptr' instance HoppyFHR.CppPtr QDateTime where nullptr = QDateTime HoppyF.nullPtr withCppPtr (QDateTime ptr') f' = f' ptr' withCppPtr (QDateTimeGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr' toPtr (QDateTime ptr') = ptr' toPtr (QDateTimeGc _ ptr') = ptr' touchCppPtr (QDateTime _) = HoppyP.return () touchCppPtr (QDateTimeGc fptr' _) = HoppyF.touchForeignPtr fptr' instance HoppyFHR.Deletable QDateTime where delete (QDateTime ptr') = delete'QDateTime $ (HoppyF.castPtr ptr' :: HoppyF.Ptr QDateTimeConst) delete (QDateTimeGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QDateTime", " object."] toGc this'@(QDateTime ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QDateTimeGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QDateTime :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ()) toGc this'@(QDateTimeGc {}) = HoppyP.return this' instance HoppyFHR.Copyable QDateTime QDateTime where copy = newCopy instance QDateTimeConstPtr QDateTime where toQDateTimeConst (QDateTime ptr') = QDateTimeConst $ (HoppyF.castPtr :: HoppyF.Ptr QDateTime -> HoppyF.Ptr QDateTimeConst) ptr' toQDateTimeConst (QDateTimeGc fptr' ptr') = QDateTimeConstGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr QDateTime -> HoppyF.Ptr QDateTimeConst) ptr' instance QDateTimePtr QDateTime where toQDateTime = HoppyP.id new :: (HoppyP.IO QDateTime) new = HoppyP.fmap QDateTime (new') newWithDate :: (M22.QDateValue arg'1) => (arg'1) -> (HoppyP.IO QDateTime) newWithDate arg'1 = M22.withQDatePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> HoppyP.fmap QDateTime (newWithDate' arg'1') newWithDateAndTime :: (M22.QDateValue arg'1, M158.QTimeValue arg'2) => (arg'1) -> (arg'2) -> (HoppyP.IO QDateTime) newWithDateAndTime arg'1 arg'2 = M22.withQDatePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M158.withQTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> HoppyP.fmap QDateTime (newWithDateAndTime' arg'1' arg'2') newWithDateAndTimeAndTimeSpec :: (M22.QDateValue arg'1, M158.QTimeValue arg'2) => (arg'1) -> (arg'2) -> (M190.QtTimeSpec) -> (HoppyP.IO QDateTime) newWithDateAndTimeAndTimeSpec arg'1 arg'2 arg'3 = M22.withQDatePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M158.withQTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'3 >>= \arg'3' -> HoppyP.fmap QDateTime (newWithDateAndTimeAndTimeSpec' arg'1' arg'2' arg'3') newWithDateAndTimeAndTimeSpecAndOffset :: (M22.QDateValue arg'1, M158.QTimeValue arg'2) => (arg'1) -> (arg'2) -> (M190.QtTimeSpec) -> (HoppyP.Int) -> (HoppyP.IO QDateTime) newWithDateAndTimeAndTimeSpecAndOffset arg'1 arg'2 arg'3 arg'4 = M22.withQDatePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M158.withQTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> HoppyP.fmap QDateTime (newWithDateAndTimeAndTimeSpecAndOffset' arg'1' arg'2' arg'3' arg'4') newWithDateAndTimeAndTimeZone :: (M22.QDateValue arg'1, M158.QTimeValue arg'2, M164.QTimeZoneValue arg'3) => (arg'1) -> (arg'2) -> (arg'3) -> (HoppyP.IO QDateTime) newWithDateAndTimeAndTimeZone arg'1 arg'2 arg'3 = M22.withQDatePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M158.withQTimePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> M164.withQTimeZonePtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> HoppyP.fmap QDateTime (newWithDateAndTimeAndTimeZone' arg'1' arg'2' arg'3') newCopy :: (QDateTimeValue arg'1) => (arg'1) -> (HoppyP.IO QDateTime) newCopy arg'1 = withQDateTimePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> HoppyP.fmap QDateTime (newCopy' arg'1') class QDateTimeSuper a where downToQDateTime :: a -> QDateTime class QDateTimeSuperConst a where downToQDateTimeConst :: a -> QDateTimeConst instance HoppyFHR.Assignable (HoppyF.Ptr (HoppyF.Ptr QDateTime)) QDateTime where assign ptr' value' = HoppyF.poke ptr' $ HoppyFHR.toPtr value' instance QDateTimeValue a => HoppyFHR.Assignable QDateTime a where assign x' y' = aSSIGN x' y' >> HoppyP.return () instance HoppyFHR.Decodable (HoppyF.Ptr (HoppyF.Ptr QDateTime)) QDateTime where decode = HoppyP.fmap QDateTime . HoppyF.peek instance HoppyFHR.Decodable QDateTime (QDateTime) where decode = HoppyFHR.decode . toQDateTimeConst instance HoppyFHR.Decodable QDateTimeConst (QDateTime) where decode = HoppyFHR.copy >=> HoppyFHR.toGc