Ignore:
Timestamp:
Feb 15, 2018 9:55:58 AM (4 years ago)
Author:
schwenkel
Message:

Bugfix for gfortran: Replace the function C_SIZEOF with STORAGE_SIZE

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/pmc_mpi_wrapper_mod.f90

    r2718 r2809  
    2626! -----------------
    2727! $Id$
     28! Bugfix for gfortran: Replace the function C_SIZEOF with STORAGE_SIZE
     29!
     30! 2718 2018-01-02 08:49:38Z maronga
    2831! Corrected "Former revisions" section
    2932!
     
    609612
    610613   
    611     winsize = idim1 * C_SIZEOF( ierr )
     614    winsize = idim1 * STORAGE_SIZE( ierr )/8
    612615
    613616    CALL MPI_ALLOC_MEM( winsize, MPI_INFO_NULL, p_myind, ierr )
Note: See TracChangeset for help on using the changeset viewer.