(j3.2006) Interp 64 question

[Bill Long]

Malcolm Cohen wrote:

>Bill Long said:
>  
>
>>Consider the module
>>
>>module procedure_pointers_05_m
>>  type x
>>    integer a
>>    
>>
>
>Missing CONTAINS statement.
>

Not missing, just intentionally not there.   The following are NOT type 
bound procedures, they are <proc-component-def-stmt>s.

>
>  
>
>>    procedure(sub1),pointer,pass(passed)::ptr1
>>    procedure(sub2),pointer,pass(passed)::ptr2
>>    procedure(sub2),pointer,pass::ptr3
>>  endtype
>>
>>  interface
>>    subroutine sub1(a,passed)
>>      import :: x
>>      integer a
>>      type(x) :: passed
>>    endsubroutine
>>
>>    subroutine sub2(passed,a)
>>      import :: x
>>      integer a
>>      type(x) :: passed
>>    endsubroutine
>>  endinterface
>>endmodule
>>
>>
>>If I read the current state of interp 64 (not yet passed) it seems the 
>>    
>>
>
>When I read interp 64, it has nothing to say on the issue.
>
>There is no "procedure declaration statement" in the above code.
>

I'm not sure I understand the last statement.   The intent of interp 64 
was to change the wording in C1212 from  "<procedure-declaration-stmt>" 
to "<procedure-declaration-stmt> or <interface-body>".   There are 
interface bodies in the above example and that is the point, that the 
intended change in the interp is problematic because  C1212 does apply 
directly to <proc-component-def-stmt>s.

Cheers,
Bill

>
>Cheers,
>  
>

-- 
Bill Long                                   longb at cray.com
Fortran Technical Support    &              voice: 651-605-9024
Bioinformatics Software Development         fax:   651-605-9142
Cray Inc., 1340 Mendota Heights Rd., Mendota Heights, MN, 55120

            

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://j3.scs.gmu.edu/pipermail/j3/attachments/20070122/f6065255/attachment.html