diff options
| author | RyanGlScott <ryan.gl.scott@gmail.com> | 2016-04-30 14:10:30 -0400 |
|---|---|---|
| committer | RyanGlScott <ryan.gl.scott@gmail.com> | 2016-04-30 14:10:30 -0400 |
| commit | cb0586075e7fed5439949cc39862f5ea66403394 (patch) | |
| tree | 7e1d25c07f09dbd0e35725571f37151b15381a6f | |
| parent | 2fe7a0aed83cbf2f98904eba68c0aafe28c5fcda (diff) | |
| download | haskell-cb0586075e7fed5439949cc39862f5ea66403394.tar.gz | |
Comment typos: Mkae -> Make, Hsakell -> Haskell
[ci skip]
| -rw-r--r-- | compiler/typecheck/TcDeriv.hs | 2 | ||||
| -rw-r--r-- | compiler/types/TyCoRep.hs | 2 | ||||
| -rw-r--r-- | compiler/vectorise/Vectorise/Monad/Naming.hs | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/compiler/typecheck/TcDeriv.hs b/compiler/typecheck/TcDeriv.hs index 28d154edd1..57a4037622 100644 --- a/compiler/typecheck/TcDeriv.hs +++ b/compiler/typecheck/TcDeriv.hs @@ -2279,7 +2279,7 @@ a)) will be solved by the explicit Eq (N a) instance. We do *not* create the superclasses by casting the superclass dictionaries for the representation type. -See the paper "Safe zero-cost coercions for Hsakell". +See the paper "Safe zero-cost coercions for Haskell". Note [DeriveAnyClass and default family instances] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ diff --git a/compiler/types/TyCoRep.hs b/compiler/types/TyCoRep.hs index 118fd9533f..4cdd88399b 100644 --- a/compiler/types/TyCoRep.hs +++ b/compiler/types/TyCoRep.hs @@ -1752,7 +1752,7 @@ mkTCvSubst :: InScopeSet -> (TvSubstEnv, CvSubstEnv) -> TCvSubst mkTCvSubst in_scope (tenv, cenv) = TCvSubst in_scope tenv cenv mkTvSubst :: InScopeSet -> TvSubstEnv -> TCvSubst --- ^ Mkae a TCvSubst with specified tyvar subst and empty covar subst +-- ^ Make a TCvSubst with specified tyvar subst and empty covar subst mkTvSubst in_scope tenv = TCvSubst in_scope tenv emptyCvSubstEnv getTvSubstEnv :: TCvSubst -> TvSubstEnv diff --git a/compiler/vectorise/Vectorise/Monad/Naming.hs b/compiler/vectorise/Vectorise/Monad/Naming.hs index 9bb9bd1923..1cb8d87bcf 100644 --- a/compiler/vectorise/Vectorise/Monad/Naming.hs +++ b/compiler/vectorise/Vectorise/Monad/Naming.hs @@ -123,7 +123,7 @@ newTyVar fs k = do u <- liftDs newUnique return $ mkTyVar (mkSysTvName u fs) k --- |Mkae a fresh coercion variable with the given kind. +-- |Make a fresh coercion variable with the given kind. newCoVar :: FastString -> Kind -> VM Var newCoVar fs k = do u <- liftDs newUnique |