{-# LANGUAGE EmptyDataDecls, FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, IncoherentInstances, MultiParamTypeClasses, OverlappingInstances, TemplateHaskell, TypeFamilies, TypeSynonymInstances #-} module OGDF.MedianHeuristic.Implementation where import Data.Monoid import Data.Word import Data.Int import Foreign.C import Foreign.Ptr import Language.Haskell.TH import Language.Haskell.TH.Syntax import System.IO.Unsafe import FFICXX.Runtime.Cast import FFICXX.Runtime.CodeGen.Cxx import FFICXX.Runtime.TH import OGDF.MedianHeuristic.RawType import OGDF.MedianHeuristic.FFI import OGDF.MedianHeuristic.Interface import OGDF.MedianHeuristic.Cast import OGDF.MedianHeuristic.RawType import OGDF.MedianHeuristic.Cast import OGDF.MedianHeuristic.Interface import STD.Deletable.RawType import STD.Deletable.Cast import STD.Deletable.Interface import OGDF.LayerByLayerSweep.RawType import OGDF.LayerByLayerSweep.Cast import OGDF.LayerByLayerSweep.Interface import OGDF.LayeredCrossMinModule.RawType import OGDF.LayeredCrossMinModule.Cast import OGDF.LayeredCrossMinModule.Interface instance () => IMedianHeuristic (MedianHeuristic) where instance () => IDeletable (MedianHeuristic) where delete :: MedianHeuristic -> IO () delete = (Ptr RawMedianHeuristic -> IO ()) -> MedianHeuristic -> IO () forall a ca y cy. (Castable a ca, Castable y cy) => (ca -> IO cy) -> a -> IO y xform0 Ptr RawMedianHeuristic -> IO () c_medianheuristic_delete instance () => ILayerByLayerSweep (MedianHeuristic) where instance () => ILayeredCrossMinModule (MedianHeuristic) where newMedianHeuristic :: () => IO MedianHeuristic newMedianHeuristic :: IO MedianHeuristic newMedianHeuristic = IO (Ptr RawMedianHeuristic) -> IO MedianHeuristic forall a ca. Castable a ca => IO ca -> IO a xformnull IO (Ptr RawMedianHeuristic) c_medianheuristic_newmedianheuristic