diff --git a/elm-export.cabal b/elm-export.cabal
--- a/elm-export.cabal
+++ b/elm-export.cabal
@@ -1,5 +1,5 @@
 name: elm-export
-version: 0.5.0.1
+version: 0.5.0.2
 cabal-version: >=1.10
 build-type: Simple
 license: OtherLicense
@@ -51,7 +51,7 @@
         base >=4.8.2.0 && <4.9,
         bytestring >=0.10.6.0 && <0.11,
         containers >=0.5.6.2 && <0.6,
-        elm-export >=0.5.0.1 && <0.6,
+        elm-export >=0.5.0.2 && <0.6,
         hspec >=2.2.3 && <2.3,
         hspec-core >=2.2.3 && <2.3,
         quickcheck-instances >=0.3.12 && <0.4,
diff --git a/src/Elm/Type.hs b/src/Elm/Type.hs
--- a/src/Elm/Type.hs
+++ b/src/Elm/Type.hs
@@ -150,16 +150,16 @@
     toElmType _ = ElmPrimitive EFloat
 
 instance ElmType Int8 where
-    toElmType _ = Primitive "Int"
+    toElmType _ = ElmPrimitive EInt
 
 instance ElmType Int16 where
-    toElmType _ = Primitive "Int"
+    toElmType _ = ElmPrimitive EInt
 
 instance ElmType Int32 where
-    toElmType _ = Primitive "Int"
+    toElmType _ = ElmPrimitive EInt
 
 instance ElmType Int64 where
-    toElmType _ = Primitive "Int"
+    toElmType _ = ElmPrimitive EInt
 
 instance (ElmType a, ElmType b) =>
          ElmType (a, b) where
diff --git a/test/ExportSpec.hs b/test/ExportSpec.hs
--- a/test/ExportSpec.hs
+++ b/test/ExportSpec.hs
@@ -5,6 +5,7 @@
 module ExportSpec where
 
 import           Data.Char
+import           Data.Int
 import           Data.Map
 import           Data.Monoid
 import           Data.Proxy
@@ -58,6 +59,14 @@
 newtype FavoritePlaces =
   FavoritePlaces {positionsByUser :: Map String [Position]}
   deriving (Generic,ElmType)
+
+-- | We don't actually use this type, we just need to see that it compiles.
+data LotsOfInts = LotsOfInts
+    { intA :: Int8
+    , intB :: Int16
+    , intC :: Int32
+    , intD :: Int64
+    } deriving (Generic, ElmType)
 
 spec :: Hspec.Spec
 spec =