   clGetMemReferenceCount, clGetMemContext,
   -- * Image Functions
   clCreateImage2D, clCreateImage3D, clGetSupportedImageFormats,
+  clGetImageFormat, clGetImageElementSize, clGetImageRowPitch,
+  clGetImageSlicePitch, clGetImageWidth, clGetImageHeight, clGetImageDepth,
   -- * Sampler Functions
   clCreateSampler, clRetainSampler, clReleaseSampler, clGetSamplerReferenceCount, 
   clGetSamplerContext, clGetSamplerAddressingMode, clGetSamplerFilterMode, 

    where
      flags = bitmaskFromFlags xs

#c
enum CLMemInfo {
  cL_MEM_TYPE=CL_MEM_TYPE,

import Control.Applicative( (<$>), (<*>) )
import Control.Parallel.OpenCL.Types( 
  CLMem, CLContext, CLSampler, CLint, CLuint, CLbool, CLMemFlags_,
  CLMemInfo_, CLAddressingMode_, CLFilterMode_, CLSamplerInfo_, CLImageInfo_,
  CLAddressingMode(..), CLFilterMode(..), CLMemFlag(..), CLMemObjectType_, 
  CLMemObjectType(..), 
  wrapPError, wrapCheckSuccess, wrapGetInfo, whenSuccess, getEnumCL, 
