------- Comment #1 from burnus at gcc dot gnu dot org  2007-10-21 10:07 -------
(And the program is accepted using the patch from bug 33162 comment 2, however,
I think the patch is the wrong to solution for this PR and bug 33162.)

NAG f95 also gives the following error:

Error: line 41: Actual proc SHAPE_LINE_P1 arg 1 is assumed-shape or POINTER
array with different rank from dummy proc SUB1 arg
Error: line 41: Incompatible procedure argument for SUB1 (no. 1) of SUB

The program works if one changes
    call sub ( shape_line_P1 )    ! Generic  functions; specific: *_1, *_2
into
    call sub ( shape_line_P1_2 )  ! Specific function

Ad hoc, I expect that the program is valid, but I still have to check the
standard.


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|Interface statement not     |Interface statement not
                   |detected: generate Error:   |detected: generate Error:
                   |Type/rank mismatch          |Type/rank mismatch


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33847

Reply via email to