Skip to content

Commit

Permalink
Windows: export everything in MagicsSingle/MagicsDouble
Browse files Browse the repository at this point in the history
  • Loading branch information
dtip committed Jan 10, 2019
1 parent 27de86c commit fa88310
Show file tree
Hide file tree
Showing 2 changed files with 10 additions and 10 deletions.
10 changes: 5 additions & 5 deletions src/MagicsDouble.cc
Original file line number Diff line number Diff line change
Expand Up @@ -88,31 +88,31 @@ extern "C"
#include <magics_api.h>


void psetr_(char* name, double* value, int length)
MAGICS_EXPORT void psetr_(char* name, double* value, int length)
{
std::string n(name, length);
mag_setr(n.c_str(), *value);
}

void pset1r_(char* name, double* data, int* dim, int length)
MAGICS_EXPORT void pset1r_(char* name, double* data, int* dim, int length)
{
std::string n(name, length);
mag_set1r(n.c_str(), data, *dim);
}

void pset2r_(char* name, double* data, int *dim, int *dim2, int length)
MAGICS_EXPORT void pset2r_(char* name, double* data, int *dim, int *dim2, int length)
{
std::string n(name, length);
mag_set2r(n.c_str(), data, *dim, *dim2);
}

void pset3r_(char* name, double* data, int* dim, int *dim2, int* dim3, int length)
MAGICS_EXPORT void pset3r_(char* name, double* data, int* dim, int *dim2, int* dim3, int length)
{
std::string n(name, length);
mag_set3r(n.c_str(), data, *dim, *dim2, *dim3);
}

void penqr_(char* name, double* value, int length)
MAGICS_EXPORT void penqr_(char* name, double* value, int length)
{
std::string n(name, length);
mag_enqr( n.c_str(), value);
Expand Down
10 changes: 5 additions & 5 deletions src/MagicsSingle.cc
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@ extern "C"
#include <magics_api.h>


void psetr_(char* name, float* value, int length)
MAGICS_EXPORT void psetr_(char* name, float* value, int length)
{
std::string n(name, length);
double dval = *value;
Expand All @@ -34,7 +34,7 @@ void psetr_(char* name, float* value, int length)
mag_setr(n.c_str(), dval);
}

void pset1r_(char* name, float* data, int* dim, int length)
MAGICS_EXPORT void pset1r_(char* name, float* data, int* dim, int length)
{
std::string n(name, length);
double* da = new double [*dim];
Expand All @@ -44,7 +44,7 @@ void pset1r_(char* name, float* data, int* dim, int length)
delete [] da;
}

void pset2r_(char* name, float* data, int *dim, int *dim2, int length)
MAGICS_EXPORT void pset2r_(char* name, float* data, int *dim, int *dim2, int length)
{
std::string n(name, length);
const long no = (*dim)*(*dim2);
Expand All @@ -55,7 +55,7 @@ void pset2r_(char* name, float* data, int *dim, int *dim2, int length)
delete [] da;
}

void pset3r_(char* name, float* data, int* dim, int *dim2, int* dim3, int length)
MAGICS_EXPORT void pset3r_(char* name, float* data, int* dim, int *dim2, int* dim3, int length)
{
std::string n(name, length);
const long no = (*dim)*(*dim2)*(*dim3);
Expand All @@ -66,7 +66,7 @@ void pset3r_(char* name, float* data, int* dim, int *dim2, int* dim3, int length
delete [] da;
}

void penqr_(const char* name, float* value, int length)
MAGICS_EXPORT void penqr_(const char* name, float* value, int length)
{
std::string n(name, length);
double tmp;
Expand Down

0 comments on commit fa88310

Please sign in to comment.