Commit a753b5ca authored by Thomas Jahns's avatar Thomas Jahns 🤸
Browse files

Remove memory type from public interface of streamWriteVarPart.

parent 87d784e2
......@@ -236,7 +236,7 @@ MPI_Comm pioInit(MPI_Comm commSuper, int nProcsIO, int IOMode,
int *pioNamespace, float partInflate);
void pioWriteTimestep ( int, int, int );
void streamWriteVarPart (int streamID, int varID, int memtype,
void streamWriteVarPart (int streamID, int varID,
const void *data, int nmiss,
Xt_idxlist partDesc);
......
......@@ -397,7 +397,6 @@
! streamWriteVarPart
! (INTEGER streamID,
! INTEGER varID,
! INTEGER memtype,
! CHOICE data,
! INTEGER nmiss,
! TYPE(XT_IDXLIST)partDesc)
......
......@@ -87,11 +87,11 @@ static int pioInit_fwrap(int commSuper, int nProcsIO, int IOMode, int * pioNames
}
FCALLSCFUN5 (INT, pioInit_fwrap, PIOINIT, pioinit, INT, INT, INT, PINT, FLOAT)
FCALLSCSUB3 (pioWriteTimestep, PIOWRITETIMESTEP, piowritetimestep, INT, INT, INT)
static void streamWriteVarPart_fwrap(int streamID, int varID, int memtype, const void * data, int nmiss, void * partDesc)
static void streamWriteVarPart_fwrap(int streamID, int varID, const void * data, int nmiss, void * partDesc)
{
streamWriteVarPart( streamID, varID, memtype, data, nmiss, (*(Xt_idxlist *)partDesc));
streamWriteVarPart( streamID, varID, data, nmiss, (*(Xt_idxlist *)partDesc));
}
FCALLSCSUB6 (streamWriteVarPart_fwrap, STREAMWRITEVARPART, streamwritevarpart, INT, INT, INT, PVOID, INT, PVOID)
FCALLSCSUB5 (streamWriteVarPart_fwrap, STREAMWRITEVARPART, streamwritevarpart, INT, INT, PVOID, INT, PVOID)
#endif /* make_fint keep */
FCALLSCFUN2 (INT, pioInqVarDecoChunk, PIOINQVARDECOCHUNK, pioinqvardecochunk, INT, INT)
FCALLSCFUN2 (INT, pioInqVarDecoOff, PIOINQVARDECOOFF, pioinqvardecooff, INT, INT)
......
......@@ -993,7 +993,7 @@ void pioWriteTimestep ( int tsID, int vdate, int vtime )
#if defined USE_MPI
void
streamWriteVarPart(int streamID, int varID, int memtype, const void *data,
streamWriteVarPart(int streamID, int varID, const void *data,
int nmiss, Xt_idxlist partDesc)
{
if ( CDI_Debug ) Message("streamID = %d varID = %d", streamID, varID);
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment