ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

widl: Support __fastcall and __pascal calling conventions. 

Support the synonyms for these and existing calling conventions.
This commit is contained in:
Rob Shearman 2008-04-02 12:56:21 +01:00 committed by Alexandre Julliard
parent d97f3205ba
commit 35ba23bd48
2 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tools/widl/parser.l
View File

@ -186,13 +186,19 @@ static const struct keyword keywords[] = {
{"FALSE", tFALSE}, {"FALSE", tFALSE},
{"TRUE", tTRUE}, {"TRUE", tTRUE},
{"__cdecl", tCDECL}, {"__cdecl", tCDECL},
{"__fastcall", tFASTCALL},
{"__pascal", tPASCAL},
{"__int64", tINT64}, {"__int64", tINT64},
{"__stdcall", tSTDCALL}, {"__stdcall", tSTDCALL},
{"_cdecl", tCDECL},
{"_fastcall", tFASTCALL},
{"_pascal", tPASCAL},
{"_stdcall", tSTDCALL}, {"_stdcall", tSTDCALL},
{"boolean", tBOOLEAN}, {"boolean", tBOOLEAN},
{"byte", tBYTE}, {"byte", tBYTE},
{"callback", tCALLBACK}, {"callback", tCALLBACK},
{"case", tCASE}, {"case", tCASE},
{"cdecl", tCDECL},
{"char", tCHAR}, {"char", tCHAR},
{"coclass", tCOCLASS}, {"coclass", tCOCLASS},
{"code", tCODE}, {"code", tCODE},
@ -217,11 +223,13 @@ static const struct keyword keywords[] = {
{"long", tLONG}, {"long", tLONG},
{"methods", tMETHODS}, {"methods", tMETHODS},
{"module", tMODULE}, {"module", tMODULE},
{"pascal", tPASCAL},
{"properties", tPROPERTIES}, {"properties", tPROPERTIES},
{"short", tSHORT}, {"short", tSHORT},
{"signed", tSIGNED}, {"signed", tSIGNED},
{"sizeof", tSIZEOF}, {"sizeof", tSIZEOF},
{"small", tSMALL}, {"small", tSMALL},
{"stdcall", tSTDCALL},
{"struct", tSTRUCT}, {"struct", tSTRUCT},
{"switch", tSWITCH}, {"switch", tSWITCH},
{"typedef", tTYPEDEF}, {"typedef", tTYPEDEF},

4
tools/widl/parser.y
View File

@ -181,6 +181,7 @@ static void check_all_user_types(ifref_list_t *ifaces);
%token tENTRY tENUM tERRORSTATUST %token tENTRY tENUM tERRORSTATUST
%token tEXPLICITHANDLE tEXTERN %token tEXPLICITHANDLE tEXTERN
%token tFALSE %token tFALSE
%token tFASTCALL
%token tFLOAT %token tFLOAT
%token tHANDLE %token tHANDLE
%token tHANDLET %token tHANDLET
@ -208,6 +209,7 @@ static void check_all_user_types(ifref_list_t *ifaces);
%token tOBJECT tODL tOLEAUTOMATION %token tOBJECT tODL tOLEAUTOMATION
%token tOPTIONAL %token tOPTIONAL
%token tOUT %token tOUT
%token tPASCAL
%token tPOINTERDEFAULT %token tPOINTERDEFAULT
%token tPROPERTIES %token tPROPERTIES
%token tPROPGET tPROPPUT tPROPPUTREF %token tPROPGET tPROPPUT tPROPPUTREF
@ -520,6 +522,8 @@ uuid_string:
; ;
callconv: tCDECL { $$ = $<str>1; } callconv: tCDECL { $$ = $<str>1; }
| tFASTCALL { $$ = $<str>1; }
| tPASCAL { $$ = $<str>1; }
| tSTDCALL { $$ = $<str>1; } | tSTDCALL { $$ = $<str>1; }
; ;