Destructors.hs

{-# LANGUAGE CApiFFI #-}
module OpenCascade.STEPControl.Internal.Destructors 
( deleteWriter
, deleteReader
) where

import OpenCascade.STEPControl.Types

import Foreign.Ptr

foreign import capi unsafe "hs_STEPControl_Writer.h hs_delete_STEPControl_Writer" deleteWriter :: Ptr Writer -> IO ()
foreign import capi unsafe "hs_STEPControl_Reader.h hs_delete_STEPControl_Reader" deleteReader :: Ptr Reader -> IO ()