{-# LANGUAGE ForeignFunctionInterface, InterruptibleFFI #-} module OGDF.NodeElement.FFI where import Data.Word import Data.Int import Foreign.C import Foreign.Ptr import OGDF.NodeElement.RawType import OGDF.NodeElement.RawType foreign import ccall interruptible "OGDFNodeElement.h NodeElement_delete" c_nodeelement_delete :: Ptr RawNodeElement -> IO () foreign import ccall interruptible "OGDFNodeElement.h NodeElement_nodeElement_index" c_nodeelement_nodeelement_index :: Ptr RawNodeElement -> IO CInt foreign import ccall interruptible "OGDFNodeElement.h NodeElement_nodeElement_indeg" c_nodeelement_nodeelement_indeg :: Ptr RawNodeElement -> IO CInt foreign import ccall interruptible "OGDFNodeElement.h NodeElement_nodeElement_outdeg" c_nodeelement_nodeelement_outdeg :: Ptr RawNodeElement -> IO CInt foreign import ccall interruptible "OGDFNodeElement.h NodeElement_nodeElement_degree" c_nodeelement_nodeelement_degree :: Ptr RawNodeElement -> IO CInt foreign import ccall interruptible "OGDFNodeElement.h NodeElement_nodeElement_succ" c_nodeelement_nodeelement_succ :: Ptr RawNodeElement -> IO (Ptr RawNodeElement) foreign import ccall interruptible "OGDFNodeElement.h NodeElement_nodeElement_pred" c_nodeelement_nodeelement_pred :: Ptr RawNodeElement -> IO (Ptr RawNodeElement)