diff --git a/CHANGES.md b/CHANGES.md
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -1,5 +1,9 @@
 # Change Log
 
+## 2.0.7
+
+* Update benchmarks for ST MonadFail removal
+
 ## 2.0.6
 
 * Relax bounds on mtl and vector
diff --git a/bench/BenchMain.hs b/bench/BenchMain.hs
--- a/bench/BenchMain.hs
+++ b/bench/BenchMain.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE LambdaCase #-}
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE QuasiQuotes #-}
 
@@ -34,8 +35,11 @@
 countTokens :: ByteString -> Int
 countTokens s =
   runST $ do
-    Right x <- lexerNew def { lexerOptionInput = s }
-    go x 0
+    lexerNew def { lexerOptionInput = s } >>= \case
+      Left x -> do
+        error $ bcUnpack x
+      Right x -> do
+        go x 0
   where
     go x a = do
       lexerNext x
diff --git a/zenacy-html.cabal b/zenacy-html.cabal
--- a/zenacy-html.cabal
+++ b/zenacy-html.cabal
@@ -1,5 +1,5 @@
 cabal-version: >= 1.10
-version: 2.0.6
+version: 2.0.7
 name:
   zenacy-html
 synopsis: