瀏覽代碼

Avoid double declaration of seterrno

Pierre Muller 1 年之前
父節點
當前提交
9dc75c3005
共有 1 個文件被更改,包括 2 次插入1 次删除
  1. 2 1
      rtl/unix/syscall.pp

+ 2 - 1
rtl/unix/syscall.pp

@@ -26,8 +26,9 @@ uses
 {$endif FPC_HAS_SETSYSNR_INC}
 
 {$ifdef FPC_USE_LIBC}
+{$if not declared(seterrno)}
 procedure seterrno(err:cint); external name 'FPC_SYS_SETERRNO';
-
+{$endif}
 {$I syscall.inc}
 {$endif}