Exemplos de report_xml_atroot em C++ (Cpp)

Exemplo n.º 1

Arquivo: mod_mpi.c Projeto: deskinner/ipm

int mod_mpi_output(ipm_mod_t* mod, int oflags)
{
  unsigned long reportflags;
  
  reportflags=0;

#ifdef HAVE_CLUSTERING
  reportflags|=XML_CLUSTERED;
  reportflags|=XML_RELATIVE_RANKS;
#endif  

  if( (task.flags&FLAG_LOG_TERSE) ||
      (task.flags&FLAG_LOG_FULL) ) 
    {
      report_set_filename();

      if( (task.flags&FLAG_LOGWRITER_MPIIO) )  {
	if( report_xml_mpiio(reportflags)!=IPM_OK ) 
	  {
	    IPMERR("Writing log using MPI-IO failed, trying serial\n");
	    report_xml_atroot(reportflags);
	  }
      }
      else {
	report_xml_atroot(reportflags);
      }
      
    }
  return IPM_OK;
}

Exemplo n.º 2

Arquivo: ipm_core.c Projeto: nerscadmin/IPM

void ipm_write_profile_log()
{
    unsigned long reportflags;

    reportflags=0;
#ifdef HAVE_CLUSTERING
    reportflags|=XML_CLUSTERED;
    reportflags|=XML_RELATIVE_RANKS;
#endif

#ifdef HAVE_MPI
    if( (task.flags&FLAG_LOG_TERSE) ||
            (task.flags&FLAG_LOG_FULL) )
    {
        report_set_filename();

        if( (task.flags&FLAG_LOGWRITER_MPIIO) )  {
            if( report_xml_mpiio(reportflags)!=IPM_OK )
            {
                IPMERR("Writing log using MPI-IO failed, trying serial\n");
                report_xml_atroot(reportflags);
            }
        }
        else {
            report_xml_atroot(reportflags);
        }
    }
#else /* HAVE_MPI */
    report_xml_local(reportflags);
#endif /* HAVE_MPI */
}