{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-} ---------- GENERATED FILE, EDITS WILL BE LOST ---------- module Graphics.UI.Qtah.Generated.Core.QString ( QStringValue (..), QStringConstPtr (..), arg, argWithSize, argWithSizeAndFill, argUlonglong, argUlonglongWithField, argUlonglongWithFieldAndBase, argUlonglongWithFieldAndBaseAndFill, argLonglong, argLonglongWithField, argLonglongWithFieldAndBase, argLonglongWithFieldAndBaseAndFill, argLong, argLongWithField, argLongWithFieldAndBase, argLongWithFieldAndBaseAndFill, argUlong, argUlongWithField, argUlongWithFieldAndBase, argUlongWithFieldAndBaseAndFill, argInt, argIntWithField, argIntWithFieldAndBase, argIntWithFieldAndBaseAndFill, argUintWith, argUintWithField, argUintWithFieldAndBase, argUintWithFieldAndBaseAndFill, argShortWith, argShortWithField, argShortWithFieldAndBase, argShortWithFieldAndBaseAndFill, argUshortWith, argUshortWithField, argUshortWithFieldAndBase, argUshortWithFieldAndBaseAndFill, argDoubleWith, argDoubleWithField, argDoubleWithFieldFormat, argDoubleWithFieldFormatPrecision, argDoubleWithFieldFormatPrecisionFill, argCharWith, argCharWithField, argCharWithFieldFill, argQCharWith, argQCharWithField, argQCharWithFieldFill, argTwoQStrings, argThreeQStrings, argFourQStrings, argFiveQStrings, argSixQStrings, argSevenQStrings, argEightQStrings, argNineQStrings, at, back, capacity, chopped, toHtmlEscaped, toLatin1, toLocal8Bit, toStdString, toUtf8, toCaseFolded, toDouble, toDoubleWithOk, toFloat, toFloatWithOk, toInt, toIntWithOk, toIntWithOkAndBase, toLong, toLongWithOk, toLongWithOkAndBase, toLonglong, toLonglongWithOk, toLonglongWithOkAndBase, toLower, toShort, toShortWithOk, toShortWithOkAndBase, toUInt, toUIntWithOk, toUIntWithOkAndBase, toULong, toULongWithOk, toULongWithOkAndBase, toUlonglong, toUlonglongWithOk, toUlonglongWithOkAndBase, toUshort, toUshortWithOk, toUshortWithOkAndBase, toUpper, trimmed, eQ, nE, lT, lE, gT, gE, QStringPtr (..), set, append, appendQChar, appendPtrConstChar, appendByteArray, chop, clear, truncate, aSSIGN, QStringConst (..), castQStringToConst, QString (..), castQStringToNonconst, new, newFromByteArray, newFromCString, newFromSizeQChar, newFromQChar, newCopy, QStringSuper (..), QStringSuperConst (..), QStringNormalizationForm (..), QStringSectionFlag (..), QStringSectionFlags, IsQStringSectionFlags (..), sectionCaseInsensitiveSeps, sectionDefault, sectionIncludeLeadingSep, sectionIncludeTrailingSep, sectionSkipEmpty, QStringSplitBehavior (..), ) where import Data.Bits ((.&.), (.|.)) import qualified Data.Bits as QtahDB import qualified Data.ByteString as QtahDBS import qualified Data.Int as HoppyDI import qualified Data.Word as HoppyDW import qualified Foreign as HoppyF import qualified Foreign.C as HoppyFC import qualified Foreign.C as QtahFC import qualified Foreign.Hoppy.Runtime as HoppyFHR import qualified Foreign.Hoppy.Runtime as QtahFHR import qualified Graphics.UI.Qtah.Flags as QtahFlags import {-# SOURCE #-} qualified Graphics.UI.Qtah.Generated.Core.QByteArray as M12 import {-# SOURCE #-} qualified Graphics.UI.Qtah.Generated.Core.QChar as M16 import qualified Graphics.UI.Qtah.Std as M1 import Prelude (($), (.), (/=), (=<<), (==), (>>), (>>=)) import qualified Prelude as HoppyP import qualified Prelude as QtahP foreign import ccall "genpop__QString_new" new' :: HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_newFromByteArray" newFromByteArray' :: HoppyF.Ptr M12.QByteArrayConst -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_newFromCString" newFromCString' :: HoppyF.Ptr HoppyFC.CChar -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_newFromSizeQChar" newFromSizeQChar' :: HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_newFromQChar" newFromQChar' :: HoppyF.Ptr M16.QChar -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_newCopy" newCopy' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_set" set' :: HoppyF.Ptr QString -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO () foreign import ccall "genpop__QString_append" append' :: HoppyF.Ptr QString -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_appendQChar" appendQChar' :: HoppyF.Ptr QString -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_appendPtrConstChar" appendPtrConstChar' :: HoppyF.Ptr QString -> HoppyF.Ptr HoppyFC.CChar -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_appendByteArray" appendByteArray' :: HoppyF.Ptr QString -> HoppyF.Ptr M12.QByteArrayConst -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "genpop__QString_arg" arg' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argWithSize" argWithSize' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argWithSizeAndFill" argWithSizeAndFill' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUlonglong" argUlonglong' :: HoppyF.Ptr QStringConst -> HoppyDW.Word64 -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUlonglongWithField" argUlonglongWithField' :: HoppyF.Ptr QStringConst -> HoppyDW.Word64 -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUlonglongWithFieldAndBase" argUlonglongWithFieldAndBase' :: HoppyF.Ptr QStringConst -> HoppyDW.Word64 -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUlonglongWithFieldAndBaseAndFill" argUlonglongWithFieldAndBaseAndFill' :: HoppyF.Ptr QStringConst -> HoppyDW.Word64 -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argLonglong" argLonglong' :: HoppyF.Ptr QStringConst -> HoppyDI.Int64 -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argLonglongWithField" argLonglongWithField' :: HoppyF.Ptr QStringConst -> HoppyDI.Int64 -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argLonglongWithFieldAndBase" argLonglongWithFieldAndBase' :: HoppyF.Ptr QStringConst -> HoppyDI.Int64 -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argLonglongWithFieldAndBaseAndFill" argLonglongWithFieldAndBaseAndFill' :: HoppyF.Ptr QStringConst -> HoppyDI.Int64 -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argLong" argLong' :: HoppyF.Ptr QStringConst -> HoppyFC.CLong -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argLongWithField" argLongWithField' :: HoppyF.Ptr QStringConst -> HoppyFC.CLong -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argLongWithFieldAndBase" argLongWithFieldAndBase' :: HoppyF.Ptr QStringConst -> HoppyFC.CLong -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argLongWithFieldAndBaseAndFill" argLongWithFieldAndBaseAndFill' :: HoppyF.Ptr QStringConst -> HoppyFC.CLong -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUlong" argUlong' :: HoppyF.Ptr QStringConst -> HoppyFC.CULong -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUlongWithField" argUlongWithField' :: HoppyF.Ptr QStringConst -> HoppyFC.CULong -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUlongWithFieldAndBase" argUlongWithFieldAndBase' :: HoppyF.Ptr QStringConst -> HoppyFC.CULong -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUlongWithFieldAndBaseAndFill" argUlongWithFieldAndBaseAndFill' :: HoppyF.Ptr QStringConst -> HoppyFC.CULong -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argInt" argInt' :: HoppyF.Ptr QStringConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argIntWithField" argIntWithField' :: HoppyF.Ptr QStringConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argIntWithFieldAndBase" argIntWithFieldAndBase' :: HoppyF.Ptr QStringConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argIntWithFieldAndBaseAndFill" argIntWithFieldAndBaseAndFill' :: HoppyF.Ptr QStringConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUintWith" argUintWith' :: HoppyF.Ptr QStringConst -> HoppyFC.CUInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUintWithField" argUintWithField' :: HoppyF.Ptr QStringConst -> HoppyFC.CUInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUintWithFieldAndBase" argUintWithFieldAndBase' :: HoppyF.Ptr QStringConst -> HoppyFC.CUInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUintWithFieldAndBaseAndFill" argUintWithFieldAndBaseAndFill' :: HoppyF.Ptr QStringConst -> HoppyFC.CUInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argShortWith" argShortWith' :: HoppyF.Ptr QStringConst -> HoppyFC.CShort -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argShortWithField" argShortWithField' :: HoppyF.Ptr QStringConst -> HoppyFC.CShort -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argShortWithFieldAndBase" argShortWithFieldAndBase' :: HoppyF.Ptr QStringConst -> HoppyFC.CShort -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argShortWithFieldAndBaseAndFill" argShortWithFieldAndBaseAndFill' :: HoppyF.Ptr QStringConst -> HoppyFC.CShort -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUshortWith" argUshortWith' :: HoppyF.Ptr QStringConst -> HoppyFC.CUShort -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUshortWithField" argUshortWithField' :: HoppyF.Ptr QStringConst -> HoppyFC.CUShort -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUshortWithFieldAndBase" argUshortWithFieldAndBase' :: HoppyF.Ptr QStringConst -> HoppyFC.CUShort -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argUshortWithFieldAndBaseAndFill" argUshortWithFieldAndBaseAndFill' :: HoppyF.Ptr QStringConst -> HoppyFC.CUShort -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argDoubleWith" argDoubleWith' :: HoppyF.Ptr QStringConst -> HoppyFC.CDouble -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argDoubleWithField" argDoubleWithField' :: HoppyF.Ptr QStringConst -> HoppyFC.CDouble -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argDoubleWithFieldFormat" argDoubleWithFieldFormat' :: HoppyF.Ptr QStringConst -> HoppyFC.CDouble -> HoppyFC.CInt -> HoppyFC.CChar -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argDoubleWithFieldFormatPrecision" argDoubleWithFieldFormatPrecision' :: HoppyF.Ptr QStringConst -> HoppyFC.CDouble -> HoppyFC.CInt -> HoppyFC.CChar -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argDoubleWithFieldFormatPrecisionFill" argDoubleWithFieldFormatPrecisionFill' :: HoppyF.Ptr QStringConst -> HoppyFC.CDouble -> HoppyFC.CInt -> HoppyFC.CChar -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argCharWith" argCharWith' :: HoppyF.Ptr QStringConst -> HoppyFC.CChar -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argCharWithField" argCharWithField' :: HoppyF.Ptr QStringConst -> HoppyFC.CChar -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argCharWithFieldFill" argCharWithFieldFill' :: HoppyF.Ptr QStringConst -> HoppyFC.CChar -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argQCharWith" argQCharWith' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argQCharWithField" argQCharWithField' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr M16.QCharConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argQCharWithFieldFill" argQCharWithFieldFill' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr M16.QCharConst -> HoppyFC.CInt -> HoppyF.Ptr M16.QCharConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argTwoQStrings" argTwoQStrings' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argThreeQStrings" argThreeQStrings' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argFourQStrings" argFourQStrings' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argFiveQStrings" argFiveQStrings' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argSixQStrings" argSixQStrings' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argSevenQStrings" argSevenQStrings' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argEightQStrings" argEightQStrings' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_argNineQStrings" argNineQStrings' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_at" at' :: HoppyF.Ptr QStringConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr M16.QCharConst) foreign import ccall "genpop__QString_back" back' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr M16.QCharConst) foreign import ccall "genpop__QString_capacity" capacity' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QString_chop" chop' :: HoppyF.Ptr QString -> HoppyFC.CInt -> HoppyP.IO () foreign import ccall "genpop__QString_chopped" chopped' :: HoppyF.Ptr QStringConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_clear" clear' :: HoppyF.Ptr QString -> HoppyP.IO () foreign import ccall "genpop__QString_toHtmlEscaped" toHtmlEscaped' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_toLatin1" toLatin1' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr M12.QByteArrayConst) foreign import ccall "genpop__QString_toLocal8Bit" toLocal8Bit' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr M12.QByteArrayConst) foreign import ccall "genpop__QString_toStdString" toStdString' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr M1.StdStringConst) foreign import ccall "genpop__QString_toUtf8" toUtf8' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr M12.QByteArrayConst) foreign import ccall "genpop__QString_toCaseFolded" toCaseFolded' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_toDouble" toDouble' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CDouble foreign import ccall "genpop__QString_toDoubleWithOk" toDoubleWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyFC.CDouble foreign import ccall "genpop__QString_toFloat" toFloat' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CFloat foreign import ccall "genpop__QString_toFloatWithOk" toFloatWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyFC.CFloat foreign import ccall "genpop__QString_toInt" toInt' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QString_toIntWithOk" toIntWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QString_toIntWithOkAndBase" toIntWithOkAndBase' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QString_toLong" toLong' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CLong foreign import ccall "genpop__QString_toLongWithOk" toLongWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyFC.CLong foreign import ccall "genpop__QString_toLongWithOkAndBase" toLongWithOkAndBase' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CLong foreign import ccall "genpop__QString_toLonglong" toLonglong' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QString_toLonglongWithOk" toLonglongWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QString_toLonglongWithOkAndBase" toLonglongWithOkAndBase' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyDI.Int64 foreign import ccall "genpop__QString_toLower" toLower' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_toShort" toShort' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CShort foreign import ccall "genpop__QString_toShortWithOk" toShortWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyFC.CShort foreign import ccall "genpop__QString_toShortWithOkAndBase" toShortWithOkAndBase' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CShort foreign import ccall "genpop__QString_toUInt" toUInt' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CUInt foreign import ccall "genpop__QString_toUIntWithOk" toUIntWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyFC.CUInt foreign import ccall "genpop__QString_toUIntWithOkAndBase" toUIntWithOkAndBase' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CUInt foreign import ccall "genpop__QString_toULong" toULong' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CULong foreign import ccall "genpop__QString_toULongWithOk" toULongWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyFC.CULong foreign import ccall "genpop__QString_toULongWithOkAndBase" toULongWithOkAndBase' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CULong foreign import ccall "genpop__QString_toUlonglong" toUlonglong' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyDW.Word64 foreign import ccall "genpop__QString_toUlonglongWithOk" toUlonglongWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyDW.Word64 foreign import ccall "genpop__QString_toUlonglongWithOkAndBase" toUlonglongWithOkAndBase' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyDW.Word64 foreign import ccall "genpop__QString_toUshort" toUshort' :: HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CUShort foreign import ccall "genpop__QString_toUshortWithOk" toUshortWithOk' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyP.IO HoppyFC.CUShort foreign import ccall "genpop__QString_toUshortWithOkAndBase" toUshortWithOkAndBase' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr HoppyFC.CBool -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CUShort foreign import ccall "genpop__QString_toUpper" toUpper' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_trimmed" trimmed' :: HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QStringConst) foreign import ccall "genpop__QString_truncate" truncate' :: HoppyF.Ptr QString -> HoppyFC.CInt -> HoppyP.IO () foreign import ccall "genpop__QString_EQ" eQ' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QString_NE" nE' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QString_LT" lT' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QString_LE" lE' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QString_GT" gT' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QString_GE" gE' :: HoppyF.Ptr QStringConst -> HoppyF.Ptr QStringConst -> HoppyP.IO HoppyFC.CBool foreign import ccall "genpop__QString_ASSIGN" aSSIGN' :: HoppyF.Ptr QString -> HoppyF.Ptr QStringConst -> HoppyP.IO (HoppyF.Ptr QString) foreign import ccall "gendel__QString" delete'QString :: HoppyF.Ptr QStringConst -> HoppyP.IO () foreign import ccall "&gendel__QString" deletePtr'QString :: HoppyF.FunPtr (HoppyF.Ptr QStringConst -> HoppyP.IO ()) class QStringValue a where withQStringPtr :: a -> (QStringConst -> HoppyP.IO b) -> HoppyP.IO b instance {-# OVERLAPPABLE #-} QStringConstPtr a => QStringValue a where withQStringPtr = HoppyP.flip ($) . toQStringConst instance {-# OVERLAPPING #-} QStringValue (QtahP.String) where withQStringPtr = HoppyFHR.withCppObj class (HoppyFHR.CppPtr this) => QStringConstPtr this where toQStringConst :: this -> QStringConst arg :: (QStringValue this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QtahP.String) arg arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (arg' arg'1' arg'2') argWithSize :: (QStringValue this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argWithSize arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argWithSize' arg'1' arg'2' arg'3') argWithSizeAndFill :: (QStringValue this, QStringValue arg'2, M16.QCharValue arg'4) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (arg'4) -> (HoppyP.IO QtahP.String) argWithSizeAndFill arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> M16.withQCharPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argWithSizeAndFill' arg'1' arg'2' arg'3' arg'4') argUlonglong :: (QStringValue this) => (this) {- ^ this -} -> (HoppyDW.Word64) -> (HoppyP.IO QtahP.String) argUlonglong arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUlonglong' arg'1' arg'2') argUlonglongWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyDW.Word64) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argUlonglongWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUlonglongWithField' arg'1' arg'2' arg'3') argUlonglongWithFieldAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyDW.Word64) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argUlonglongWithFieldAndBase arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUlonglongWithFieldAndBase' arg'1' arg'2' arg'3' arg'4') argUlonglongWithFieldAndBaseAndFill :: (QStringValue this, M16.QCharValue arg'5) => (this) {- ^ this -} -> (HoppyDW.Word64) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'5) -> (HoppyP.IO QtahP.String) argUlonglongWithFieldAndBaseAndFill arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> M16.withQCharPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUlonglongWithFieldAndBaseAndFill' arg'1' arg'2' arg'3' arg'4' arg'5') argLonglong :: (QStringValue this) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.IO QtahP.String) argLonglong arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argLonglong' arg'1' arg'2') argLonglongWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argLonglongWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argLonglongWithField' arg'1' arg'2' arg'3') argLonglongWithFieldAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argLonglongWithFieldAndBase arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argLonglongWithFieldAndBase' arg'1' arg'2' arg'3' arg'4') argLonglongWithFieldAndBaseAndFill :: (QStringValue this, M16.QCharValue arg'5) => (this) {- ^ this -} -> (HoppyDI.Int64) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'5) -> (HoppyP.IO QtahP.String) argLonglongWithFieldAndBaseAndFill arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> M16.withQCharPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argLonglongWithFieldAndBaseAndFill' arg'1' arg'2' arg'3' arg'4' arg'5') argLong :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CLong) -> (HoppyP.IO QtahP.String) argLong arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argLong' arg'1' arg'2') argLongWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CLong) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argLongWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argLongWithField' arg'1' arg'2' arg'3') argLongWithFieldAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CLong) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argLongWithFieldAndBase arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argLongWithFieldAndBase' arg'1' arg'2' arg'3' arg'4') argLongWithFieldAndBaseAndFill :: (QStringValue this, M16.QCharValue arg'5) => (this) {- ^ this -} -> (HoppyFC.CLong) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'5) -> (HoppyP.IO QtahP.String) argLongWithFieldAndBaseAndFill arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> M16.withQCharPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argLongWithFieldAndBaseAndFill' arg'1' arg'2' arg'3' arg'4' arg'5') argUlong :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CULong) -> (HoppyP.IO QtahP.String) argUlong arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUlong' arg'1' arg'2') argUlongWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CULong) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argUlongWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUlongWithField' arg'1' arg'2' arg'3') argUlongWithFieldAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CULong) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argUlongWithFieldAndBase arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUlongWithFieldAndBase' arg'1' arg'2' arg'3' arg'4') argUlongWithFieldAndBaseAndFill :: (QStringValue this, M16.QCharValue arg'5) => (this) {- ^ this -} -> (HoppyFC.CULong) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'5) -> (HoppyP.IO QtahP.String) argUlongWithFieldAndBaseAndFill arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> M16.withQCharPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUlongWithFieldAndBaseAndFill' arg'1' arg'2' arg'3' arg'4' arg'5') argInt :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argInt arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argInt' arg'1' arg'2') argIntWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argIntWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argIntWithField' arg'1' arg'2' arg'3') argIntWithFieldAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argIntWithFieldAndBase arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argIntWithFieldAndBase' arg'1' arg'2' arg'3' arg'4') argIntWithFieldAndBaseAndFill :: (QStringValue this, M16.QCharValue arg'5) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'5) -> (HoppyP.IO QtahP.String) argIntWithFieldAndBaseAndFill arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> M16.withQCharPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argIntWithFieldAndBaseAndFill' arg'1' arg'2' arg'3' arg'4' arg'5') argUintWith :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CUInt) -> (HoppyP.IO QtahP.String) argUintWith arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUintWith' arg'1' arg'2') argUintWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CUInt) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argUintWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUintWithField' arg'1' arg'2' arg'3') argUintWithFieldAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CUInt) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argUintWithFieldAndBase arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUintWithFieldAndBase' arg'1' arg'2' arg'3' arg'4') argUintWithFieldAndBaseAndFill :: (QStringValue this, M16.QCharValue arg'5) => (this) {- ^ this -} -> (HoppyFC.CUInt) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'5) -> (HoppyP.IO QtahP.String) argUintWithFieldAndBaseAndFill arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> M16.withQCharPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUintWithFieldAndBaseAndFill' arg'1' arg'2' arg'3' arg'4' arg'5') argShortWith :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CShort) -> (HoppyP.IO QtahP.String) argShortWith arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argShortWith' arg'1' arg'2') argShortWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CShort) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argShortWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argShortWithField' arg'1' arg'2' arg'3') argShortWithFieldAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CShort) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argShortWithFieldAndBase arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argShortWithFieldAndBase' arg'1' arg'2' arg'3' arg'4') argShortWithFieldAndBaseAndFill :: (QStringValue this, M16.QCharValue arg'5) => (this) {- ^ this -} -> (HoppyFC.CShort) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'5) -> (HoppyP.IO QtahP.String) argShortWithFieldAndBaseAndFill arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> M16.withQCharPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argShortWithFieldAndBaseAndFill' arg'1' arg'2' arg'3' arg'4' arg'5') argUshortWith :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CUShort) -> (HoppyP.IO QtahP.String) argUshortWith arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUshortWith' arg'1' arg'2') argUshortWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CUShort) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argUshortWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUshortWithField' arg'1' arg'2' arg'3') argUshortWithFieldAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CUShort) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argUshortWithFieldAndBase arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUshortWithFieldAndBase' arg'1' arg'2' arg'3' arg'4') argUshortWithFieldAndBaseAndFill :: (QStringValue this, M16.QCharValue arg'5) => (this) {- ^ this -} -> (HoppyFC.CUShort) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'5) -> (HoppyP.IO QtahP.String) argUshortWithFieldAndBaseAndFill arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'4 >>= \arg'4' -> M16.withQCharPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argUshortWithFieldAndBaseAndFill' arg'1' arg'2' arg'3' arg'4' arg'5') argDoubleWith :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.IO QtahP.String) argDoubleWith arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyP.realToFrac ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argDoubleWith' arg'1' arg'2') argDoubleWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argDoubleWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyP.realToFrac ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argDoubleWithField' arg'1' arg'2' arg'3') argDoubleWithFieldFormat :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.Int) -> (HoppyFC.CChar) -> (HoppyP.IO QtahP.String) argDoubleWithFieldFormat arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyP.realToFrac ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> let arg'4' = arg'4 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argDoubleWithFieldFormat' arg'1' arg'2' arg'3' arg'4') argDoubleWithFieldFormatPrecision :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.Int) -> (HoppyFC.CChar) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argDoubleWithFieldFormatPrecision arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyP.realToFrac ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> let arg'4' = arg'4 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'5 >>= \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argDoubleWithFieldFormatPrecision' arg'1' arg'2' arg'3' arg'4' arg'5') argDoubleWithFieldFormatPrecisionFill :: (QStringValue this, M16.QCharValue arg'6) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.Int) -> (HoppyFC.CChar) -> (HoppyP.Int) -> (arg'6) -> (HoppyP.IO QtahP.String) argDoubleWithFieldFormatPrecisionFill arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyP.realToFrac ) arg'2 >>= \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> let arg'4' = arg'4 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'5 >>= \arg'5' -> M16.withQCharPtr arg'6 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'6' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argDoubleWithFieldFormatPrecisionFill' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6') argCharWith :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CChar) -> (HoppyP.IO QtahP.String) argCharWith arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (HoppyFHR.decodeAndDelete . QStringConst) =<< (argCharWith' arg'1' arg'2') argCharWithField :: (QStringValue this) => (this) {- ^ this -} -> (HoppyFC.CChar) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argCharWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argCharWithField' arg'1' arg'2' arg'3') argCharWithFieldFill :: (QStringValue this, M16.QCharValue arg'4) => (this) {- ^ this -} -> (HoppyFC.CChar) -> (HoppyP.Int) -> (arg'4) -> (HoppyP.IO QtahP.String) argCharWithFieldFill arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> M16.withQCharPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argCharWithFieldFill' arg'1' arg'2' arg'3' arg'4') argQCharWith :: (QStringValue this, M16.QCharValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QtahP.String) argQCharWith arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M16.withQCharPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argQCharWith' arg'1' arg'2') argQCharWithField :: (QStringValue this, M16.QCharValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) argQCharWithField arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M16.withQCharPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argQCharWithField' arg'1' arg'2' arg'3') argQCharWithFieldFill :: (QStringValue this, M16.QCharValue arg'2, M16.QCharValue arg'4) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (arg'4) -> (HoppyP.IO QtahP.String) argQCharWithFieldFill arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> M16.withQCharPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> M16.withQCharPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argQCharWithFieldFill' arg'1' arg'2' arg'3' arg'4') argTwoQStrings :: (QStringValue this, QStringValue arg'2, QStringValue arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO QtahP.String) argTwoQStrings arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argTwoQStrings' arg'1' arg'2' arg'3') argThreeQStrings :: (QStringValue this, QStringValue arg'2, QStringValue arg'3, QStringValue arg'4) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (arg'4) -> (HoppyP.IO QtahP.String) argThreeQStrings arg'1 arg'2 arg'3 arg'4 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argThreeQStrings' arg'1' arg'2' arg'3' arg'4') argFourQStrings :: (QStringValue this, QStringValue arg'2, QStringValue arg'3, QStringValue arg'4, QStringValue arg'5) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (arg'4) -> (arg'5) -> (HoppyP.IO QtahP.String) argFourQStrings arg'1 arg'2 arg'3 arg'4 arg'5 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> withQStringPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argFourQStrings' arg'1' arg'2' arg'3' arg'4' arg'5') argFiveQStrings :: (QStringValue this, QStringValue arg'2, QStringValue arg'3, QStringValue arg'4, QStringValue arg'5, QStringValue arg'6) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (arg'4) -> (arg'5) -> (arg'6) -> (HoppyP.IO QtahP.String) argFiveQStrings arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> withQStringPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> withQStringPtr arg'6 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'6' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argFiveQStrings' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6') argSixQStrings :: (QStringValue this, QStringValue arg'2, QStringValue arg'3, QStringValue arg'4, QStringValue arg'5, QStringValue arg'6, QStringValue arg'7) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (arg'4) -> (arg'5) -> (arg'6) -> (arg'7) -> (HoppyP.IO QtahP.String) argSixQStrings arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> withQStringPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> withQStringPtr arg'6 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'6' -> withQStringPtr arg'7 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'7' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argSixQStrings' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7') argSevenQStrings :: (QStringValue this, QStringValue arg'2, QStringValue arg'3, QStringValue arg'4, QStringValue arg'5, QStringValue arg'6, QStringValue arg'7, QStringValue arg'8) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (arg'4) -> (arg'5) -> (arg'6) -> (arg'7) -> (arg'8) -> (HoppyP.IO QtahP.String) argSevenQStrings arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 arg'8 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> withQStringPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> withQStringPtr arg'6 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'6' -> withQStringPtr arg'7 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'7' -> withQStringPtr arg'8 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'8' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argSevenQStrings' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7' arg'8') argEightQStrings :: (QStringValue this, QStringValue arg'2, QStringValue arg'3, QStringValue arg'4, QStringValue arg'5, QStringValue arg'6, QStringValue arg'7, QStringValue arg'8, QStringValue arg'9) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (arg'4) -> (arg'5) -> (arg'6) -> (arg'7) -> (arg'8) -> (arg'9) -> (HoppyP.IO QtahP.String) argEightQStrings arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 arg'8 arg'9 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> withQStringPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> withQStringPtr arg'6 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'6' -> withQStringPtr arg'7 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'7' -> withQStringPtr arg'8 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'8' -> withQStringPtr arg'9 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'9' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argEightQStrings' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7' arg'8' arg'9') argNineQStrings :: (QStringValue this, QStringValue arg'2, QStringValue arg'3, QStringValue arg'4, QStringValue arg'5, QStringValue arg'6, QStringValue arg'7, QStringValue arg'8, QStringValue arg'9, QStringValue arg'10) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (arg'4) -> (arg'5) -> (arg'6) -> (arg'7) -> (arg'8) -> (arg'9) -> (arg'10) -> (HoppyP.IO QtahP.String) argNineQStrings arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 arg'8 arg'9 arg'10 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> withQStringPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> withQStringPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' -> withQStringPtr arg'5 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'5' -> withQStringPtr arg'6 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'6' -> withQStringPtr arg'7 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'7' -> withQStringPtr arg'8 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'8' -> withQStringPtr arg'9 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'9' -> withQStringPtr arg'10 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'10' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (argNineQStrings' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7' arg'8' arg'9' arg'10') at :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO QtahP.Char) at arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . M16.QCharConst) =<< (at' arg'1' arg'2') back :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.Char) back arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M16.QCharConst) =<< (back' arg'1') capacity :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int) capacity arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (capacity' arg'1') chopped :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO QtahP.String) chopped arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (chopped' arg'1' arg'2') toHtmlEscaped :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String) toHtmlEscaped arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (toHtmlEscaped' arg'1') toLatin1 :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahDBS.ByteString) toLatin1 arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M12.QByteArrayConst) =<< (toLatin1' arg'1') toLocal8Bit :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahDBS.ByteString) toLocal8Bit arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M12.QByteArrayConst) =<< (toLocal8Bit' arg'1') toStdString :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.String) toStdString arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M1.StdStringConst) =<< (toStdString' arg'1') toUtf8 :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahDBS.ByteString) toUtf8 arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . M12.QByteArrayConst) =<< (toUtf8' arg'1') toCaseFolded :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String) toCaseFolded arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (toCaseFolded' arg'1') toDouble :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Double) toDouble arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyP.realToFrac ) =<< (toDouble' arg'1') toDoubleWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyP.Double) toDoubleWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyP.realToFrac ) =<< (toDoubleWithOk' arg'1' arg'2') toFloat :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Float) toFloat arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyP.realToFrac ) =<< (toFloat' arg'1') toFloatWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyP.Float) toFloatWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyP.realToFrac ) =<< (toFloatWithOk' arg'1' arg'2') toInt :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int) toInt arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (toInt' arg'1') toIntWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyP.Int) toIntWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (toIntWithOk' arg'1' arg'2') toIntWithOkAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int) toIntWithOkAndBase arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (toIntWithOkAndBase' arg'1' arg'2' arg'3') toLong :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyFC.CLong) toLong arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toLong' arg'1') toLongWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyFC.CLong) toLongWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (toLongWithOk' arg'1' arg'2') toLongWithOkAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.Int) -> (HoppyP.IO HoppyFC.CLong) toLongWithOkAndBase arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (toLongWithOkAndBase' arg'1' arg'2' arg'3') toLonglong :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyDI.Int64) toLonglong arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toLonglong' arg'1') toLonglongWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyDI.Int64) toLonglongWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (toLonglongWithOk' arg'1' arg'2') toLonglongWithOkAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.Int) -> (HoppyP.IO HoppyDI.Int64) toLonglongWithOkAndBase arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (toLonglongWithOkAndBase' arg'1' arg'2' arg'3') toLower :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String) toLower arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (toLower' arg'1') toShort :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyFC.CShort) toShort arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toShort' arg'1') toShortWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyFC.CShort) toShortWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (toShortWithOk' arg'1' arg'2') toShortWithOkAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.Int) -> (HoppyP.IO HoppyFC.CShort) toShortWithOkAndBase arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (toShortWithOkAndBase' arg'1' arg'2' arg'3') toUInt :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyFC.CUInt) toUInt arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toUInt' arg'1') toUIntWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyFC.CUInt) toUIntWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (toUIntWithOk' arg'1' arg'2') toUIntWithOkAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.Int) -> (HoppyP.IO HoppyFC.CUInt) toUIntWithOkAndBase arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (toUIntWithOkAndBase' arg'1' arg'2' arg'3') toULong :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyFC.CULong) toULong arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toULong' arg'1') toULongWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyFC.CULong) toULongWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (toULongWithOk' arg'1' arg'2') toULongWithOkAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.Int) -> (HoppyP.IO HoppyFC.CULong) toULongWithOkAndBase arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (toULongWithOkAndBase' arg'1' arg'2' arg'3') toUlonglong :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyDW.Word64) toUlonglong arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toUlonglong' arg'1') toUlonglongWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyDW.Word64) toUlonglongWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (toUlonglongWithOk' arg'1' arg'2') toUlonglongWithOkAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.Int) -> (HoppyP.IO HoppyDW.Word64) toUlonglongWithOkAndBase arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (toUlonglongWithOkAndBase' arg'1' arg'2' arg'3') toUshort :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyFC.CUShort) toUshort arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (toUshort' arg'1') toUshortWithOk :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.IO HoppyFC.CUShort) toUshortWithOk arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in (toUshortWithOk' arg'1' arg'2') toUshortWithOkAndBase :: (QStringValue this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CBool) -> (HoppyP.Int) -> (HoppyP.IO HoppyFC.CUShort) toUshortWithOkAndBase arg'1 arg'2 arg'3 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> let arg'2' = arg'2 in ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'3 >>= \arg'3' -> (toUshortWithOkAndBase' arg'1' arg'2' arg'3') toUpper :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String) toUpper arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (toUpper' arg'1') trimmed :: (QStringValue this) => (this) {- ^ this -} -> (HoppyP.IO QtahP.String) trimmed arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> (HoppyFHR.decodeAndDelete . QStringConst) =<< (trimmed' arg'1') eQ :: (QStringValue this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) eQ arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (eQ' arg'1' arg'2') nE :: (QStringValue this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) nE arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (nE' arg'1' arg'2') lT :: (QStringValue this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) lT arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (lT' arg'1' arg'2') lE :: (QStringValue this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) lE arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (lE' arg'1' arg'2') gT :: (QStringValue this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) gT arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (gT' arg'1' arg'2') gE :: (QStringValue this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool) gE arg'1 arg'2 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> ( (HoppyP.return . (/= 0)) ) =<< (gE' arg'1' arg'2') class (QStringConstPtr this) => QStringPtr this where toQString :: this -> QString set :: (QStringPtr arg'1, M16.QCharValue arg'3) => (arg'1) -> (HoppyP.Int) -> (arg'3) -> (HoppyP.IO ()) set arg'1 arg'2 arg'3 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> M16.withQCharPtr arg'3 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'3' -> (set' arg'1' arg'2' arg'3') append :: (QStringPtr this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QString) append arg'1 arg'2 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> HoppyP.fmap QString (append' arg'1' arg'2') appendQChar :: (QStringPtr this, M16.QCharValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QString) appendQChar arg'1 arg'2 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> M16.withQCharPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> HoppyP.fmap QString (appendQChar' arg'1' arg'2') appendPtrConstChar :: (QStringPtr this) => (this) {- ^ this -} -> (HoppyF.Ptr HoppyFC.CChar) -> (HoppyP.IO QString) appendPtrConstChar arg'1 arg'2 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> let arg'2' = arg'2 in HoppyP.fmap QString (appendPtrConstChar' arg'1' arg'2') appendByteArray :: (QStringPtr this, M12.QByteArrayValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QString) appendByteArray arg'1 arg'2 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> M12.withQByteArrayPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> HoppyP.fmap QString (appendByteArray' arg'1' arg'2') chop :: (QStringPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ()) chop arg'1 arg'2 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (chop' arg'1' arg'2') clear :: (QStringPtr this) => (this) {- ^ this -} -> (HoppyP.IO ()) clear arg'1 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> (clear' arg'1') truncate :: (QStringPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ()) truncate arg'1 arg'2 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (truncate' arg'1' arg'2') aSSIGN :: (QStringPtr this, QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QString) aSSIGN arg'1 arg'2 = HoppyFHR.withCppPtr (toQString arg'1) $ \arg'1' -> withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> HoppyP.fmap QString (aSSIGN' arg'1' arg'2') data QStringConst = QStringConst (HoppyF.Ptr QStringConst) | QStringConstGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QStringConst) deriving (HoppyP.Show) instance HoppyP.Eq QStringConst where x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y instance HoppyP.Ord QStringConst where compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y) castQStringToConst :: QString -> QStringConst castQStringToConst (QString ptr') = QStringConst $ HoppyF.castPtr ptr' castQStringToConst (QStringGc fptr' ptr') = QStringConstGc fptr' $ HoppyF.castPtr ptr' instance HoppyFHR.CppPtr QStringConst where nullptr = QStringConst HoppyF.nullPtr withCppPtr (QStringConst ptr') f' = f' ptr' withCppPtr (QStringConstGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr' toPtr (QStringConst ptr') = ptr' toPtr (QStringConstGc _ ptr') = ptr' touchCppPtr (QStringConst _) = HoppyP.return () touchCppPtr (QStringConstGc fptr' _) = HoppyF.touchForeignPtr fptr' instance HoppyFHR.Deletable QStringConst where delete (QStringConst ptr') = delete'QString ptr' delete (QStringConstGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QStringConst", " object."] toGc this'@(QStringConst ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QStringConstGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QString :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ()) toGc this'@(QStringConstGc {}) = HoppyP.return this' instance HoppyFHR.Copyable QStringConst QString where copy = newCopy instance QStringConstPtr QStringConst where toQStringConst = HoppyP.id data QString = QString (HoppyF.Ptr QString) | QStringGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QString) deriving (HoppyP.Show) instance HoppyP.Eq QString where x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y instance HoppyP.Ord QString where compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y) castQStringToNonconst :: QStringConst -> QString castQStringToNonconst (QStringConst ptr') = QString $ HoppyF.castPtr ptr' castQStringToNonconst (QStringConstGc fptr' ptr') = QStringGc fptr' $ HoppyF.castPtr ptr' instance HoppyFHR.CppPtr QString where nullptr = QString HoppyF.nullPtr withCppPtr (QString ptr') f' = f' ptr' withCppPtr (QStringGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr' toPtr (QString ptr') = ptr' toPtr (QStringGc _ ptr') = ptr' touchCppPtr (QString _) = HoppyP.return () touchCppPtr (QStringGc fptr' _) = HoppyF.touchForeignPtr fptr' instance HoppyFHR.Deletable QString where delete (QString ptr') = delete'QString $ (HoppyF.castPtr ptr' :: HoppyF.Ptr QStringConst) delete (QStringGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QString", " object."] toGc this'@(QString ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QStringGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QString :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ()) toGc this'@(QStringGc {}) = HoppyP.return this' instance HoppyFHR.Copyable QString QString where copy = newCopy instance QStringConstPtr QString where toQStringConst (QString ptr') = QStringConst $ (HoppyF.castPtr :: HoppyF.Ptr QString -> HoppyF.Ptr QStringConst) ptr' toQStringConst (QStringGc fptr' ptr') = QStringConstGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr QString -> HoppyF.Ptr QStringConst) ptr' instance QStringPtr QString where toQString = HoppyP.id new :: (HoppyP.IO QString) new = HoppyP.fmap QString (new') newFromByteArray :: (M12.QByteArrayValue arg'1) => (arg'1) -> (HoppyP.IO QString) newFromByteArray arg'1 = M12.withQByteArrayPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> HoppyP.fmap QString (newFromByteArray' arg'1') newFromCString :: (HoppyF.Ptr HoppyFC.CChar) -> (HoppyP.IO QString) newFromCString arg'1 = let arg'1' = arg'1 in HoppyP.fmap QString (newFromCString' arg'1') newFromSizeQChar :: (M16.QCharValue arg'2) => (HoppyP.Int) -> (arg'2) -> (HoppyP.IO QString) newFromSizeQChar arg'1 arg'2 = ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'1 >>= \arg'1' -> M16.withQCharPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' -> HoppyP.fmap QString (newFromSizeQChar' arg'1' arg'2') newFromQChar :: (M16.QCharPtr arg'1) => (arg'1) -> (HoppyP.IO QString) newFromQChar arg'1 = HoppyFHR.withCppPtr (M16.toQChar arg'1) $ \arg'1' -> HoppyP.fmap QString (newFromQChar' arg'1') newCopy :: (QStringValue arg'1) => (arg'1) -> (HoppyP.IO QString) newCopy arg'1 = withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> HoppyP.fmap QString (newCopy' arg'1') class QStringSuper a where downToQString :: a -> QString class QStringSuperConst a where downToQStringConst :: a -> QStringConst instance HoppyFHR.Assignable (HoppyF.Ptr (HoppyF.Ptr QString)) QString where assign ptr' value' = HoppyF.poke ptr' $ HoppyFHR.toPtr value' instance QStringValue a => HoppyFHR.Assignable QString a where assign x' y' = aSSIGN x' y' >> HoppyP.return () instance HoppyFHR.Decodable (HoppyF.Ptr (HoppyF.Ptr QString)) QString where decode = HoppyP.fmap QString . HoppyF.peek instance HoppyFHR.Encodable QString (QtahP.String) where encode = QtahP.flip QtahFC.withCString newFromCString instance HoppyFHR.Encodable QStringConst (QtahP.String) where encode = HoppyP.fmap (toQStringConst) . HoppyFHR.encodeAs (HoppyP.undefined :: QString) instance HoppyFHR.Decodable QString (QtahP.String) where decode = HoppyFHR.decode . toQStringConst instance HoppyFHR.Decodable QStringConst (QtahP.String) where decode = toStdString data QStringNormalizationForm = NormalizationFormD | NormalizationFormC | NormalizationFormKd | NormalizationFormKc | UnknownQStringNormalizationForm (HoppyFC.CInt) deriving (HoppyP.Show) instance HoppyFHR.CppEnum (HoppyFC.CInt) QStringNormalizationForm where fromCppEnum NormalizationFormD = 0 fromCppEnum NormalizationFormC = 1 fromCppEnum NormalizationFormKd = 2 fromCppEnum NormalizationFormKc = 3 fromCppEnum (UnknownQStringNormalizationForm n) = n toCppEnum (0) = NormalizationFormD toCppEnum (1) = NormalizationFormC toCppEnum (2) = NormalizationFormKd toCppEnum (3) = NormalizationFormKc toCppEnum n = UnknownQStringNormalizationForm n instance HoppyP.Eq QStringNormalizationForm where x == y = HoppyFHR.fromCppEnum x == HoppyFHR.fromCppEnum y instance HoppyP.Ord QStringNormalizationForm where compare x y = HoppyP.compare (HoppyFHR.fromCppEnum x) (HoppyFHR.fromCppEnum y) data QStringSectionFlag = SectionDefault | SectionSkipEmpty | SectionIncludeLeadingSep | SectionIncludeTrailingSep | SectionCaseInsensitiveSeps | UnknownQStringSectionFlag (HoppyFC.CInt) deriving (HoppyP.Show) instance HoppyFHR.CppEnum (HoppyFC.CInt) QStringSectionFlag where fromCppEnum SectionDefault = 0 fromCppEnum SectionSkipEmpty = 1 fromCppEnum SectionIncludeLeadingSep = 2 fromCppEnum SectionIncludeTrailingSep = 4 fromCppEnum SectionCaseInsensitiveSeps = 8 fromCppEnum (UnknownQStringSectionFlag n) = n toCppEnum (0) = SectionDefault toCppEnum (1) = SectionSkipEmpty toCppEnum (2) = SectionIncludeLeadingSep toCppEnum (4) = SectionIncludeTrailingSep toCppEnum (8) = SectionCaseInsensitiveSeps toCppEnum n = UnknownQStringSectionFlag n instance HoppyP.Eq QStringSectionFlag where x == y = HoppyFHR.fromCppEnum x == HoppyFHR.fromCppEnum y instance HoppyP.Ord QStringSectionFlag where compare x y = HoppyP.compare (HoppyFHR.fromCppEnum x) (HoppyFHR.fromCppEnum y) newtype QStringSectionFlags = QStringSectionFlags (HoppyFC.CInt) deriving (QtahP.Eq, QtahP.Ord, QtahP.Show) instance QtahFlags.Flags (HoppyFC.CInt) QStringSectionFlag QStringSectionFlags where enumToFlags = QStringSectionFlags . QtahFHR.fromCppEnum flagsToEnum (QStringSectionFlags x') = QtahFHR.toCppEnum x' class IsQStringSectionFlags a where toQStringSectionFlags :: a -> QStringSectionFlags instance IsQStringSectionFlags QStringSectionFlags where toQStringSectionFlags = QtahP.id instance IsQStringSectionFlags QStringSectionFlag where toQStringSectionFlags = QtahFlags.enumToFlags instance IsQStringSectionFlags (HoppyFC.CInt) where toQStringSectionFlags = QtahFlags.numToFlags sectionCaseInsensitiveSeps :: QStringSectionFlags sectionCaseInsensitiveSeps = QStringSectionFlags (8) sectionDefault :: QStringSectionFlags sectionDefault = QStringSectionFlags (0) sectionIncludeLeadingSep :: QStringSectionFlags sectionIncludeLeadingSep = QStringSectionFlags (2) sectionIncludeTrailingSep :: QStringSectionFlags sectionIncludeTrailingSep = QStringSectionFlags (4) sectionSkipEmpty :: QStringSectionFlags sectionSkipEmpty = QStringSectionFlags (1) instance QtahDB.Bits QStringSectionFlags where x .&. y = QtahFlags.numToFlags (QtahFlags.flagsToNum x .&. QtahFlags.flagsToNum y) x .|. y = QtahFlags.numToFlags (QtahFlags.flagsToNum x .|. QtahFlags.flagsToNum y) xor x y = QtahFlags.numToFlags $ QtahDB.xor (QtahFlags.flagsToNum x) (QtahFlags.flagsToNum y) complement x = QtahFlags.numToFlags $ QtahDB.complement $ QtahFlags.flagsToNum x shift x i = QtahFlags.numToFlags $ QtahDB.shift (QtahFlags.flagsToNum x) i rotate x i = QtahFlags.numToFlags $ QtahDB.rotate (QtahFlags.flagsToNum x) i bitSize x = case QtahDB.bitSizeMaybe x of QtahP.Just n -> n QtahP.Nothing -> QtahP.error "bitSize is undefined" bitSizeMaybe = QtahDB.bitSizeMaybe . QtahFlags.flagsToNum isSigned = QtahDB.isSigned . QtahFlags.flagsToNum testBit x i = QtahDB.testBit (QtahFlags.flagsToNum x) i bit = QtahFlags.numToFlags . QtahDB.bit popCount = QtahDB.popCount . QtahFlags.flagsToNum data QStringSplitBehavior = KeepEmptyParts | SkipEmptyParts | UnknownQStringSplitBehavior (HoppyFC.CInt) deriving (HoppyP.Show) instance HoppyFHR.CppEnum (HoppyFC.CInt) QStringSplitBehavior where fromCppEnum KeepEmptyParts = 0 fromCppEnum SkipEmptyParts = 1 fromCppEnum (UnknownQStringSplitBehavior n) = n toCppEnum (0) = KeepEmptyParts toCppEnum (1) = SkipEmptyParts toCppEnum n = UnknownQStringSplitBehavior n instance HoppyP.Eq QStringSplitBehavior where x == y = HoppyFHR.fromCppEnum x == HoppyFHR.fromCppEnum y instance HoppyP.Ord QStringSplitBehavior where compare x y = HoppyP.compare (HoppyFHR.fromCppEnum x) (HoppyFHR.fromCppEnum y)