Allow .FOR and .FPP suffixes for Fortran source files

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@25198 138bc75d-0d04-0410-961f-82ee72b054a4

5 files changed, 49 insertions, 9 deletions

diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index f4c988f63ba..6baac8c9e61 100644
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -1,5 +1,10 @@
 1999-02-14  Craig Burley  <craig@jcb-sc.com>
 
+	* lang-specs.h, g77.1, g77.texi, news.texi: Recognize `.FOR'
+	and `.FPP' as well as `.for' and `.fpp'.
+
+1999-02-14  Craig Burley  <craig@jcb-sc.com>
+
 	* intdoc.in (LOG10): Fix description.
 
 1999-02-14  Craig Burley  <craig@jcb-sc.com>
diff --git a/gcc/f/g77.1 b/gcc/f/g77.1
index d6a465b07ea..3f20af9fffd 100644
--- a/gcc/f/g77.1
+++ b/gcc/f/g77.1
@@ -1,7 +1,7 @@
 .\" Copyright (c) 1995-1997 Free Software Foundation              -*-Text-*-
 .\" See section COPYING for conditions for redistribution
 .\" FIXME: no info here on predefines.  Should there be?  extra for F77...
-.TH G77 1 "1998-09-01" "GNU Tools" "GNU Tools"
+.TH G77 1 "1999-02-14" "GNU Tools" "GNU Tools"
 .de BP
 .sp
 .ti \-.2i
@@ -88,14 +88,18 @@ For complete documentation on GNU Fortran, type `\|\c
 
 F77 source files use the suffix `\|\c
 .B .f\c
-\&\|' or `\|\c
+\&\|', `\|\c
 .B .for\c
+\&\|', or `\|\c
+.B .FOR\c
 \&\|'; F77 files to be preprocessed by
 .BR cpp ( 1 )
 use the suffix `\|\c
 .B .F\c
-\&\|' or `\|\c
+\&\|', `\|\c
 .B .fpp\c
+\&\|', or `\|\c
+.B .FPP\c
 \&\|'; Ratfor source files use the suffix `\|\c
 .B .r\c
 \&\|' (though
@@ -250,10 +254,14 @@ file.f    Fortran source file
 .br
 file.for  Fortran source file
 .br
+file.FOR  Fortran source file
+.br
 file.F    preprocessed Fortran source file
 .br
 file.fpp  preprocessed Fortran source file
 .br
+file.FPP  preprocessed Fortran source file
+.br
 file.r    Ratfor source file (ratfor not included)
 .br
 file.s    assembly language file
diff --git a/gcc/f/g77.texi b/gcc/f/g77.texi
index 12314062510..e2f82eff131 100644
--- a/gcc/f/g77.texi
+++ b/gcc/f/g77.texi
@@ -14,7 +14,7 @@
 @c %**start of header 
 @setfilename g77.info
 
-@set last-up-date 1998-09-01
+@set last-up-date 1999-02-14
 @set version-g77 0.5.24
 @set email-general egcs@@egcs.cygnus.com
 @set email-bugs egcs-bugs@@egcs.cygnus.com
@@ -1464,8 +1464,12 @@ Suffixes specific to GNU Fortran are listed below.
 information on suffixes recognized by GNU CC.
 
 @table @code
+@cindex .f filename suffix
+@cindex .for filename suffix
+@cindex .FOR filename suffix
 @item @var{file}.f
 @item @var{file}.for
+@item @var{file}.FOR
 Fortran source code that should not be preprocessed.
 
 Such source code cannot contain any preprocessor directives, such
@@ -1482,8 +1486,10 @@ You can force @samp{.f} files to be preprocessed by @samp{cpp} by using
 @cindex programs, cpp
 @cindex .F filename suffix
 @cindex .fpp filename suffix
+@cindex .FPP filename suffix
 @item @var{file}.F
 @item @var{file}.fpp
+@item @var{file}.FPP
 Fortran source code that must be preprocessed (by the C preprocessor
 @code{cpp}, which is part of GNU CC).
 
@@ -3384,6 +3390,14 @@ or, if you cannot do that, email
 @email{fortran@@gnu.org} asking for a recent copy of the
 GNU Fortran @file{.plan} file.
 
+@heading In @code{egcs 1.2}:
+@itemize @bullet
+@item
+Source file names with the suffixes @samp{.FOR} and @samp{.FPP}
+now are recognized by @code{g77}
+as if they ended in @samp{.for} and @samp{.fpp}, respectively.
+@end itemize
+
 @heading In @code{egcs} 1.1 (versus 0.5.24):
 @itemize @bullet
 @cindex alignment
@@ -14944,12 +14958,15 @@ A source file containing lines beginning with @code{#define},
 @code{#include}, @code{#if}, and so on is likely one that
 requires preprocessing.
 
-If the file's suffix is @samp{.f} or @samp{.for}, the file
-will normally be compiled @emph{without} preprocessing by @code{g77}.
+If the file's suffix is @samp{.f}, @samp{.for}, or @samp{.FOR},
+the file normally will be compiled @emph{without} preprocessing
+by @code{g77}.
 
-Change the file's suffix from @samp{.f} to @samp{.F} (or, on
-systems with case-insensitive file names, to @samp{.fpp}) or
-from @samp{.for} to @samp{.fpp}.
+Change the file's suffix from @samp{.f} to @samp{.F}
+(or, on systems with case-insensitive file names,
+to @samp{.fpp} or @samp{.FPP}),
+from @samp{.for} to @samp{.fpp},
+or from @samp{.FOR} to @samp{.FPP}.
 @code{g77} compiles files with such names @emph{with}
 preprocessing.
 
diff --git a/gcc/f/lang-specs.h b/gcc/f/lang-specs.h
index bf475d8da1a..a40b2e8b18a 100644
--- a/gcc/f/lang-specs.h
+++ b/gcc/f/lang-specs.h
@@ -26,6 +26,7 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 
   {".F", {"@f77-cpp-input"}},
   {".fpp", {"@f77-cpp-input"}},
+  {".FPP", {"@f77-cpp-input"}},
   {"@f77-cpp-input",
      /* For f77 we want -traditional to avoid errors with, for
 	instance, mismatched '.  Also, we avoid unpleasant surprises
@@ -70,6 +71,7 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
            %{!pipe:%g.s} %A\n }}"}},
   {".f", {"@f77"}},
   {".for", {"@f77"}},
+  {".FOR", {"@f77"}},
   {"@f77",
    {"%{!M:%{!MM:%{!E:f771 %i %(f771) \
 		   %{!Q:-quiet} -dumpbase %b.f %{d*} %{m*} %{a}\
diff --git a/gcc/f/news.texi b/gcc/f/news.texi
index 3044c2471ba..b858479de37 100644
--- a/gcc/f/news.texi
+++ b/gcc/f/news.texi
@@ -58,6 +58,14 @@ though this can make getting a complete picture
 of what a particular @code{egcs} version contains
 somewhat more difficult.
 
+@heading In @code{egcs} 1.2:
+@itemize @bullet
+@item
+Source file names with the suffixes @samp{.FOR} and @samp{.FPP}
+now are recognized by @code{g77}
+as if they ended in @samp{.for} and @samp{.fpp}, respectively.
+@end itemize
+
 @heading In 0.5.24 and @code{egcs} 1.1.1 (versus 0.5.23 and 1.1):
 @itemize @bullet
 @item