From 5f47d35be101be073ebdc0cb5ba78740042143cb Mon Sep 17 00:00:00 2001 From: Alan Modra Date: Sun, 29 Aug 1999 23:44:27 +0000 Subject: [PATCH] Allow spaces in i386 FP reg names, eg. %st ( 1 ). --- gas/ChangeLog | 6 ++++++ gas/config/tc-i386.c | 35 ++++++++++++++++++++++++++++++++-- gas/testsuite/ChangeLog | 4 ++++ gas/testsuite/gas/i386/white.l | 3 +++ gas/testsuite/gas/i386/white.s | 3 +++ include/opcode/ChangeLog | 6 ++++++ include/opcode/i386.h | 24 +++++++++++++---------- 7 files changed, 69 insertions(+), 12 deletions(-) diff --git a/gas/ChangeLog b/gas/ChangeLog index 8861565713f..6727babc238 100644 --- a/gas/ChangeLog +++ b/gas/ChangeLog @@ -1,3 +1,9 @@ +1999-08-29 Alan Modra + + Based on a patch from H.J. Lu + * config/tc-i386.c (parse_register): Handle FP regs specially. + (md_begin): Remove '(' and ')' from register_chars. + 1999-08-29 Doug Evans * config/tc-m32r.c (md_parse_option): Delete unrecognized option diff --git a/gas/config/tc-i386.c b/gas/config/tc-i386.c index a2c0bcc4d6e..085a4b9b3e7 100644 --- a/gas/config/tc-i386.c +++ b/gas/config/tc-i386.c @@ -703,8 +703,6 @@ md_begin () #ifdef LEX_AT identifier_chars['@'] = '@'; #endif - register_chars[')'] = ')'; - register_chars['('] = '('; digit_chars['-'] = '-'; identifier_chars['_'] = '_'; identifier_chars['.'] = '.'; @@ -4166,6 +4164,39 @@ parse_register (reg_string, end_op) r = (const reg_entry *) hash_find (reg_hash, reg_name_given); + /* Handle floating point regs, allowing spaces in the (i) part. */ + if (r == i386_regtab /* %st is first entry of table */) + { + --s; + if (is_space_char (*s)) + ++s; + if (*s == '(') + { + *p++ = *s++; + if (is_space_char (*s)) + ++s; + if (*s >= '0' && *s <= '7') + { + r = &i386_float_regtab[*s - '0']; + *p++ = *s++; + if (is_space_char (*s)) + ++s; + if (*s == ')') + { + *end_op = s + 1; + return r; + } + *p++ = *s; + } + if (!allow_naked_reg) + { + *p = '\0'; + as_bad (_("bad register name `%s'"), reg_name_given); + } + return (const reg_entry *) NULL; + } + } + if (r == NULL) { if (!allow_naked_reg) diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog index 824253d4064..2805e2c9fb0 100644 --- a/gas/testsuite/ChangeLog +++ b/gas/testsuite/ChangeLog @@ -1,3 +1,7 @@ +1999-08-29 Alan Modra + + * gas/i386/white.s, gas/i386/white.l: Add space in FP reg tests. + Sat Aug 28 00:16:12 1999 Jerry Quinn * gas/hppa/basic/basic.exp: Add new tests shift2.s, diff --git a/gas/testsuite/gas/i386/white.l b/gas/testsuite/gas/i386/white.l index 1ce6161fc98..c2d9157a224 100644 --- a/gas/testsuite/gas/i386/white.l +++ b/gas/testsuite/gas/i386/white.l @@ -19,3 +19,6 @@ GAS LISTING .* 16 0022 66B81300 0000 Mov \$ foo , %eAx 17 .Code32 18 0028 66B81300 mov \$ foo , %ax + 19 + 20 002c D9C9 fxch %st \( 1 \) + 21 002e D9C9 fxch % st\(1\) diff --git a/gas/testsuite/gas/i386/white.s b/gas/testsuite/gas/i386/white.s index 3bf50705ff5..11eccfbabb9 100644 --- a/gas/testsuite/gas/i386/white.s +++ b/gas/testsuite/gas/i386/white.s @@ -16,3 +16,6 @@ foo: jmpw % es : * ( % ebx ) Mov $ foo , %eAx .Code32 mov $ foo , %ax + + fxch %st ( 1 ) + fxch % st(1) diff --git a/include/opcode/ChangeLog b/include/opcode/ChangeLog index d59e716cc46..ef0da73bff3 100644 --- a/include/opcode/ChangeLog +++ b/include/opcode/ChangeLog @@ -1,3 +1,9 @@ +1999-08-29 Alan Modra + + * i386.h (i386_regtab): Move %st to top of table, and split off + other fp reg entries. + (i386_float_regtab): To here. + Sat Aug 28 00:25:25 1999 Jerry Quinn * hppa.h (pa_opcodes): Replace 'f' by 'v'. Prefix float register args diff --git a/include/opcode/i386.h b/include/opcode/i386.h index 3df27f212df..7e3a56464bb 100644 --- a/include/opcode/i386.h +++ b/include/opcode/i386.h @@ -1061,6 +1061,8 @@ static const template i386_optab[] = { /* 386 register table */ static const reg_entry i386_regtab[] = { + /* make %st first as we test for it */ + {"st", FloatReg|FloatAcc, 0}, /* 8 bit regs */ {"al", Reg8|Acc, 0}, {"cl", Reg8|ShiftCount, 1}, @@ -1130,16 +1132,7 @@ static const reg_entry i386_regtab[] = { {"tr5", Test, 5}, {"tr6", Test, 6}, {"tr7", Test, 7}, - /* float registers */ - {"st(0)", FloatReg|FloatAcc, 0}, - {"st", FloatReg|FloatAcc, 0}, - {"st(1)", FloatReg, 1}, - {"st(2)", FloatReg, 2}, - {"st(3)", FloatReg, 3}, - {"st(4)", FloatReg, 4}, - {"st(5)", FloatReg, 5}, - {"st(6)", FloatReg, 6}, - {"st(7)", FloatReg, 7}, + /* mmx and simd registers */ {"mm0", RegMMX, 0}, {"mm1", RegMMX, 1}, {"mm2", RegMMX, 2}, @@ -1158,6 +1151,17 @@ static const reg_entry i386_regtab[] = { {"xmm7", RegXMM, 7} }; +static const reg_entry i386_float_regtab[] = { + {"st(0)", FloatReg|FloatAcc, 0}, + {"st(1)", FloatReg, 1}, + {"st(2)", FloatReg, 2}, + {"st(3)", FloatReg, 3}, + {"st(4)", FloatReg, 4}, + {"st(5)", FloatReg, 5}, + {"st(6)", FloatReg, 6}, + {"st(7)", FloatReg, 7} +}; + #define MAX_REG_NAME_SIZE 8 /* for parsing register names from input */ /* segment stuff */ -- 2.30.2