From e3fc374f3448afe54fd858eb99652677b86cf0ed Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Fri, 15 Feb 2002 21:06:29 +0000
Subject: [PATCH] [project @ 2002-02-15 21:06:29 by sof] fix bug which caused
 'safe' to be identical to 'unsafe' in an FFI decl.

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

diff --git a/ghc/compiler/parser/Lex.lhs b/ghc/compiler/parser/Lex.lhs
index 501dd4396515..d4647888dad0 100644
--- a/ghc/compiler/parser/Lex.lhs
+++ b/ghc/compiler/parser/Lex.lhs
@@ -319,7 +319,7 @@ ghcExtensionKeywordsFM = listToUFM $
 	( "export",	ITexport ),
 	( "label",	ITlabel ),
 	( "dynamic",	ITdynamic ),
-	( "safe",	ITunsafe ),
+	( "safe",	ITsafe ),
 	( "unsafe",	ITunsafe ),
 	( "with",	ITwith ),
 	( "stdcall",    ITstdcallconv),
-- 
GitLab