From 658b3650867707a3be0a5a2f8e8124421cec348c Mon Sep 17 00:00:00 2001
From: quintela <unknown>
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 62b2e341d3ce..eaf8caf3fe66 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")
--
GitLab