diff options
| author | Steven Bosscher <stevenb@suse.de> | 2005-07-07 11:59:29 +0000 |
|---|---|---|
| committer | Steven Bosscher <steven@gcc.gnu.org> | 2005-07-07 11:59:29 +0000 |
| commit | 24bce1fd23b566afbcb00d08b287640b2e9d67d8 (patch) | |
| tree | e940d56cbd6a643436fdfdd05bd15d8ed752189d /gcc/fortran/primary.c | |
| parent | 8ddf681af74e5404974fb47b0b9874de49a3b07d (diff) | |
| download | gcc-24bce1fd23b566afbcb00d08b287640b2e9d67d8.zip gcc-24bce1fd23b566afbcb00d08b287640b2e9d67d8.tar.gz gcc-24bce1fd23b566afbcb00d08b287640b2e9d67d8.tar.bz2 | |
primary.c (match_hollerith_constant): Use int, not unsigned int, for the hollerith length.
* primary.c (match_hollerith_constant): Use int, not unsigned int,
for the hollerith length. Fix indentation.
From-SVN: r101707
Diffstat (limited to 'gcc/fortran/primary.c')
| -rw-r--r-- | gcc/fortran/primary.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/primary.c b/gcc/fortran/primary.c index 1f8305b..f6807d5 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); |