Nicer fail for Compiler
commitb83b90b2667dbfd2cd208cd4ca41d893513ff800
authorJasper Van der Jeugt <m@jaspervdj.be>
dateMon 7 Jan 2013, 15:57 (14 years ago)
parentbbc2631
src/Hakyll/Core/Compiler/Internal.hs+3
@@ -126,6 +126,9 @@ instance Monad Compiler where
126126 CompilerRequire i c' -> return $ CompilerRequire i $ c' >>= f
127127 {-# INLINE (>>=) #-}
128128
129+ fail = compilerThrow
130+ {-# INLINE fail #-}
131+
129132
130133--------------------------------------------------------------------------------
131134instance Applicative Compiler where