diff --git a/CHANGELOG.markdown b/CHANGELOG.markdown
--- a/CHANGELOG.markdown
+++ b/CHANGELOG.markdown
@@ -1,3 +1,7 @@
+0.1.1
+-----
+* Added a `CTYPE` to the Half declaration so that it can be used with `CApiFFI` as an unsigned short.
+
 0.1
 ---
 * Initial release
diff --git a/half.cabal b/half.cabal
--- a/half.cabal
+++ b/half.cabal
@@ -1,6 +1,6 @@
 name:          half
 category:      Numeric
-version:       0.1
+version:       0.1.1
 license:       BSD3
 cabal-version: >= 1.8
 license-file:  LICENSE
diff --git a/src/Numeric/Half.hs b/src/Numeric/Half.hs
--- a/src/Numeric/Half.hs
+++ b/src/Numeric/Half.hs
@@ -48,7 +48,7 @@
 foreign import ccall unsafe "hs_halfToFloat" toFloat :: Half -> Float
 {-# RULES "toFloat" realToFrac = toFloat #-}
 
-newtype Half = Half { getHalf :: CUShort } deriving (Storable, Typeable)
+newtype {-# CTYPE "unsigned short" #-} Half = Half { getHalf :: CUShort } deriving (Storable, Typeable)
 
 instance Show Half where
   showsPrec d h = showsPrec d (toFloat h)