summaryrefslogtreecommitdiff
path: root/src/Data/Bytes/Get.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Data/Bytes/Get.hs')
-rw-r--r--src/Data/Bytes/Get.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Data/Bytes/Get.hs b/src/Data/Bytes/Get.hs
index 816a6be..ede0304 100644
--- a/src/Data/Bytes/Get.hs
+++ b/src/Data/Bytes/Get.hs
@@ -89,7 +89,8 @@ class (Integral (Remaining m), Monad m, Applicative m) => MonadGet m where
-- Note that this forces the rest of the input.
remaining :: m (Remaining m)
#ifndef HLINT
- default remaining :: (MonadTrans t, MonadGet n, m ~ t n) => m (Remaining n)
+ default remaining :: (MonadTrans t, MonadGet n, m ~ t n, Remaining m ~ Remaining n)
+ => m (Remaining m)
remaining = lift remaining
#endif