diff options
| author | Gabor Greif <ggreif@gmail.com> | 2017-12-19 13:52:06 +0100 |
|---|---|---|
| committer | Gabor Greif <ggreif@gmail.com> | 2017-12-19 14:35:03 +0100 |
| commit | a100763cc5c6c9736a00ca57b2ec3c721311eecb (patch) | |
| tree | de71d4f3c962713260557b63bb3a1f3688ac03ad /compiler/specialise/Rules.hs | |
| parent | 244d1441bbe9a8d5e83015c749d1339b8f7c7319 (diff) | |
| download | haskell-a100763cc5c6c9736a00ca57b2ec3c721311eecb.tar.gz | |
Get rid of some stuttering in comments and docs
Diffstat (limited to 'compiler/specialise/Rules.hs')
| -rw-r--r-- | compiler/specialise/Rules.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/specialise/Rules.hs b/compiler/specialise/Rules.hs index edcab88f56..319404ef15 100644 --- a/compiler/specialise/Rules.hs +++ b/compiler/specialise/Rules.hs @@ -413,7 +413,7 @@ lookupRule dflags in_scope is_active fn args rules findBest :: (Id, [CoreExpr]) -> (CoreRule,CoreExpr) -> [(CoreRule,CoreExpr)] -> (CoreRule,CoreExpr) -- All these pairs matched the expression --- Return the pair the the most specific rule +-- Return the pair the most specific rule -- The (fn,args) is just for overlap reporting findBest _ (rule,ans) [] = (rule,ans) |