gfortran.h (gfc_expr): Remove from_H, add "representation" struct.
[official-gcc.git] / gcc / gthr-vxworks.h
blobc11d3a20cabb18c5b4bfeb4c2f506c953eadea2d
1 /* Threads compatibility routines for libgcc2 and libobjc for VxWorks. */
2 /* Compile this one with gcc. */
3 /* Copyright (C) 1997, 1999, 2000 Free Software Foundation, Inc.
4 Contributed by Mike Stump <mrs@wrs.com>.
6 This file is part of GCC.
8 GCC is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 2, or (at your option) any later
11 version.
13 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 for more details.
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING. If not, write to the Free
20 Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA
21 02110-1301, USA. */
23 /* As a special exception, if you link this library with other files,
24 some of which are compiled with GCC, to produce an executable,
25 this library does not by itself cause the resulting executable
26 to be covered by the GNU General Public License.
27 This exception does not however invalidate any other reasons why
28 the executable file might be covered by the GNU General Public License. */
30 #ifndef GCC_GTHR_VXWORKS_H
31 #define GCC_GTHR_VXWORKS_H
33 #ifdef _LIBOBJC
35 /* libobjc requires the optional pthreads component. */
36 #include "gthr-posix.h"
38 #else
40 #ifdef __cplusplus
41 extern "C" {
42 #endif
44 #define __GTHREADS 1
45 #define __gthread_active_p() 1
47 /* Mutexes are easy, except that they need to be initialized at runtime. */
49 #include <semLib.h>
51 typedef SEM_ID __gthread_mutex_t;
52 /* All VxWorks mutexes are recursive. */
53 typedef SEM_ID __gthread_recursive_mutex_t;
54 #define __GTHREAD_MUTEX_INIT_FUNCTION __gthread_mutex_init_function
55 #define __GTHREAD_RECURSIVE_MUTEX_INIT_FUNCTION __gthread_recursive_mutex_init_function
57 static inline void
58 __gthread_mutex_init_function (__gthread_mutex_t *mutex)
60 *mutex = semMCreate (SEM_Q_PRIORITY | SEM_INVERSION_SAFE | SEM_DELETE_SAFE);
63 static inline int
64 __gthread_mutex_lock (__gthread_mutex_t *mutex)
66 return semTake (*mutex, WAIT_FOREVER);
69 static inline int
70 __gthread_mutex_trylock (__gthread_mutex_t *mutex)
72 return semTake (*mutex, NO_WAIT);
75 static inline int
76 __gthread_mutex_unlock (__gthread_mutex_t *mutex)
78 return semGive (*mutex);
81 static inline void
82 __gthread_recursive_mutex_init_function (__gthread_recursive_mutex_t *mutex)
84 __gthread_mutex_init_function (mutex);
87 static inline int
88 __gthread_recursive_mutex_lock (__gthread_recursive_mutex_t *mutex)
90 return __gthread_mutex_lock (mutex);
93 static inline int
94 __gthread_recursive_mutex_trylock (__gthread_recursive_mutex_t *mutex)
96 return __gthread_mutex_trylock (mutex);
99 static inline int
100 __gthread_recursive_mutex_unlock (__gthread_recursive_mutex_t *mutex)
102 return __gthread_mutex_unlock (mutex);
105 /* pthread_once is complicated enough that it's implemented
106 out-of-line. See config/vxlib.c. */
108 typedef struct
110 #ifndef __RTP__
111 volatile unsigned char busy;
112 #endif
113 volatile unsigned char done;
115 __gthread_once_t;
117 #ifndef __RTP__
118 # define __GTHREAD_ONCE_INIT { 0, 0 }
119 #else
120 # define __GTHREAD_ONCE_INIT { 0 }
121 #endif
123 extern int __gthread_once (__gthread_once_t *once, void (*func)(void));
125 /* Thread-specific data requires a great deal of effort, since VxWorks
126 is not really set up for it. See config/vxlib.c for the gory
127 details. All the TSD routines are sufficiently complex that they
128 need to be implemented out of line. */
130 typedef unsigned int __gthread_key_t;
132 extern int __gthread_key_create (__gthread_key_t *keyp, void (*dtor)(void *));
133 extern int __gthread_key_delete (__gthread_key_t key);
135 extern void *__gthread_getspecific (__gthread_key_t key);
136 extern int __gthread_setspecific (__gthread_key_t key, void *ptr);
138 #ifdef __cplusplus
140 #endif
142 #endif /* not _LIBOBJC */
144 #endif /* gthr-vxworks.h */