packages feed

opencascade-hs-0.7.0.0: src/OpenCascade/Quantity/Internal/Destructors.hs

{-# LANGUAGE CApiFFI #-}
module OpenCascade.Quantity.Internal.Destructors
( deleteColor
, deleteColorRGBA
) where

import OpenCascade.Quantity.Types
import Foreign.Ptr

foreign import capi unsafe "hs_Quantity_Color.h hs_delete_Quantity_Color" deleteColor :: Ptr Color -> IO ()

foreign import capi unsafe "hs_Quantity_ColorRGBA.h hs_delete_Quantity_ColorRGBA" deleteColorRGBA :: Ptr ColorRGBA -> IO ()