From 658b3650867707a3be0a5a2f8e8124421cec348c Mon Sep 17 00:00:00 2001 From: quintela Date: Tue, 2 Dec 1997 18:08:54 +0000 Subject: [PATCH] [project @ 1997-12-02 18:08:54 by quintela] Added -fwarn-simple-patterns option --- ghc/compiler/main/CmdLineOpts.lhs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/ghc/compiler/main/CmdLineOpts.lhs b/ghc/compiler/main/CmdLineOpts.lhs index 62b2e34..eaf8caf 100644 --- a/ghc/compiler/main/CmdLineOpts.lhs +++ b/ghc/compiler/main/CmdLineOpts.lhs @@ -91,7 +91,7 @@ module CmdLineOpts ( opt_Verbose, opt_WarnNameShadowing, opt_WarnUnusedNames, - opt_WarnIncompletePatterns, opt_WarnOverlappedPatterns, + opt_WarnIncompletePatterns, opt_WarnOverlappedPatterns, opt_WarnSimplePatterns, opt_WarnMissingMethods, opt_WarnDuplicateExports, opt_PruneTyDecls, opt_PruneInstDecls, @@ -350,6 +350,7 @@ opt_UnfoldingKeenessFactor = lookup_def_float "-funfolding-keeness-factor" uN opt_WarnNameShadowing = lookUp SLIT("-fwarn-name-shadowing") opt_WarnIncompletePatterns = lookUp SLIT("-fwarn-incomplete-patterns") opt_WarnOverlappedPatterns = lookUp SLIT("-fwarn-overlapped-patterns") +opt_WarnSimplePatterns = lookUp SLIT("-fwarn-simple-patterns") opt_WarnUnusedNames = lookUp SLIT("-fwarn-unused-names") opt_WarnMissingMethods = lookUp SLIT("-fwarn-missing-methods") opt_WarnDuplicateExports = lookUp SLIT("-fwarn-duplicate-exports") -- 1.7.10.4