diff options
Diffstat (limited to 'compiler/GHC/Cmm/Node.hs')
-rw-r--r-- | compiler/GHC/Cmm/Node.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Cmm/Node.hs b/compiler/GHC/Cmm/Node.hs index 98314a8da3..d5d020ee00 100644 --- a/compiler/GHC/Cmm/Node.hs +++ b/compiler/GHC/Cmm/Node.hs @@ -348,7 +348,7 @@ instance UserOfRegs GlobalReg (CmmNode e x) where instance (Ord r, UserOfRegs r CmmReg) => UserOfRegs r ForeignTarget 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 _ _ !z (PrimTarget _) = z foldRegsUsed dflags f !z (ForeignTarget e _) = foldRegsUsed dflags f z e |