aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJeff Law <law@redhat.com>1999-07-01 14:37:29 +0000
committerJeff Law <law@redhat.com>1999-07-01 14:37:29 +0000
commitb1c5e0ee59631e37ca448958be4d3aa8dc34aec1 (patch)
treee1367931d935c24e54f22d798d9243dfebd4435a
parent09ecf0ba55ac24adb15fa81dccaaba06f29f443e (diff)
downloadfsf-binutils-gdb-b1c5e0ee59631e37ca448958be4d3aa8dc34aec1.zip
fsf-binutils-gdb-b1c5e0ee59631e37ca448958be4d3aa8dc34aec1.tar.gz
fsf-binutils-gdb-b1c5e0ee59631e37ca448958be4d3aa8dc34aec1.tar.bz2
h
* config/tc-hppa.c (pa_ip): Convert the opcode and all completers into lower case.
-rw-r--r--gas/config/tc-hppa.c14
1 files changed, 6 insertions, 8 deletions
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)
{