diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index 093668bb9359eaa2eb22551d19d0307dc3c37de5..6c276948fca0f0bea36df78e36cc6d2ca10da5d8 100644
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -1,3 +1,7 @@
+Wed Aug 25 01:21:06 1999 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
+
+ * lang-specs.h: Pass cc1 spec to f771.
+
Mon Aug 9 19:44:08 1999 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* com.c (lang_print_error_function): Constify a char*.
diff --git a/gcc/f/lang-specs.h b/gcc/f/lang-specs.h
index b4492a6327d27412d373b1a566d890b7697c8721..b41956d8eb236b80e9c4805ed08eb2074c552076 100644
--- a/gcc/f/lang-specs.h
+++ b/gcc/f/lang-specs.h
@@ -45,7 +45,7 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
%{ffast-math:-D__FAST_MATH__}\
%{g*} %{W*} %{w} %{pedantic*} %{H} %{d*} %C %{D*} %{U*} %{i*} %Z\
%i %{!M:%{!MM:%{!E:%{!pipe:%g.i}}}}%{E:%W{o*}}%{M:%W{o*}}%{MM:%W{o*}} |\n",
- "%{!M:%{!MM:%{!E:f771 %{!pipe:%g.i} %(f771) \
+ "%{!M:%{!MM:%{!E:f771 %{!pipe:%g.i} %1 %(f771) \
%{!Q:-quiet} -dumpbase %b.F %{d*} %{m*} %{a*}\
%{g*} %{O*} %{W*} %{w} %{pedantic*} \
%{v:-version -fversion} %{pg:-p} %{p} %{f*} %{I*}\
@@ -60,7 +60,7 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
{"ratfor %{C} %{v}\
%{C:%{!E:%eGNU C does not support -C without using -E}}\
%{!E:%{!pipe:-o %g.f}}%{E:%W{o*}} %i |\n",
- "%{!E:f771 %{!pipe:%g.f} %(f771) \
+ "%{!E:f771 %{!pipe:%g.f} %1 %(f771) \
%{!Q:-quiet} -dumpbase %b.r %{d*} %{m*} %{a*}\
%{g*} %{O*} %{W*} %{w} %{pedantic*} \
%{v:-version -fversion} %{pg:-p} %{p} %{f*} %{I*}\
@@ -74,7 +74,7 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
{".for", {"@f77"}},
{".FOR", {"@f77"}},
{"@f77",
- {"%{!M:%{!MM:%{!E:f771 %i %(f771) \
+ {"%{!M:%{!MM:%{!E:f771 %i %1 %(f771) \
%{!Q:-quiet} -dumpbase %b.f %{d*} %{m*} %{a*}\
%{g*} %{O*} %{W*} %{w} %{pedantic*}\
%{v:-version -fversion} %{pg:-p} %{p} %{f*} %{I*}\
@@ -95,7 +95,7 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
%{ffast-math:-D__FAST_MATH__}\
%{g*} %{W*} %{w} %{pedantic*} %{H} %{d*} %C %{D*} %{U*} %{i*} %Z \
/dev/null /dev/null \n\
- f771 -fnull-version %(f771) \
+ f771 -fnull-version %1 %(f771) \
%{!Q:-quiet} -dumpbase g77-version.f %{d*} %{m*} %{a*} \
%{g*} %{O*} %{W*} %{w} %{pedantic*} \
-version -fversion %{f*} %{I*} -o %g.s /dev/null \n\