paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-05 18:17:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

pastojs: async modifier not needed in impl

Browse Source
This commit is contained in:
mattias 2020-11-20 10:40:48 +00:00
parent 79d1c35407
commit dc4f984172
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/packages/fcl-passrc/src/pasresolver.pp
View File

@ -9467,7 +9467,7 @@ begin
RaiseIncompatibleType(20170216151734,nResultTypeMismatchExpectedButFound,
[],DeclResult,ImplResult,ImplProc);
if ImplProc.IsAsync<>DeclProc.IsAsync then
if ImplProc.IsAsync and not DeclProc.IsAsync then
RaiseMsg(20200524111856,nXModifierMismatchY,sXModifierMismatchY,['procedure type','async'],ImplProc);
end;

2
compiler/packages/pastojs/tests/tcmodules.pas
View File

@ -32694,7 +32694,7 @@ begin
'function TObject.Run(w: word = 3): word; async;',
'begin',
'end;',
'function TBird.Run(w: word = 3): word; async;',
'function TBird.Run(w: word = 3): word;', // async modifier not needed in impl
'var p: TJSPromise;',
'begin',
' p:=inherited;',