mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-03 22:50:18 +02:00
* fpc_dispinvoke_variant is a compilerproc
git-svn-id: trunk@5256 -
This commit is contained in:
parent
f88e6a834e
commit
60b1d1e162
@ -156,7 +156,7 @@ function fpc_idispatch_to_variant(const i : idispatch) : variant;compilerproc;
|
||||
|
||||
|
||||
procedure fpc_dispinvoke_variant(dest : pvardata;const source : tvardata;
|
||||
calldesc : pcalldesc;params : pointer);
|
||||
calldesc : pcalldesc;params : pointer); compilerproc;
|
||||
begin
|
||||
variantmanager.dispinvoke(dest,source,calldesc,params);
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user