diff options
| author | Gabor Greif <ggreif@gmail.com> | 2016-12-16 14:00:15 +0100 |
|---|---|---|
| committer | Gabor Greif <ggreif@gmail.com> | 2016-12-16 14:00:15 +0100 |
| commit | ed4cf039092a8cc5bea78dedb845f8e2db3f49b8 (patch) | |
| tree | 72b95e4653413d133b77ec2cf8b2bbaac0d2e487 /compiler/simplCore/SetLevels.hs | |
| parent | 6fecb2a4dec6d1a4bfb5655ef5fc2a3e475954a4 (diff) | |
| download | haskell-ed4cf039092a8cc5bea78dedb845f8e2db3f49b8.tar.gz | |
Typos in comments
Diffstat (limited to 'compiler/simplCore/SetLevels.hs')
| -rw-r--r-- | compiler/simplCore/SetLevels.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/simplCore/SetLevels.hs b/compiler/simplCore/SetLevels.hs index dc36a6c9b0..ef98e7b915 100644 --- a/compiler/simplCore/SetLevels.hs +++ b/compiler/simplCore/SetLevels.hs @@ -1033,7 +1033,7 @@ lookupVar le v = case lookupVarEnv (le_env le) v of _ -> Var v abstractVars :: Level -> LevelEnv -> DVarSet -> [OutVar] - -- Find the variables in fvs, free vars of the target expresion, + -- Find the variables in fvs, free vars of the target expression, -- whose level is greater than the destination level -- These are the ones we are going to abstract out -- |