------- Comment #4 from burnus at gcc dot gnu dot org 2009-11-23 12:38 ------- Does your patch still reject
pure function test() integer, pointer :: p => null() ! INVALID per C1272 integer :: test test = p end function test That is currently rejected as "Error: Initialization of pointer at (1) is not allowed in a PURE procedure". NAG f95 rejects it with: "ERROR: Local variable P of PURE procedure TEST has the SAVE attribute" as "p" gets implicitly declared as SAVE. There might well be a check for it in gfortran already, but seemingly no test case. If there is no such test case, could you also add it? -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42008