diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+## 0.1.1.0
+
+- Add `parseExprWithParseFixities` to configure parsers flexibly (e.g. parse as `++`, but interpret it as `join`)
+
 ## 0.1.0.0
 
 - Initial Release
diff --git a/egison-pattern-src-th-mode.cabal b/egison-pattern-src-th-mode.cabal
--- a/egison-pattern-src-th-mode.cabal
+++ b/egison-pattern-src-th-mode.cabal
@@ -1,6 +1,6 @@
 cabal-version:      2.0
 name:               egison-pattern-src-th-mode
-version:            0.1.0.0
+version:            0.1.1.0
 synopsis:
   Parser and pretty printer for Egison pattern expressions to use with TH
 
@@ -32,7 +32,7 @@
   build-depends:
       base                             >=4.7    && <5
     , egison-pattern-src               ^>=0.1.0
-    , egison-pattern-src-haskell-mode  ^>=0.1.0
+    , egison-pattern-src-haskell-mode  ^>=0.1.1
     , haskell-src-exts                 >=1.11.1 && <1.24
     , haskell-src-meta                 >=0.0.0  && <0.9
     , mtl                              ^>=2.2.1
diff --git a/src/Language/Egison/Parser/Pattern/Mode/Haskell/TH.hs b/src/Language/Egison/Parser/Pattern/Mode/Haskell/TH.hs
--- a/src/Language/Egison/Parser/Pattern/Mode/Haskell/TH.hs
+++ b/src/Language/Egison/Parser/Pattern/Mode/Haskell/TH.hs
@@ -12,6 +12,7 @@
     Expr
   , parseExpr
   , parseExprWithFixities
+  , parseExprWithParseFixities
   -- * Converting 'Expr'
   , toTH
   )
@@ -47,8 +48,10 @@
 import qualified Language.Egison.Parser.Pattern.Mode.Haskell
                                                as HaskellMode
                                                 ( Fixity
+                                                , ParseFixity
                                                 , parseExpr
                                                 , parseExprWithFixities
+                                                , parseExprWithParseFixities
                                                 )
 
 
@@ -75,3 +78,14 @@
   -> m Expr
 parseExprWithFixities mode fixities =
   fmap toTH . HaskellMode.parseExprWithFixities mode fixities
+
+-- | Parse 'Expr' using 'Haskell.ParseMode' from @haskell-src-exts@, while supplying an explicit list of 'HaskellMode.ParseFixity'.
+-- Note that fixities obtained from 'Haskell.ParseMode' are just ignored here.
+parseExprWithParseFixities
+  :: MonadError (Errors String) m
+  => Haskell.ParseMode
+  -> [HaskellMode.ParseFixity]
+  -> String
+  -> m Expr
+parseExprWithParseFixities mode fixities =
+  fmap toTH . HaskellMode.parseExprWithParseFixities mode fixities