From 85c77c383f623ece2c4cbb485bf74848e766edf3 Mon Sep 17 00:00:00 2001 From: Dave Anglin Date: Wed, 21 May 2003 19:40:54 +0000 Subject: [PATCH] * config/tc-hppa.c (hppa_symbol_chars): Remove `,' and `!'. * testsuite/gas/hppa/parse/parse.exp: Add "space.s". * testsuite/gas/hppa/parse/space.s: New file to test spaces. --- gas/ChangeLog | 4 ++++ gas/config/tc-hppa.c | 6 ++++-- gas/testsuite/ChangeLog | 5 +++++ gas/testsuite/gas/hppa/parse/parse.exp | 3 +++ gas/testsuite/gas/hppa/parse/space.s | 24 ++++++++++++++++++++++++ 5 files changed, 40 insertions(+), 2 deletions(-) create mode 100644 gas/testsuite/gas/hppa/parse/space.s diff --git a/gas/ChangeLog b/gas/ChangeLog index c0e2ee05d59..fe9d11fd970 100644 --- a/gas/ChangeLog +++ b/gas/ChangeLog @@ -1,3 +1,7 @@ +2003-05-21 John David Anglin + + * tc-hppa.c (hppa_symbol_chars): Remove `,' and `!'. + 2003-05-21 Nick Clifton * config/obj-elf.c: Include dwarf2dbg.h. diff --git a/gas/config/tc-hppa.c b/gas/config/tc-hppa.c index 3212ead8229..39da02ed17e 100644 --- a/gas/config/tc-hppa.c +++ b/gas/config/tc-hppa.c @@ -622,8 +622,10 @@ static struct call_desc last_call_desc; /* handle of the OPCODE hash table */ static struct hash_control *op_hash = NULL; -/* Those characters can be suffixes of opcode names. */ -const char hppa_symbol_chars[] = ",*!?=<>"; +/* These characters can be suffixes of opcode names and they may be + followed by meaningful whitespace. We don't include `,' and `!' + as they never appear followed by meaningful whitespace. */ +const char hppa_symbol_chars[] = "*?=<>"; /* Table of pseudo ops for the PA. FIXME -- how many of these are now redundant with the overall GAS and the object file diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog index 6a4114f52f6..794686f0b24 100644 --- a/gas/testsuite/ChangeLog +++ b/gas/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2003-05-21 H.J. Lu + + * gas/hppa/parse/parse.exp: Add "space.s". + * gas/hppa/parse/space.s: New file to test spaces. + 2003-05-20 Jason Eckhardt * gas/i860/branch.{s,d}: New files. diff --git a/gas/testsuite/gas/hppa/parse/parse.exp b/gas/testsuite/gas/hppa/parse/parse.exp index 6a7c4251301..463c48f1591 100644 --- a/gas/testsuite/gas/hppa/parse/parse.exp +++ b/gas/testsuite/gas/hppa/parse/parse.exp @@ -222,5 +222,8 @@ if [istarget hppa*-*-*] then { # Check for bogus registers in single precision fmpyadd/fmpysub # instructions gas_test_error "badfmpyadd.s" "" "Check for error on bad fmpyadd insn" + + # Make sure we grok spaces in directives. + gas_test "space.s" "" "" "Test acceptance of spaces in directives" } diff --git a/gas/testsuite/gas/hppa/parse/space.s b/gas/testsuite/gas/hppa/parse/space.s new file mode 100644 index 00000000000..2e37e7e0aa0 --- /dev/null +++ b/gas/testsuite/gas/hppa/parse/space.s @@ -0,0 +1,24 @@ + .code + .align 4 + .export $$mulI, millicode + .proc + .callinfo millicode +$$mulI: + .procend + + .code + + .align 4 + .PARAM foo, RTNVAL=GR +foo: + .PROC + .CALLINFO FRAME=128, NO_CALLS, ENTRY_GR=3, ENTRY_FR=12 + .ENTRY + bv,n %r0(%r2) + .EXIT + .PROCEND + + .align 4 + .import yabba, code + + ble R%yabba(%sr4, %r0) -- 2.30.2