diff --git a/servant/src/Servant/Utils/Enter.hs b/servant/src/Servant/Utils/Enter.hs index 93c09a5f..3cddb8fe 100644 --- a/servant/src/Servant/Utils/Enter.hs +++ b/servant/src/Servant/Utils/Enter.hs @@ -37,7 +37,7 @@ class ( Entered m n typ ~ ret ) => Enter typ m n ret where - enter :: m :~> n -> typ -> ret + enter :: (m :~> n) -> typ -> ret -- ** Servant combinators