{-# LANGUAGE ForeignFunctionInterface, TypeFamilies, MultiParamTypeClasses, FlexibleInstances, TypeSynonymInstances, EmptyDataDecls, ExistentialQuantification, ScopedTypeVariables #-} module OGDF.LayeredCrossMinModule.RawType where import Foreign.Ptr import FFICXX.Runtime.Cast data RawLayeredCrossMinModule newtype LayeredCrossMinModule = LayeredCrossMinModule (Ptr RawLayeredCrossMinModule) deriving (Eq, Ord, Show) instance () => FPtr (LayeredCrossMinModule) where type Raw LayeredCrossMinModule = RawLayeredCrossMinModule get_fptr (LayeredCrossMinModule ptr) = ptr cast_fptr_to_obj = LayeredCrossMinModule