paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-14 10:20:21 +02:00
Code Issues Packages Projects Releases Wiki Activity

* declare fpc_zeromem and fpc_fillmem as inline to avoid one call

Browse Source 
git-svn-id: trunk@33994 -
This commit is contained in:
svenbarth 2016-06-15 20:16:16 +00:00
parent 11c90a73b1
commit 248490bbf1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/inc/compproc.inc
View File

@ -37,8 +37,8 @@ Procedure fpc_freemem(p:pointer);compilerproc;
{$endif FPC_HAS_FEATURE_HEAP}
{ used by Default() in code blocks }
procedure fpc_zeromem(p:pointer;len:ptruint);compilerproc;
procedure fpc_fillmem(out data;len:ptruint;b : byte);compilerproc;
procedure fpc_zeromem(p:pointer;len:ptruint);inline;compilerproc;
procedure fpc_fillmem(out data;len:ptruint;b : byte);inline;compilerproc;
procedure fpc_Shortstr_SetLength(var s:shortstring;len:SizeInt); compilerproc;
procedure fpc_shortstr_assign(len:{$ifdef cpu16}smallint{$else}longint{$endif};sstr,dstr:pointer); compilerproc;