Ignore:
Timestamp:
Feb 15, 2018 9:55:58 AM (3 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_child_mod.f90

    r2801 r2809  
    2626! -----------------
    2727! $Id$
     28! Bugfix for gfortran: Replace the function C_SIZEOF with STORAGE_SIZE
     29!
     30! 2801 2018-02-14 16:01:55Z thiele
    2831! Introduce particle transfer in nested models.
    2932!
     
    314317
    315318
    316     win_size = C_SIZEOF( dummy )
     319    win_size = STORAGE_SIZE( dummy )/8
    317320    CALL MPI_WIN_CREATE( dummy, win_size, iwp, MPI_INFO_NULL, me%intra_comm,   &
    318321                         indwin, ierr )
Note: See TracChangeset for help on using the changeset viewer.