diff options
| author | Toon Moene <toon@moene.indiv.nluug.nl> | 2004-07-15 18:52:49 +0200 |
|---|---|---|
| committer | Toon Moene <toon@gcc.gnu.org> | 2004-07-15 16:52:49 +0000 |
| commit | 3e4035f83334aa30c12825dc3c3a1fa1b5b2f9f9 (patch) | |
| tree | 5f8cfd6717d2fc2edd87b592618718293587582c /libf2c/libI77/wsle.c | |
| parent | 48b456474c69a132da15996c61009e35efa59492 (diff) | |
| download | gcc-3e4035f83334aa30c12825dc3c3a1fa1b5b2f9f9.zip gcc-3e4035f83334aa30c12825dc3c3a1fa1b5b2f9f9.tar.gz gcc-3e4035f83334aa30c12825dc3c3a1fa1b5b2f9f9.tar.bz2 | |
libf2c: Removed.
2004-07-15 Toon Moene <toon@moene.indiv.nluug.nl>
* libf2c: Removed.
* gcc/gccbug.in: Updated because of libf2c removal.
* maintainer-scripts/gcc_release: Ditto.
From-SVN: r84759
Diffstat (limited to 'libf2c/libI77/wsle.c')
| -rw-r--r-- | libf2c/libI77/wsle.c | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/libf2c/libI77/wsle.c b/libf2c/libI77/wsle.c deleted file mode 100644 index e9ef172..0000000 --- a/libf2c/libI77/wsle.c +++ /dev/null @@ -1,38 +0,0 @@ -#include "config.h" -#include "f2c.h" -#include "fio.h" -#include "fmt.h" -#include "lio.h" -#include "string.h" - -integer -s_wsle (cilist * a) -{ - int n; - if ((n = c_le (a))) - return (n); - f__reading = 0; - f__external = 1; - f__formatted = 1; - f__putn = x_putc; - f__lioproc = l_write; - L_len = LINE; - f__donewrec = x_wSL; - if (f__curunit->uwrt != 1 && f__nowwriting (f__curunit)) - err (a->cierr, errno, "list output start"); - return (0); -} - -integer -e_wsle (void) -{ - int n; - f__init = 1; - n = f__putbuf ('\n'); - f__recpos = 0; -#ifdef ALWAYS_FLUSH - if (!n && fflush (f__cf)) - err (f__elist->cierr, errno, "write end"); -#endif - return (n); -} |