Date: Tue, 26 Mar 1996 16:20:10 -0800 From: "Steven G. Kargl" <kargl@troutmask.apl.washington.edu> To: FreeBSD-gnats-submit@freebsd.org Subject: gnu/1101: f2c's -krd option in f77 (patch enclosed) Message-ID: <199603270020.QAA07538@troutmask.apl.washington.edu> Resent-Message-ID: <199603270020.QAA13689@freefall.freebsd.org>
index | next in thread | raw e-mail
>Number: 1101
>Category: gnu
>Synopsis: f2c's -krd does not work with f77 wrapper
>Confidential: no
>Severity: non-critical
>Priority: low
>Responsible: freebsd-bugs
>State: open
>Class: change-request
>Submitter-Id: current-users
>Arrival-Date: Tue Mar 26 16:20:02 PST 1996
>Last-Modified:
>Originator: Steven G. Kargl
>Organization:
>Release: FreeBSD 2.1-STABLE i386
>Environment:
>Description:
f77 command does not accept the -krd f2c option.
>From f2c manpage:
-kr Use temporary values to enforce Fortran expression
evaluation where K&R (first edition) parenthesiza-
tion rules allow rearrangement. If the option is
`-krd', use double precision temporaries even for
single-precision operands.
>How-To-Repeat:
%f77 -krd some_fortran_file.f
>Fix:
*** gcc.c.orig Tue Mar 26 15:59:42 1996
--- gcc.c Tue Mar 26 16:00:24 1996
***************
*** 720,726 ****
{"@f2c",
"f2c %{checksubscripts:-C} %{I2} %{onetrip} %{honorcase:-U} %{u} %{w}\
%{ANSIC:-A} %{a} %{C++}\
! %{c} %{E} %{ec} %{ext} %{f} %{72} %{g} %{h} %{i2} %{kr}\
%{P} %{p} %{r} %{r8} %{s} %{w8} %{z} %{N*}\
%i %{!pipe: -o %g.c} %{pipe:-o -}|\n",
"cpp -lang-c %{nostdinc*} %{C} %{v} %{A*} %{I*} %{P} %I\
--- 720,726 ----
{"@f2c",
"f2c %{checksubscripts:-C} %{I2} %{onetrip} %{honorcase:-U} %{u} %{w}\
%{ANSIC:-A} %{a} %{C++}\
! %{c} %{E} %{ec} %{ext} %{f} %{72} %{g} %{h} %{i2} %{kr} %{krd}\
%{P} %{p} %{r} %{r8} %{s} %{w8} %{z} %{N*}\
%i %{!pipe: -o %g.c} %{pipe:-o -}|\n",
"cpp -lang-c %{nostdinc*} %{C} %{v} %{A*} %{I*} %{P} %I\
>Audit-Trail:
>Unformatted:
help
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?199603270020.QAA07538>