diff options
| author | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-10 16:39:27 +0000 |
|---|---|---|
| committer | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-10 16:39:27 +0000 |
| commit | a65f65bce7714a76a26c439cf529b5ee8d1587fe (patch) | |
| tree | 99ca0893d491387fcdc14cd40e245390c13dcc6e /gcc/fortran/module.c | |
| parent | 1248692d13d5a841493bb05be520d34fd82e6f07 (diff) | |
| download | gcc-a65f65bce7714a76a26c439cf529b5ee8d1587fe.tar.gz | |
PR fortran/36197
* module.c (quote_string): Fix sprintf format.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135154 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/module.c')
| -rw-r--r-- | gcc/fortran/module.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index 2c3d88ac643..ef2faf7c882 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -1502,7 +1502,7 @@ quote_string (const gfc_char_t *s, const size_t slength) *q++ = '\\', *q++ = '\\'; else if (!gfc_wide_is_printable (*p)) { - sprintf (q, "\\U%08" HOST_WIDE_INT_PRINT "ux", + sprintf (q, "\\U%08" HOST_WIDE_INT_PRINT "x", (unsigned HOST_WIDE_INT) *p); q += 10; } |