summaryrefslogtreecommitdiff
path: root/utils/deriveConstants
diff options
context:
space:
mode:
authorGabor Greif <ggreif@gmail.com>2015-12-01 16:59:39 +0100
committerGabor Greif <ggreif@gmail.com>2015-12-01 16:59:39 +0100
commit44c3e3768e28199468d2ffff0b25db055d22c310 (patch)
tree7d1e71bae697c125ae03e400cb3c6aca9dc25826 /utils/deriveConstants
parent36c1247846bbbc1af939c098660ce27ddaa36a0d (diff)
downloadhaskell-44c3e3768e28199468d2ffff0b25db055d22c310.tar.gz
Fix warning about unused pattern variable
Diffstat (limited to 'utils/deriveConstants')
-rw-r--r--utils/deriveConstants/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/deriveConstants/Main.hs b/utils/deriveConstants/Main.hs
index 09c94ab7e3..6a88ac2d17 100644
--- a/utils/deriveConstants/Main.hs
+++ b/utils/deriveConstants/Main.hs
@@ -786,7 +786,7 @@ getWanted verbose os tmpdir gccProgram gccFlags nmProgram mobjdumpProgram
, Just sym <- stripPrefix prefix sym0 = Just (sym, read n)
| otherwise = Nothing
where
- [sym0, adr] = take 2 (reverse $ words l1)
+ [sym0, _] = take 2 (reverse $ words l1)
-- If an Int value is larger than 2^28 or smaller
-- than -2^28, then fail.