[Bug fortran/40920] Derived type with BIND(C) - rejected as argument.

[burnus at gcc dot gnu dot org]

------- Comment #3 from burnus at gcc dot gnu dot org  2010-01-13 08:44 -------
(In reply to comment #2)
> A related issue has been reported here
> http://groups.google.com/group/comp.lang.fortran/browse_frm/thread/ddc211f2987326b8#

That example is invalid and correctly rejected; if one makes it valid, one is
back at the bug shown in comment 0. But I agree that the message text is bad:

--- decl.c      (revision 155850)
+++ decl.c      (working copy)
@@ -936,2 +936,2 @@ verify_c_interop_param (gfc_symbol *sym)
-               gfc_error ("Type '%s' at %L is a parameter to the BIND(C) "
-                          " procedure '%s' but is not C interoperable "
+               gfc_error ("Dummy argument '%s' at %L of BIND(C) "
+                          "procedure '%s' is not C interoperable "

(Your "Argument .. to procedure" sounds for me as if an "actual argument" were
meant.)


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40920