New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
#271 (Problem with lib_mpp.F90 using mpi_bsend with F95 compilers.) – NEMO

Opened 16 years ago

Closed 15 years ago

#271 closed Defect (fixed)

Problem with lib_mpp.F90 using mpi_bsend with F95 compilers.

Reported by: k.mogensen@… Owned by: nemo
Priority: low Milestone:
Component: OCE Version: v3.0
Severity: Keywords:
Cc:

Description

Hi.

There is an issue with the way the buffer is allocated in lib_mpp.F90 for buffered sends.

The buffer variable is defined as a local variable (tampon) in mpi_init_opa and allocated within this routine. However I believe that for Fortran-95 local allocatable arrays are supposed to be automatically deallocated when you exit the routine. With our workstations compiler (PGI version 7.1.4 + LAM mpi) I get a SIGSEGV when using due to the tampon array not longer being available.

By moving the tampon array into the heading of the module it works. I believe, that this is a general problem with all F95 compilers and this fix (or another fix) should go into the next version.

At the same time maybe the declaration of tampon should be changed from REAL(kind=8) to REAL(kind=wp).

/Kristian

Commit History (1)

ChangesetAuthorTimeChangeLog
1237rblod2008-12-29T19:35:34+01:00

Light fixes, see ticket #271

Change History (1)

comment:1 Changed 15 years ago by rblod

  • Resolution set to fixed
  • Status changed from new to closed
Note: See TracTickets for help on using tickets.