{-# LANGUAGE ForeignFunctionInterface, TypeFamilies,
  MultiParamTypeClasses, FlexibleInstances, TypeSynonymInstances,
  EmptyDataDecls, ExistentialQuantification, ScopedTypeVariables #-}
module GDAL.OGRLayer.RawType where
import Foreign.Ptr
import FFICXX.Runtime.Cast

data RawOGRLayer

newtype OGRLayer = OGRLayer (Ptr RawOGRLayer)
                     deriving (OGRLayer -> OGRLayer -> Bool
(OGRLayer -> OGRLayer -> Bool)
-> (OGRLayer -> OGRLayer -> Bool) -> Eq OGRLayer
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: OGRLayer -> OGRLayer -> Bool
== :: OGRLayer -> OGRLayer -> Bool
$c/= :: OGRLayer -> OGRLayer -> Bool
/= :: OGRLayer -> OGRLayer -> Bool
Eq, Eq OGRLayer
Eq OGRLayer
-> (OGRLayer -> OGRLayer -> Ordering)
-> (OGRLayer -> OGRLayer -> Bool)
-> (OGRLayer -> OGRLayer -> Bool)
-> (OGRLayer -> OGRLayer -> Bool)
-> (OGRLayer -> OGRLayer -> Bool)
-> (OGRLayer -> OGRLayer -> OGRLayer)
-> (OGRLayer -> OGRLayer -> OGRLayer)
-> Ord OGRLayer
OGRLayer -> OGRLayer -> Bool
OGRLayer -> OGRLayer -> Ordering
OGRLayer -> OGRLayer -> OGRLayer
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: OGRLayer -> OGRLayer -> Ordering
compare :: OGRLayer -> OGRLayer -> Ordering
$c< :: OGRLayer -> OGRLayer -> Bool
< :: OGRLayer -> OGRLayer -> Bool
$c<= :: OGRLayer -> OGRLayer -> Bool
<= :: OGRLayer -> OGRLayer -> Bool
$c> :: OGRLayer -> OGRLayer -> Bool
> :: OGRLayer -> OGRLayer -> Bool
$c>= :: OGRLayer -> OGRLayer -> Bool
>= :: OGRLayer -> OGRLayer -> Bool
$cmax :: OGRLayer -> OGRLayer -> OGRLayer
max :: OGRLayer -> OGRLayer -> OGRLayer
$cmin :: OGRLayer -> OGRLayer -> OGRLayer
min :: OGRLayer -> OGRLayer -> OGRLayer
Ord, Int -> OGRLayer -> ShowS
[OGRLayer] -> ShowS
OGRLayer -> String
(Int -> OGRLayer -> ShowS)
-> (OGRLayer -> String) -> ([OGRLayer] -> ShowS) -> Show OGRLayer
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> OGRLayer -> ShowS
showsPrec :: Int -> OGRLayer -> ShowS
$cshow :: OGRLayer -> String
show :: OGRLayer -> String
$cshowList :: [OGRLayer] -> ShowS
showList :: [OGRLayer] -> ShowS
Show)

instance () => FPtr (OGRLayer) where
        type Raw OGRLayer = RawOGRLayer
        get_fptr :: OGRLayer -> Ptr (Raw OGRLayer)
get_fptr (OGRLayer Ptr RawOGRLayer
ptr) = Ptr (Raw OGRLayer)
Ptr RawOGRLayer
ptr
        cast_fptr_to_obj :: Ptr (Raw OGRLayer) -> OGRLayer
cast_fptr_to_obj = Ptr (Raw OGRLayer) -> OGRLayer
Ptr RawOGRLayer -> OGRLayer
OGRLayer