vbscript: Allow 'with' as an identifier.
Signed-off-by: Jacek Caban <jacek@codeweavers.com> Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
parent
aad0340c8f
commit
37e2729607
|
@ -536,6 +536,7 @@ DotIdentifier
|
|||
| tON { $$ = $1; }
|
||||
| tRESUME { $$ = $1; }
|
||||
| tGOTO { $$ = $1; }
|
||||
| tWITH { $$ = $1; }
|
||||
|
||||
/* Most statements accept both new line and ':' as separators */
|
||||
StSep
|
||||
|
|
|
@ -1522,6 +1522,7 @@ sub test_dotIdentifiers
|
|||
Call ok(testObj.on = 10, "testObj.on = " & testObj.on & " expected 10")
|
||||
Call ok(testObj.resume = 10, "testObj.resume = " & testObj.resume & " expected 10")
|
||||
Call ok(testObj.goto = 10, "testObj.goto = " & testObj.goto & " expected 10")
|
||||
Call ok(testObj.with = 10, "testObj.with = " & testObj.with & " expected 10")
|
||||
end sub
|
||||
call test_dotIdentifiers
|
||||
|
||||
|
|
|
@ -855,7 +855,8 @@ static HRESULT WINAPI testObj_GetDispID(IDispatchEx *iface, BSTR bstrName, DWORD
|
|||
{ L"next", DISPID_TESTOBJ_KEYWORD },
|
||||
{ L"on", DISPID_TESTOBJ_KEYWORD },
|
||||
{ L"resume", DISPID_TESTOBJ_KEYWORD },
|
||||
{ L"goto", DISPID_TESTOBJ_KEYWORD }
|
||||
{ L"goto", DISPID_TESTOBJ_KEYWORD },
|
||||
{ L"with", DISPID_TESTOBJ_KEYWORD }
|
||||
};
|
||||
|
||||
test_grfdex(grfdex, fdexNameCaseInsensitive);
|
||||
|
|
Loading…
Reference in New Issue