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

	if (omp_unset_lock_real != NULL && EXTRAE_INITIALIZED())
	{
		Backend_Enter_Instrumentation (2);
		Probe_OpenMP_Named_Unlock_Entry(p1);
		omp_unset_lock_real (p1);
		Probe_OpenMP_Named_Unlock_Exit();
		Backend_Leave_Instrumentation ();
	}
	else if (omp_unset_lock_real != NULL)
	{
		omp_unset_lock_real (p1);
	}
	else
	{
		fprintf (stderr, PACKAGE_NAME": omp_unset_lock is not hooked! exiting!!\n");
		exit (0);
	}
}
コード例 #2
0
void Extrae_OpenMP_Named_Unlock_Exit (void)
{
	Probe_OpenMP_Named_Unlock_Exit ();
	Backend_Leave_Instrumentation ();
}