diff options
Diffstat (limited to 'compiler/types/Unify.hs')
-rw-r--r-- | compiler/types/Unify.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/types/Unify.hs b/compiler/types/Unify.hs index 1e5406db2e..d13266660b 100644 --- a/compiler/types/Unify.hs +++ b/compiler/types/Unify.hs @@ -1215,7 +1215,9 @@ instance Applicative UM where (<*>) = ap instance Monad UM where +#if !MIN_VERSION_base(4,13,0) fail = MonadFail.fail +#endif m >>= k = UM (\state -> do { (state', v) <- unUM m state ; unUM (k v) state' }) |