git.iko.soy/typeable/file-embed
on master help sign in
support template-haskell 2.16, GHC 8.10 (#28)
commit03484ad401260e1d3b9dfc5d6f7cda05d84f11c9 authorSimon Michael <simon@joyful.com> dateSat 14 Dec 2019, 07:57 (7 years ago) parent47b499c
1 file changed+5−1
Data/FileEmbed.hs+5−1
Data/FileEmbed.hs+5−1
@@ -143,7 +143,11 @@ pairToExp _root (path, bs) = do
143143 qAddDependentFile $ _root ++ '/' : path
144144#endif
145145 exp' <- bsToExp bs
146− return $! TupE [LitE $ StringL path, exp']
146+ return $! TupE
147+#if MIN_VERSION_template_haskell(2,16,0)
148+ $ map Just
149+#endif
150+ [LitE $ StringL path, exp']
147151
148152bsToExp :: B.ByteString -> Q Exp
149153#if MIN_VERSION_template_haskell(2, 5, 0)