C++ (Cpp) Extrae_init_tracingの例

コード例 #1

ファイル: fork_wrapper.c プロジェクト: polca-project/polca-toolbox

void Extrae_Probe_fork_child_Exit (void)
{
	if (mpitrace_on)
	{
		Extrae_init_tracing (TRUE);
	}
}

コード例 #2

ファイル: misc_wrapper.c プロジェクト: gllort/extrae

void Extrae_init_Wrapper (void)
{
	/* Do not initialize if it's already initialized */
	if (Extrae_is_initialized_Wrapper() == EXTRAE_NOT_INITIALIZED)
	{
		/* Actually initialize the tracing */
		Extrae_init_tracing(FALSE);
	}
	else
	{
		char *previous = "Unknown";
		if (Extrae_is_initialized_Wrapper() == EXTRAE_INITIALIZED_EXTRAE_INIT)
			previous = "API";
		else if (Extrae_is_initialized_Wrapper() == EXTRAE_INITIALIZED_MPI_INIT)
			previous = "MPI";
		else if (Extrae_is_initialized_Wrapper() == EXTRAE_INITIALIZED_SHMEM_INIT)
			previous = "SHMEM";

		fprintf (stderr, PACKAGE_NAME": Warning! API tries to initialize more than once\n");
		fprintf (stderr, PACKAGE_NAME":          Previous initialization was done by %s\n", previous);
	}
}