summaryrefslogtreecommitdiff
path: root/rtl/java/jcompproc.inc
diff options
context:
space:
mode:
Diffstat (limited to 'rtl/java/jcompproc.inc')
-rw-r--r--rtl/java/jcompproc.inc2
1 files changed, 1 insertions, 1 deletions
diff --git a/rtl/java/jcompproc.inc b/rtl/java/jcompproc.inc
index a2114883b3..0c4e31afb5 100644
--- a/rtl/java/jcompproc.inc
+++ b/rtl/java/jcompproc.inc
@@ -531,7 +531,7 @@ function fpc_variant_to_idispatch(const v : variant) : idispatch;compilerproc;
function fpc_idispatch_to_variant(const i : idispatch) : variant;compilerproc;
procedure fpc_vararray_get(var d : variant;const s : variant;indices : plongint;len : sizeint);compilerproc;
procedure fpc_vararray_put(var d : variant;const s : variant;indices : plongint;len : sizeint);compilerproc;
-procedure fpc_dispinvoke_variant(dest : pvardata;const source : tvardata; calldesc : pcalldesc;params : pointer);compilerproc;
+procedure fpc_dispinvoke_variant(dest : pvardata;var source : tvardata; calldesc : pcalldesc;params : pointer);compilerproc;
{$endif FPC_HAS_FEATURE_VARIANTS}
{$ifdef FPC_HAS_FEATURE_TEXTIO}