Document and expose AFDtype.

Author: dmjio

src/ArrayFire/Internal/Defines.hsc

@@ -42,9 +42,14 @@ newtype AFErr = AFErr { afError :: CInt }
  , afErrUnknown = AF_ERR_UNKNOWN
  }
 
-newtype AFDtype = AFDtype { afDType :: CInt }
-  deriving (Show, Eq, Storable)
-
+-- | Low-level for representation of ArrayFire types
+newtype AFDtype
+  = AFDtype
+  { afDType :: CInt
+  -- ^ Value corresponding to ArrayFire type
+  } deriving (Show, Eq, Storable)
+
+-- | Enums for AFDtype
 #{enum AFDtype, AFDtype
  , f32 = f32
  , c32 = c32

src/ArrayFire/Types.hs

@@ -56,8 +56,10 @@ module ArrayFire.Types
   , BorderType          (..)
   , Storage             (..)
   , AFDType             (..)
+  , AFDtype             (..)
   , ColorMap            (..)
   ) where
 
 import ArrayFire.Exception
 import ArrayFire.Internal.Types
+import ArrayFire.Internal.Defines