Переглянути джерело

* Small addition to r7911.

git-svn-id: trunk@7914 -
yury 18 роки тому
батько
коміт
ec2d657a32
1 змінених файлів з 2 додано та 0 видалено
  1. 2 0
      rtl/inc/wstrings.inc

+ 2 - 0
rtl/inc/wstrings.inc

@@ -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;
 {