summaryrefslogtreecommitdiff
path: root/sim/testsuite/sim/frv/mcpxrs.cgs
diff options
context:
space:
mode:
authorDave Brolley <brolley@redhat.com>2003-08-29 16:41:31 +0000
committerDave Brolley <brolley@redhat.com>2003-08-29 16:41:31 +0000
commit29f63e3a7cd1a6196021db84f330cfc5d4277f9f (patch)
tree1056bea2e5d045b9afb24a2e6b25081fea1b4fc7 /sim/testsuite/sim/frv/mcpxrs.cgs
parent8ada8fd2eed30b6843d326fc6a3606f4e9c6d21f (diff)
downloadgdb-29f63e3a7cd1a6196021db84f330cfc5d4277f9f.tar.gz
New sim testsuite for Fujitsu FRV. Contributed by Red Hat.
Diffstat (limited to 'sim/testsuite/sim/frv/mcpxrs.cgs')
-rw-r--r--sim/testsuite/sim/frv/mcpxrs.cgs115
1 files changed, 115 insertions, 0 deletions
diff --git a/sim/testsuite/sim/frv/mcpxrs.cgs b/sim/testsuite/sim/frv/mcpxrs.cgs
new file mode 100644
index 00000000000..1d62a96e7dc
--- /dev/null
+++ b/sim/testsuite/sim/frv/mcpxrs.cgs
@@ -0,0 +1,115 @@
+# frv testcase for mcpxrs $GRi,$GRj,$ACCk
+# mach: all
+
+ .include "testutils.inc"
+
+ start
+
+ .global mcpxrs
+mcpxrs:
+ ; Positive operands
+ set_fr_iimmed 2,4,fr7 ; multiply small numbers
+ set_fr_iimmed 3,5,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0xff,accg0
+ test_acc_immed -14,acc0
+
+ set_fr_iimmed 3,1,fr7 ; multiply by 0
+ set_fr_iimmed 2,0,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_immed 6,acc0
+
+ set_fr_iimmed 2,1,fr7 ; multiply by 1
+ set_fr_iimmed 1,1,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_immed 1,acc0
+
+ set_fr_iimmed 0x3fff,2,fr7 ; 15 bit result
+ set_fr_iimmed 2,0x0007,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_limmed 0,0x7ff0,acc0
+
+ set_fr_iimmed 0x4000,2,fr7 ; 16 bit result
+ set_fr_iimmed 2,0x2000,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_limmed 0x0000,0x4000,acc0
+
+ set_fr_iimmed 0x7fff,0x0000,fr7 ; max positive result
+ set_fr_iimmed 0x7fff,0x7fff,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_limmed 0x3fff,0x0001,acc0
+
+ ; Mixed operands
+ set_fr_iimmed 2,0xfffd,fr7 ; multiply small numbers
+ set_fr_iimmed 0xfffd,1,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0xff,accg0
+ test_acc_immed -3,acc0
+
+ set_fr_iimmed 0xfffe,2,fr7 ; multiply by 1
+ set_fr_iimmed 1,0xfffe,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_immed 2,acc0
+
+ set_fr_iimmed 0xfffe,0,fr7 ; multiply by 0
+ set_fr_iimmed 1,0xfffe,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0xff,accg0
+ test_acc_immed -2,acc0
+
+ set_fr_iimmed 0x2001,0xfffe,fr7 ; 15 bit result
+ set_fr_iimmed 0xfffe,0xfff9,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0xff,accg0
+ test_acc_limmed 0xffff,0xbff0,acc0
+
+ set_fr_iimmed 0x4000,0xfffe,fr7 ; 16 bit result
+ set_fr_iimmed 0xfffe,0x0003,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0xff,accg0
+ test_acc_limmed 0xffff,0x8006,acc0
+
+ set_fr_iimmed 0x7fff,0x8000,fr7 ; max negative result
+ set_fr_iimmed 0x8000,0x8000,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0xff,accg0
+ test_acc_limmed 0x8000,0x8000,acc0
+
+ set_fr_iimmed 0x8000,0x7fff,fr7 ; max positive result
+ set_fr_iimmed 0x8000,0x8000,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_limmed 0x7fff,0x8000,acc0
+
+ ; Negative operands
+ set_fr_iimmed 0xfffe,0xfffc,fr7 ; multiply small numbers
+ set_fr_iimmed 0xfffd,0xfffb,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0xff,accg0
+ test_acc_immed -14,acc0
+
+ set_fr_iimmed 0xffff,0xffff,fr7 ; multiply by -1
+ set_fr_iimmed 0xfffe,0xffff,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_immed 1,acc0
+
+ set_fr_iimmed 0x7fff,0x0000,fr7 ; almost max positive result
+ set_fr_iimmed 0x7fff,0x8001,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_immed 0x3fff0001,acc0
+
+ set_fr_iimmed 0x8000,0x0000,fr7 ; max positive result
+ set_fr_iimmed 0x8000,0x8000,fr8
+ mcpxrs fr7,fr8,acc0
+ test_accg_immed 0,accg0
+ test_acc_immed 0x40000000,acc0
+
+ pass