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: [tree-ssa] handle F95 in dwarfout.c


Andreas Jaeger <aj@suse.de> writes:

> dwarfout.c currently handles F95 with LANG_C.  I expect using Fortran90
> is a better approximation.  What do others suggest?
> 
> I'll bootstrap/regtest this now on x86_64-linux-gnu.  Ok to commit if
> it passes with no regressions?
> 
> Andreas
> 
> 2003-12-14  Andreas Jaeger  <aj@suse.de>
> 
> 	* dwarfout.c (output_compile_unit_die): Handle GNU F95 as F90.
> 
> ============================================================
> Index: gcc/dwarfout.c
> --- gcc/dwarfout.c	18 Oct 2003 23:59:44 -0000	1.111.2.19
> +++ gcc/dwarfout.c	14 Dec 2003 18:37:01 -0000
> @@ -4024,6 +4024,9 @@ output_compile_unit_die (void *arg)
>      language_attribute (LANG_ADA83);
>    else if (strcmp (language_string, "GNU F77") == 0)
>      language_attribute (LANG_FORTRAN77);
> +  else if (strcmp (language_string, "GNU F95") == 0)
> +    /* DWARF1 only specifies F90.  */
> +    language_attribute (LANG_FORTRAN90);
>    else if (strcmp (language_string, "GNU Pascal") == 0)
>      language_attribute (LANG_PASCAL83);
>    else if (strcmp (language_string, "GNU Java") == 0)

Yes, this is OK.

-- 
- Geoffrey Keating <geoffk@geoffk.org>


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