diff options
| author | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2006-11-16 11:20:57 +0000 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2006-11-16 11:20:57 +0000 |
| commit | 6c0e51c4fad90d1a93040fe92695890b5715d6f5 (patch) | |
| tree | e94b68627b7d5bfea3a7ab998e583028c889df1e /libgfortran/io/open.c | |
| parent | ecaf6f07808d7d2f5a3929de189d8799e8a085f5 (diff) | |
| download | gcc-6c0e51c4fad90d1a93040fe92695890b5715d6f5.zip gcc-6c0e51c4fad90d1a93040fe92695890b5715d6f5.tar.gz gcc-6c0e51c4fad90d1a93040fe92695890b5715d6f5.tar.bz2 | |
trans-decl.c (gfc_get_symbol_decl): Fix formatting.
* trans-decl.c (gfc_get_symbol_decl): Fix formatting.
* io/open.c (new_unit): Format %d expects an int variable.
* runtime/error.c (show_locus): Format %d expects an int variable.
From-SVN: r118887
Diffstat (limited to 'libgfortran/io/open.c')
| -rw-r--r-- | libgfortran/io/open.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/io/open.c b/libgfortran/io/open.c index 24ce51a..ce7d4dd 100644 --- a/libgfortran/io/open.c +++ b/libgfortran/io/open.c @@ -343,7 +343,7 @@ new_unit (st_parameter_open *opp, gfc_unit *u, unit_flags * flags) break; opp->file = tmpname; - opp->file_len = sprintf(opp->file, "fort.%d", opp->common.unit); + opp->file_len = sprintf(opp->file, "fort.%d", (int) opp->common.unit); break; default: |