diff options
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/primary.c | 6 |
2 files changed, 8 insertions, 3 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index d897396c42b..8b23d570e9c 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,8 @@ +2005-07-07 Steven Bosscher <stevenb@suse.de> + + * primary.c (match_hollerith_constant): Use int, not unsigned int, + for the hollerith length. Fix indentation. + 2005-07-07 Feng Wang <fengwang@nudt.edu.cn> PR fortran/16531 diff --git a/gcc/fortran/primary.c b/gcc/fortran/primary.c index 1f8305bf7b4..f6807d5ec32 100644 --- a/gcc/fortran/primary.c +++ b/gcc/fortran/primary.c @@ -237,8 +237,8 @@ match_hollerith_constant (gfc_expr ** result) gfc_expr * e = NULL; const char * msg; char * buffer; - unsigned int num; - unsigned int i; + int num; + int i; old_loc = gfc_current_locus; gfc_gobble_whitespace (); @@ -271,7 +271,7 @@ match_hollerith_constant (gfc_expr ** result) } else { - buffer = (char *)gfc_getmem (sizeof(char)*num+1); + buffer = (char *) gfc_getmem (sizeof(char) * num + 1); for (i = 0; i < num; i++) { buffer[i] = gfc_next_char_literal (1); |