diff options
| author | Gabor Greif <ggreif@gmail.com> | 2015-04-10 10:00:50 +0200 |
|---|---|---|
| committer | Gabor Greif <ggreif@gmail.com> | 2015-04-10 10:00:50 +0200 |
| commit | 9d16808e1b6dd2fb7ab3eb5712d9842e77d57631 (patch) | |
| tree | d574d81a21d82998860c15c8d9c8d320d55fa928 /compiler/vectorise | |
| parent | fa46c597db9939de1de4bc9b917c8dc1d9e2093a (diff) | |
| download | haskell-9d16808e1b6dd2fb7ab3eb5712d9842e77d57631.tar.gz | |
Typos in error messages and in comments
Diffstat (limited to 'compiler/vectorise')
| -rw-r--r-- | compiler/vectorise/Vectorise/Generic/PAMethods.hs | 2 | ||||
| -rw-r--r-- | compiler/vectorise/Vectorise/Utils/Base.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/compiler/vectorise/Vectorise/Generic/PAMethods.hs b/compiler/vectorise/Vectorise/Generic/PAMethods.hs index 0d5d37c7d7..2f4e23e393 100644 --- a/compiler/vectorise/Vectorise/Generic/PAMethods.hs +++ b/compiler/vectorise/Vectorise/Generic/PAMethods.hs @@ -365,7 +365,7 @@ buildToArrPReprs vect_tc repr_co _ pdatas_tc r -- eg: (xss :: PDatas (Tree a b)) varg <- newLocalVar (fsLit "xss") arg_ty - -- Coersion to case between the (PRepr a) type and its instance. + -- Coercion to case between the (PRepr a) type and its instance. pdatas_co <- mkBuiltinCo pdatasTyCon let co = mkAppCo pdatas_co . mkSymCo diff --git a/compiler/vectorise/Vectorise/Utils/Base.hs b/compiler/vectorise/Vectorise/Utils/Base.hs index dc1f210369..9c603807d6 100644 --- a/compiler/vectorise/Vectorise/Utils/Base.hs +++ b/compiler/vectorise/Vectorise/Utils/Base.hs @@ -130,7 +130,7 @@ splitPrimTyCon ty -- Coercion Construction ----------------------------------------------------- --- |Make a representational coersion to some builtin type. +-- |Make a representational coercion to some builtin type. -- mkBuiltinCo :: (Builtins -> TyCon) -> VM Coercion mkBuiltinCo get_tc |