diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,3 +1,7 @@
+### 2.0.4.1
+
+Fix build for GHC 7.10 [#151](https://github.com/yesodweb/shakespeare/pull/151)
+
 ### 2.0.4
 
 * [Add multiline literal aligned with bar #148](https://github.com/yesodweb/shakespeare/pull/148)
diff --git a/Text/Hamlet.hs b/Text/Hamlet.hs
--- a/Text/Hamlet.hs
+++ b/Text/Hamlet.hs
@@ -127,6 +127,7 @@
     (pattern, scope) <- bindingPattern b
     return (AsP name pattern, (i, VarE name):scope)
 bindingPattern (BindVar i@(Ident s))
+    | s == "_" = return (WildP, [])
     | all isDigit s = do
         return (LitP $ IntegerL $ read s, [])
     | otherwise = do
diff --git a/shakespeare.cabal b/shakespeare.cabal
--- a/shakespeare.cabal
+++ b/shakespeare.cabal
@@ -1,5 +1,5 @@
 name:            shakespeare
-version:         2.0.4
+version:         2.0.4.1
 license:         MIT
 license-file:    LICENSE
 author:          Michael Snoyman <michael@snoyman.com>