[project @ 1999-01-22 13:12:22 by sof]

ifaceKeywordsFM: adding missing __ccall_GC entry

diff --git a/ghc/compiler/reader/Lex.lhs b/ghc/compiler/reader/Lex.lhs
index 11d5774..4346902 100644 (file)
--- a/ghc/compiler/reader/Lex.lhs
+++ b/ghc/compiler/reader/Lex.lhs
@@ -657,6 +657,7 @@ ifaceKeywordsFM = listToUFM $
         ("__Ux",               ITunfold IAmALoopBreaker),
        
         ("__ccall",            ITccall (False, False, False)),
+        ("__ccall_GC",         ITccall (False, False, True)),
         ("__dyn_ccall",                ITccall (True,  False, False)),
         ("__dyn_ccall_GC",     ITccall (True,  False, True)),
         ("__casm",             ITccall (False, True,  False)),