internal procedures as arguments: error or warning?

[forall]

I just replaced an older version of Intel Fortran with the 9.0.021 and started to get the following compile error:

"Error: A procedure name as an actual argument must not be the name of an internal procedure (R1214.4)."

I am aware this is non-standard Fortran, but it was supported in the prev version and it was my understanding should be supported in the future.

Strangely, other instances of this extension just bring up the warning

"Warning: F95 standard does not allow an internal procedure to be an actual argument procedure name. (R1214.4)."

any ideas what is going on here? thanks in advance!

As an 'unrelated' aside, it is quite annoying that replacing the compiler also annihilated all the settings (buttons and shortcuts) I built up.

[Steven_L_Intel1]

If you asked for standards checking, which it seems you did, you'd get at least the second warning. I just tried a small example and didn't see any diagnostic by default. If you have a sample that shows a problem, please send it to Intel Premier Support.

The resetting of the VS buttons is an unfortunate side-effect of the way we have to provide our integration. This might be better come VS2005.

[forall]

Steve - thanks for the prompt reply. I attach an extremely simplified sample file just to check that you can reproduce the error. I will also submit it as a bug report.

[Steven_L_Intel1]

Thanks. The issue seems to be whether or not the contained routine would require an explicit interface - in your case, it returns an array. I'll look to see why this restriction was added. I note that recent 8.1 compilers also complain. I had to go back to October 2004 to find one that didn't.

Message Edited by sblionel on 08-26-2005 04:58 PM