Skip to content

Commit 0398307

Browse files
committed
Add support for CDecl keyword.
1 parent 8c253d6 commit 0398307

File tree

2 files changed

+2
-1
lines changed

2 files changed

+2
-1
lines changed

Rubberduck.Parsing/Grammar/VBALexer.g4

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -80,6 +80,7 @@ BYREF : B Y R E F;
8080
BYTE : B Y T E;
8181
CALL : C A L L;
8282
CASE : C A S E;
83+
CDECL : C D E C L;
8384
CLASS : C L A S S;
8485
CLOSE : C L O S E;
8586
CONST : C O N S T;

Rubberduck.Parsing/Grammar/VBAParser.g4

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -297,7 +297,7 @@ variable : expression;
297297
constStmt : (visibility whiteSpace)? CONST whiteSpace constSubStmt (whiteSpace? COMMA whiteSpace? constSubStmt)*;
298298
constSubStmt : identifier (whiteSpace asTypeClause)? whiteSpace? EQ whiteSpace? expression;
299299

300-
declareStmt : (visibility whiteSpace)? DECLARE whiteSpace (PTRSAFE whiteSpace)? (FUNCTION | SUB) whiteSpace identifier whiteSpace LIB whiteSpace STRINGLITERAL (whiteSpace ALIAS whiteSpace STRINGLITERAL)? (whiteSpace? argList)? (whiteSpace asTypeClause)?;
300+
declareStmt : (visibility whiteSpace)? DECLARE whiteSpace (PTRSAFE whiteSpace)? (FUNCTION | SUB) whiteSpace identifier whiteSpace (CDECL whiteSpace)? LIB whiteSpace STRINGLITERAL (whiteSpace ALIAS whiteSpace STRINGLITERAL)? (whiteSpace? argList)? (whiteSpace asTypeClause)?;
301301

302302
argList : LPAREN (whiteSpace? arg (whiteSpace? COMMA whiteSpace? arg)*)? whiteSpace? RPAREN;
303303

0 commit comments

Comments
 (0)