diff options
| author | steven <steven@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-07-07 11:59:29 +0000 |
|---|---|---|
| committer | steven <steven@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-07-07 11:59:29 +0000 |
| commit | 55c9782e173af23bb3e78eb9d1f4ee2810ce4da8 (patch) | |
| tree | e940d56cbd6a643436fdfdd05bd15d8ed752189d /gcc/fortran | |
| parent | 280566a7e7fa4e5436445b676a41507e8b6626db (diff) | |
| download | gcc-55c9782e173af23bb3e78eb9d1f4ee2810ce4da8.tar.gz | |
* primary.c (match_hollerith_constant): Use int, not unsigned int,
for the hollerith length. Fix indentation.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101707 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran')
| -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); |