diff options
| author | simonmar <unknown> | 2002-05-09 12:45:19 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2002-05-09 12:45:19 +0000 |
| commit | 0f16ce565a0487035315008d0f983e741101fb70 (patch) | |
| tree | e8f8b5ab445c295ded78da82683b7943562f1906 | |
| parent | 1937e4289d926f2460bbf063bae608ef398f1675 (diff) | |
[haddock @ 2002-05-09 12:45:19 by simonmar]
Add 'stdcall' keyword
| -rw-r--r-- | src/HsLexer.lhs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/HsLexer.lhs b/src/HsLexer.lhs index e270154a..505e07f8 100644 --- a/src/HsLexer.lhs +++ b/src/HsLexer.lhs @@ -1,5 +1,5 @@ ----------------------------------------------------------------------------- --- $Id: HsLexer.lhs,v 1.7 2002/05/09 10:34:44 simonmar Exp $ +-- $Id: HsLexer.lhs,v 1.8 2002/05/09 12:45:19 simonmar Exp $ -- -- (c) The GHC Team, 1997-2000 -- @@ -176,7 +176,8 @@ reserved_ids = [ ( "where", KW_Where ), ( "as", KW_As ), ( "qualified", KW_Qualified ), - ( "hiding", KW_Hiding ) + ( "hiding", KW_Hiding ), + ( "stdcall", KW_StdCall ) ] isIdent c = isAlpha c || isDigit c || c == '\'' || c == '_' |