Move the function pointer for __tsan_init from file static to function local.

Author: paulfloyd

openmp/tools/archer/ompt-tsan.cpp

@@ -166,9 +166,6 @@ DECLARE_TSAN_FUNCTION(AnnotateNewMemory, const char *, int,
                       const volatile void *, size_t)
 DECLARE_TSAN_FUNCTION(__tsan_func_entry, const void *)
 DECLARE_TSAN_FUNCTION(__tsan_func_exit)
-
-// __tsan_init is used to detect absence of TSan and must intentionally be a nullptr.
-static void (*__tsan_init)(void);
 }
 
 // This marker is used to define a happens-before arc. The race detector will
@@ -1256,6 +1253,8 @@ ompt_start_tool(unsigned int omp_version, const char *runtime_version) {
   // an implementation of the Annotation interface is available in the
   // execution or disable the tool (by returning NULL).
 
+  void (*__tsan_init)(void) = nullptr;
+
   findTsanFunctionSilent(__tsan_init, (void (*)(void)));
   if (!__tsan_init) // if we are not running on TSAN, give a different
                           // tool the chance to be loaded