Aren
/
NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Import egcs 1.1 (branch), 14 Oct 1998 sources

This commit is contained in:
tv 1998-10-14 14:35:59 +00:00
parent dd23d5aa0c
commit 82ce0181bd
9 changed files with 32 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
gnu/dist/libf2c/ChangeLog vendored
View File

@ -1,3 +1,28 @@
Fri Oct 2 01:27:50 1998 Kamil Iskra <iskra@student.uci.agh.edu.pl>
* Makefile.in (install): Add missing "else true;".
1998-09-28 Dave Love <d.love@dl.ac.uk>
* libI77/open.c: Back out part of last Netlib update affecting
scratch files which clashed with the g77 variations and broke
implicit endfile on rewind.
1998-09-21 Dave Love <d.love@dl.ac.uk>
* libI77/Version.c: Update.
Sat Sep 5 23:06:56 1998 Craig Burley <burley@gnu.org>
* libI77/sfe.c (e_wdfe): Set f__init to avoid spurious recursive
i/o error from formatted direct i/o.
Tue Sep 1 10:06:06 1998 Craig Burley <burley@gnu.org>
* libF77/Version.c: Update.
* libU77/Version.c: Update.
* libI77/Version.c: Update.
Wed Aug 26 23:20:12 1998 Jeffrey A Law (law@cygnus.com)
* Makefile.in (FLAGS_TO_PASS): Fix typo.

2
gnu/dist/libf2c/Makefile.in vendored
View File

@ -155,7 +155,7 @@ install: all
echo ' (To turn off this warning, delete the file'; \
echo ' f2c-install-ok in the source or build directory.)'; \
echo ''; \
fi
else true; fi
install-strip:
$(MAKE) INSTALL_PROGRAM='$(INSTALL_PROGRAM) -s' install

2
gnu/dist/libf2c/libF77/Version.c vendored
View File

@ -3,7 +3,7 @@ static char junk[] = "\n@(#)LIBF77 VERSION 19970919\n";
/*
*/
char __G77_LIBF77_VERSION__[] = "0.5.23";
char __G77_LIBF77_VERSION__[] = "0.5.24";
/*
2.00 11 June 1980. File version.c added to library.

2
gnu/dist/libf2c/libI77/Version.c vendored
View File

@ -3,7 +3,7 @@ static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19980617\n";
/*
*/
char __G77_LIBI77_VERSION__[] = "0.5.23";
char __G77_LIBI77_VERSION__[] = "0.5.24-19980920";
/*
2.01 $ format added

14
gnu/dist/libf2c/libI77/open.c vendored
View File

@ -205,7 +205,6 @@ integer f_open(olist *a)
case 's':
case 'S':
b->uscrtch=1;
#ifdef NON_ANSI_STDIO
#ifdef HAVE_TEMPNAM /* Allow use of TMPDIR preferentially. */
s = tempnam (0, buf);
if (strlen (s) >= sizeof (buf))
@ -221,17 +220,6 @@ integer f_open(olist *a)
#endif
#endif /* ! defined (HAVE_TEMPNAM) */
goto replace;
#else
if (!(b->ufd = tmpfile()))
opnerr(a->oerr,errno,"open");
b->ufnm = 0;
#ifndef NON_UNIX_STDIO
b->uinode = b->udev = -1;
#endif
b->useek = 1;
return 0;
#endif
case 'n':
case 'N':
#ifdef NON_POSIX_STDIO
@ -246,9 +234,7 @@ integer f_open(olist *a)
/* no break */
case 'r': /* Fortran 90 replace option */
case 'R':
#ifdef NON_ANSI_STDIO
replace:
#endif
if (tf = fopen(buf,f__w_mode[0]))
fclose(tf);
}

1
gnu/dist/libf2c/libI77/sfe.c vendored
View File

@ -35,5 +35,6 @@ integer e_wsfe(Void)
integer e_wdfe(Void)
{
f__init = 1;
return en_fio();
}

2
gnu/dist/libf2c/libU77/Version.c vendored
View File

@ -1,6 +1,6 @@
static char junk[] = "\n@(#) LIBU77 VERSION 19980709\n";
char __G77_LIBU77_VERSION__[] = "0.5.23";
char __G77_LIBU77_VERSION__[] = "0.5.24";
#include <stdio.h>

2
gnu/dist/libio/dbz/dbzmain.c vendored
View File

@ -19,7 +19,7 @@
#define STREQ(a, b) (*(a) == *(b) && strcmp((a), (b)) == 0)
#ifndef lint
static char RCSid[] = "$Header: /cvsroot/src/gnu/dist/libio/dbz/Attic/dbzmain.c,v 1.1.1.3 1998/09/13 16:14:02 tv Exp $";
static char RCSid[] = "$Header: /cvsroot/src/gnu/dist/libio/dbz/Attic/dbzmain.c,v 1.1.1.4 1998/10/14 14:35:59 tv Exp $";
#endif
char *progname;

2
gnu/dist/libio/dbz/fake.c vendored
View File

@ -13,7 +13,7 @@
#define STREQ(a, b) (*(a) == *(b) && strcmp((a), (b)) == 0)
#ifndef lint
static char RCSid[] = "$Header: /cvsroot/src/gnu/dist/libio/dbz/Attic/fake.c,v 1.1.1.3 1998/09/13 16:14:02 tv Exp $";
static char RCSid[] = "$Header: /cvsroot/src/gnu/dist/libio/dbz/Attic/fake.c,v 1.1.1.4 1998/10/14 14:35:59 tv Exp $";
#endif
int midonly = 0; /* just message ids, rest not realistic */