OSDN Git Service

* config/tc-hppa.c (hppa_symbol_chars): Remove `,' and `!'.
authordanglin <danglin>
Wed, 21 May 2003 19:40:53 +0000 (19:40 +0000)
committerdanglin <danglin>
Wed, 21 May 2003 19:40:53 +0000 (19:40 +0000)
* testsuite/gas/hppa/parse/parse.exp: Add "space.s".
* testsuite/gas/hppa/parse/space.s: New file to test spaces.

gas/ChangeLog
gas/config/tc-hppa.c
gas/testsuite/ChangeLog
gas/testsuite/gas/hppa/parse/parse.exp
gas/testsuite/gas/hppa/parse/space.s [new file with mode: 0644]

index c0e2ee0..fe9d11f 100644 (file)
@@ -1,3 +1,7 @@
+2003-05-21  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
+
+       * tc-hppa.c (hppa_symbol_chars): Remove `,' and `!'.
+
 2003-05-21  Nick Clifton  <nickc@redhat.com>
 
         * config/obj-elf.c: Include dwarf2dbg.h.
index 3212ead..39da02e 100644 (file)
@@ -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
index 6a4114f..794686f 100644 (file)
@@ -1,3 +1,8 @@
+2003-05-21  H.J. Lu <hongjiu.lu@intel.com>
+
+       * gas/hppa/parse/parse.exp: Add "space.s".
+       * gas/hppa/parse/space.s: New file to test spaces.
+
 2003-05-20  Jason Eckhardt  <jle@rice.edu>
 
        * gas/i860/branch.{s,d}: New files.
index 6a7c425..463c48f 100644 (file)
@@ -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 (file)
index 0000000..2e37e7e
--- /dev/null
@@ -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)