* gas/m32r/high-1.[ds]: New testcase.

	* gas/m32r/m32r.exp: Run it.

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index fdb3f03..d2b4a1d 100644 (file)
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+Mon Sep  8 14:21:23 1997  Doug Evans  <dje@canuck.cygnus.com>
+
+       * gas/m32r/high-1.[ds]: New testcase.
+       * gas/m32r/m32r.exp: Run it.
+
 Mon Aug 25 11:04:24 1997  Doug Evans  <dje@canuck.cygnus.com>
 
        * gas/m32r/relax-1.[ds]: New testcase.

diff --git a/gas/testsuite/gas/m32r/.Sanitize b/gas/testsuite/gas/m32r/.Sanitize
index 79dc624..59b31ec 100644 (file)
--- a/gas/testsuite/gas/m32r/.Sanitize
+++ b/gas/testsuite/gas/m32r/.Sanitize
@@ -26,6 +26,8 @@ Things-to-keep:
 allinsn.exp
 allinsn.d
 allinsn.s
+high-1.d
+high-1.s
 m32r.exp
 relax-1.d
 relax-1.s

diff --git a/gas/testsuite/gas/m32r/high-1.s b/gas/testsuite/gas/m32r/high-1.s
new file mode 100644 (file)
index 0000000..8a5d1d1
--- /dev/null
+++ b/gas/testsuite/gas/m32r/high-1.s
@@ -0,0 +1,14 @@
+; Test high/shigh handling.
+
+foo:
+       seth r4,#high(foo+0x10000)
+       or3  r4,r4,#low(foo+0x10000)
+
+       seth r4,#high(0x12348765)
+       or3  r4,r4,#low(0x12348765)
+
+       seth r4,#shigh(0x12348765)
+       or3  r4,r4,#low(0x12348765)
+
+       seth r4,#shigh(0x87654321)
+       or3  r4,r4,#low(0x87654321)