 --------------------------------------------------------------------------------
 
 module Foreign.CUDA.Runtime.Error
-  (
-    Status(..),
-    describe,
-    resultIfOk,
-    nothingIfOk
-  )
   where
 
+
+-- Friends
+import Foreign.CUDA.Internal.C2HS
+
+-- System
 import Foreign
 import Foreign.C
-
-import Foreign.CUDA.Internal.C2HS
+import Data.Typeable
+import Control.Exception
 
 #include <cuda_runtime_api.h>
 {# context lib="cudart" #}
 
 
 --------------------------------------------------------------------------------
--- Data Types
+-- Return Status
 --------------------------------------------------------------------------------
 
 --

    with prefix="cudaError" deriving (Eq, Show) #}

--------------------------------------------------------------------------------
-- Functions
--------------------------------------------------------------------------------

-- |

{-# LANGUAGE ForeignFunctionInterface, DeriveDataTypeable #-}
--------------------------------------------------------------------------------
-- |
-- Module    : Foreign.CUDA.Runtime.Error
