<br><tt><font size=2>j3-bounces@j3-fortran.org wrote on 10/22/2009 04:56:01
PM:<br>
<br>
&gt; &gt; &nbsp; &nbsp; interface<br>
&gt; &gt; &nbsp; &nbsp; &nbsp; &nbsp; subroutine foo<br>
&gt; &gt; &nbsp; &nbsp; &nbsp; &nbsp; end subroutine<br>
&gt; &gt; &nbsp; &nbsp; end interface<br>
&gt; &gt; <br>
&gt; &gt; &nbsp; &nbsp; interface<br>
&gt; &gt; &nbsp; &nbsp; &nbsp; &nbsp; function func (i)<br>
&gt; &gt; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; import foo<br>
&gt; &gt; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; procedure(foo), pointer
:: func<br>
&gt; &gt; &nbsp; &nbsp; &nbsp; &nbsp; end function<br>
&gt; &gt; &nbsp; &nbsp; end interface<br>
&gt; &gt; <br>
&gt; &gt; &nbsp; &nbsp; associate (x =&gt; func(10))<br>
&gt; &gt; &nbsp; &nbsp; &nbsp; &nbsp; call x<br>
&gt; <br>
&gt; Interface says FUNC is a function, so<br>
&gt; <br>
&gt; &nbsp; &nbsp; call x<br>
&gt; <br>
&gt; looks like a syntax error at best.<br>
&gt; <br>
&gt; In general, a &lt;selector&gt; is either &lt;expr&gt; or &lt;variable&gt;.
&nbsp;A subroutine <br>
&gt; name does not qualify as either of these.<br>
</font></tt>
<br>
<br><tt><font size=2>&quot;func(10)&quot; is an expression, is it not?
&nbsp;Then what is X?</font></tt>
<br>
<br>
<br><font size=2 face="sans-serif">Jim Xia<br>
<br>
XL Fortran Compiler Test<br>
IBM Toronto Lab at 8200 Warden Ave, Markham, On, L6G 1C7<br>
Phone (905) 413-3444 &nbsp;Tie-line 313-3444<br>
email: jimxia@ca.ibm.com<br>
D2/YF7/8200 /MKM<br>
<br>
</font><a href=http://www.ibm.com/software/awdtools/fortran/xlfortran><font size=2 face="sans-serif">http://www.ibm.com/software/awdtools/fortran/xlfortran</font></a>
<br>