source: XIOS/dev/branch_openmp/extern/ep_dev/ep_type.cpp @ 1517

Last change on this file since 1517 was 1517, checked in by yushan, 3 years ago

save dev

File size: 1.2 KB
RevLine 
[1381]1#include "ep_lib.hpp"
2#include <mpi.h>
3#include "ep_declaration.hpp"
4#include <iostream>
5#include <fstream>
6#include "ep_mpi.hpp"
7
8using namespace std;
9
10
11namespace ep_lib
12{ 
[1517]13  ep_comm::ep_comm(void* comm)
[1381]14  {
[1517]15    is_ep = false;
16    is_intercomm = false;
17    mpi_comm = static_cast< ::MPI_Comm*>(comm);
[1381]18  }
19
[1517]20  ep_info::ep_info(void* info)
[1381]21  {
[1517]22    mpi_info = static_cast< ::MPI_Info*>(info);
[1381]23  }
24
[1500]25  ep_request::ep_request(void* request)
[1381]26  {
[1517]27    mpi_request = static_cast< ::MPI_Request*>(request);
[1381]28  }
29 
[1500]30  ep_status::ep_status(void* status)
31  {
[1517]32    mpi_status = static_cast< ::MPI_Status*>(status);
[1500]33  }
[1517]34
35  /*
[1500]36 
[1381]37  MPI_Aint::MPI_Aint(void* aint)
38  {
39    mpi_aint = new ::MPI_Aint;
40    *(static_cast< ::MPI_Aint*>(mpi_aint)) = *(static_cast< ::MPI_Aint*>(aint));
41  }
42
43  MPI_Aint::MPI_Aint(int aint)
44  {
45    mpi_aint = new ::MPI_Aint;
46    *(static_cast< ::MPI_Aint*>(mpi_aint)) = aint;
47  }
[1385]48
49  MPI_Aint MPI_Aint::operator=(int a)
50  {
51    mpi_aint = new ::MPI_Aint;
52    *(static_cast< int*>(mpi_aint)) = a;
53  }
[1381]54 
55  MPI_Fint::MPI_Fint(void* fint)
56  {
57    mpi_fint = new ::MPI_Fint;
58    *(static_cast< ::MPI_Fint*>(mpi_fint)) = *(static_cast< ::MPI_Fint*>(fint));
59  }
60
61 
[1517]62*/
[1381]63 
64
65
66}
67
68
69
70
71
72
73
74
75
Note: See TracBrowser for help on using the repository browser.