Commit | Line | Data |
---|---|---|
eac85310 MV |
1 | /* classes: h_files */ |
2 | ||
9de87eea MV |
3 | #ifndef SCM_PTHREADS_THREADS_H |
4 | #define SCM_PTHREADS_THREADS_H | |
eac85310 | 5 | |
2b829bbb | 6 | /* Copyright (C) 2002, 2005, 2006 Free Software Foundation, Inc. |
eac85310 | 7 | * |
73be1d9e | 8 | * This library is free software; you can redistribute it and/or |
53befeb7 NJ |
9 | * modify it under the terms of the GNU Lesser General Public License |
10 | * as published by the Free Software Foundation; either version 3 of | |
11 | * the License, or (at your option) any later version. | |
eac85310 | 12 | * |
53befeb7 NJ |
13 | * This library is distributed in the hope that it will be useful, but |
14 | * WITHOUT ANY WARRANTY; without even the implied warranty of | |
73be1d9e MV |
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
16 | * Lesser General Public License for more details. | |
eac85310 | 17 | * |
73be1d9e MV |
18 | * You should have received a copy of the GNU Lesser General Public |
19 | * License along with this library; if not, write to the Free Software | |
53befeb7 NJ |
20 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA |
21 | * 02110-1301 USA | |
73be1d9e | 22 | */ |
eac85310 MV |
23 | |
24 | \f | |
25 | ||
9bc4701c | 26 | /* The pthreads-threads implementation. This is a direct mapping. |
eac85310 MV |
27 | */ |
28 | ||
29 | #include <pthread.h> | |
0b6843b1 | 30 | #include <sched.h> |
eac85310 | 31 | |
89f423d5 | 32 | /* `libgc' intercepts pthread calls by defining wrapping macros. */ |
1c44468d | 33 | #include "libguile/bdw-gc.h" |
89f423d5 | 34 | |
9de87eea MV |
35 | /* Threads |
36 | */ | |
37 | #define scm_i_pthread_t pthread_t | |
38 | #define scm_i_pthread_self pthread_self | |
39 | #define scm_i_pthread_create pthread_create | |
40 | #define scm_i_pthread_detach pthread_detach | |
41 | #define scm_i_pthread_exit pthread_exit | |
2e77f720 LC |
42 | #define scm_i_pthread_cancel pthread_cancel |
43 | #define scm_i_pthread_cleanup_push pthread_cleanup_push | |
44 | #define scm_i_pthread_cleanup_pop pthread_cleanup_pop | |
9de87eea MV |
45 | #define scm_i_sched_yield sched_yield |
46 | ||
47 | /* Signals | |
9bc4701c | 48 | */ |
9de87eea | 49 | #define scm_i_pthread_sigmask pthread_sigmask |
9bc4701c | 50 | |
9de87eea MV |
51 | /* Mutexes |
52 | */ | |
66302618 LC |
53 | #if SCM_NEED_BRACES_ON_PTHREAD_MUTEX_INITIALIZER |
54 | # define SCM_I_PTHREAD_MUTEX_INITIALIZER { PTHREAD_MUTEX_INITIALIZER } | |
55 | #else | |
56 | # define SCM_I_PTHREAD_MUTEX_INITIALIZER PTHREAD_MUTEX_INITIALIZER | |
57 | #endif | |
9de87eea MV |
58 | #define scm_i_pthread_mutex_t pthread_mutex_t |
59 | #define scm_i_pthread_mutex_init pthread_mutex_init | |
60 | #define scm_i_pthread_mutex_destroy pthread_mutex_destroy | |
61 | #define scm_i_pthread_mutex_trylock pthread_mutex_trylock | |
62 | #define scm_i_pthread_mutex_lock pthread_mutex_lock | |
63 | #define scm_i_pthread_mutex_unlock pthread_mutex_unlock | |
d1138028 | 64 | extern pthread_mutexattr_t scm_i_pthread_mutexattr_recursive[1]; |
9de87eea MV |
65 | |
66 | /* Condition variables | |
67 | */ | |
68 | #define SCM_I_PTHREAD_COND_INITIALIZER PTHREAD_COND_INITIALIZER | |
69 | #define scm_i_pthread_cond_t pthread_cond_t | |
70 | #define scm_i_pthread_cond_init pthread_cond_init | |
71 | #define scm_i_pthread_cond_destroy pthread_cond_destroy | |
72 | #define scm_i_pthread_cond_signal pthread_cond_signal | |
73 | #define scm_i_pthread_cond_broadcast pthread_cond_broadcast | |
74 | #define scm_i_pthread_cond_wait pthread_cond_wait | |
75 | #define scm_i_pthread_cond_timedwait pthread_cond_timedwait | |
76 | ||
77 | /* Onces | |
78 | */ | |
79 | #define scm_i_pthread_once_t pthread_once_t | |
9de87eea | 80 | #define scm_i_pthread_once pthread_once |
8ab3d8a0 KR |
81 | #if SCM_NEED_BRACES_ON_PTHREAD_ONCE_INIT |
82 | #define SCM_I_PTHREAD_ONCE_INIT { PTHREAD_ONCE_INIT } | |
83 | #else | |
84 | #define SCM_I_PTHREAD_ONCE_INIT PTHREAD_ONCE_INIT | |
85 | #endif | |
eac85310 | 86 | |
9de87eea MV |
87 | /* Thread specific storage |
88 | */ | |
89 | #define scm_i_pthread_key_t pthread_key_t | |
90 | #define scm_i_pthread_key_create pthread_key_create | |
91 | #define scm_i_pthread_setspecific pthread_setspecific | |
92 | #define scm_i_pthread_getspecific pthread_getspecific | |
e29e0b09 | 93 | |
9de87eea MV |
94 | /* Convenience functions |
95 | */ | |
96 | #define scm_i_scm_pthread_mutex_lock scm_pthread_mutex_lock | |
661ae7ab | 97 | #define scm_i_dynwind_pthread_mutex_lock scm_dynwind_pthread_mutex_lock |
9de87eea MV |
98 | #define scm_i_scm_pthread_cond_wait scm_pthread_cond_wait |
99 | #define scm_i_scm_pthread_cond_timedwait scm_pthread_cond_timedwait | |
28d52ebb | 100 | |
9de87eea | 101 | #endif /* SCM_PTHREADS_THREADS_H */ |
eac85310 MV |
102 | |
103 | /* | |
104 | Local Variables: | |
105 | c-file-style: "gnu" | |
106 | End: | |
107 | */ |