From 4dd74f38b2afd902bab4748caf4138bbd1cd93e4 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Tue, 12 Dec 2000 15:49:20 +0000
Subject: [PATCH] [project @ 2000-12-12 15:49:20 by simonmar] Add missing
 default case from isSpecial

---
 ghc/compiler/parser/Lex.lhs |    1 +
 1 file changed, 1 insertion(+)

diff --git a/ghc/compiler/parser/Lex.lhs b/ghc/compiler/parser/Lex.lhs
index 7de898b..2febf52 100644
--- a/ghc/compiler/parser/Lex.lhs
+++ b/ghc/compiler/parser/Lex.lhs
@@ -292,6 +292,7 @@ isSpecial ITunsafe    	= True
 isSpecial ITwith      	= True
 isSpecial ITccallconv   = True
 isSpecial ITstdcallconv = True
+isSpecial _             = False
 
 -- IMPORTANT: Keep this in synch with ParseIface.y's var_fs production! (SUP)
 ghcExtensionKeywordsFM = listToUFM $
-- 
1.7.10.4