summaryrefslogtreecommitdiff
path: root/rtl/java/jsstrings.inc
diff options
context:
space:
mode:
Diffstat (limited to 'rtl/java/jsstrings.inc')
-rw-r--r--rtl/java/jsstrings.inc2
1 files changed, 1 insertions, 1 deletions
diff --git a/rtl/java/jsstrings.inc b/rtl/java/jsstrings.inc
index d35fb84a0f..79b2d7b10f 100644
--- a/rtl/java/jsstrings.inc
+++ b/rtl/java/jsstrings.inc
@@ -363,7 +363,7 @@ Function int_Val_SInt_ShortStr(DestSize: SizeInt; Const S: ShortString; out Code
{$define FPC_HAS_SETSTRING_SHORTSTR}
-Procedure SetString (Out S : Shortstring; Buf : PChar; Len : SizeInt);
+Procedure fpc_setstring_shortstr(Out S : Shortstring; Buf : PChar; Len : SizeInt); compilerproc;
begin
If Len > High(S) then
Len := High(S);