瀏覽代碼

* fixed typo as pointed out by Aleksa Todorovic

git-svn-id: trunk@23278 -
florian 12 年之前
父節點
當前提交
d460d44671
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/inc/systemh.inc

+ 1 - 1
rtl/inc/systemh.inc

@@ -1227,7 +1227,7 @@ Function StringToPPChar(S: PChar;ReserveEntries:integer):ppchar;
 
 
 procedure AbstractError;external name 'FPC_ABSTRACTERROR';
-procedure EmptyMethod;external name 'FPC_AEMPTYMETHOD';
+procedure EmptyMethod;external name 'FPC_EMPTYMETHOD';
 Function  SysBackTraceStr(Addr:Pointer): ShortString;
 Procedure SysAssert(const Msg,FName:ShortString;LineNo:Longint;ErrorAddr:Pointer);
 (* Supposed to return address of previous CtrlBreakHandler *)