diff options
Diffstat (limited to 'compiler/GHC/Cmm/Expr.hs')
| -rw-r--r-- | compiler/GHC/Cmm/Expr.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Cmm/Expr.hs b/compiler/GHC/Cmm/Expr.hs index 1600588e2c..bb3fe2e202 100644 --- a/compiler/GHC/Cmm/Expr.hs +++ b/compiler/GHC/Cmm/Expr.hs @@ -368,7 +368,7 @@ instance Ord r => DefinerOfRegs r r where instance (Ord r, UserOfRegs r CmmReg) => UserOfRegs r CmmExpr where -- The (Ord r) in the context is necessary here - -- See Note [Recursive superclasses] in TcInstDcls + -- See Note [Recursive superclasses] in GHC.Tc.TyCl.Instance foldRegsUsed dflags f !z e = expr z e where expr z (CmmLit _) = z expr z (CmmLoad addr _) = foldRegsUsed dflags f z addr |