diff options
Diffstat (limited to 'compiler/GHC/Cmm/Lint.hs')
| -rw-r--r-- | compiler/GHC/Cmm/Lint.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Cmm/Lint.hs b/compiler/GHC/Cmm/Lint.hs index 2c3c605240..e76be551f9 100644 --- a/compiler/GHC/Cmm/Lint.hs +++ b/compiler/GHC/Cmm/Lint.hs @@ -174,7 +174,7 @@ lintCmmMiddle node = case node of then return () else cmmLintAssignErr (CmmAssign reg expr) erep reg_ty - CmmStore l r -> do + CmmStore l r _alignment -> do _ <- lintCmmExpr l _ <- lintCmmExpr r return () |