elm-export 0.5.0.1 → 0.5.0.2
raw patch · 3 files changed
+15/−6 lines, 3 filesdep ~elm-export
Dependency ranges changed: elm-export
Files
- elm-export.cabal +2/−2
- src/Elm/Type.hs +4/−4
- test/ExportSpec.hs +9/−0
elm-export.cabal view
@@ -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,
src/Elm/Type.hs view
@@ -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
test/ExportSpec.hs view
@@ -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 =