diff options
| author | Kaveh R. Ghazi <ghazi@caip.rutgers.edu> | 1999-09-16 22:20:44 +0000 |
|---|---|---|
| committer | Kaveh Ghazi <ghazi@gcc.gnu.org> | 1999-09-16 22:20:44 +0000 |
| commit | 92a438d13c876561ee189d9eb274f2dd8151ac91 (patch) | |
| tree | 5e3393cc1483b31e95e58de4c913fd832b1ce906 /gcc/f/src.c | |
| parent | 7bd41ea6c8e6e08d4382230a82e6655c0d0ab477 (diff) | |
| download | gcc-92a438d13c876561ee189d9eb274f2dd8151ac91.zip gcc-92a438d13c876561ee189d9eb274f2dd8151ac91.tar.gz gcc-92a438d13c876561ee189d9eb274f2dd8151ac91.tar.bz2 | |
system.h (CTYPE_CONV, [...]): New macros.
* system.h (CTYPE_CONV, TOUPPER, TOLOWER): New macros. Use
CTYPE_CONV in all ctype macros.
* cccp.c (initialize_char_syntax): Use uppercase ctype macro
from system.h.
* cexp.y (initialize_random_junk): Likewise.
* c4x.c (c4x_interrupt_function_p, c4x_handle_pragma): Likewise.
* i370.c (handle_pragma): Likewise.
* i370.h (ASM_OUTPUT_LABELREF, ASM_OUTPUT_ASCII): Likewise.
* v850.c (override_options): Likewise.
* doprint.c (_doprnt): Likewise.
* fixinc/fixincl.c (main, quoted_file_exists, extract_quoted_files):
Likewise.
* fixinc/server.c (load_data): Likewise.
* fold-const.c (real_hex_to_f): Likewise.
* genattr.c (write_upcase, gen_attr): Likewise.
* genattrtab.c (convert_const_symbol_ref, evaluate_eq_attr,
write_upcase): Likewise.
* genemit.c (print_code): Likewise.
* genopinit.c (gen_insn): Likewise.
* genpeep.c (print_code): Likewise.
* genrecog.c (print_code): Likewise.
* optabs.c (init_libfuncs): Likewise.
ch:
* lex.c (maybe_downcase, getlc, handle_generic_pragma,
check_newline): Likewise.
f:
* bad.c (ffebad_finish): Likewise.
* fini.c (main): Likewise.
* intrin.c (ffeintrin_init_0): Likewise.
* lex.c (ffelex_hash_): Likewise.
* src.c (ffesrc_init_1): Likewise.
From-SVN: r29463
Diffstat (limited to 'gcc/f/src.c')
| -rw-r--r-- | gcc/f/src.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/gcc/f/src.c b/gcc/f/src.c index 7b23931..e434fbf 100644 --- a/gcc/f/src.c +++ b/gcc/f/src.c @@ -120,10 +120,10 @@ ffesrc_init_1 () } for (i = 'A'; i <= 'Z'; ++i) - ffesrc_tolower_[i] = tolower (i); + ffesrc_tolower_[i] = TOLOWER (i); for (i = 'a'; i <= 'z'; ++i) - ffesrc_toupper_[i] = toupper (i); + ffesrc_toupper_[i] = TOUPPER (i); ffesrc_check_symbol_ = (ffe_case_symbol () != FFE_caseNONE); @@ -153,7 +153,7 @@ ffesrc_init_1 () if (ffesrc_ok_match_init_lower_) for (i = 'a'; i <= 'z'; ++i) - ffesrc_char_match_init_[i] = toupper (i); + ffesrc_char_match_init_[i] = TOUPPER (i); else for (i = 'a'; i <= 'z'; ++i) ffesrc_char_match_init_[i] = FFESRC_INVALID_SYMBOL_CHAR_; @@ -164,21 +164,21 @@ ffesrc_init_1 () if (ffesrc_ok_match_noninit_lower_) for (i = 'a'; i <= 'z'; ++i) - ffesrc_char_match_noninit_[i] = toupper (i); + ffesrc_char_match_noninit_[i] = TOUPPER (i); else for (i = 'a'; i <= 'z'; ++i) ffesrc_char_match_noninit_[i] = FFESRC_INVALID_SYMBOL_CHAR_; if (ffe_case_source () == FFE_caseLOWER) for (i = 'A'; i <= 'Z'; ++i) - ffesrc_char_source_[i] = tolower (i); + ffesrc_char_source_[i] = TOLOWER (i); else if (ffe_case_source () == FFE_caseUPPER) for (i = 'a'; i <= 'z'; ++i) - ffesrc_char_source_[i] = toupper (i); + ffesrc_char_source_[i] = TOUPPER (i); if (ffe_case_match () == FFE_caseLOWER) for (i = 'A'; i <= 'Z'; ++i) - ffesrc_char_internal_init_[i] = tolower (i); + ffesrc_char_internal_init_[i] = TOLOWER (i); switch (ffe_case_symbol ()) { |