Blame memkind-1.10.0/jemalloc/include/jemalloc/internal/tsd_malloc_thread_cleanup.h

Packit Service 724aca
#ifdef JEMALLOC_INTERNAL_TSD_MALLOC_THREAD_CLEANUP_H
Packit Service 724aca
#error This file should be included only once, by tsd.h.
Packit Service 724aca
#endif
Packit Service 724aca
#define JEMALLOC_INTERNAL_TSD_MALLOC_THREAD_CLEANUP_H
Packit Service 724aca
Packit Service 724aca
#define JEMALLOC_TSD_TYPE_ATTR(type) __thread type JEMALLOC_TLS_MODEL
Packit Service 724aca
Packit Service 724aca
extern JEMALLOC_TSD_TYPE_ATTR(tsd_t) tsd_tls;
Packit Service 724aca
extern JEMALLOC_TSD_TYPE_ATTR(bool) tsd_initialized;
Packit Service 724aca
extern bool tsd_booted;
Packit Service 724aca
Packit Service 724aca
/* Initialization/cleanup. */
Packit Service 724aca
JEMALLOC_ALWAYS_INLINE bool
Packit Service 724aca
tsd_cleanup_wrapper(void) {
Packit Service 724aca
	if (tsd_initialized) {
Packit Service 724aca
		tsd_initialized = false;
Packit Service 724aca
		tsd_cleanup(&tsd_tls);
Packit Service 724aca
	}
Packit Service 724aca
	return tsd_initialized;
Packit Service 724aca
}
Packit Service 724aca
Packit Service 724aca
JEMALLOC_ALWAYS_INLINE bool
Packit Service 724aca
tsd_boot0(void) {
Packit Service 724aca
	malloc_tsd_cleanup_register(&tsd_cleanup_wrapper);
Packit Service 724aca
	tsd_booted = true;
Packit Service 724aca
	return false;
Packit Service 724aca
}
Packit Service 724aca
Packit Service 724aca
JEMALLOC_ALWAYS_INLINE void
Packit Service 724aca
tsd_boot1(void) {
Packit Service 724aca
	/* Do nothing. */
Packit Service 724aca
}
Packit Service 724aca
Packit Service 724aca
JEMALLOC_ALWAYS_INLINE bool
Packit Service 724aca
tsd_boot(void) {
Packit Service 724aca
	return tsd_boot0();
Packit Service 724aca
}
Packit Service 724aca
Packit Service 724aca
JEMALLOC_ALWAYS_INLINE bool
Packit Service 724aca
tsd_booted_get(void) {
Packit Service 724aca
	return tsd_booted;
Packit Service 724aca
}
Packit Service 724aca
Packit Service 724aca
JEMALLOC_ALWAYS_INLINE bool
Packit Service 724aca
tsd_get_allocates(void) {
Packit Service 724aca
	return false;
Packit Service 724aca
}
Packit Service 724aca
Packit Service 724aca
/* Get/set. */
Packit Service 724aca
JEMALLOC_ALWAYS_INLINE tsd_t *
Packit Service 724aca
tsd_get(bool init) {
Packit Service 724aca
	return &tsd_tls;
Packit Service 724aca
}
Packit Service 724aca
JEMALLOC_ALWAYS_INLINE void
Packit Service 724aca
tsd_set(tsd_t *val) {
Packit Service 724aca
	assert(tsd_booted);
Packit Service 724aca
	if (likely(&tsd_tls != val)) {
Packit Service 724aca
		tsd_tls = (*val);
Packit Service 724aca
	}
Packit Service 724aca
	tsd_initialized = true;
Packit Service 724aca
}