errcode.c

mpi并行计算的c++代码 可用vc或gcc编译通过 可以用来搭建并行计算试验环境

    char s1[] = "pointer1";
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_address", "**mpi_address %p %p", s1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_address %p %p" );
    }
    /* src/mpi/datatype/get_address.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_get_address", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_get_address" );
    {
    /* src/mpi/datatype/get_address.c */
    char s1[] = "pointer1";
    char s2[] = "pointer2";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_get_address", "**mpi_get_address %p %p", s1, s2 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_get_address %p %p" );
    }
    /* src/mpi/datatype/get_count.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_get_count", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_get_count" );
    {
    /* src/mpi/datatype/get_count.c */
    char s1[] = "pointer1";
    int i2 = MPI_INT;
    char s3[] = "pointer3";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_get_count", "**mpi_get_count %p %D %p", s1, i2, s3 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_get_count %p %D %p" );
    }
    /* src/mpi/datatype/get_elements.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_get_elements", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_get_elements" );
    {
    /* src/mpi/datatype/get_elements.c */
    char s1[] = "pointer1";
    int i2 = MPI_INT;
    char s3[] = "pointer3";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_get_elements", "**mpi_get_elements %p %D %p", s1, i2, s3 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_get_elements %p %D %p" );
    }
    /* src/mpi/datatype/pack.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**arg", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**arg" );
    /* src/mpi/datatype/pack.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_pack", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_pack" );
    {
    /* src/mpi/datatype/pack.c */
    char s1[] = "pointer1";
    int i2 = 2;
    int i3 = MPI_INT;
    char s4[] = "pointer4";
    int i5 = 5;
    char s6[] = "pointer6";
    int i7 = MPI_COMM_WORLD;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_pack", "**mpi_pack %p %d %D %p %d %p %C", s1, i2, i3, s4, i5, s6, i7 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_pack %p %d %D %p %d %p %C" );
    }
    /* src/mpi/datatype/pack_external.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_pack_external", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_pack_external" );
    {
    /* src/mpi/datatype/pack_external.c */
    char s1[] = "string1";
    char s2[] = "pointer2";
    int i3 = 3;
    int i4 = MPI_INT;
    char s5[] = "pointer5";
    int i6 = 6;
    char s7[] = "pointer7";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_pack_external", "**mpi_pack_external %s %p %d %D %p %d %p", s1, s2, i3, i4, s5, i6, s7 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_pack_external %s %p %d %D %p %d %p" );
    }
    /* src/mpi/datatype/pack_external_size.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_pack_external_size", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_pack_external_size" );
    {
    /* src/mpi/datatype/pack_external_size.c */
    char s1[] = "string1";
    int i2 = 2;
    int i3 = MPI_INT;
    char s4[] = "pointer4";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_pack_external_size", "**mpi_pack_external_size %s %d %D %p", s1, i2, i3, s4 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_pack_external_size %s %d %D %p" );
    }
    /* src/mpi/datatype/pack_size.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_pack_size", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_pack_size" );
    {
    /* src/mpi/datatype/pack_size.c */
    int i1 = 1;
    int i2 = MPI_INT;
    int i3 = MPI_COMM_WORLD;
    char s4[] = "pointer4";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_pack_size", "**mpi_pack_size %d %D %C %p", i1, i2, i3, s4 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_pack_size %d %D %C %p" );
    }
    /* src/mpi/datatype/register_datarep.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**notimpl", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**notimpl" );
    /* src/mpi/datatype/register_datarep.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_register_datarep", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_register_datarep" );
    {
    /* src/mpi/datatype/register_datarep.c */
    char s1[] = "string1";
    char s2[] = "pointer2";
    char s3[] = "pointer3";
    char s4[] = "pointer4";
    char s5[] = "pointer5";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_register_datarep", "**mpi_register_datarep %s %p %p %p %p", s1, s2, s3, s4, s5 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_register_datarep %s %p %p %p %p" );
    }
    /* src/mpi/datatype/status_set_elements.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_status_set_elements", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_status_set_elements" );
    {
    /* src/mpi/datatype/status_set_elements.c */
    char s1[] = "pointer1";
    int i2 = MPI_INT;
    int i3 = 3;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_status_set_elements", "**mpi_status_set_elements %p %D %d", s1, i2, i3 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_status_set_elements %p %D %d" );
    }
    /* src/mpi/datatype/type_commit.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_commit", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_commit" );
    {
    /* src/mpi/datatype/type_commit.c */
    char s1[] = "pointer1";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_commit", "**mpi_type_commit %p", s1 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_commit %p" );
    }
    /* src/mpi/datatype/type_contiguous.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_contiguous", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_contiguous" );
    {
    /* src/mpi/datatype/type_contiguous.c */
    int i1 = 1;
    int i2 = MPI_INT;
    char s3[] = "pointer3";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_contiguous", "**mpi_type_contiguous %d %D %p", i1, i2, s3 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_contiguous %d %D %p" );
    }
    /* src/mpi/datatype/type_create_darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darrayblock", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**darrayblock" );
    {
    /* src/mpi/datatype/type_create_darray.c */
    int i1 = 1;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darrayblock", "**darrayblock %d", i1 );
    ChkMsg( err, MPI_ERR_OTHER, "**darrayblock %d" );
    }
    /* src/mpi/datatype/type_create_darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darrayblock2", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**darrayblock2" );
    {
    /* src/mpi/datatype/type_create_darray.c */
    int i1 = 1;
    int i2 = 2;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darrayblock2", "**darrayblock2 %d %d", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**darrayblock2 %d %d" );
    }
    /* src/mpi/datatype/type_create_darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darraycyclic", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**darraycyclic" );
    {
    /* src/mpi/datatype/type_create_darray.c */
    int i1 = 1;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darraycyclic", "**darraycyclic %d", i1 );
    ChkMsg( err, MPI_ERR_OTHER, "**darraycyclic %d" );
    }
    {
    /* src/mpi/datatype/type_create_darray.c */
    char s1[] = "string1";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**arg", "**arg %s", s1 );
    ChkMsg( err, MPI_ERR_OTHER, "**arg %s" );
    }
    /* src/mpi/datatype/type_create_darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darrayunknown", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**darrayunknown" );
    /* src/mpi/datatype/type_create_darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darraydist", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**darraydist" );
    {
    /* src/mpi/datatype/type_create_darray.c */
    int i1 = 1;
    int i2 = 2;
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**darraydist", "**darraydist %d %d", i1, i2 );
    ChkMsg( err, MPI_ERR_OTHER, "**darraydist %d %d" );
    }
    /* src/mpi/datatype/type_create_darray.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_darray", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_darray" );
    {
    /* src/mpi/datatype/type_create_darray.c */
    int i1 = 1;
    int i2 = 2;
    int i3 = 3;
    char s4[] = "pointer4";
    char s5[] = "pointer5";
    char s6[] = "pointer6";
    char s7[] = "pointer7";
    int i8 = 8;
    int i9 = MPI_INT;
    char s10[] = "pointer10";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_darray", "**mpi_type_create_darray %d %d %d %p %p %p %p %d %D %p", i1, i2, i3, s4, s5, s6, s7, i8, i9, s10 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_darray %d %d %d %p %p %p %p %d %D %p" );
    }
    /* src/mpi/datatype/type_create_hindexed.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_hindexed", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_hindexed" );
    {
    /* src/mpi/datatype/type_create_hindexed.c */
    int i1 = 1;
    char s2[] = "pointer2";
    char s3[] = "pointer3";
    int i4 = MPI_INT;
    char s5[] = "pointer5";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_hindexed", "**mpi_type_create_hindexed %d %p %p %D %p", i1, s2, s3, i4, s5 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_hindexed %d %p %p %D %p" );
    }
    /* src/mpi/datatype/type_create_hvector.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_hvector", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_hvector" );
    {
    /* src/mpi/datatype/type_create_hvector.c */
    int i1 = 1;
    int i2 = 2;
    int i3 = 3;
    int i4 = MPI_INT;
    char s5[] = "pointer5";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_hvector", "**mpi_type_create_hvector %d %d %d %D %p", i1, i2, i3, i4, s5 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_hvector %d %d %d %D %p" );
    }
    /* src/mpi/datatype/type_create_indexed_block.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_indexed_block", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_indexed_block" );
    {
    /* src/mpi/datatype/type_create_indexed_block.c */
    int i1 = 1;
    int i2 = 2;
    char s3[] = "pointer3";
    int i4 = MPI_INT;
    char s5[] = "pointer5";
     err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_indexed_block", "**mpi_type_create_indexed_block %d %d %p %D %p", i1, i2, s3, i4, s5 );
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_indexed_block %d %d %p %D %p" );
    }
    /* src/mpi/datatype/type_create_resized.c */
    err = MPIR_Err_create_code(MPI_SUCCESS, MPIR_ERR_RECOVERABLE, "errcode::main", __LINE__, MPI_ERR_OTHER, "**mpi_type_create_resized", 0);
    ChkMsg( err, MPI_ERR_OTHER, "**mpi_type_create_resized" );
    {