(j3.2006) MPI usage problems in Fortran

[Jim Xia]

j3-bounces at j3-fortran.org wrote on 03/18/2008 01:47:35 PM:

> However, when I try the following:
> 
>        implicit none
>        interface
>          subroutine send(A)
>            real, target :: A(*)
>          end subroutine send
>        end interface
> 
>        real :: buf(10)
> 
>        call send(buf)
> 
>        end program
> 
> I get no error message.  Is this a legal program?  Shouldn't the 
> target attribute be required for the actual argument?  Section 5.3.17 
> doesn't say.

No error message is a correct behavior.  All the rules for argument 
associations are in section 12.4.1.  If you read through it, this case is 
allowed.  However it also says it is processor dependent if a pointer 
associated with buf in the program unit send remain associated with buf 
after the subroutine call [270:20-22].

Cheers,

Jim Xia

RL Fortran Compiler Test
IBM Toronto Lab at 8200 Warden Ave, Markham, On, L6G 1C7
Phone (905) 413-3444  Tie-line 313-3444
email: jimxia at ca.ibm.com
D2/YF7/8200 /MKM
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://j3-fortran.org/pipermail/j3/attachments/20080318/55f00f95/attachment.html