[Patch, fortran] PR32881 - PURE attribute escapes from contained procedure

[Paul Thomas]

:ADDPATCH fortran:

This problem came about because the initialization assignment is tested 
both in the outer and the contained namespaces.  Thus, if the contained 
namespace is pure, an error was caused.  The initialization assignment 
is tested by seeing if the rhs is the same as the 'value' field of the 
lhs symbol.  The testcase is the reporter's.

Regtests on amd64/Cygwin_NT - OK for trunk?

Paul

2007-08-17  Paul Thomas  <pault@gcc.gnu.org>

    PR fortran/32881
    * expr.c (gfc_check_pointer_assign): If the rhs is the
    initialization expression for the rhs, there is no error.

2007-08-17  Paul Thomas  <pault@gcc.gnu.org>

    PR fortran/32881
    * gfortran.dg/pure_initializer_1.f90: New test.


 
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr32881.diff
Type: text/x-patch
Size: 1461 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20070817/dad42263/attachment.bin>