X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;ds=sidebyside;f=platform%2Fwin32%2Ffunctions%2Fthreads%2Ftss_set.c;fp=platform%2Fwin32%2Ffunctions%2Fthreads%2Ftss_set.c;h=5ab53f14d69bff8dff6f0bcfeb039bcc8dba89bc;hb=21c5050f9d173dc1ea751cb8d32549d22d01aba8;hp=0000000000000000000000000000000000000000;hpb=63253d8feb501c19ef09194a6da407a8c331cfad;p=pdclib.old

diff --git a/platform/win32/functions/threads/tss_set.c b/platform/win32/functions/threads/tss_set.c
new file mode 100644
index 0000000..5ab53f1
--- /dev/null
+++ b/platform/win32/functions/threads/tss_set.c
@@ -0,0 +1,22 @@
+#ifndef REGTEST
+#include <threads.h>
+#include <windows.h>
+
+int tss_set(tss_t key, void *val)
+{
+    if(TlsSetValue(key->_Key, val))
+        return thrd_success;
+    return thrd_error;
+}
+#endif
+
+#ifdef TEST
+#include <_PDCLIB_test.h>
+
+/* Tested in tss_get.c */
+int main( void )
+{
+    return TEST_RESULTS;
+}
+
+#endif
\ No newline at end of file