* gas/alpha/fp.*: New files.

* lib/gas-defs.exp (regexp_diff): Report noted mismatch at
verbosity level 3 or above only.

diff --git a/gas/testsuite/gas/alpha/fp.d b/gas/testsuite/gas/alpha/fp.d
new file mode 100644 (file)
index 0000000..1c97216
--- /dev/null
+++ b/gas/testsuite/gas/alpha/fp.d
@@ -0,0 +1,10 @@
+
+.*:     file format ecoff-littlealpha
+
+Contents of section .reginfo:
+ [0-9 .]*
+ [0-9A-Z .]*
+Contents of section .rdata:
+ 0000 71a37909 4f930a40 5441789a cd4b881b  q.y.O..@TAx..K..
+ 0010 2a404f93 790971a3 789a5440 5441789a  \*@O.y.q.x.T@TAx.
+ 0020 00000000 00000000 00000000 00000000  ................

diff --git a/gas/testsuite/gas/alpha/fp.exp b/gas/testsuite/gas/alpha/fp.exp
new file mode 100644 (file)
index 0000000..5517dcf
--- /dev/null
+++ b/gas/testsuite/gas/alpha/fp.exp
@@ -0,0 +1,16 @@
+#
+# SunOS4 on SPARC tests
+#
+
+if [istarget alpha-*-osf1*] then {
+    set testname "fp constants (part 2)"
+    if [gas_test_old "fp.s" "" "fp constants (part 1)"] then {
+       objdump_start_no_subdir "a.out > a.dump" "-s"
+       objdump_finish
+       if { [regexp_diff "a.dump" "$srcdir/$subdir/fp.d"] == 0 } then {
+           pass $testname
+       } else {
+           fail $testname
+       }
+    }
+}