diff options
| author | burley <burley@138bc75d-0d04-0410-961f-82ee72b054a4> | 1999-03-17 08:21:44 +0000 |
|---|---|---|
| committer | burley <burley@138bc75d-0d04-0410-961f-82ee72b054a4> | 1999-03-17 08:21:44 +0000 |
| commit | 90053ad86486b9b8f3cc0be42bb8c06eef49e55a (patch) | |
| tree | 9269dd7802645654339d53efad0c4d3a59fca911 /libf2c/libI77/dfe.c | |
| parent | 7abc3ef8035ad757d1b1e3fae5b3d82354f1c6ab (diff) | |
| download | gcc-90053ad86486b9b8f3cc0be42bb8c06eef49e55a.tar.gz | |
Update libg2c to netlib f2c-19990317
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@25818 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libf2c/libI77/dfe.c')
| -rw-r--r-- | libf2c/libI77/dfe.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/libf2c/libI77/dfe.c b/libf2c/libI77/dfe.c index bcf2c8016a6..f639ab51ce7 100644 --- a/libf2c/libI77/dfe.c +++ b/libf2c/libI77/dfe.c @@ -138,3 +138,9 @@ integer e_rdfe(Void) en_fio(); return(0); } + +integer e_wdfe(Void) +{ + f__init = 1; + return en_fio(); +} |