From 11427f35d1275419d178d02f53cea73e406e1c74 Mon Sep 17 00:00:00 2001
From: panne <unknown>
Date: Sat, 20 Jan 2001 21:02:19 +0000
Subject: [PATCH] [project @ 2001-01-20 21:02:19 by panne] Remove bogus case
 alternative

---
 ghc/compiler/rename/RnHiFiles.lhs |    5 -----
 1 file changed, 5 deletions(-)

diff --git a/ghc/compiler/rename/RnHiFiles.lhs b/ghc/compiler/rename/RnHiFiles.lhs
index 9742091..6664fe6 100644
--- a/ghc/compiler/rename/RnHiFiles.lhs
+++ b/ghc/compiler/rename/RnHiFiles.lhs
@@ -529,11 +529,6 @@ readIface file_path
     case parseIface contents init_parser_state of
 	POk _ iface          -> returnRn (Right iface)
 	PFailed err 	     -> bale_out err
-	parse_result 	     -> bale_out empty
-	 	-- This last case can happen if the interface file is (say) empty
-		-- in which case the parser thinks it looks like an IdInfo or
-		-- something like that.  Just an artefact of the fact that the
-		-- parser is used for several purposes at once.
     }
   where
     init_parser_state = PState{ bol = 0#, atbol = 1#,
-- 
1.7.10.4