X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=opt%2Fpthreads%2Ftss_delete.c;fp=opt%2Fpthreads%2Ftss_delete.c;h=906c761eda577000b8bc5c28d72706c115ab39f2;hb=540e01a59a43ba091b3b221bf00f1ee7df8cdf1f;hp=0000000000000000000000000000000000000000;hpb=f133f37ab345ed859a35cf6e19aba2f02d18cee8;p=pdclib

diff --git a/opt/pthreads/tss_delete.c b/opt/pthreads/tss_delete.c
new file mode 100644
index 0000000..906c761
--- /dev/null
+++ b/opt/pthreads/tss_delete.c
@@ -0,0 +1,21 @@
+#ifndef REGTEST
+#include <threads.h>
+#include <pthread.h>
+#include <assert.h>
+
+void tss_delete(tss_t key)
+{
+    assert(pthread_key_delete(key) == 0);
+}
+#endif
+
+#ifdef TEST
+#include <_PDCLIB_test.h>
+
+/* Tested in tss_get.c */
+int main( void )
+{
+    return TEST_RESULTS;
+}
+
+#endif