From b1c5e0ee59631e37ca448958be4d3aa8dc34aec1 Mon Sep 17 00:00:00 2001 From: Jeff Law Date: Thu, 1 Jul 1999 14:37:29 +0000 Subject: h * config/tc-hppa.c (pa_ip): Convert the opcode and all completers into lower case. --- gas/config/tc-hppa.c | 14 ++++++-------- 1 file changed, 6 insertions(+), 8 deletions(-) (limited to 'gas') diff --git a/gas/config/tc-hppa.c b/gas/config/tc-hppa.c index 8307e20..f7f1fa9 100644 --- a/gas/config/tc-hppa.c +++ b/gas/config/tc-hppa.c @@ -1455,6 +1455,12 @@ pa_ip (str) pa_check_current_space_and_subspace (); #endif + /* Convert everything up to the first whitespace character into lower + case. */ + for (s = str; *s != ' ' && *s != '\t' && *s != '\n' && *s != '\0'; s++) + if (isupper (*s)) + *s = tolower (*s); + /* Skip to something interesting. */ for (s = str; isupper (*s) || islower (*s) || (*s >= '0' && *s <= '3'); ++s) ; @@ -1480,14 +1486,6 @@ pa_ip (str) save_s = str; - /* Convert everything into lower case. */ - while (*save_s) - { - if (isupper (*save_s)) - *save_s = tolower (*save_s); - save_s++; - } - /* Look up the opcode in the has table. */ if ((insn = (struct pa_opcode *) hash_find (op_hash, str)) == NULL) { -- cgit v1.1