From 928e2dc79b46a455ef0c0096ddf40682e07b4a27 Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@users.sourceforge.net>
Date: Sun, 12 Oct 2008 12:16:57 +0200
Subject: Implement VFS question and password callbacks

---
 ULibc.pas | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'ULibc.pas')

diff --git a/ULibc.pas b/ULibc.pas
index ba60e47..a01b573 100644
--- a/ULibc.pas
+++ b/ULibc.pas
@@ -24,6 +24,7 @@ interface
 
 const GLIBC_LIB = 'libc.so.6';
       DL_LIB = 'libdl.so.2';
+      PTHREAD_LIB = 'libpthread.so.0';
 
 type
 {$IFDEF KYLIX}
@@ -850,6 +851,9 @@ function access(pathname: PChar; mode: Longint): Longint; cdecl; external GLIBC_
 function euidaccess(pathname: PChar; mode: Longint): Longint; cdecl; external GLIBC_LIB name 'euidaccess';
 
 
+type pthread_t = {$ifdef cpu64}QWord{$else}DWord{$endif};
+
+function pthread_self: pthread_t; cdecl; external PTHREAD_LIB name 'pthread_self';
 
 
 implementation
-- 
cgit v1.2.3