errcode.c

fortran并行计算包

    int i1 = MPI_WIN_NULL;
    char s2[] = "pointer2";
    char s3[] = "pointer3";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_get_name", "**mpi_win_get_name %W %p %p", i1, s2, s3 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_get_name %W %p %p" );
    }
    /* src/mpi/rma/win_test.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_test", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_test" );
    {
    /* src/mpi/rma/win_test.c */
    int i1 = MPI_WIN_NULL;
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_test", "**mpi_win_test %W %p", i1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_test %W %p" );
    }
    /* src/mpi/rma/win_fence.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_fence", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_fence" );
    {
    /* src/mpi/rma/win_fence.c */
    int i1 = 1;
    int i2 = MPI_WIN_NULL;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_fence", "**mpi_win_fence %A %W", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_fence %A %W" );
    }
    /* src/mpi/errhan/win_call_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_call_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_call_errhandler" );
    {
    /* src/mpi/errhan/win_call_errhandler.c */
    int i1 = MPI_WIN_NULL;
    int i2 = 2;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_call_errhandler", "**mpi_win_call_errhandler %W %d", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_call_errhandler %W %d" );
    }
    /* src/mpi/errhan/comm_get_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_comm_get_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_comm_get_errhandler" );
    {
    /* src/mpi/errhan/comm_get_errhandler.c */
    int i1 = MPI_COMM_WORLD;
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_comm_get_errhandler", "**mpi_comm_get_errhandler %C %p", i1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_comm_get_errhandler %C %p" );
    }
    /* src/mpi/errhan/file_set_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**errhandnotfile", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**errhandnotfile" );
    /* src/mpi/errhan/file_set_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_file_set_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_file_set_errhandler" );
    {
    /* src/mpi/errhan/file_set_errhandler.c */
    MPI_File i1 = MPI_FILE_NULL;
    int i2 = MPI_ERRORS_RETURN;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_file_set_errhandler", "**mpi_file_set_errhandler %F %E", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_file_set_errhandler %F %E" );
    }
    /* src/mpi/errhan/errhandler_set.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_errhandler_set", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_errhandler_set" );
    {
    /* src/mpi/errhan/errhandler_set.c */
    int i1 = MPI_COMM_WORLD;
    int i2 = MPI_ERRORS_RETURN;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_errhandler_set", "**mpi_errhandler_set %C %E", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_errhandler_set %C %E" );
    }
    /* src/mpi/errhan/dynerrutil.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**argerrcode", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**argerrcode" );
    {
    /* src/mpi/errhan/dynerrutil.c */
    int i1 = 1;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**argerrcode", "**argerrcode %d", i1 );
    ChkMsg( err, MPI_ERR_OTHER, "**argerrcode %d" );
    }
    /* src/mpi/errhan/dynerrutil.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**nomem", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**nomem" );
    {
    /* src/mpi/errhan/dynerrutil.c */
    char s1[] = "string1";
    int i2 = 2;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**nomem", "**nomem %s %d", s1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**nomem %s %d" );
    }
    /* src/mpi/errhan/win_get_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_get_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_get_errhandler" );
    {
    /* src/mpi/errhan/win_get_errhandler.c */
    int i1 = MPI_WIN_NULL;
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_get_errhandler", "**mpi_win_get_errhandler %W %p", i1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_get_errhandler %W %p" );
    }
    /* src/mpi/errhan/file_create_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_file_create_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_file_create_errhandler" );
    {
    /* src/mpi/errhan/file_create_errhandler.c */
    char s1[] = "pointer1";
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_file_create_errhandler", "**mpi_file_create_errhandler %p %p", s1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_file_create_errhandler %p %p" );
    }
    /* src/mpi/errhan/errhandler_create.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_errhandler_create", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_errhandler_create" );
    {
    /* src/mpi/errhan/errhandler_create.c */
    char s1[] = "pointer1";
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_errhandler_create", "**mpi_errhandler_create %p %p", s1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_errhandler_create %p %p" );
    }
    /* src/mpi/errhan/comm_set_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_comm_set_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_comm_set_errhandler" );
    {
    /* src/mpi/errhan/comm_set_errhandler.c */
    int i1 = MPI_COMM_WORLD;
    int i2 = MPI_ERRORS_RETURN;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_comm_set_errhandler", "**mpi_comm_set_errhandler %C %E", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_comm_set_errhandler %C %E" );
    }
    /* src/mpi/errhan/error_class.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_error_class", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_error_class" );
    {
    /* src/mpi/errhan/error_class.c */
    int i1 = 1;
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_error_class", "**mpi_error_class %d %p", i1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_error_class %d %p" );
    }
    /* src/mpi/errhan/win_set_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**errhandnotwin", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**errhandnotwin" );
    /* src/mpi/errhan/win_set_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_set_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_set_errhandler" );
    {
    /* src/mpi/errhan/win_set_errhandler.c */
    int i1 = MPI_WIN_NULL;
    int i2 = MPI_ERRORS_RETURN;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_set_errhandler", "**mpi_win_set_errhandler %W %E", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_set_errhandler %W %E" );
    }
    /* src/mpi/errhan/error_string.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_error_string", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_error_string" );
    {
    /* src/mpi/errhan/error_string.c */
    int i1 = 1;
    char s2[] = "string2";
    char s3[] = "pointer3";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_error_string", "**mpi_error_string %d %s %p", i1, s2, s3 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_error_string %d %s %p" );
    }
    /* src/mpi/errhan/file_call_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_file_call_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_file_call_errhandler" );
    {
    /* src/mpi/errhan/file_call_errhandler.c */
    MPI_File i1 = MPI_FILE_NULL;
    int i2 = 2;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_file_call_errhandler", "**mpi_file_call_errhandler %F %d", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_file_call_errhandler %F %d" );
    }
    /* src/mpi/errhan/comm_create_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_comm_create_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_comm_create_errhandler" );
    {
    /* src/mpi/errhan/comm_create_errhandler.c */
    char s1[] = "pointer1";
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_comm_create_errhandler", "**mpi_comm_create_errhandler %p %p", s1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_comm_create_errhandler %p %p" );
    }
    /* src/mpi/errhan/file_get_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_file_get_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_file_get_errhandler" );
    {
    /* src/mpi/errhan/file_get_errhandler.c */
    MPI_File i1 = MPI_FILE_NULL;
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_file_get_errhandler", "**mpi_file_get_errhandler %F %p", i1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_file_get_errhandler %F %p" );
    }
    /* src/mpi/errhan/errhandler_get.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_errhandler_get", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_errhandler_get" );
    {
    /* src/mpi/errhan/errhandler_get.c */
    int i1 = MPI_COMM_WORLD;
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_errhandler_get", "**mpi_errhandler_get %C %p", i1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_errhandler_get %C %p" );
    }
    /* src/mpi/errhan/add_error_class.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**noerrclasses", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**noerrclasses" );
    /* src/mpi/errhan/add_error_class.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_add_error_class", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_add_error_class" );
    {
    /* src/mpi/errhan/add_error_class.c */
    char s1[] = "pointer1";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_add_error_class", "**mpi_add_error_class %p", s1 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_add_error_class %p" );
    }
    {
    /* src/mpi/errhan/win_create_errhandler.c */
    char s1[] = "string1";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**nomem", "**nomem %s", s1 );
    ChkMsg( err, MPI_ERR_OTHER, "**nomem %s" );
    }
    /* src/mpi/errhan/win_create_errhandler.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_win_create_errhandler", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_win_create_errhandler" );