diff --git a/Generator.hs b/Generator.hs
--- a/Generator.hs
+++ b/Generator.hs
@@ -410,6 +410,7 @@
       , "Foreign.C.Types"
       , "Foreign.Ptr"
       , "Graphics.GL.Raw.Types"
+      , "Numeric.Half"
       ]
     ] ++ nub (Foldable.concatMap invokers (funSignatures fm))
 
@@ -419,7 +420,8 @@
   , Function ni (printf "MonadIO m => FunPtr (%s) -> %s" v' v) $
       printf "fp %s = liftIO (%s fp %s)" params nd params
   ] where
-  numArgs = subtract 2 . length $ splitOn " -> " v
+  parts = splitOn " -> " v
+  numArgs = subtract 2 $ length parts
   params = joinOn " " $ map (\x -> "v" ++ show x) [0..numArgs]
   v' = ioish v
   nd = dynamicName v
diff --git a/dist/build/autogen/Graphics/GL/Raw/Internal/FFI.hs b/dist/build/autogen/Graphics/GL/Raw/Internal/FFI.hs
--- a/dist/build/autogen/Graphics/GL/Raw/Internal/FFI.hs
+++ b/dist/build/autogen/Graphics/GL/Raw/Internal/FFI.hs
@@ -865,6 +865,7 @@
 import Foreign.C.Types
 import Foreign.Ptr
 import Graphics.GL.Raw.Types
+import Numeric.Half
 
 foreign import ccall "dynamic" dynenumfloatIOV :: FunPtr (GLenum -> GLfloat -> IO ()) -> GLenum -> GLfloat -> IO ()
 
diff --git a/gl.cabal b/gl.cabal
--- a/gl.cabal
+++ b/gl.cabal
@@ -1,13 +1,13 @@
 name:          gl
-version:       0.1
+version:       0.2
 synopsis:      Complete OpenGL raw bindings
 description:   Complete OpenGL raw bindings
 license:       BSD3
 license-file:  LICENSE
 author:        Edward A. Kmett, Gabríel Arthúr Pétursson, Sven Panne
 maintainer:    ekmett@gmail.com
-copyright:     Copyright © 2014 Edward A. Kmett
-               Copyright © 2014 Gabríel Arthúr Pétursson
+copyright:     Copyright © 2014 Edward A. Kmett,
+               Copyright © 2014 Gabríel Arthúr Pétursson,
                Copyright © 2013 Sven Panne
 category:      Graphics
 build-type:    Custom
@@ -39,6 +39,7 @@
   build-depends:
       base == 4.*
     , containers == 0.5.*
+    , half >= 0.1 && < 0.2
     , transformers >= 0.2 && < 0.5
     , vector == 0.10.*
 
diff --git a/src/Graphics/GL/Raw/Types.hs b/src/Graphics/GL/Raw/Types.hs
--- a/src/Graphics/GL/Raw/Types.hs
+++ b/src/Graphics/GL/Raw/Types.hs
@@ -59,6 +59,7 @@
 import Data.Word
 import Foreign.C.Types
 import Foreign.Ptr
+import Numeric.Half
 
 type GLDEBUGPROC =
   FunPtr (GLenum
@@ -124,7 +125,7 @@
 type GLenum = CUInt
 type GLfixed = GLint
 type GLfloat = CFloat
-type GLhalfNV = CUShort
+type GLhalfNV = Half
 type GLint = CInt
 type GLint64 = Int64
 type GLint64EXT = Int64