コード例 #1
0
ファイル: omp_wrapper.c プロジェクト: mogeb/extrae-paraver
void omp_set_lock (void *p1)
{
#if defined(DEBUG)
	fprintf (stderr, PACKAGE_NAME": omp_set_lock is at %p\n", omp_set_lock_real);
	fprintf (stderr, PACKAGE_NAME": omp_set_lock params %p\n", p1);
#endif

	if (omp_set_lock_real != NULL && EXTRAE_INITIALIZED())
	{
		Backend_Enter_Instrumentation (2);
		Probe_OpenMP_Named_Lock_Entry();
		omp_set_lock_real (p1);
		Probe_OpenMP_Named_Lock_Exit(p1);
		Backend_Leave_Instrumentation ();
	}
	else if (omp_set_lock_real != NULL)
	{
		omp_set_lock_real (p1);
	}
	else
	{
		fprintf (stderr, PACKAGE_NAME": omp_set_lock is not hooked! exiting!!\n");
		exit (0);
	}
}
コード例 #2
0
void Extrae_OpenMP_Named_Lock_Entry (void *name)
{
	Backend_Enter_Instrumentation (2);
	Probe_OpenMP_Named_Lock_Entry (name);
}