Commit Graph

14 Commits

Author SHA1 Message Date
Kaveh R. Ghazi e403d80d35 dfe.c (s_rdfe, s_wdfe): Wrap parentheses around assignment used as truth value.
* libI77/dfe.c (s_rdfe, s_wdfe): Wrap parentheses around
	assignment used as truth value.
	* libI77/due.c (s_rdue, s_wdue): Likewise.
	* libI77/endfile.c (f_end): Likewise.
	* libI77/iio.c (s_rsfi, s_wsfi): Likewise.
	* libI77/lread.c (ERR, l_C, nmL_getc, s_rsle): Likewise.
	* libI77/lwrite.c (l_g, l_put): Likewise.
	* libI77/open.c (f_open): Likewise.
	* libI77/rdfmt.c (rd_Z): Likewise.
	* libI77/rsfe.c (s_rsfe): Likewise.
	* libI77/rsne.c (hash, mk_hashtab, nl_init, getname, getdimen,
	x_rsne, s_rsne): Likewise.
	* libI77/sue.c (s_rsue, s_wsue): Likewise.
	* libI77/wref.c (wrt_E, wrt_F): Likewise.
	* libI77/wsfe.c (s_wsfe): Likewise.
	* libI77/wsle.c (s_wsle): Likewise.
	* libI77/wsne.c (s_wsne): Likewise.

