From 73a0939a2b1ed6c06fd9f6a8c4c32fcebdcce69b Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Sun, 2 Nov 2003 16:30:12 +0000
Subject: [PATCH]  *  more fixes

---
 rtl/unix/dl.pp | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/rtl/unix/dl.pp b/rtl/unix/dl.pp
index c79d36fc9a..c7b6479702 100644
--- a/rtl/unix/dl.pp
+++ b/rtl/unix/dl.pp
@@ -12,6 +12,10 @@ Const
   RTLD_LAZY         = $001;
   RTLD_NOW          = $002;
   RTLD_BINDING_MASK = $003;
+  RTLD_GLOBAL	    = $100;
+  {$ifdef BSD}
+  RTLD_MODEMASK     = RTLD_BINDING_MASK;
+  {$endif}
 
 Function dlopen(Name : PChar; Flags : longint) : Pointer; cdecl; external libdl;
 FUnction dlsym(Lib : Pointer; Name : Pchar) : Pointer; cdecl; external Libdl;