diff options
| author | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-19 06:00:51 +0000 |
|---|---|---|
| committer | burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-08-19 06:00:51 +0000 |
| commit | 4c89f1d5d3a3636a81b683326dc3da58702152a7 (patch) | |
| tree | 8cf5304695348946d3b563576c6149eb93140428 /libgfortran/io/write.c | |
| parent | 647e3d35f6a7637b1bb09f5310f76d901343eab9 (diff) | |
| download | ppe42-gcc-4c89f1d5d3a3636a81b683326dc3da58702152a7.tar.gz ppe42-gcc-4c89f1d5d3a3636a81b683326dc3da58702152a7.zip | |
2008-08-19 Tobias Burnus <burnus@net-b.de>
PR libfortran/35863
* io/write.c (write_a_char4): Add missing variable declaration
in HAVE_CRLF block.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@139223 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/io/write.c')
| -rw-r--r-- | libgfortran/io/write.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c index 8194cf8b719..97aed53ced6 100644 --- a/libgfortran/io/write.c +++ b/libgfortran/io/write.c @@ -308,6 +308,7 @@ write_a_char4 (st_parameter_dt *dtp, const fnode *f, const char *source, int len /* Write out any padding if needed. */ if (len < wlen) { + char *p; p = write_block (dtp, wlen - len); if (p == NULL) return; |
