Imported Upstream version 3.3.0.2upstream/3.3.0.2

1 files changed, 43 insertions, 0 deletions

diff --git a/libcult/cult/sched/spin.ixx b/libcult/cult/sched/spin.ixx
new file mode 100644
index 0000000..2accdde
--- /dev/null
+++ b/libcult/cult/sched/spin.ixx
@@ -0,0 +1,43 @@
+// file      : cult/sched/spin.ixx
+// author    : Boris Kolpackov <boris@kolpackov.net>
+// copyright : Copyright (c) 2005-2010 Boris Kolpackov
+// license   : GNU GPL v2 + exceptions; see accompanying LICENSE file
+
+#include <cult/sched/exception.hxx>
+
+namespace Cult
+{
+  namespace Sched
+  {
+    inline
+    Void Spin::
+    lock ()
+    {
+      if (Int e = pthread_spin_lock (&spin_))
+        throw Implementation (e);
+    }
+
+    inline
+    Boolean Spin::
+    try_lock ()
+    {
+      Int e (pthread_spin_trylock (&spin_));
+
+      switch (e)
+      {
+      case 0: return true;
+      case EBUSY: return false;
+      default: throw Implementation (e);
+      }
+    }
+
+    inline
+    Void Spin::
+    unlock ()
+    {
+      if (Int e = pthread_spin_unlock (&spin_))
+        throw Implementation (e);
+    }
+  }
+}
+