From cd1d29e3dd0f616a39fddefdc7ec3009f03ad890 Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Wed, 3 Sep 1997 15:55:02 +0000
Subject: [PATCH] [project @ 1997-09-03 15:55:02 by simonm] turn on
 do-case-elim for -Onot, since several easy-to-remove casees
 were spotted in the output from -ddump-simpl under -Onot.

---
 ghc/driver/ghc.lprl |    1 +
 1 file changed, 1 insertion(+)

diff --git a/ghc/driver/ghc.lprl b/ghc/driver/ghc.lprl
index c9a35f7..e8c7154 100644
--- a/ghc/driver/ghc.lprl
+++ b/ghc/driver/ghc.lprl
@@ -698,6 +698,7 @@ sub setupOptimiseFlags {
 	  '-ffloat-lets-exposing-whnf',
 	  '-ffloat-primops-ok',
 	  '-fcase-of-case',
+	  '-fdo-case-elim',
 #	  '-fdo-lambda-eta-expansion',	# too complicated
 	  '-freuse-con',
 #	  '-flet-to-case',		# no strictness analysis, so...
-- 
1.7.10.4