From ad40c306cde4a63d123821a1ebedf5e1f7894dac Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Mon, 10 Oct 2011 21:33:58 +0000
Subject: [PATCH]  * Use recent libc __errno function for OpenBSD

git-svn-id: trunk@19447 -
---
 rtl/unix/initc.pp | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/rtl/unix/initc.pp b/rtl/unix/initc.pp
index 05061da03c..9984627a02 100644
--- a/rtl/unix/initc.pp
+++ b/rtl/unix/initc.pp
@@ -31,7 +31,7 @@ implementation
 // this idea works out.
 
 {$ifdef OpenBSD}
-{$define UseOldErrnoDirectLink}
+{define UseOldErrnoDirectLink OpenBSD also uses __errno function }
 {$endif}
 
 {$ifdef UseOldErrnoDirectLink}
@@ -59,6 +59,10 @@ function geterrnolocation: pcint; cdecl;external clib name '__errno_location';
 function geterrnolocation: pcint; cdecl;external clib name '__error';
 {$endif}
 
+{$ifdef OpenBSD} // tested on x86
+function geterrnolocation: pcint; cdecl;external clib name '__errno';
+{$endif}
+
 {$ifdef NetBSD} // from a sparc dump.
 function geterrnolocation: pcint; cdecl;external clib name '__errno';
 {$endif}