瀏覽代碼

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