Date: Mon, 27 Apr 1998 17:48:17 -0700 (PDT) From: scott-allendorf@uiowa.edu To: freebsd-gnats-submit@FreeBSD.ORG Subject: misc/6433: src/lib/libF77/exit.c still needed Message-ID: <199804280048.RAA23173@hub.freebsd.org>
next in thread | raw e-mail | index | archive | help
>Number: 6433
>Category: misc
>Synopsis: src/lib/libF77/exit.c still needed
>Confidential: no
>Severity: serious
>Priority: high
>Responsible: freebsd-bugs
>State: open
>Quarter:
>Keywords:
>Date-Required:
>Class: sw-bug
>Submitter-Id: current-users
>Arrival-Date: Mon Apr 27 17:50:01 PDT 1998
>Last-Modified:
>Originator: Scott Allendorf
>Organization:
The University of Iowa
>Release: 2.2.6-STABLE
>Environment:
FreeBSD lazarus.physics.uiowa.edu 2.2.6-STABLE FreeBSD 2.2.6-STABLE #0: Sat Apr 25 19:39:24 CDT 1998 sca@lazarus.physics.uiowa.edu:/usr/src/sys/compile/LAZARUS i386
>Description:
src/lib/libF77/F77_aloc.c still refers to the function exit_(). This
function is/was defined in src/lib/libF77/exit.c, which was removed some
time ago. Any FORTRAN program using 'CALL EXIT' will fail to link using
f77.
>How-To-Repeat:
% cat > junk.f
PROGRAM JUNK
PRINT *, 'Hello world.'
CALL EXIT
END
^D
% f77 -o junk junk.f
>Fix:
Fix by restoring src/lib/libF77/exit.c or getting exit_.c from a
current netlib f2c distribution. The corresponding change also needs
to be made to src/lib/libf2c/Makefile.
>Audit-Trail:
>Unformatted:
To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-bugs" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?199804280048.RAA23173>