Commit 5660d1dd authored by batterseapower's avatar batterseapower
Browse files

Tweak comments in MkId and follow mkStringLit renaming

parent 7c6c7a46
......@@ -90,6 +90,7 @@ import Module
%************************************************************************
\begin{code}
wiredInIds :: [Id]
wiredInIds
= [ -- These error-y things are wired in because we don't yet have
-- a way to express in an interface file that the result type variable
......@@ -117,6 +118,7 @@ wiredInIds
] ++ ghcPrimIds
-- These Ids are exported from GHC.Prim
ghcPrimIds :: [Id]
ghcPrimIds
= [ -- These can't be defined in Haskell, but they have
-- perfectly reasonable unfoldings in Core
......@@ -957,7 +959,7 @@ unwrapFamInstScrut tycon args scrut
%************************************************************************
%* *
\subsection{Primitive operations
\subsection{Primitive operations}
%* *
%************************************************************************
......@@ -1275,7 +1277,7 @@ mkRuntimeErrorApp
mkRuntimeErrorApp err_id res_ty err_msg
= mkApps (Var err_id) [Type res_ty, err_string]
where
err_string = Lit (mkStringLit err_msg)
err_string = Lit (mkMachString err_msg)
rEC_SEL_ERROR_ID = mkRuntimeErrorId recSelErrorName
rUNTIME_ERROR_ID = mkRuntimeErrorId runtimeErrorName
......
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