{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, GeneralizedNewtypeDeriving, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-}
{-# LANGUAGE NoMonomorphismRestriction #-}
module Graphics.UI.Qtah.Core.QPoint (
QPointValue (..),
QPointConstPtr (..),
QPointPtr (..),
QPointConst,
QPoint,
castConst,
cast,
downCastConst,
downCast,
encode,
decode,
new,
newCopy,
newNull,
aDDA,
aSSIGN,
dIVA,
dotProduct,
eQ,
isNull,
mULA,
mULAReal,
manhattanLength,
nE,
sUBA,
setX,
setY,
x,
y,
) where
import qualified Foreign.Hoppy.Runtime as QtahFHR
import qualified Graphics.UI.Qtah.Core.HPoint as HPoint
import Graphics.UI.Qtah.Generated.Core.QPoint
import Prelude ()
import qualified Prelude as QtahP
castConst = toQPointConst
cast = toQPoint
downCastConst = downToQPointConst
downCast = downToQPoint
encode :: HPoint.HPoint -> QtahP.IO QPoint
encode = QtahFHR.encodeAs (QtahP.undefined :: QPoint)
decode :: (QPointConstPtr this) => this -> QtahP.IO HPoint.HPoint
decode = QtahFHR.decode QtahP.. toQPointConst