summaryrefslogtreecommitdiff
path: root/compiler/stranal
diff options
context:
space:
mode:
authorGabor Greif <ggreif@gmail.com>2018-12-15 12:44:59 +0100
committerGabor Greif <ggreif@gmail.com>2018-12-17 15:07:08 +0100
commitcaf50f631f0216fc11b653b1d0f34e7ca578ec45 (patch)
tree5abd3c388a22e375d211439849a1d136157173a4 /compiler/stranal
parentf99d898ba384b7d3ace7aae71b0125ba645e09cb (diff)
downloadhaskell-caf50f631f0216fc11b653b1d0f34e7ca578ec45.tar.gz
Stomp a few typos and grammaros
Also use 'id'
Diffstat (limited to 'compiler/stranal')
-rw-r--r--compiler/stranal/WwLib.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/stranal/WwLib.hs b/compiler/stranal/WwLib.hs
index 902adbfd90..756a706dd8 100644
--- a/compiler/stranal/WwLib.hs
+++ b/compiler/stranal/WwLib.hs
@@ -506,7 +506,7 @@ To avoid this:
mkWWstr :: DynFlags
-> FamInstEnvs
- -> Bool -- True <=> INLINEABLE pragama on this function defn
+ -> Bool -- True <=> INLINEABLE pragma on this function defn
-- See Note [Do not unpack class dictionaries]
-> [Var] -- Wrapper args; have their demand info on them
-- *Includes type variables*
@@ -569,7 +569,7 @@ as-yet-un-filled-in pkgState files.
-- brings into scope wrap_arg (via lets)
-- See Note [How to do the worker/wrapper split]
mkWWstr_one :: DynFlags -> FamInstEnvs
- -> Bool -- True <=> INLINEABLE pragama on this function defn
+ -> Bool -- True <=> INLINEABLE pragma on this function defn
-- See Note [Do not unpack class dictionaries]
-> Var
-> UniqSM (Bool, [Var], CoreExpr -> CoreExpr, CoreExpr -> CoreExpr)