This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [PATCH] Fix ICE on functions with no explicit nor implicit type(PR fortran/21729)


Jakub Jelinek wrote:
> On Sat, May 28, 2005 at 03:49:09PM +0200, Tobias Schl?ter wrote:
>>>@@ -4835,6 +4842,39 @@ gfc_resolve (gfc_namespace * ns)
>>> 
>>>   gfc_traverse_ns (ns, resolve_symbol);
>>> 
>>>+  if (ns->proc_name && ns->proc_name->attr.function)
>>>+    {
>>>+      gfc_entry_list *el;
>>>+      gfc_symbol *sym;
>>>+
>>>+      if (ns->entries)
>>>+	sym = ns->entries->sym;
>>>+      else
>>>+	sym = ns->proc_name;
>>
>>Why this if?  Did you run into a bug when you tried to resolve the function
>>symbol itself?
> 
> 
> I just wanted to print Function for functions and ENTRY for their entries.
> If it just printed Function always it could be slightly simpler.

Hm, looks like I'm misreading the code.  To me it looks like you're doing
nothing for the function symbol, if the function has alternative entries.

- Tobi



Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]