http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59107
janus at gcc dot gnu.org changed: What |Removed |Added ---------------------------------------------------------------------------- Keywords| |diagnostic Status|UNCONFIRMED |NEW Last reconfirmed| |2013-11-17 CC| |janus at gcc dot gnu.org Ever confirmed|0 |1 --- Comment #1 from janus at gcc dot gnu.org --- Confirmed with 4.7, 4.8 and trunk. Apparently the symbol gets a ts.type of BT_INTEGER somewhere (indepedent of the type of 'nargs'). It also happens for the following variant: implicit none Intrinsic :: command_argument_count print *, command_argument_count() End Doing the same thing with a different intrinsic like 'cos' does not give the warning: Intrinsic :: cos print *, cos(0.) End