[patch, fortran] Support .F03 and .f03 file extensions

[Tobias Burnus <burnus@net-b.de>]

[-- Attachment #1: Type: text/plain, Size: 373 bytes --]

:ADDPATCH fortran:

Support the .f03 and .F03 file extensions.

Ok for the trunk?

Bootstrapped, tested and regression tested on x86_64-unknown-linux-gnu


Tobias


2007-01-06  Tobias Burnus  <burnus@net-b.de>

    * lang-specs.h: Add support for .f03 and .F03 extensions.
    * gfortran.texi: Document .f03 extension.
    * options.c (form_from_filename): Recognize .f03.

[-- Attachment #2: f03.diff --]
[-- Type: text/x-patch, Size: 2195 bytes --]

Index: gcc/fortran/gfortran.texi
===================================================================
--- gcc/fortran/gfortran.texi	(Revision 120520)
+++ gcc/fortran/gfortran.texi	(Arbeitskopie)
@@ -367,8 +367,8 @@
 Fortran) for each file in the source code, and then calls the assembler
 and linker as appropriate to produce the compiled output. In a copy of
 GCC which has been compiled with Fortran language support enabled,
-@command{gcc} will recognize files with @file{.f}, @file{.f90}, and
-@file{.f95} extensions as Fortran source code, and compile it
+@command{gcc} will recognize files with @file{.f}, @file{.f90}, @file{.f95},
+and @file{.f03} extensions as Fortran source code, and compile it
 accordingly.  A @command{gfortran} driver program is also provided,
 which is identical to @command{gcc} except that it automatically links
 the Fortran runtime libraries into the compiled program.
Index: gcc/fortran/options.c
===================================================================
--- gcc/fortran/options.c	(Revision 120520)
+++ gcc/fortran/options.c	(Arbeitskopie)
@@ -137,6 +138,9 @@
     ".f95", FORM_FREE}
     ,
     {
+    ".f03", FORM_FREE}
+    ,
+    {
     ".f", FORM_FIXED}
     ,
     {
Index: gcc/fortran/lang-specs.h
===================================================================
--- gcc/fortran/lang-specs.h	(Revision 120520)
+++ gcc/fortran/lang-specs.h	(Arbeitskopie)
@@ -18,6 +18,7 @@
       -fpreprocessed %{!nostdinc:-fintrinsic-modules-path finclude%s} %{!fsyntax-only:%(invoke_as)}}}}", 0, 0, 0},
 {".F90", "@f95-cpp-input", 0, 0, 0},
 {".F95", "@f95-cpp-input", 0, 0, 0},
+{".F03", "@f95-cpp-input", 0, 0, 0},
 {"@f95-cpp-input",
   "cc1 -E -lang-fortran -traditional-cpp -D_LANGUAGE_FORTRAN %(cpp_options) \
       %{E|M|MM:%(cpp_debug_options)}\
@@ -26,6 +27,7 @@
       -fpreprocessed %{!nostdinc:-fintrinsic-modules-path finclude%s} %{!fsyntax-only:%(invoke_as)}}}}", 0, 0, 0},
 {".f90", "@f95", 0, 0, 0},
 {".f95", "@f95", 0, 0, 0},
+{".f03", "@f95", 0, 0, 0},
 {"@f95", "%{!E:f951 %i %(cc1_options) %{J*} %{I*}\
          %{!nostdinc:-fintrinsic-modules-path finclude%s} %{!fsyntax-only:%(invoke_as)}}", 0, 0, 0},
 {".f",   "@f77", 0, 0, 0},