diff options
| author | Kaveh R. Ghazi <ghazi@caip.rutgers.edu> | 1998-09-30 16:34:45 +0000 |
|---|---|---|
| committer | Kaveh Ghazi <ghazi@gcc.gnu.org> | 1998-09-30 16:34:45 +0000 |
| commit | 5efaf7b00ee3751680bffd751fa86eed6007c46a (patch) | |
| tree | 7810d6f845ef11b472b49bcda7839846716a29be /gcc/ch/inout.c | |
| parent | 5abb0464be9c333dc30d10aed65964005857f5ca (diff) | |
| download | gcc-5efaf7b00ee3751680bffd751fa86eed6007c46a.zip gcc-5efaf7b00ee3751680bffd751fa86eed6007c46a.tar.gz gcc-5efaf7b00ee3751680bffd751fa86eed6007c46a.tar.bz2 | |
Warning fixes:
* actions.c (id_cmp): Do pointer arithmetic as `long' not `int' to
ensure enough bits for calculation.
* ch-tree.h (check_text_length): Remove unused parameter.
* convert.c (display_int_cst): Cast a HOST_WIDE_INT argument to
function sprintf into the appropriate type for printing.
* decl.c (print_lang_decl): Use HOST_WIDE_INT_PRINT_DEC as the
format specifier.
(print_mode): Likewise.
(init_decl_processing): Cast the arguments of bcopy/bzero to char *.
* grant.c (grant_array_type): Use HOST_WIDE_INT_PRINT_DEC as
the format specifier.
* inout.c (check_text_length): Remove unused parameter `type'.
(build_chill_associate): Initialize variables `arg1', `arg2',
`arg3', `arg4' and `arg5'.
(build_chill_modify): Likewise.
(scanformcont): Change type of variable `curr' to `unsigned char'.
* lex.c (maybe_downcase): Cast the argument of `tolower' to
`unsigned char'.
* satisfy.c (satisfy): Remove unused parameter in call to
`check_text_length'.
* tasking.c (generate_tasking_code_variable): Pass a HOST_WIDE_INT
as a `long' in call to function `error'.
(decl_tasking_code_variable): Likewise.
From-SVN: r22679
Diffstat (limited to 'gcc/ch/inout.c')
| -rw-r--r-- | gcc/ch/inout.c | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/gcc/ch/inout.c b/gcc/ch/inout.c index 2c5f628..c9af816 100644 --- a/gcc/ch/inout.c +++ b/gcc/ch/inout.c @@ -1615,8 +1615,8 @@ build_text_mode (textlength, indexmode, dynamic) } tree -check_text_length (type, length) - tree type, length; +check_text_length (length) + tree length; { if (length == NULL_TREE || TREE_CODE (length) == ERROR_MARK) return length; @@ -1750,7 +1750,8 @@ build_chill_associate (assoc, fname, attr) tree fname; tree attr; { - tree arg1, arg2, arg3, arg4, arg5, arg6, arg7; + tree arg1 = NULL_TREE, arg2 = NULL_TREE, arg3 = NULL_TREE, arg4 = NULL_TREE, + arg5 = NULL_TREE, arg6, arg7; int had_errors = 0; tree result; @@ -1982,7 +1983,8 @@ build_chill_modify (assoc, list) tree assoc; tree list; { - tree arg1, arg2, arg3, arg4, arg5, arg6, arg7; + tree arg1 = NULL_TREE, arg2 = NULL_TREE, arg3 = NULL_TREE, arg4 = NULL_TREE, + arg5 = NULL_TREE, arg6, arg7; int had_errors = 0, numargs; tree fname = NULL_TREE, attr = NULL_TREE; tree result; @@ -3898,7 +3900,7 @@ scanformcont (fcs, len, fcsptr, lenptr, exprlist, exprptr, int *nextargnum; { fcsstate_t state = FormatText; - char curr; + unsigned char curr; int dig; while (len--) |