diff options
author | Ian Lynagh <igloo@earth.li> | 2008-06-14 20:15:58 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2008-06-14 20:15:58 +0000 |
commit | a8624a9d185bd3d08d318596e134042224859a6b (patch) | |
tree | e8f9f7f75d924c9b63f3ef0da79f1ef153a88b14 | |
parent | 0e7150a93803531c5214662f7b26109dcabb30b2 (diff) | |
download | haskell-a8624a9d185bd3d08d318596e134042224859a6b.tar.gz |
Fix some warnings in ParsePkgConf
-rw-r--r-- | compiler/main/ParsePkgConf.y | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/compiler/main/ParsePkgConf.y b/compiler/main/ParsePkgConf.y index 1f6434b468..ac0cebbf64 100644 --- a/compiler/main/ParsePkgConf.y +++ b/compiler/main/ParsePkgConf.y @@ -1,5 +1,5 @@ { -{-# OPTIONS -w #-} +{-# OPTIONS -fno-warn-unused-binds -fno-warn-unused-matches -fno-warn-missing-signatures #-} -- The above warning supression flag is a temporary kludge. -- While working on this module you are encouraged to remove it and fix -- any warnings in the module. See @@ -61,7 +61,7 @@ field :: { PackageConfig -> PackageConfig } : VARID '=' pkgid {% case unpackFS $1 of "package" -> return (\p -> p{package = $3}) - _other -> happyError + _ -> happyError } | VARID '=' STRING { id } @@ -102,13 +102,13 @@ field :: { PackageConfig -> PackageConfig } "haddockHTMLs" -> p{haddockHTMLs = map unpackFS $3} "depends" -> p{depends = []} -- empty list only, non-empty handled below - other -> p + _ -> p } | VARID '=' pkgidlist {% case unpackFS $1 of "depends" -> return (\p -> p{depends = $3}) - _other -> happyError + _ -> happyError } pkgid :: { PackageIdentifier } |