From-SVN: r54172
2002-06-02 14:34:31 +00:00
Kaveh R. Ghazi 407c72cb29 *: Fix formatting.
* libF77/*: Fix formatting.
	* libI77/*: Likewise.
	* libU77/*: Likewise.

From-SVN: r54145
2002-06-01 12:38:32 +00:00
Kaveh R. Ghazi 4d85a6fea6 *: Delete KR_headers cruft.
* libF77/*: Delete KR_headers cruft.
	* libI77/*: Likewise.
	* libU77/*: Likewise.

From-SVN: r54132
2002-06-01 01:53:53 +00:00
Toon Moene f813aee742 re PR fortran/4885 (BACKSPACE example that doesn't work as of gcc/g77-3.0.x)
2001-01-02  Toon Moene  <toon@moene.indiv.nluug.nl>

	PR fortran/4885
	* endfile.c (t_runc): After ftruncate. seek to end-of-file.

From-SVN: r47529
2001-12-02 14:00:56 +00:00
Toon Moene 7e29b2612a Makefile.in: Update config.h dependencies.
2001-07-07  Toon Moene  <toon@moene.indiv.nluug.nl>

	* libI77/Makefile.in: Update config.h dependencies.
	* libI77/configure.in: Define _XOPEN_SOURCE and
	_FILE_OFFSET_BITS unconditionally.
	* libI77/configure: Rebuilt.
	* libI77/config.h.in: Rebuilt.
	* libI77/endfile.c (t_runc): Replace rewind by FSEEK.
	* libI77/err.c (f__nowwriting): The type of `loc' is off_t.
	* libI77/open.c (f_open): Replace rewind by FSEEK.
	* libI77/rewind.c: Include config.h.  (f_rew): Replace
	rewind by FSEEK.
	* libI77/sfe.c: Include config.h.
	* libI77/wsfe.c: Ditto.
	* libU77/configure.in: Define _XOPEN_SOURCE and
	_FILE_OFFSET_BITS unconditionally.
	* libU77/configure: Rebuilt.
	* libU77/config.hin: Rebuilt.

From-SVN: r43841
2001-07-07 18:51:58 +00:00
Toon Moene f8d92613d0 configure.in: Check for fseeko, ftello.
2001-07-06  Toon Moene  <toon@moene.indiv.nluug.nl>
            Pedro Vazquez  <vazquez@penelope.iqm.unicamp.br>

	* configure.in: Check for fseeko, ftello.
	* configure: Rebuilt.
	* config.h.in: Rebuilt.
	* fio.h: Define FSEEK to be fseek or fseeko, depending
	on configure's findings.  Ditto for FTELL and ftell / ftello.
	* backspace.c (f_back): Use FSEEK for fseek, FTELL for ftell.
	* dfe.c (c_dfe): Ditto.
	* due.c (c_due, e_rdue): Ditto.
	* endfile.c (t_runc): Ditto.
	* err.c (f__nowreading, f__nowwriting): Ditto.
	* ftell_.c (G77_ftell_0, G77_fseek_0): Ditto.
	* inquire.c (f_inqu): Ditto.
	* open.c (f_open): Ditto.
	* rdfmt.c (rd_ed): Ditto.
	* sue.c (s_wsue, e_wsue, e_rsue): Ditto.

Co-Authored-By: Pedro Vazquez <vazquez@penelope.iqm.unicamp.br>

From-SVN: r43806
2001-07-06 12:09:39 +00:00
Toon Moene cf382a9154 fio.h: Use off_t when appropriate.
2001-07-01  Toon Moene  <toon@moene.indiv.nluug.nl>
            Pedro Vazquez  <vazquez@penelope.iqm.unicamp.br>

	* libI77/fio.h: Use off_t when appropriate.
	* libI77/backspace.c (f_back): Ditto.
	* libI77/endfile.c (t_runc): Ditto.
	* libI77/err.c (f__nowreading): Ditto.
	* libI77/ftell_.c (unit_chk): Ditto.
	* libI77/sue.c (global f__recloc, s_wsue): Ditto.

Co-Authored-By: Pedro Vazquez <vazquez@penelope.iqm.unicamp.br>

From-SVN: r43670
2001-07-01 13:18:08 +00:00
Andreas Jaeger 05b7b1c1dc Makefile.in (endfile.o): Add dependency on config.h.
* libI77/Makefile.in (endfile.o): Add dependency on config.h.

	* libI77/endfile.c: Include config.h and sys/types for off_t.

	* libI77/config.h.in: New file.

	* libI77/configure.in: Add test for off_t, create config.h file.
	* libI77/configure: Regenerated.

From-SVN: r42148
2001-05-16 12:26:52 +02:00
Loren J. Rittle d2c4367503 endfile.c (t_runc): Add cast to help case where ftruncate() prototype is somehow missing even...
* libI77/endfile.c (t_runc): Add cast to help case where
	ftruncate() prototype is somehow missing even though autoconf
	test found it properly.

From-SVN: r42120
2001-05-15 21:24:41 +00:00
Toon Moene 978970473b configure.in: Test for ftruncate.
2001-02-26  Toon Moene  <toon@moene.indiv.nluug.nl>

	* libI77/configure.in: Test for ftruncate.
	* libI77/configure: Rebuilt.
	* libI77/endfile.c: Use fflush/ftruncate when available.

From-SVN: r40072
2001-02-26 20:23:41 +00:00
Toon Moene 6973bf5482 configure.in: Define IEEE_COMPLEX_DIVIDE.
* libF77/configure.in: Define IEEE_COMPLEX_DIVIDE.
	* libF77/[cz]_div.c: Arrange for compilation under
	-DIEEE_COMPLEX_DIVIDE to make these routines
	avoid calling sig_die when the denominator vanishes.
	* libF77/s_rnge.c: Add casts for the case of
	sizeof(ftnint) == sizeof(int) < sizeof(long).
	* libI77/endfile.c: Set state to writing (b->uwrt = 1) when an
	endfile statement requires copying the file
	Also, supply a missing (long) cast in the sprintf call.
	* libI77/sfe.c: Add #ifdef ALWAYS_FLUSH logic, for formatted I/O.

From-SVN: r32496
2000-03-12 19:20:47 +00:00
Craig Burley dbf18916e7 Update libg2c to netlib f2c-19990317
From-SVN: r25818
1999-03-17 03:21:44 -05:00
Craig Burley a843efa0d4 Update to Netlib version of 1998-04-20
From-SVN: r19877
1998-05-19 10:52:03 +00:00
Jeff Law 81fea2b1d1 * Previous contents of gcc/f/runtime moved into toplevel
"libf2c" directory.

From-SVN: r17568
1998-01-31 18:37:08 -07:00