diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,9 +2,13 @@
 
 See full history at: <https://github.com/faylang/fay/commits>
 
+#### 0.19.2.1 (2014-04-14)
+
+* Allow `haskell-src-exts 1.15.*`
+
 ### 0.19.2 (2014-04-10)
 
-* Fixes a bug where arrays types with an empty data decls would be deserialized into a Fay list.
+* Fixes a bug where arrays used with empty data decls would be deserialized into a Fay list instead of kept as is.
 
 #### 0.19.1.2 (2014-04-07)
 
diff --git a/fay.cabal b/fay.cabal
--- a/fay.cabal
+++ b/fay.cabal
@@ -1,5 +1,5 @@
 name:                fay
-version:             0.19.2
+version:             0.19.2.1
 synopsis:            A compiler for Fay, a Haskell subset that compiles to JavaScript.
 description:         Fay is a proper subset of Haskell which is type-checked
                      with GHC, and compiled to JavaScript. It is lazy, pure, has a Fay monad,
@@ -113,7 +113,7 @@
                    , ghc-paths                          < 0.2
                    , haskell-names        >= 0.3.1   && < 0.4
                    , haskell-packages     == 0.2.3.1 || > 0.2.3.2 && < 0.3
-                   , haskell-src-exts     >= 1.14    && < 1.15
+                   , haskell-src-exts     >= 1.14    && < 1.16
                    , language-ecmascript  >= 0.15    && < 1.0
                    , mtl                                < 2.2
                    , pretty-show          >= 1.6     && < 1.7
diff --git a/src/Fay/Compiler/FFI.hs b/src/Fay/Compiler/FFI.hs
--- a/src/Fay/Compiler/FFI.hs
+++ b/src/Fay/Compiler/FFI.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP               #-}
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE TupleSections     #-}
 {-# LANGUAGE ViewPatterns      #-}
@@ -57,6 +58,9 @@
       TyParen _ t       -> TyParen () <$> rmNewtys t
       TyInfix _ t1 q t2 -> flip (TyInfix ()) (unAnn q) <$> rmNewtys t1 <*> rmNewtys t2
       TyKind _ t k      -> flip (TyKind ()) (unAnn k) <$> rmNewtys t
+#if MIN_VERSION_haskell_src_exts(1,15,0)
+      TyPromoted {}     -> return $ unAnn typ
+#endif
     compileFFI' :: N.Type -> Compile JsExp
     compileFFI' sig = do
       let name = fromMaybe "<exp>" nameopt
diff --git a/src/Fay/FFI.hs b/src/Fay/FFI.hs
--- a/src/Fay/FFI.hs
+++ b/src/Fay/FFI.hs
@@ -14,7 +14,7 @@
 
 import           Data.String (IsString)
 import           Fay.Types
-import           Prelude     (Bool, Char, Double, Int, Maybe, String, error)
+import           Prelude     (error)
 
 -- | Values that may be null
 --  Nullable x decodes to x, Null decodes to null.