Add pthreads threading backend and move the POSIX port over to using it

[pdclib.old] / opt / pthreads / call_once.c

diff --git a/opt/pthreads/call_once.c b/opt/pthreads/call_once.c
new file mode 100644 (file)
index 0000000..123ad3a
--- /dev/null
+++ b/opt/pthreads/call_once.c
@@ -0,0 +1,38 @@
+#ifndef REGTEST
+#include <threads.h>
+#include <pthread.h>
+
+void call_once(once_flag *flag, void (*func)(void))
+{
+    pthread_once(flag, func);
+}
+#endif
+
+#ifdef TEST
+#include <_PDCLIB_test.h>
+
+#ifndef REGTEST
+static int count = 0;
+static once_flag once = ONCE_FLAG_INIT;
+
+static void do_once(void)
+{
+    count++;
+}
+#endif
+
+int main( void )
+{
+#ifndef REGTEST
+    TESTCASE(count == 0);
+    call_once(&once, do_once);
+    TESTCASE(count == 1);
+    call_once(&once, do_once);
+    TESTCASE(count == 1);
+    do_once();
+    TESTCASE(count == 2);
+#endif
+    return TEST_RESULTS;
+}
+
+#endif