(file) Return to tls.c CVS log (file) (dir) Up to [OMI] / omi / pal

File: [OMI] / omi / pal / tls.c (download)
Revision: 1.1, Mon Apr 20 17:19:55 2015 UTC (9 years ago) by krisbash
Branch: MAIN
CVS Tags: OMI_1_0_8_2, OMI_1_0_8_1, HEAD
OMI 1.0.8-1

#include "tls.h"

_Return_type_success_(return == 0) int TLS_Init_Injected(
    _Out_ TLS* self,
    NitsCallSite cs)
{
    if (NitsShouldFault(cs, NitsAutomatic))
        return -1;

#if defined(_MSC_VER)
    self->index = TlsAlloc();
    return self->index == TLS_OUT_OF_INDEXES ? -1 : 0;
#else
    return pthread_key_create(&self->key, NULL) == 0 ? 0 : -1;
#endif
}

ViewCVS 0.9.2