diff options
author | Andreas Jaeger <aj@gcc.gnu.org> | 2005-05-17 19:02:38 +0200 |
---|---|---|
committer | Andreas Jaeger <aj@gcc.gnu.org> | 2005-05-17 19:02:38 +0200 |
commit | a0f94629e9ae74173a1c0a79d0d13ee65ea3f96a (patch) | |
tree | c41d1358c6475591fcbf1824b15f026e9019846b | |
parent | e21aff8abe2079837b599b4975c81b6dfe969a65 (diff) | |
download | gcc-a0f94629e9ae74173a1c0a79d0d13ee65ea3f96a.zip gcc-a0f94629e9ae74173a1c0a79d0d13ee65ea3f96a.tar.gz gcc-a0f94629e9ae74173a1c0a79d0d13ee65ea3f96a.tar.bz2 |
unit.c (get_unit): Mark argument as unused.
* io/unit.c (get_unit): Mark argument as unused.
(init_units): Avoid warning about signed comparision.
From-SVN: r99842
-rw-r--r-- | libgfortran/io/unit.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libgfortran/io/unit.c b/libgfortran/io/unit.c index 6f64825..9058665 100644 --- a/libgfortran/io/unit.c +++ b/libgfortran/io/unit.c @@ -248,7 +248,7 @@ find_unit (int n) * unit or the internal file. */ gfc_unit * -get_unit (int read_flag) +get_unit (int read_flag __attribute__ ((unused))) { if (ioparm.internal_unit != NULL) { @@ -289,7 +289,7 @@ void init_units (void) { gfc_unit *u; - int i; + unsigned int i; if (options.stdin_unit >= 0) { /* STDIN */ @@ -363,7 +363,7 @@ init_units (void) * set a 1 in the LSB and keep a running sum, stopping at MSB-1 bit. */ g.max_offset = 0; - for (i=0; i < sizeof(g.max_offset) * 8 - 1; i++) + for (i = 0; i < sizeof (g.max_offset) * 8 - 1; i++) g.max_offset = g.max_offset + ((gfc_offset) 1 << i); } |