瀏覽代碼

+ readded FPC_WRITE_TEXT_ANSISTR alias removed in r12322, because it's
required by the variant code

git-svn-id: trunk@12337 -

Jonas Maebe 17 年之前
父節點
當前提交
afafe33266
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/inc/text.inc

+ 1 - 1
rtl/inc/text.inc

@@ -593,7 +593,7 @@ Begin
 End;
 
 
-Procedure fpc_Write_Text_AnsiStr (Len : Longint; Var f : Text; const S : AnsiString); iocheck; compilerproc;
+Procedure fpc_Write_Text_AnsiStr (Len : Longint; Var f : Text; const S : AnsiString); iocheck; [Public,alias:'FPC_WRITE_TEXT_ANSISTR']; compilerproc;
 {
  Writes a AnsiString to the Text file T
 }