From 27be51d16abf525a1459f1a00b2a27eb18eaa337 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Thu, 5 Jun 1997 20:58:10 +0000
Subject: [PATCH] [project @ 1997-06-05 20:58:10 by sof] new option:
 opt_WarnOverlappedPatterns

---
 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 8fd3c64..8361737 100644
--- a/ghc/compiler/main/CmdLineOpts.lhs
+++ b/ghc/compiler/main/CmdLineOpts.lhs
@@ -98,7 +98,7 @@ module CmdLineOpts (
 	opt_Verbose,
 	opt_WarnNameShadowing,
 	opt_WarnUnusedNames,
-	opt_WarnIncompletePatterns,
+	opt_WarnIncompletePatterns, opt_WarnOverlappedPatterns,
 	opt_PruneTyDecls, opt_PruneInstDecls,
 	opt_D_show_unused_imports,
 	opt_D_show_rn_stats
@@ -352,6 +352,7 @@ opt_UnfoldingConDiscount	= lookup_def_int "-funfolding-con-discount"	   uNFOLDIN
 opt_LiberateCaseThreshold	= lookup_def_int "-fliberate-case-threshold"	   lIBERATE_CASE_THRESHOLD
 opt_WarnNameShadowing		= lookUp  SLIT("-fwarn-name-shadowing")
 opt_WarnIncompletePatterns	= not (lookUp  SLIT("-fno-warn-incomplete-patterns"))
+opt_WarnOverlappedPatterns	= not (lookUp  SLIT("-fno-warn-overlapped-patterns"))
 opt_WarnUnusedNames		= lookUp  SLIT("-fwarn-unused-names")
 opt_PruneTyDecls		= not (lookUp SLIT("-fno-prune-tydecls"))
 opt_PruneInstDecls		= not (lookUp SLIT("-fno-prune-instdecls"))
-- 
1.7.10.4