Commit ff7094e5 authored by Gabor Greif's avatar Gabor Greif 💬

Typos in comments [ci skip]

parent 01b062ec
......@@ -159,7 +159,7 @@ ns_module = mkHoleModule . ns_mod_name
-- | Substitution on @{A.T}@. We enforce the invariant that the
-- 'nameModule' of keys of this map have 'moduleUnitId' @hole@
-- (meaning that if we have a hole substitution, the keys of the map
-- are never affected.) Alternatively, this is isomorphic to
-- @Map ('ModuleName', 'OccName') 'Name'@.
type ShNameSubst = NameEnv Name
......
......@@ -662,7 +662,7 @@ is collected here, in @matchWrapper@. This function takes as
arguments:
\begin{itemize}
\item
Typchecked @Matches@ (of a function definition, or a case or lambda
Typechecked @Matches@ (of a function definition, or a case or lambda
expression)---the main input;
\item
An error message to be inserted into any (runtime) pattern-matching
......
......@@ -143,7 +143,7 @@ updNameCache upd_fn = do { hsc_env <- getTopEnv
-}
-- | Look up the 'Name' for a given 'Module' and 'OccName'.
-- Consider alternately using 'lookupIfaceTop' if you're in the 'IfL' monad
-- Consider alternatively using 'lookupIfaceTop' if you're in the 'IfL' monad
-- and 'Module' is simply that of the 'ModIface' you are typechecking.
lookupOrig :: Module -> OccName -> TcRnIf a b Name
lookupOrig mod occ
......
......@@ -2713,7 +2713,7 @@ primop AddrToAnyOp "addrToAny#" GenPrimOp
primop AnyToAddrOp "anyToAddr#" GenPrimOp
a -> State# RealWorld -> (# State# RealWorld, Addr# #)
{ Retrive the address of any Haskell value. This is
{ Retrieve the address of any Haskell value. This is
essentially an {\texttt unsafeCoerce\#}, but if implemented as such
the core lint pass complains and fails to compile.
As a primop, it is opaque to core/stg, and only appears
......
......@@ -1621,7 +1621,7 @@ mkTyVarEqErr dflags ctxt report ct oriented tv1 ty2
| OC_Occurs <- occ_check_expand
-- We report an "occurs check" even for a ~ F t a, where F is a type
-- function; it's not insouble (because in principle F could reduce)
-- function; it's not insoluble (because in principle F could reduce)
-- but we have certainly been unable to solve it
-- See Note [Occurs check error] in TcCanonical
= do { let main_msg = addArising (ctOrigin ct) $
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment