summaryrefslogtreecommitdiff
path: root/libraries/template-haskell/Language/Haskell/TH/PprLib.hs
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/template-haskell/Language/Haskell/TH/PprLib.hs')
-rw-r--r--libraries/template-haskell/Language/Haskell/TH/PprLib.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/libraries/template-haskell/Language/Haskell/TH/PprLib.hs b/libraries/template-haskell/Language/Haskell/TH/PprLib.hs
index e398094fef..1a99207807 100644
--- a/libraries/template-haskell/Language/Haskell/TH/PprLib.hs
+++ b/libraries/template-haskell/Language/Haskell/TH/PprLib.hs
@@ -158,6 +158,7 @@ instance Applicative PprM where
(<*>) = ap
instance Monad PprM where
+ return = pure
m >>= k = PprM $ \s -> let (x, s') = runPprM m s
in runPprM (k x) s'