aboutsummaryrefslogtreecommitdiff
path: root/libf2c
diff options
context:
space:
mode:
Diffstat (limited to 'libf2c')
-rw-r--r--libf2c/ChangeLog4
-rw-r--r--libf2c/configure.in13
-rw-r--r--libf2c/libI77/close.c9
3 files changed, 19 insertions, 7 deletions
diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog
index 1adcc0d..c66c0aa 100644
--- a/libf2c/ChangeLog
+++ b/libf2c/ChangeLog
@@ -5,6 +5,10 @@ Tue Dec 23 22:56:01 1997 Craig Burley <burley@gnu.org>
handler on 64-bit systems like Alphas.
* f2cext.c (signal_): Changed accordingly.
+Wed Oct 29 01:01:04 1997 Mumit Khan <khan@brahma.xraylith.wisc.edu>
+
+ * configure.in: Set CC to CC_FOR_TARGET when cross-compiling.
+
Tue Sep 30 00:41:39 1997 Craig Burley <burley@gnu.ai.mit.edu>
Do a better job of printing the offending FORMAT string
diff --git a/libf2c/configure.in b/libf2c/configure.in
index 6bd6518..f5b127e 100644
--- a/libf2c/configure.in
+++ b/libf2c/configure.in
@@ -23,15 +23,20 @@ AC_INIT(libF77/Version.c)
AC_REVISION(1.10)
-dnl Checks for programs.
-# For g77 we'll set CC to point at the built gcc, but this will get it into
-# the makefiles
-AC_PROG_CC
dnl AC_C_CROSS
dnl Gives misleading `(cached)' message from the check.
if test "$CROSS";then
+ if test "$CC_FOR_TARGET"; then
+ CC="$CC_FOR_TARGET"
+ else
+ CC="../../xgcc -B../../xgcc/"
+ fi
ac_cv_c_cross=yes
else
+ dnl Checks for programs.
+ # For g77 we'll set CC to point at the built gcc, but this will get it into
+ # the makefiles
+ AC_PROG_CC
ac_cv_c_cross=no
fi
diff --git a/libf2c/libI77/close.c b/libf2c/libI77/close.c
index 93e9198..5c3af4c 100644
--- a/libf2c/libI77/close.c
+++ b/libf2c/libI77/close.c
@@ -75,9 +75,12 @@ f_exit(void)
static cllist xx;
if (! (f__init & 1))
return; /* Not initialized, so no open units. */
- /* no more I/O to be done. If this is not done, then if the
- program is interrupted during I/O, f_clos thinks, incorrectly,
- that there is an I/O recursion. */
+ /* I/O no longer in progress. If, during an I/O operation (such
+ as waiting for the user to enter a line), there is an
+ interrupt (such as ^C to stop the program on a UNIX system),
+ f_exit() is called, but there is no longer any I/O in
+ progress. Without turning off this flag, f_clos() would
+ think that there is an I/O recursion in this circumstance. */
f__init &= ~2;
if (!xx.cerr) {
xx.cerr=1;