summaryrefslogtreecommitdiff
path: root/libguile/arbiters.c
diff options
context:
space:
mode:
authorKevin Ryde <user42@zip.com.au>2005-03-17 23:11:54 +0000
committerKevin Ryde <user42@zip.com.au>2005-03-17 23:11:54 +0000
commit8ff3ca467c45642f73b998c97f13a340d018d9bd (patch)
tree7a30c84eedaea0a6fedc37166d6feeb81640c2eb /libguile/arbiters.c
parente96f5ee768e9ecdbd9566482ba5d7bb92cd36b92 (diff)
downloadguile-8ff3ca467c45642f73b998c97f13a340d018d9bd.tar.gz
(FETCH_STORE) [generic C]: Should be
scm_i_scm_pthread_mutex_lock/unlock now. Reported by Ludovic Courtès.
Diffstat (limited to 'libguile/arbiters.c')
-rw-r--r--libguile/arbiters.c14
1 files changed, 7 insertions, 7 deletions
diff --git a/libguile/arbiters.c b/libguile/arbiters.c
index 35011917a..ec1eb7804 100644
--- a/libguile/arbiters.c
+++ b/libguile/arbiters.c
@@ -1,4 +1,4 @@
-/* Copyright (C) 1995,1996, 1997, 2000, 2001, 2004 Free Software Foundation, Inc.
+/* Copyright (C) 1995,1996, 1997, 2000, 2001, 2004, 2005 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
@@ -64,12 +64,12 @@
atomic. Unfortunately this approach probably makes arbiters no faster
than mutexes (though still using less memory of course), so some
CPU-specifics are highly desirable. */
-#define FETCH_STORE(fet,mem,sto) \
- do { \
- scm_mutex_lock (&scm_i_misc_mutex); \
- (fet) = (mem); \
- (mem) = (sto); \
- scm_mutex_unlock (&scm_i_misc_mutex); \
+#define FETCH_STORE(fet,mem,sto) \
+ do { \
+ scm_i_scm_pthread_mutex_lock (&scm_i_misc_mutex); \
+ (fet) = (mem); \
+ (mem) = (sto); \
+ scm_i_pthread_mutex_unlock (&scm_i_misc_mutex); \
} while (0)
#endif