diff options
Diffstat (limited to 'gcc/fortran/scanner.c')
| -rw-r--r-- | gcc/fortran/scanner.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/scanner.c b/gcc/fortran/scanner.c index 48f148d..6e6017a 100644 --- a/gcc/fortran/scanner.c +++ b/gcc/fortran/scanner.c @@ -1840,11 +1840,11 @@ load_file (const char *filename, bool initial) && line[2] == (unsigned char) '\xBF'))) { int n = line[1] == (unsigned char) '\xBB' ? 3 : 2; - gfc_char_t *new = gfc_get_wide_string (line_len); + gfc_char_t *new_char = gfc_get_wide_string (line_len); - wide_strcpy (new, &line[n]); + wide_strcpy (new_char, &line[n]); gfc_free (line); - line = new; + line = new_char; len -= n; } |