paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-30 20:01:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Small addition to r7911.

Browse Source 
git-svn-id: trunk@7914 -
This commit is contained in:
yury 2007-07-01 20:29:01 +00:00
parent 28f0d47d83
commit ec2d657a32
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/wstrings.inc
View File

@ -195,9 +195,11 @@ begin
S:=Nil;
end;
{$ifdef FPC_WINLIKEWIDESTRING}
var
__data_start: byte; external name '__data_start__';
__data_end: byte; external name '__data_end__';
{$endif FPC_WINLIKEWIDESTRING}
Procedure fpc_WideStr_Decr_Ref (Var S : Pointer);[Public,Alias:'FPC_WIDESTR_DECR_REF']; compilerproc;
{