1
1

Remove num_pes,my_pe declarations from shmem.fh.

The openshmem test suite
(http://bongo.cs.uh.edu/site/sites/default/site_files/openshmem-test-suite-release-1.0d.tar.bz2)
declares num_pes and my_pe in each Fortran test file -- it apparently
doesn't expect shmem.fh to declare these functions.  Sigh.

cmr=v1.7.5:reviewer=miked:subject=the openshmem community is crazy

This commit was SVN r30660.
This commit is contained in:
Jeff Squyres 2014-02-11 01:36:26 +00:00
parent 86e8a147c6
commit b4effd200f
3 changed files with 5 additions and 3 deletions

View File

@ -1,6 +1,7 @@
!
! Copyright (c) 2013 Mellanox Technologies, Inc.
! All rights reserved.
! Copyright (c) 2014 Cisco Systems, Inc. All rights reserved.
! $COPYRIGHT$
!
! Additional copyrights may follow
@ -12,6 +13,7 @@ program hello_oshmem
include 'shmem.fh'
integer proc, nproc
integer my_pe, num_pes
call START_PES(0)
proc = MY_PE()

View File

@ -1,6 +1,7 @@
!
! Copyright (c) 2013 Mellanox Technologies, Inc.
! All rights reserved.
! Copyright (c) 2014 Cisco Systems, Inc. All rights reserved.
! $COPYRIGHT$
!
! Additional copyrights may follow
@ -15,6 +16,7 @@ program ring_oshmem
integer*8, save :: rbuf
integer*8 :: message
integer :: proc, nproc, next
integer :: my_pe, num_pes
rbuf = -1
message = 10

View File

@ -2,6 +2,7 @@
!
! Copyright (c) 2013 Mellanox Technologies, Inc.
! All rights reserved.
! Copyright (c) 2014 Cisco Systems, Inc. All rights reserved.
! $COPYRIGHT$
!
! Additional copyrights may follow
@ -48,9 +49,6 @@
integer SHMEM_CMP_GE
parameter ( SHMEM_CMP_GE = 5 )
integer my_pe
integer num_pes
logical shmem_pe_accessible
logical shmem_addr_accessible